<** 多功能修剪含十字交叉線段,T型,L型牆角.(更新)**>

gogozb

lee50310 发表于 2021-7-14 10:19
這是測試用的圖檔

上传者        lee50310
附件名称       
bb8_chs.LSP (簡體版)
售价(明经币)        2 个
        抱歉，您的 明经币 不足，无法下载
--------------------------------------------------------
没有币了。

xiahaibo1314

;; 多功能修剪----------【开始】-----------------------------------
;; 十字交叉线段,T型墙,L型墙角,及平行垂直两线段补线,封口,去边.
(defun c:tt (/ cwp1 cwp2 SelSet Index Enty1 Entlist obj1 Enty2 intPoints Values IntList NewAssoc objName fr cr mid_ptA obj_ptA mid_ptB obj_ptB lay col
              XTrimPnt StartPoint EndPoint Coords flg dd pel pe1 pe2 ang1 ang2 ang3 ang4 ang5 wang1 wang2 ex1 ex2 ex3 ex4 ey1 ey2 ey3 ey4 xk e_lst
              ValuesZero x1 y1 x2 y2 u pt1 pt2 pt3 pt4 pin tel pts1 pts2 bel loop num tt
            )
  ;嵌入可重复的功能------------------------------

gogozb

gogozb 发表于 2023-1-3 15:23
上传者        lee50310
附件名称       
bb8_chs.LSP (簡體版)

谢谢你，这样送币好感动！

gogozb

尘缘一生 发表于 2021-12-25 04:10
毛主席语录：好好学习，天天向上。 真是精品啊，慢慢消化吧。

程序运行到第194行，此'("osmode" "DIMDEC" "FILLETRAD" "cmdecho" "ORTHOMODE")就停止了，请问是什么原因呢？

Klein

自己写了一个类似的十字路口断线和接线的，比较基础，这个功能齐全，学习一下

二更更二

没币啊，难受

jkop

不论是配管、结构、电管、建筑应用，能够节省不少时间，真的太方便了

chen780404

gogozb 发表于 2023-1-3 15:20
命令: TT
错误: no function definition: SYSVAR

我也出现这样的情况，不能用啊。

loveu515

panliang9 发表于 2021-7-15 16:46
这个贴子里的程序可以帮你把命令改到你需要的。
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=181 ...

现在的权限还看不了

enn09

大神又出精品了，谢谢大神的分享