AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
AutoCAD顧問
Would you like to react to this message? Create an account in a few clicks or log in to continue.
如何在 LSIP 使用 explode Io15010 如何在 LSIP 使用 explode 2020-310 如何在 LSIP 使用 explode Oiu15010 如何在 LSIP 使用 explode 2020-211 如何在 LSIP 使用 explode Oo-2-110 如何在 LSIP 使用 explode BPl3tjj

如何在 LSIP 使用 explode

向下

如何在 LSIP 使用 explode Empty 如何在 LSIP 使用 explode

發表 由 WATSON513 于 2018-09-15, 12:50

菜鳥發問請多包涵

(defun c:TT1()
(setq AP3 (getpoint "\n左上點:"))
(setq AP1 (getpoint AP3 "\n右下點:"))
(command "_explode" "C" AP3 AP1 "") ;<= *無效的選取*
)

(defun c:TT2()
(setq AP3 (getpoint "\n左上點:"))
(setq AP1 (getpoint AP3 "\n右下點:"))
(command "_erase" "C" AP3 AP1 "")
)



想請較為何執行 TT1 會顯示以下錯誤 TT2不會

*無效的選取*
應有一個點或 前次(L)/全部(ALL)/群組(G)
; 錯誤: 函數被取消

可否教我 在 lisp 內使用explode

WATSON513
WATSON513
一般會員
一般會員

文章總數 : 32
年齡 : 45
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 3465
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 naruto018 于 2018-09-15, 14:29

參考看看
代碼:
(command "_.explode" (ssget "C" (getpoint) (getpoint)) "")

至於兩邊的差別只能請教高手了
naruto018
naruto018
中級會員
中級會員

文章總數 : 175
年齡 : 28
來自 : 高雄
職業 : 學習中(CAD,Revit,Excel VBA)
愛好 : 當個懶熊
個性 : 內向
使用年資 : 新手
使用版本 : 2015
AutoCAD基礎篇等級 : 10星級
積分 : 5
經驗值 : 2709
威望值 : 433
注冊日期 : 2016-11-29
藍鵲726號
男 摩羯座 羊

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 于 2018-09-15, 20:01

感謝你回應
我試過了
這樣做確實可以

這樣作只分解了一個物件
在窗選的區域內有多個物件要作分解
要如何作

WATSON513
WATSON513
一般會員
一般會員

文章總數 : 32
年齡 : 45
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 3465
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 naruto018 于 2018-09-15, 23:03

好像是分解指令在LISP只能對一個物件使用
用while迴圈來循環全部解決
代碼:
(setq SelObjs (ssget "C" (getpoint) (getpoint)));或不限定選取方式直接用(ssget)
(setq N -1)
(while (setq SelObj (ssname SelObjs (setq N (1+ N))))
    (command "_.explode" SelObj)
    )
naruto018
naruto018
中級會員
中級會員

文章總數 : 175
年齡 : 28
來自 : 高雄
職業 : 學習中(CAD,Revit,Excel VBA)
愛好 : 當個懶熊
個性 : 內向
使用年資 : 新手
使用版本 : 2015
AutoCAD基礎篇等級 : 10星級
積分 : 5
經驗值 : 2709
威望值 : 433
注冊日期 : 2016-11-29
藍鵲726號
男 摩羯座 羊

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 于 2018-09-16, 09:16

在LISP
分解指令 似乎真的只能一次一個

這樣我懂了
謝謝你



WATSON513
WATSON513
一般會員
一般會員

文章總數 : 32
年齡 : 45
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 3465
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 Tiger&蘋果爸 于 2018-09-17, 14:48

WATSON513 寫到:在LISP
分解指令 似乎真的只能一次一個

這樣我懂了
謝謝你
可以加入早期這個 QAFLAGS系統變數,設置為1即可多個分解
代碼:
(defun c:TT1()
 (setq AP3 (getpoint "\n左上點:"))         
 (setq AP1 (getpoint AP3 "\n右下點:"))
  (setvar "QAFLAGS" 1) ;<= *加入此行*
 (command "_explode" "C" AP3 AP1 "") 
)

____________________________________________________________________________________
如何在 LSIP 使用 explode Oo-2-110 如何在 LSIP 使用 explode Ia15010 如何在 LSIP 使用 explode Ziao1510 如何在 LSIP 使用 explode BPl3tjj
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 19440
年齡 : 44
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2021
經驗值 : 77191
威望值 : 14786
注冊日期 : 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

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 于 2018-09-18, 13:23



感謝蘋果爸
提供"QAFLAGS"這個系統變數
剛實測了可以用

QAFLAGS這個系統變數
在2016版本 說明裡似乎沒有資料
我在這裡
https://www.autocad-tw.com/t14991-topic
相關的說明

剛使用發現QAFLAGS不只影響分解指令
也影響插入圖塊指令
WATSON513
WATSON513
一般會員
一般會員

文章總數 : 32
年齡 : 45
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 3465
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 Tiger&蘋果爸 于 2018-09-18, 15:43

WATSON513 寫到:感謝蘋果爸
提供"QAFLAGS"這個系統變數
剛實測了可以用

QAFLAGS這個系統變數
在2016版本 說明裡似乎沒有資料
我在這裡
https://www.autocad-tw.com/t14991-topic
相關的說明

剛使用發現QAFLAGS不只影響分解指令
也影響插入圖塊指令
通常程式中我還會把它QAFLAGS還原為0
其他的指令才不會受影響~
認同

____________________________________________________________________________________
如何在 LSIP 使用 explode Oo-2-110 如何在 LSIP 使用 explode Ia15010 如何在 LSIP 使用 explode Ziao1510 如何在 LSIP 使用 explode BPl3tjj
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 19440
年齡 : 44
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2021
經驗值 : 77191
威望值 : 14786
注冊日期 : 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

回頂端 向下

如何在 LSIP 使用 explode Empty 回復: 如何在 LSIP 使用 explode

發表 由 WATSON513 于 2018-09-18, 16:40

了解了
謝謝你
WATSON513
WATSON513
一般會員
一般會員

文章總數 : 32
年齡 : 45
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 3465
威望值 : 6
注冊日期 : 2011-11-11
男 天蝎座 兔

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
如何在 LSIP 使用 explode Uos15010 如何在 LSIP 使用 explode BPl3tjj 如何在 LSIP 使用 explode Ziao1510 如何在 LSIP 使用 explode Oo-2-110 如何在 LSIP 使用 explode Oooo-110 如何在 LSIP 使用 explode 2020-211