fl202 发表于 2018-1-30 14:09:56

yoyoho 发表于 2013-6-25 08:13
;;; ------------------------------------------------------------------
;;; jdx2 画截断双线
(defun...

个人意见：
(setq ptt (polar pt1 (- ang (/ pi 2)) (* 1 scale)))
改为
(setq ptt (polar pt1 (- ang (/ pi 2)) (* 6 scale)))
比较合适。

(setq scale 50)
比较合适。

yoyoho 发表于 2018-1-30 22:32:21

fl202 发表于 2018-1-30 14:09
个人意见：
(setq ptt (polar pt1 (- ang (/ pi 2)) (* 1 scale)))
改为


谢谢您的建议!!!!!

zhangrunze 发表于 2024-5-13 14:58:37

yoyoho 发表于 2013-6-25 08:13
;;; ------------------------------------------------------------------
;;; jdx2 画截断双线
(defun...

感谢分享优质代码~
能自动折线比例就好了~
页: 1 [2]
查看完整版本: 求一个方便实用的画CAD双折断线的程序