顧問教學
加入贊助
聯絡我們![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Ioaoe110](https://i.servimg.com/u/f67/12/31/59/66/ioaoe110.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 2020-310](https://i.servimg.com/u/f67/12/31/59/66/2020-310.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Oiu15010](https://i.servimg.com/u/f67/12/31/59/66/oiu15010.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 2020-211](https://i.servimg.com/u/f67/12/31/59/66/2020-211.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Ia15010](https://i.servimg.com/u/f62/19/71/67/71/ia15010.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Aizyao10](https://i.servimg.com/u/f67/12/31/59/66/aizyao10.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Uos15010](https://i.servimg.com/u/f67/12/31/59/66/uos15010.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 BPl3tjj](https://i.imgur.com/BPl3tjj.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Ziao1510](https://i.servimg.com/u/f62/19/71/67/71/ziao1510.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Oo-2-110](https://i.servimg.com/u/f67/12/31/59/66/oo-2-110.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Zuoiy_10](https://i.servimg.com/u/f67/12/31/59/66/zuoiy_10.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Aizyao11](https://i.servimg.com/u/f67/12/31/59/66/aizyao11.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Iyb_1510](https://i.servimg.com/u/f67/12/31/59/66/iyb_1510.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Aoe1-111](https://i.servimg.com/u/f67/12/31/59/66/aoe1-111.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Uos15011](https://i.servimg.com/u/f67/12/31/59/66/uos15011.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Aoe2da10](https://i.servimg.com/u/f67/12/31/59/66/aoe2da10.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Aoe2da11](https://i.servimg.com/u/f67/12/31/59/66/aoe2da11.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Aoe10](https://i.servimg.com/u/f67/12/31/59/66/aoe10.png)
[討論]計算長度LISP如何指定單一圖層
+18
ming1789
a810328
櫻子
candylin0530
mai22118
ginse0727
amdhome
lucia
ching1791
lingo_st
meet_emily
紫綺
Tiger&蘋果爸
白金之星
bruce79
verlth
shenhung
Boss&倫
22 posters
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第2頁(共2頁)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Empty](https://2img.net/i/empty.gif)
[討論]計算長度LISP如何指定單一圖層
由 Boss&倫 周六 01 五月 2010, 23:58
主題回顧 :
下面計算線、聚合線LISP:
請教個位寫LISP前輩
1.要在框選前加入指定單一圖層,在計算指定圖層內的線段總長。
這樣計算起來比較不會出錯,請各位前輩指點一二~感恩
2.如果加入弧,該加入哪些語法!
下面計算線、聚合線LISP:
(defun c:long_1 ()
(setq ss (ssget '((0 . "*line"))))
(setq nn (sslength ss))
(setq i 0 tnum 0)
(repeat nn
(setq ssn (ssname ss i))
(command "lengthen" ssn "")
(setq num (getvar "perimeter"))
(setq tnum (+ tnum num))
(setq i (1+ i))
)
(alert (strcat "框選的線段加總長為: "(rtos tnum 2)))
)
請教個位寫LISP前輩
1.要在框選前加入指定單一圖層,在計算指定圖層內的線段總長。
這樣計算起來比較不會出錯,請各位前輩指點一二~感恩
2.如果加入弧,該加入哪些語法!
Boss&倫- 中級會員
- 文章總數 : 123
年齡 : 45
來自 : 台北
職業 : 機電
愛好 : 繪圖
個性 : 開朗
使用年資 : 6
使用版本 : AutoCAD2010
積分 : 5
經驗值 : 5624
威望值 : 55
注冊日期 : 2010-03-14
a810328- 一般會員
- 文章總數 : 17
年齡 : 40
來自 : 彰化
職業 : 畫CAD，作網頁
愛好 : PC
個性 : 還好
使用年資 : 7
使用版本 : 2014
經驗值 : 5135
威望值 : -3
注冊日期 : 2010-06-11
a810328- 一般會員
- 文章總數 : 17
年齡 : 40
來自 : 彰化
職業 : 畫CAD，作網頁
愛好 : PC
個性 : 還好
使用年資 : 7
使用版本 : 2014
經驗值 : 5135
威望值 : -3
注冊日期 : 2010-06-11
ming1789- 一般會員
- 文章總數 : 26
年齡 : 48
來自 : 彰化
職業 : 機械
愛好 : 上網
個性 : 樂觀
使用年資 : 10
使用版本 : 2014
經驗值 : 2986
威望值 : 0
注冊日期 : 2016-06-18
huang5560- 一般會員
- 文章總數 : 9
年齡 : 55
來自 : 板橋
職業 : 水電
愛好 : 電影,看書
個性 : 內向
使用年資 : 5
使用版本 : 2008
經驗值 : 4105
威望值 : 0
注冊日期 : 2013-02-26
回復： [討論]計算長度LISP如何指定單一圖層
由 EVONNE 周四 02 8月 2018, 13:49
請問:CAD2016&18是否無法使用?
____________________________________________________________________________________
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 BPl3tjj.png](https://i.imgur.com/BPl3tjj.png.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Oooa_110](https://i.servimg.com/u/f67/12/31/59/66/oooa_110.png)
EVONNE- 初級會員
- 文章總數 : 105
年齡 : 55
來自 : 苓雅區
職業 : 繪圖
愛好 : 看書
個性 : 尚可
使用年資 : 10
使用版本 : 2014 2016
積分 : 1
經驗值 : 5140
威望值 : 36
注冊日期 : 2011-07-18
linxyz168- 專屬會員
- 文章總數 : 57
年齡 : 46
來自 : 新北市
職業 : 設計
愛好 : 看電影/打球
個性 : 隨和
使用年資 : 12年
使用版本 : 2011
經驗值 : 4319
威望值 : 12
注冊日期 : 2013-03-31
回復： [討論]計算長度LISP如何指定單一圖層
由 白金之星 周四 23 五月 2019, 13:52
此LISP以前下載過 很好用且實用 最近換成2016版CAD LISP也載入成功 但好像無法正常執行 請問是否有版本問題
____________________________________________________________________________________
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 SegmentationLine31](https://2img.net/h/i392.photobucket.com/albums/pp4/babyincar/SegmentationLine31.gif)
白金之星- 初級會員
- 文章總數 : 243
年齡 : 47
來自 : 台北
職業 : 工頭
愛好 : AutoCad
個性 : 樂觀
使用年資 : 7
使用版本 : 2008
積分 : 4
經驗值 : 5867
威望值 : 9
未回應主題 : 您有一筆未回應
注冊日期 : 2008-09-22
回復： [討論]計算長度LISP如何指定單一圖層
由 Tiger&蘋果爸 周四 23 五月 2019, 14:51
是的，新版本語法不一樣白金之星 寫到:此LISP以前下載過 很好用且實用 最近換成2016版CAD LISP也載入成功 但好像無法正常執行 請問是否有版本問題
請把這行
(command "lengthen" ssn "")
然後改成
(command "lengthen" ssn "" "" "")
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 2019_088](https://servimg.com/r/6712315966/2019_088.png)
____________________________________________________________________________________
👉[好康]🎁加入專屬B取得大補帖及看2D+3D影片(點我)👈
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Sesa2011](https://i.servimg.com/u/f67/12/31/59/66/sesa2011.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Youtub11](https://i.servimg.com/u/f67/12/31/59/66/youtub11.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Oiea2011](https://i.servimg.com/u/f67/12/31/59/66/oiea2011.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Oe20011](https://i.servimg.com/u/f67/12/31/59/66/oe20011.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Fbi20011](https://i.servimg.com/u/f67/12/31/59/66/fbi20011.png)
![[討論]計算長度LISP如何指定單一圖層 - 頁 2 Line2011](https://i.servimg.com/u/f67/12/31/59/66/line2011.png)
Tiger&蘋果爸- 系統管理員
- 文章總數 : 21108
年齡 : 48
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照/吸貓
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 88616
威望值 : 16958
注冊日期 : 2008-04-23
-
回復： [討論]計算長度LISP如何指定單一圖層
由 白金之星 周四 23 五月 2019, 16:28
感謝AUTOCAD界的最強老爸-蘋果爸及時救援，已經馬上修改測試完成，謝謝
____________________________________________________________________________________
白金之星- 初級會員
- 文章總數 : 243
年齡 : 47
來自 : 台北
職業 : 工頭
愛好 : AutoCad
個性 : 樂觀
使用年資 : 7
使用版本 : 2008
積分 : 4
經驗值 : 5867
威望值 : 9
未回應主題 : 您有一筆未回應
注冊日期 : 2008-09-22
zero0921- 一般會員
- 文章總數 : 12
年齡 : 41
來自 : 台中
職業 : 消防工程
愛好 : 聽音樂
個性 : 木訥
使用年資 : 新手初學
使用版本 : 新手初學
經驗值 : 1578
威望值 : 0
注冊日期 : 2020-02-18
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第2頁(共2頁)
這個論壇的權限：
您 無法 在這個版面回復文章