pxt2001
发表于 2011-8-28 10:17:14
云线经常用到,
画图的,修改图纸是家常便饭,云线是必不可少的工具。
kwok
发表于 2011-9-4 18:16:42
不错,又一学习了.
qcw911
发表于 2011-10-20 14:51:49
(defun c:yu()
(setq os (getvar "osmode"))
(setvar "osmode" 0)
(setq cm (getvar "cmdecho"))
(setvar "cmdecho" 0 )
(command "color" 1)
(setq pt1 (getpoint"選擇第一點:"))
(setq pt2 (getpoint pt1"\n選擇第一點:"))
(command "_rectang" pt1 pt2)
(setq en1 (entlast))
(command"_revcloud" "o" "" en1 "N")
(setvar "osmode" os)
(setvar "cmdecho" cm)
)
yoyoho
发表于 2011-10-20 15:12:32
感谢 qcw911 楼主分享程序 < 谢谢! >
GamIng
发表于 2011-10-21 16:48:41
LIFEI18 发表于 2011-1-29 20:22 static/image/common/back.gif
使用COMMAND函数掉用CAD本身画云线命令,将最后生成的对象转换成云线,就行了,
(command "_.rectang" p ...
这程序虽然看起来简单,但是确实很适用呀!
zzc83
发表于 2011-10-31 22:26:54
是啊 比云线好用多了
461045462
发表于 2011-11-17 08:11:16
云线用的不多,还是收藏了。
学习到新的东西
谢谢楼上各位
freefeng
发表于 2012-2-1 10:02:46
好用的程序!谢一个!
lifenwei
发表于 2012-3-15 09:00:08
感谢分享了
smartstar
发表于 2012-5-5 23:46:28
原来也可以这样。