记忆拉伸
记忆距离拉伸功能。。 You should use getpoint basepoint (p1), then, getpoint p2 for distance. Show you can save this vector for next use 骗子 别下了根本不好用会移动选择的物体 这个拉伸命令的增强功能可以有 付图片,,,,,, 这种帖子早就有了,不过支持下 我觉得这个好用些,但不能用鼠标点取距离,你的可以,各有千秋;记忆拉伸(注册 2012.09.24)(defun c:s1(/ s_disyd)
(setvar "ORTHOMODE" 1)
(command ".STRETCH" (ssget) "")
(command (setq basicpoint (getpoint "\n指定基点:")))
(if (= nil s_dis_allyd)
(progn (setq s_dis_allyd (getreal "\n输入拉伸距离:"))
(command s_dis_allyd))
(progn (setq s_disyd (getreal (strcat "\n输入拉伸距离<"(rtos s_dis_allyd 2 4))))
(if (= nil s_disyd)
(setq s_disyd s_dis_allyd))
(command s_disyd)
(setq s_dis_allyd s_disyd)))
(setvar "ORTHOMODE" 0)
(princ))
模仿源泉建筑里的? 我的是模防的是燕秀工具箱的。。。。。。。。。。。。。。 669423907 发表于 2013-6-10 09:54 static/image/common/back.gif
我觉得这个好用些,但不能用鼠标点取距离,你的可以,各有千秋
;记忆拉伸(注册 2012.09.24)(defun c:s1( ...
怎么里面还有我名字啊,哈哈 支持一下,学习
支持一下,学习 都好用,各有千秋