AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~

Join the forum, it's quick and easy

AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
AutoCAD顧問
Would you like to react to this message? Create an account in a few clicks or log in to continue.
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Ioaoe110[討論]請教線轉為複線,或是聚合線轉為複線的作法? 2020-310[討論]請教線轉為複線,或是聚合線轉為複線的作法? Oiu15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? 2020-211[討論]請教線轉為複線,或是聚合線轉為複線的作法? Ia15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aizyao10[討論]請教線轉為複線,或是聚合線轉為複線的作法? Uos15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? BPl3tjj[討論]請教線轉為複線,或是聚合線轉為複線的作法? Ziao1510
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? Oo-2-110[討論]請教線轉為複線,或是聚合線轉為複線的作法? Zuoiy_10[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aizyao11[討論]請教線轉為複線,或是聚合線轉為複線的作法? Iyb_1510[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe1-111[討論]請教線轉為複線,或是聚合線轉為複線的作法? Uos15011[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe2da10[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe2da11[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe10

[討論]請教線轉為複線,或是聚合線轉為複線的作法?

4 posters

向下

[討論]請教線轉為複線,或是聚合線轉為複線的作法? Empty [討論]請教線轉為複線,或是聚合線轉為複線的作法?

發表 由 Andy122333 2017-06-12, 17:07

各位好,請教是否有線轉為複線,或是聚合線轉為複線的作法?
否則...一線段一線段的畫...快瘋了我.... 愛哭  愛哭  愛哭
先謝謝大家囉~~~
Andy122333
Andy122333
一般會員
一般會員

文章總數 : 9
年齡 : 54
來自 : 桃園市
職業 : 機電工程
愛好 : 看電影
個性 : 中庸
使用年資 : 3
使用版本 : 2015
經驗值 : 3041
威望值 : 0
注冊日期 : 2016-03-07
男 射手座 雞

回頂端 向下

[討論]請教線轉為複線,或是聚合線轉為複線的作法? Empty 回復: [討論]請教線轉為複線,或是聚合線轉為複線的作法?

發表 由 Tiger&蘋果爸 2017-06-12, 18:04

沒辦法,這個只能借助程式!
所以得一條一條畫~
不知道你是什麼樣的需求要這樣做!
認同

____________________________________________________________________________________
👉[優惠]慶祝AutoCAD顧問十六週年の感謝有你(點我)👈
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Sesa2011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Youtub11 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Oiea2011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Oe20011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Fbi20011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Line2011
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 21141
年齡 : 48
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照/吸貓
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 88828
威望值 : 16977
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

[討論]請教線轉為複線,或是聚合線轉為複線的作法? Empty 回復: [討論]請教線轉為複線,或是聚合線轉為複線的作法?

發表 由 Andy122333 2017-06-12, 18:27

是喔...
因為公司是是機電工程,業主要求管線要複線方式表示...
還是謝謝喔~~~
Andy122333
Andy122333
一般會員
一般會員

文章總數 : 9
年齡 : 54
來自 : 桃園市
職業 : 機電工程
愛好 : 看電影
個性 : 中庸
使用年資 : 3
使用版本 : 2015
經驗值 : 3041
威望值 : 0
注冊日期 : 2016-03-07
男 射手座 雞

回頂端 向下

[討論]請教線轉為複線,或是聚合線轉為複線的作法? Empty 回復: [討論]請教線轉為複線,或是聚合線轉為複線的作法?

發表 由 Atsai 2017-07-16, 21:10

Andy122333 寫到:各位好,請教是否有線轉為複線,或是聚合線轉為複線的作法?
否則...一線段一線段的畫...快瘋了我.... 愛哭  愛哭  愛哭
先謝謝大家囉~~~

這個是網路上找到的只支援Pline轉Mline的Lisp,若要支援line的話,要再增加幾行代碼。
代碼:

(defun c:pl2ml ( / e i l s )
    (if (setq s (ssget '((0 . "LWPOLYLINE"))))
        (repeat (setq i (sslength s))
            (setq e (ssname s (setq i (1- i)))
                  l (entget e)
            )
            (apply 'command
                (append '("_.mline")
                    (apply 'append
                        (mapcar
                            (function
                                (lambda ( x )
                                    (list "_non" (trans (cdr x) e 1))
                                )
                            )
                            (vl-remove-if-not '(lambda ( x ) (= 10 (car x))) l)
                        )
                    )
                    (if (= 1 (logand 1 (cdr (assoc 70 l)))) '("_C") '(""))
                )
            )
        )
    )
    (princ)
)

Tiger&蘋果爸 寫到:讚啦!! 謝謝熱心程式分享~< 積分 +1>
[公告]關於團隊成員的回文及貢獻
附件
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Attachment
pl2ml.zip 這個是另一個編譯檔的,可支援line及pline轉Mline。您無權下載這里的附件。(2 Kb) 下載 27 次

____________________________________________________________________________________
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Ioaoe110 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Zuoiy_10 [討論]請教線轉為複線,或是聚合線轉為複線的作法? 2020-211 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Aizyao11 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Iyb_1510
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aizyao10 [討論]請教線轉為複線,或是聚合線轉為複線的作法? BPl3tjj.png [討論]請教線轉為複線,或是聚合線轉為複線的作法? Ziao1510 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Oo-2-110 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Oooa_110
Atsai
Atsai
中級會員
中級會員

文章總數 : 162
年齡 : 49
來自 : 台中
職業 : 工程
愛好 : 看漫畫
個性 : 樂天
使用年資 : 10
使用版本 : 2010
AutoCAD基礎篇等級 : 10星級
積分 : 8
經驗值 : 5692
威望值 : 496
注冊日期 : 2012-04-06
男 金牛座 兔

回頂端 向下

[討論]請教線轉為複線,或是聚合線轉為複線的作法? Empty 回復: [討論]請教線轉為複線,或是聚合線轉為複線的作法?

發表 由 Tiger&蘋果爸 2017-07-17, 09:40

我在網路上也搜尋到一個「line轉mline」
代碼:
(defun c:l2ml()
(setq mysset (ssget))
(setq mylength (sslength mysset))
(setq counter 0)
(while (< counter mylength)
   (setq obj (ssname mysset counter))
   (setq data (entget obj))
   (setq pt1 (cdr (assoc 10 data)))
   (setq pt2 (cdr (assoc 11 data)))
   (command "mline" "style" "standard" pt1 pt2 "")
   (entdel obj)
   (setq counter (+ 1 counter))
)
(princ)
)

____________________________________________________________________________________
👉[優惠]慶祝AutoCAD顧問十六週年の感謝有你(點我)👈
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Sesa2011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Youtub11 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Oiea2011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Oe20011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Fbi20011 [討論]請教線轉為複線,或是聚合線轉為複線的作法? Line2011
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 21141
年齡 : 48
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照/吸貓
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 88828
威望值 : 16977
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i.servimg.com/u/f11/19/71/67/71/2d3d10.png2D+3D線上 顧問外掛程式 經典問與答讀者 藍鵲1號
2009聚會勳章 2010聚會勳章 2011聚會勳章 2012聚會勳章 2013勳章-2D基礎 2014聚會勳章 2015聚會勳章 2016聚會勳章 串連貼紙成功 男 水瓶座 兔

http://mypaper.pchome.com.tw/kv1012tiger

回頂端 向下

[討論]請教線轉為複線,或是聚合線轉為複線的作法? Empty 回復: [討論]請教線轉為複線,或是聚合線轉為複線的作法?

發表 由 stagecoach 2021-05-05, 16:31

Tiger&蘋果爸 寫到:沒辦法,這個只能借助程式!
所以得一條一條畫~
不知道你是什麼樣的需求要這樣做!
認同

請問蘋果爸,怎麼做才能將一堆複線轉換成聚合線?? 頭暈目眩 救救我吧!
stagecoach
stagecoach
一般會員
一般會員

文章總數 : 25
年齡 : 48
來自 : Taichung
職業 : 工務
愛好 : 繪圖
個性 : 莫名奇妙
使用年資 : 新手初學
使用版本 : 2022
經驗值 : 2968
威望值 : 30
注冊日期 : 2016-09-02
男 天秤座 兔

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Ioaoe110[討論]請教線轉為複線,或是聚合線轉為複線的作法? 2020-310[討論]請教線轉為複線,或是聚合線轉為複線的作法? Oiu15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? 2020-211[討論]請教線轉為複線,或是聚合線轉為複線的作法? Ia15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aizyao10[討論]請教線轉為複線,或是聚合線轉為複線的作法? Uos15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? BPl3tjj[討論]請教線轉為複線,或是聚合線轉為複線的作法? Ziao1510
[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe15010[討論]請教線轉為複線,或是聚合線轉為複線的作法? Oo-2-110[討論]請教線轉為複線,或是聚合線轉為複線的作法? Zuoiy_10[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aizyao11[討論]請教線轉為複線,或是聚合線轉為複線的作法? Iyb_1510[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe1-111[討論]請教線轉為複線,或是聚合線轉為複線的作法? Uos15011[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe2da10[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe2da11[討論]請教線轉為複線,或是聚合線轉為複線的作法? Aoe10