找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 3057|回复: 30

[原创] LISP编程经验点滴(一)程序结构

[复制链接]

已领礼包: 51个

财富等级: 招财进宝

发表于 2013-8-6 20:39:28 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
我写LISP程序,一般先把下面代码敲出来

  1. (defun tt()
  2.     (if (and
  3.             (setq ss (ssget)) or (setq e (entsel "\n提示"))
  4.             ....
  5.         )
  6.        (progn
  7.        )
  8.     )
  9.     (princ)
  10. )

然后根据需要再扩充了。

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
发表于 2013-8-6 21:03:56 | 显示全部楼层
我直接用宏!不要手打啦

点评

你宏打出来的是什么样的?  详情 回复 发表于 2013-8-6 21:13
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 1 反对 0

使用道具 举报

发表于 2013-8-6 21:07:32 | 显示全部楼层
偶滴
  1. (defun c:tt (/ oldxxx) ;_变量一定要收集
  2.   (if (and . . . .)
  3.     (progn
  4.       (setq oldxxx (getvar sysvar));_根据需要是否必要保留
  5.       (vl-catch-all-apply
  6. (function (lambda (/)
  7.     )
  8. )
  9.       )
  10.       (setvar sysvar oldxxx)
  11.     )
  12.   )
  13.   (princ)
  14. )

论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 145个

财富等级: 日进斗金

发表于 2013-8-6 21:13:40 | 显示全部楼层
wowan1314 发表于 2013-8-6 21:03
我直接用宏!不要手打啦

你宏打出来的是什么样的?

点评

如下图! 感觉好算省事!  详情 回复 发表于 2013-8-6 21:29
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2013-8-6 21:29:00 | 显示全部楼层
本帖最后由 wowan1314 于 2013-8-7 12:28 编辑
XDSoft 发表于 2013-8-6 21:13
你宏打出来的是什么样的?

如下图! 感觉还算省事!

11111.gif

点评

wowan, 应该给大家多普及普及这个,太方便了。  详情 回复 发表于 2013-8-6 21:41
哦滴个神,忒强大了!省码多少代码啊  详情 回复 发表于 2013-8-6 21:35
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2013-8-6 21:35:56 | 显示全部楼层
wowan1314 发表于 2013-8-6 21:29
如下图! 感觉还算省事!

哦滴个神,忒强大了!省码多少代码啊{:soso_e102:}

点评

这个是“文本片段”的功能。可以在自定义的各个表达式间跳转。 也可以当宏来使用!我只想到把它当宏来用。还没彻底了解这个功能!  详情 回复 发表于 2013-8-6 21:42
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 145个

财富等级: 日进斗金

发表于 2013-8-6 21:41:11 | 显示全部楼层
wowan1314 发表于 2013-8-6 21:29
如下图! 感觉还算省事!

wowan, 应该给大家多普及普及这个,太方便了。

点评

就是我推荐的EE呀。下个版本更强大了。要加入提示函数怎么用的功能。 本来就有 函数自动提示的功能。。 要加入的是 输入函数后 提示你这个函数的功能 并提示你需要的 参数类型 和个数  详情 回复 发表于 2013-8-6 21:44
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2013-8-6 21:42:08 | 显示全部楼层
Free-Lancer 发表于 2013-8-6 21:35
哦滴个神,忒强大了!省码多少代码啊

这个是“文本片段”的功能。可以在自定义的各个表达式间跳转。

也可以当宏来使用!我只想到把它当宏来用。还没彻底了解这个功能!
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2013-8-6 21:44:52 | 显示全部楼层
本帖最后由 wowan1314 于 2013-8-6 21:47 编辑
XDSoft 发表于 2013-8-6 21:41
wowan, 应该给大家多普及普及这个,太方便了。

就是我推荐的EE呀。下个版本更强大了。要加入提示函数怎么用的功能。

本来就有实时 函数自动完成的功能。。  要加入的是 输入函数后 提示你这个函数的功能 并提示你需要的 参数类型 和个数

类似这样!

类似这样!

点评

知道你推荐过,如果有空,再多发发这个编辑器的经验帖子吧。一个程序员离不开一个好的编辑器。  详情 回复 发表于 2013-8-6 21:47
帮看看XDRX_API的函数能加进去不?  详情 回复 发表于 2013-8-6 21:46
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 145个

财富等级: 日进斗金

发表于 2013-8-6 21:46:02 | 显示全部楼层
wowan1314 发表于 2013-8-6 21:44
就是我推荐的EE呀。下个版本更强大了。要加入提示函数怎么用的功能。

本来就有实时 函数自动完成的功 ...

帮看看XDRX_API的函数能加进去不?{:soso_e166:}

点评

嗯。等下个版本出来后,我把XD_API也弄进语法文件。再发帖尽可能的介绍下用法。  详情 回复 发表于 2013-8-6 21:50
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 145个

财富等级: 日进斗金

发表于 2013-8-6 21:47:33 | 显示全部楼层
wowan1314 发表于 2013-8-6 21:44
就是我推荐的EE呀。下个版本更强大了。要加入提示函数怎么用的功能。

本来就有实时 函数自动完成的功 ...

知道你推荐过,如果有空,再多发发这个编辑器的经验帖子吧。一个程序员离不开一个好的编辑器。
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2013-8-6 21:50:18 | 显示全部楼层
XDSoft 发表于 2013-8-6 21:46
帮看看XDRX_API的函数能加进去不?

嗯。等下个版本出来后,我把XD_API也弄进语法文件。再发帖尽可能的介绍下用法。

点评

XD APIer 有福了,先谢谢了。  详情 回复 发表于 2013-8-6 21:52
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 145个

财富等级: 日进斗金

发表于 2013-8-6 21:52:09 | 显示全部楼层
wowan1314 发表于 2013-8-6 21:50
嗯。等下个版本出来后,我把XD_API也弄进语法文件。再发帖尽可能的介绍下用法。

XD APIer 有福了,先谢谢了。

点评

新的版本估计得9月多才能出来。 所以先简单的做个包含XDRX函数语法文件,及查询函数帮助文件 让使用EE的XD APIer先将就用吧。。 语法文件总收录XD-API函数627个。  详情 回复 发表于 2013-8-7 00:09
老大太客气了。。 本来我自己也要使用的撒。 大家好才是真的好。 呵呵!  详情 回复 发表于 2013-8-6 21:57
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

发表于 2013-8-6 21:57:54 | 显示全部楼层
XDSoft 发表于 2013-8-6 21:52
XD APIer 有福了,先谢谢了。

老大太客气了。。 本来我自己也要使用的撒。

大家好才是真的好。 呵呵!

点评

你好 我好 她更好 呵呵  详情 回复 发表于 2013-8-6 22:44
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

已领礼包: 19个

财富等级: 恭喜发财

发表于 2013-8-6 22:44:25 | 显示全部楼层
wowan1314 发表于 2013-8-6 21:57
老大太客气了。。 本来我自己也要使用的撒。

大家好才是真的好。 呵呵!

你好 我好 她更好 呵呵
论坛插件加载方法
发帖求助前要善用【论坛搜索】功能,那里可能会有你要找的答案;
如果你在论坛求助问题,并且已经从坛友或者管理的回复中解决了问题,请把帖子标题加上【已解决】;
如何回报帮助你解决问题的坛友,一个好办法就是给对方加【D豆】,加分不会扣除自己的积分,做一个热心并受欢迎的人!
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|申请友链|Archiver|手机版|小黑屋|辽公网安备|晓东CAD家园 ( 辽ICP备15016793号 )

GMT+8, 2024-11-15 15:04 , Processed in 0.223742 second(s), 65 queries , Gzip On.

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表