AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
如何在 LSIP 使用 explode Oo-2-110 如何在 LSIP 使用 explode Ia15010 如何在 LSIP 使用 explode Ziao1510 如何在 LSIP 使用 explode BPl3tjj 如何在 LSIP 使用 explode Uos15010 如何在 LSIP 使用 explode Uos15011

如何在 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
一般會員
一般會員

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

回頂端 向下

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

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

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

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

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

回頂端 向下

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

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

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

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

WATSON513
WATSON513
一般會員
一般會員

文章總數 : 30
年齡 : 43
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 2957
威望值 : 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
中級會員
中級會員

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

回頂端 向下

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

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

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

這樣我懂了
謝謝你



WATSON513
WATSON513
一般會員
一般會員

文章總數 : 30
年齡 : 43
來自 : 新竹
職業 : 鈑金展開
愛好 : 爬山
個性 : 愛作夢
使用年資 : 10
使用版本 : 2016
經驗值 : 2957
威望值 : 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&蘋果爸
系統管理員
系統管理員

文章總數 : 18496
年齡 : 43
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 71599
威望值 : 13673
注冊日期 : 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版本 說明裡似乎沒有資料
我在這裡
http://www.autocad-tw.com/t14991-topic
相關的說明

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

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

回頂端 向下

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

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

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

QAFLAGS這個系統變數
在2016版本 說明裡似乎沒有資料
我在這裡
http://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&蘋果爸
系統管理員
系統管理員

文章總數 : 18496
年齡 : 43
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 71599
威望值 : 13673
注冊日期 : 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
一般會員
一般會員

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

回頂端 向下

回頂端


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