hpbqqq 发表于 2016-6-3 09:15:29

求大神帮忙啊~~

求帮忙写个程序，要以下功能：
如我已经加载了“平法之拉移随心.VLX”。输入命令GBJ后还要输入V去量取长度。现在想要的就是一个命令就能实现这两个命令。
类似 (DEFUN C:A1() (COMMAND "OFFSET" "100"))只要输入A1就能实现偏移100.

微笑忘记过去 发表于 2016-6-3 16:59:22

你真够懒的，这么简单的功能你自己已经可以写出来了。

1993063 发表于 2016-6-4 23:13:45

(Defun Offset ( DIST )
(Command "OFFSET"dist)
(while ( /= (Getvar 'cmdactive) 0)(Command pause))
)
(Defun C:o1 nil(Offset 1))
页: [1]
查看完整版本: 求大神帮忙啊~~