本帖最后由 lee50310 于 2023-5-29 17:12 编辑
月下闲人 发表于 2023-5-29 16:58
大佬可以对三层生成的偏移距离和填充比例自定义吗？
是自定
再程式中此處 偏移量 = 10 , 15 , 20
線型比例= "0.05" , "0.1" ,"0.2"
;<偏移+填充線型>
(foreach x '((10 "0.05") (15 "0.1") (20 "0.2")) ;((偏移量1 "線型比例1") (偏移量2 "線型比例2") (偏移量3 "線型比例3"))
(setq ipt(polar pe (+ ang (* pi 0.5)) (car x))) ;中點垂直偏移量點
(command "_offset" (car x) obj ipt "")
(setq eb(entlast))
(command "_hatch" "AR-SAND" (cadr x) "" "_s" obj eb "")
(setq obj eb)
);end_foreach
月下闲人 发表于 2023-5-29 16:58
大佬可以对三层生成的偏移距离和填充比例自定义吗？可以有记忆功能设置和续点设置,如图
我考慮看看
lee50310 发表于 2023-5-29 17:27
我考慮看看
好的，麻烦了:handshake
报告楼主：执行http://bbs.mjtd.com/forum.php?mod=viewthread&tid=187647&_dsign=d113058f的<<< ***封閉區域圓孔均佈 ***>>>后，，再运行这个，出现“Error: 参数太多”，直接退出
执行过本程序后，再运行<<< ***封閉區域圓孔均佈 ***>>>出现“Error: 参数太少”，直接退出
本帖最后由 lee50310 于 2023-6-5 09:31 编辑
月下闲人 发表于 2023-5-29 17:30
好的，麻烦了
已寫好另發表
請至此處下載
http://bbs.mjtd.com/thread-187948-1-1.html
bai2000 发表于 2023-5-31 23:09
报告楼主：执行http://bbs.mjtd.com/forum.php?mod=viewthread&tid=187647&_dsign=d113058f的>后，，再运行 ...
很抱歉! 你的是最新的cad版本
我沒有此版本 無法找出你的問題
lee50310 发表于 2023-6-4 17:27
已寫好另發表
請至此處下載
http://bbs.mjtd.com/thread-187948-1-1.html
很好用，感谢大神
这样的填充是用在什么方面的图上？