帮忙改下双向偏移的代码

KEwb · 发表于 2024-6-23 11:58:41

这个是在论坛上看到的，求大神帮忙将偏移距离固定为150，输入命令后直接执行不用输入距离了

kwok · 发表于 2024-6-23 11:58:42

  (if (null *dd) (setq *dd 0.5))
  (setq dd (getdist "请输入偏移距离："))
  (if (null dd) (setq dd *dd))
上面3行删掉改为 (setq dd 150)

KEwb · 发表于 2024-6-23 14:32:43

kwok 发表于 2024-6-23 11:58
(if (null *dd) (setq *dd 0.5))
(setq dd (getdist "请输入偏移距离："))
(if (null dd) (setq dd ...

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