设为首页收藏本站 CAD论坛 CAD教程 CAD下载明经币充值

切换到宽版

明经CAD社区»社区 › 开发篇 › AutoLISP/Visual LISP 编程技术 › 求一个画多段线的命令

发新帖

查看: 553|回复: 2

[提问] 求一个画多段线的命令

发表于 2016-4-6 18:55 | 显示全部楼层 |阅读模式

1明经币

输入命令DDX，画线框为60，颜色为211的多短线。

回复

使用道具举报

流动的清泉

发表于 2016-4-8 11:32 | 显示全部楼层

看到了，就来冒个泡！

回复

使用道具举报

发表于 2016-4-26 11:59 | 显示全部楼层

(defun c:ddx()
;;取得当前颜色为#os6
(setq #os6 (getvar "Cecolor"))
(setvar "cecolor" "211")
(command "_pline" (getpoint) "w" 60 60)
;颜色还原
(setvar "Cecolor" #os6)
)

回复

使用道具举报

发新帖

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )
©2000-2023 明经通道版权所有本站代码，在未取得本站及作者授权的情况下，不得用于商业用途

GMT+8, 2024-5-18 20:26 , Processed in 0.201291 second(s), 21 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表