啊业_48384 发表于 2015-8-24 16:35:23

有什么可以把圆孔坐标转X+,X-,Y+,Y-要有小数的方法?

本帖最后由 啊业_48384 于 2015-8-24 16:38 编辑

有什么可以把圆孔坐标转X+,X-,Y+,Y-要有小数的方法?


如:X+10.000 Y+10.000
      X-10.000 Y-10.000

......

有没有那位大哥大姐,可帮写个lisp程式?

ZZXXQQ 发表于 2015-8-24 16:40:34

(entmod (subst (cons 10 (mapcar '+ (cdr(assoc 10 (setq ent (entget(car(entsel "\n选择圆: ")))))) '(10.0 10.0))) (assoc 10 ent) ent))
页: [1]
查看完整版本: 有什么可以把圆孔坐标转X+,X-,Y+,Y-要有小数的方法?