[求助]：如何将lisp作为透明命令使用？

fl202 · 发表于 2009-3-12 08:28:08

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

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

×

如在使用命令的时候调整某些系统变量，或者实现如下的功能：
比如移动或者复制的时候，选取完毕操作对象和基点后，选取目标点的时候，我们用距离某个参照物多少的距离来定位这个目标点，比如旁边的某个直线，距离他端点或者中点的100的距离为目标点。

taner · 发表于 2009-3-13 08:17:27

代碼中不要用COMMAND或VL-CMDF就行.

fl202 · 发表于 2009-3-13 14:44:12

(defun c:1t()
  (setq pt1 (getpoint "\n 请输入参考点："))
  (setq pt2 (getpoint pt1 "\n 请确定目标点："))
  )
这样行吗？我试验了下怎么不行？
比如复制命令copy，选取完复制对象和基点，当要求输入复制到的目标点的时候，我想先点选一个参考点，输入一个距离然后算出目标点的位置，将此值返回给copy。可是实现不了。

HSXTJD · 发表于 2009-3-16 15:36:16

copy本来就有这个选项

账号		自动登录	找回密码
密码			立即注册

[求助] [求助]：如何将lisp作为透明命令使用？

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

相关帖子