[求助]谁能编辑一个反选的LSP文件?像Photoshp一样的程序.

gcb998

选取一选择集后反选其他物体，还有可以加一个偏移程序,
选择一对象输入偏移数据后,分别向两侧偏移希望全面兼容R14,
希望高手指点,我在此为所有CAD用户谢谢您了!
                                敬礼!

xyp1964

2. (load "xyp_lib")
3. ;|加载通用函数(可在签名栏直接下载)
4. 如果已经下载xyp_lib并放到搜索路径下可以不再下载!
5. 利用以下任何一种方式即可加载和运行通用函数内的所有子程序：
6. 1.在acad.lsp中增加(load"xyp_lib")
7. 2.在每个程序内增加(load"xyp_lib")
8. 3.在command下，输入(load"xyp_lib")
9. 4.在菜单.mnl中增加(load"xyp_lib")
10. 5.将xyp_lib.vlx文件直接拽到cad屏幕
11. [COLOR=red] ★通用函数下载地址：[/COLOR]
12. [url]http://www.xdcad.net/forum/attachment.php?s=&postid=1606661[/url]
13. [url]http://bbs.mjtd.com/forum.php?mod=viewthread&tid=37554[/url]|;
14. (defun c:test ()
15.   (CMDLA0)
16.   (princ "\选择")
17.   (setq ss1 (ssget "X")
18. ss2 (ssget)
19.   )
20.   (command "select" ss1 "r" ss2 "")
21.   (setq ss (ssget "P"))
22.   (XYP_LX ss)
23.   (CMDLA1)
24. )

(load "xyp_lib") ;|加载通用函数(可在签名栏直接下载) 如果已经下载xyp_lib并放到搜索路径下可以不再下载! 利用以下任何一种方式即可加载和运行通用函数内的所有子程序： 1.在acad.lsp中增加(load"xyp_lib") 2.在每个程序内增加(load"xyp_lib") 3.在command下，输入(load"xyp_lib") 4.在菜单.mnl中增加(load"xyp_lib") 5.将xyp_lib.vlx文件直接拽到cad屏幕 [COLOR=red] ★通用函数下载地址：[/COLOR] [url]http://www.xdcad.net/forum/attachment.php?s=&postid=1606661[/url] [url]http://bbs.mjtd.com/forum.php?mod=viewthread&tid=37554[/url]|; (defun c:test ()   (CMDLA0)   (princ "\选择")   (setq ss1 (ssget "X") ss2 (ssget)   )   (command "select" ss1 "r" ss2 "")   (setq ss (ssget "P"))   (XYP_LX ss)   (CMDLA1) )

gcb998

楼主写的程序出现下面的问题,如何解决,

Error: null function*Cancel*

你的dh01.VLX程序里面没有两侧偏移的程序,可以编一个R14下的吗?

我在MDT中用过此程序,所以题出来,希望能解决?

 

aeo000000

选择后

打 "r" "p"

EX: move 选择 .. "r""p" 回车 ...

无惢

没弄懂怎么加载和用