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

[已解決]內有3個相似的lisp 請問要怎讓他都有作用?

上一篇主題 下一篇主題 向下

[已解決]內有3個相似的lisp 請問要怎讓他都有作用?

發表 由 aaronchung.tw 于 2013-05-17, 02:52

我把這三個lisp都放在acad.mnl裡,但執行都只有第一個有作用,要怎樣才能讓3個LISP都能動作。

(defun c:GG ()
(SETQ SS (ssget))
(command "change" SS "" "P" "LA" "0" "C" "6" "LT" "BYBLOCK" ""))
(prin1))

(defun c:BB ()
(SETQ SS (ssget))
(command "change" SS "" "P" "LA" "0" "C" "7" "LT" "BYBLOCK" ""))
(prin1))

(defun c:HH ()
(SETQ SS (ssget))
(command "change" SS "" "P" "LA" "0" "C" "8" "LT" "HIDDEN" ""))
(prin1))

謝謝!


aaronchung.tw 在 2013-05-17, 06:10 作了第 4 次修改
avatar
aaronchung.tw
初級會員
初級會員

文章總數 : 85
年齡 : 38
來自 : Taipei
職業 : 繪圖
愛好 : 電腦網路,閑逛
個性 : 隨和
使用年資 : 8年
使用版本 : 2008
積分 : 1
經驗值 : 2522
威望值 : 24
注冊日期 : 2011-12-03
藍鵲198號
男 射手座 馬

回頂端 向下

回復: [已解決]內有3個相似的lisp 請問要怎讓他都有作用?

發表 由 ginse0727 于 2013-05-17, 05:31

建議你把這三個LSP另存在一個副檔名為lsp的文字檔.
假設你是另存成檔名aaa.lsp,存在d:\lsp資料夾裡,
那你只在原來的acad.mnl最後一行裡加上
(load "d:/lsp/aaa.lsp")
這樣應該三個小程式都可以用了.
試試看吧!
avatar
ginse0727
高級會員
高級會員

文章總數 : 256
年齡 : 43
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 4173
威望值 : 491
發帖精華 : 1
注冊日期 : 2010-07-12
經典問與答讀者 藍鵲61號
2011聚會勳章 男 獅子座 虎

回頂端 向下

回復: [已解決]內有3個相似的lisp 請問要怎讓他都有作用?

發表 由 shenhung 于 2013-05-17, 05:49

(defun c:GG ()
(SETQ SS (ssget))
(command "change" SS "" "P" "LA" "0" "C" "6" "LT" "BYBLOCK" "")
(prin1))

(defun c:BB ()
(SETQ SS (ssget))
(command "change" SS "" "P" "LA" "0" "C" "7" "LT" "BYBLOCK" "")
(prin1))

(defun c:HH ()
(SETQ SS (ssget))
(command "change" SS "" "P" "LA" "0" "C" "8" "LT" "HIDDEN" "")
(prin1))


command change 這一行.最後都各多一個括號.拿掉就可以用了
avatar
shenhung
高級會員
高級會員

文章總數 : 238
年齡 : 50
來自 : 新北市
職業 : 塑膠模具設計.AUTOLISP
愛好 : 音樂
個性 : 隨和
使用年資 : 18年
使用版本 : 2010
積分 : 15
經驗值 : 4951
威望值 : 916
注冊日期 : 2009-06-03
男 摩羯座 馬

回頂端 向下

回復: [已解決]內有3個相似的lisp 請問要怎讓他都有作用?

發表 由 aaronchung.tw 于 2013-05-17, 06:03

感謝shenhung的解答,現在可以正確使用了。

也感謝ginse0727的方法,我沒想到利用load的方式載lisp,學到另一種方法。

感謝兩位的回答。
avatar
aaronchung.tw
初級會員
初級會員

文章總數 : 85
年齡 : 38
來自 : Taipei
職業 : 繪圖
愛好 : 電腦網路,閑逛
個性 : 隨和
使用年資 : 8年
使用版本 : 2008
積分 : 1
經驗值 : 2522
威望值 : 24
注冊日期 : 2011-12-03
藍鵲198號
男 射手座 馬

回頂端 向下

回復: [已解決]內有3個相似的lisp 請問要怎讓他都有作用?

發表 由 Tiger&蘋果爸 于 2013-05-17, 06:47

aaronchung.tw 寫到:感謝shenhung的解答,現在可以正確使用了。

也感謝ginse0727的方法,我沒想到利用load的方式載lisp,學到另一種方法。

感謝兩位的回答。
一般也可以使用appload指令載入,新版方式則可以透過「自訂CUI 載入LISP」,請查看以下相關主題:
「教學」載入LISP應用程式 APPLOAD指令
[影片]自訂CUI 載入LISP
微笑

____________________________________________________________________________________
avatar
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 17080
年齡 : 41
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 15↑
使用版本 : AutoCAD 2016
經驗值 : 63953
威望值 : 12657
注冊日期 : 2008-04-23
2D基礎函授 2D進階函授 3D基礎函授 https://i11.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

回頂端 向下

回復: [已解決]內有3個相似的lisp 請問要怎讓他都有作用?

發表 由 aaronchung.tw 于 2013-05-18, 02:07

之前都是在acad.mnl裡寫LISP使用,都沒研究其他的方法,現在該來學習一下其他的方法了。感謝提供資料!
avatar
aaronchung.tw
初級會員
初級會員

文章總數 : 85
年齡 : 38
來自 : Taipei
職業 : 繪圖
愛好 : 電腦網路,閑逛
個性 : 隨和
使用年資 : 8年
使用版本 : 2008
積分 : 1
經驗值 : 2522
威望值 : 24
注冊日期 : 2011-12-03
藍鵲198號
男 射手座 馬

回頂端 向下

上一篇主題 下一篇主題 回頂端


 
這個論壇的權限:
無法 在這個版面回復文章