[分享]LISP複製圖塊及更名
+29
swcforest
qaz6605
aqurius32
winnie
瘋瘋的熊
hugh817
Monkey.D
jgt2035
jasminyouto
sam87187898
ginse0727
s45638239
poiuyy
櫻子
et1029et
RyanGuo
rickey0228
EVONNE
JerryJr
pedromax
Tanya
YU HSIANG
wu200090
judyyai
lingo_st
鑽石級宅男
meet_emily
月蜻蜓
Tiger&蘋果爸
33 posters
[分享]LISP複製圖塊及更名
分享Lee Mac提供的lisp圖塊複製更名範例,有需要的朋友請下載使用吧~
CBlock指令說明:複製完圖塊後,再更名新的圖塊名稱,再透過MOVE指令將新建立的圖塊移出。
RBlock指令說明:複製完圖塊後,再更名新的圖塊名稱,會刪除圖面中原來的圖塊。
![[分享]LISP複製圖塊及更名 Aoc210](https://i.servimg.com/u/f31/12/31/59/66/aoc210.png)
程式作者 Lee Mac
http://lee-mac.com/programs.html
CBlock指令 及 RBlock指令 步驟操作:
2012.08.23補充:
適當加上巨集語法可以節省程式步驟!
例如:Cblock指令執行完畢,還需要使用者輸入MOVE指令,再將新的圖塊移出來,可以新增工具按鈕加上巨集就可一氣呵成。
Rblock指令,可以改為重複執行!
巨集指令執行時,若取消指令時請按「Esc鍵」即可。
▼複製圖塊更名
^C^CCBLOCK;\\MOVE;\
▼重複圖塊更名
*^C^CRBLOCK;\\
CopyRenameBlock.lsp程式下載(*回覆可見*):
CBlock指令說明:複製完圖塊後,再更名新的圖塊名稱,再透過MOVE指令將新建立的圖塊移出。
RBlock指令說明:複製完圖塊後,再更名新的圖塊名稱,會刪除圖面中原來的圖塊。
![[分享]LISP複製圖塊及更名 Aoc210](https://i.servimg.com/u/f31/12/31/59/66/aoc210.png)
程式作者 Lee Mac
http://lee-mac.com/programs.html
CBlock指令 及 RBlock指令 步驟操作:
judyyai 寫到:感謝蘋爸熱心影片教學與分享~< 積分 +1><威望 +3>
2012.08.23補充:
適當加上巨集語法可以節省程式步驟!
例如:Cblock指令執行完畢,還需要使用者輸入MOVE指令,再將新的圖塊移出來,可以新增工具按鈕加上巨集就可一氣呵成。
Rblock指令,可以改為重複執行!
巨集指令執行時,若取消指令時請按「Esc鍵」即可。
▼複製圖塊更名
^C^CCBLOCK;\\MOVE;\
▼重複圖塊更名
*^C^CRBLOCK;\\
CopyRenameBlock.lsp程式下載(*回覆可見*):
Tiger&蘋果爸 在 2022-05-05, 09:36 作了第 4 次修改
____________________________________________________________________________________
👉[好康]加入專屬B取得大補帖及看2D+3D課程(點我)👈
👉[2022優惠活動]AutoCAD 2D進化論教學包(點我)👈
回復: [分享]LISP複製圖塊及更名
目前很多人用 Ctrl+C --> Ctrl+Shift+V 產生亂數產生的圖塊名稱,
用這LISP 就不用 Rename 在去找圖塊名稱來改!
算是頗方便的!!感恩分享!
用這LISP 就不用 Rename 在去找圖塊名稱來改!
算是頗方便的!!感恩分享!

月蜻蜓- 初級會員
- 文章總數 : 52
年齡 : 52
來自 : 新竹
職業 : CAD (2D)
愛好 : 看漫畫,看科幻電影!
個性 : 溫和!
使用年資 : 20
使用版本 : AutoCADM 2013
積分 : 2
經驗值 : 4805
威望值 : 103
注冊日期 : 2010-10-16
回復: [分享]LISP複製圖塊及更名
~宇宙世界超級好用~謝謝~

meet_emily- 高級會員
- 文章總數 : 125
年齡 : 52
來自 : 宜蘭
職業 : 學習
愛好 : 電影,音樂
個性 : 有點呆板,但不古板!有點天真,但不失真!有點強硬,但不強勢!
使用年資 : 6
使用版本 : 2010
積分 : 12
經驗值 : 5528
威望值 : 62
回帖精華 : 1
注冊日期 : 2008-10-12
回復: [分享]LISP複製圖塊及更名
讚啦!!!
這對於繪製施工圖的朋友們(包含小弟我)
超實用的拉
感謝再感謝阿


這對於繪製施工圖的朋友們(包含小弟我)
超實用的拉
感謝再感謝阿



鑽石級宅男- 高級會員
- 文章總數 : 188
年齡 : 37
來自 : 南投縣
職業 : 機電製圖工程師
愛好 : 欣賞美好事物
個性 : 熟的開朗~不熟靦腆
使用年資 : 6年
使用版本 : 2012
積分 : 11
最佳解答 : 1
經驗值 : 5573
威望值 : 208
注冊日期 : 2010-05-20
回復: [分享]LISP複製圖塊及更名
前幾天在LEE-MAC那邊才看到這指令,試用一下,真的很方便
因為最近在修施工圖,剛好需要大量整理圖塊
沒想到今天就看到蘋爸整理分享
永遠為我們著想,而走在前面的論壇
絕對值得大家支持
<熱心分享 積分 +1>
山寨版的,請笑納....
因為最近在修施工圖,剛好需要大量整理圖塊
沒想到今天就看到蘋爸整理分享
永遠為我們著想,而走在前面的論壇
絕對值得大家支持
<熱心分享 積分 +1>
山寨版的,請笑納....
____________________________________________________________________________________
沒有功勞也有苦勞,沒有苦勞也有疲勞的年代已經過去
現在是...........................................
沒有功勞直接就是個屁,連個屁都不是,那就真的很疲勞了
大家一起努力吧,努力別落到連個屁都不是................
lingo_st- 中級會員
- 文章總數 : 211
年齡 : 58
來自 : 新北市
職業 : 營造,建設
愛好 : 學習,服務,電腦軟硬體
個性 : 正直,達觀且無可救藥的雞婆
使用年資 : 使用12年但真的是新手
使用版本 : 2012,2013
積分 : 6
經驗值 : 5300
威望值 : 271
注冊日期 : 2011-12-18
回復: [分享]LISP複製圖塊及更名
別這麼說,好東西要和好朋友分享~lingo_st 寫到:前幾天在LEE-MAC那邊才看到這指令,試用一下,真的很方便
因為最近在修施工圖,剛好需要大量整理圖塊
沒想到今天就看到蘋爸整理分享
永遠為我們著想,而走在前面的論壇
絕對值得大家支持
<熱心分享 積分 +1>
山寨版的,請笑納....
PS:謝謝你的積分喔!

____________________________________________________________________________________
👉[好康]加入專屬B取得大補帖及看2D+3D課程(點我)👈
👉[2022優惠活動]AutoCAD 2D進化論教學包(點我)👈
回復: [分享]LISP複製圖塊及更名
Tiger&蘋果爸 寫到:別這麼說,好東西要和好朋友分享~lingo_st 寫到:前幾天在LEE-MAC那邊才看到這指令,試用一下,真的很方便
因為最近在修施工圖,剛好需要大量整理圖塊
沒想到今天就看到蘋爸整理分享
永遠為我們著想,而走在前面的論壇
絕對值得大家支持
<熱心分享 積分 +1>
山寨版的,請笑納....
PS:謝謝你的積分喔!
![]()
恩~真的很好用~這次來個正版加分~讚~

突然發現~蘋爸沒有積分的欄位

judyyai- 管理顧問
- 文章總數 : 7779
年齡 : 45
來自 : 台南
職業 : 機械製圖
愛好 : 電腦相關
個性 : think too much...
使用年資 : 10↑
使用版本 : AC2019(開始於2019年底末月)
AutoCAD基礎篇等級 : 10星級
積分 : 393
最佳解答 : 1
經驗值 : 29742
威望值 : 3606
發帖精華 : 2
回帖精華 : 4
注冊日期 : 2008-11-19
回復: [分享]LISP複製圖塊及更名
有這個,圖塊改名真的方便多了,謝謝蘋果爸的分享
wu200090- 初級會員
- 文章總數 : 141
年齡 : 49
來自 : 高雄市
職業 : 沖,塑模設計
愛好 : 大自然,登山健行
個性 : 随和
使用年資 : 9
使用版本 : 2012
積分 : 2
經驗值 : 5062
威望值 : 163
注冊日期 : 2011-03-27
感謝熱心提供!
真的謝謝Lee Mac的分享,好人會有好報的!
如果可以,我想要給你們一百個讚喔!!
如果可以,我想要給你們一百個讚喔!!

YU HSIANG- 初級會員
- 文章總數 : 140
年齡 : 44
來自 : 新北市
職業 : 繪圖
愛好 : 上網
個性 : 靜
使用年資 : 12
使用版本 : AUTO CAD 2010
積分 : 9
經驗值 : 4992
威望值 : 195
注冊日期 : 2011-05-05
回復: [分享]LISP複製圖塊及更名
謝謝JUDY幫我正版加分!judyyai 寫到: 恩~真的很好用~這次來個正版加分~讚~
突然發現~蘋爸沒有積分的欄位
因為積分對我好像沒有意義,所以我就把積分欄位拿掉了~

另外,lingo_st的這片討論文很有趣
[討論]這巨集怎麼改比較好?
適當加上巨集語法可以節省程式步驟!
例如:Cblock指令執行完畢,還需要使用者輸入MOVE指令,再將新的圖塊移出來,可以新增工具按鈕加上巨集就可一氣呵成。
Rblock指令,可以改為重複執行!
巨集指令執行時,若取消指令時請按「Esc鍵」即可。
▼複製圖塊更名
^C^CCBLOCK;\\MOVE;\
▼重複圖塊更名
*^C^CRBLOCK;\\
Tiger&蘋果爸 在 2022-05-05, 09:37 作了第 1 次修改
____________________________________________________________________________________
👉[好康]加入專屬B取得大補帖及看2D+3D課程(點我)👈
👉[2022優惠活動]AutoCAD 2D進化論教學包(點我)👈
回復: [分享]LISP複製圖塊及更名
好方便喔,真有效率,謝謝分享。
Tanya- 榮譽顧問
- 文章總數 : 378
年齡 : 48
來自 : 埔里鎮
職業 : 服務業
愛好 : 畫圖&音樂&大自然
個性 : 隨和
使用年資 : 2年
使用版本 : MAP 2011
積分 : 28
最佳解答 : 1
經驗值 : 6771
威望值 : 739
注冊日期 : 2010-03-06
回復: [分享]LISP複製圖塊及更名
自動產生另一個圖塊名稱及可修改名稱,
這個圖塊改名程式用起來很方便也很有效率,
讚!
謝謝蘋果爸的分享
這個圖塊改名程式用起來很方便也很有效率,
讚!
謝謝蘋果爸的分享
pedromax- 初級會員
- 文章總數 : 38
年齡 : 39
來自 : 台北
職業 : 機械設計工程師
愛好 : 聽音樂
個性 : 內向
使用年資 : 5
使用版本 : 2010
積分 : 1
經驗值 : 4024
威望值 : 48
注冊日期 : 2012-08-10
回復: [分享]LISP複製圖塊及更名
相當實用的小程式
感謝李麥克制作與蘋果爸的分享喔
感謝李麥克制作與蘋果爸的分享喔
JerryJr- 高級會員
- 文章總數 : 248
年齡 : 46
來自 : 台北
職業 : 建築
愛好 : LOVE GOOD
個性 : GOOD
使用年資 : 10 YEAR OVER
使用版本 : 哪版最新就用哪版
積分 : 39
最佳解答 : 1
經驗值 : 6006
威望值 : 245
回帖精華 : 1
注冊日期 : 2008-09-15
回復: [分享]LISP複製圖塊及更名
謝謝蘋果爸的分享
這麼好用的程式,省掉我修改類似BLOCK的麻煩,謝謝!!
這麼好用的程式,省掉我修改類似BLOCK的麻煩,謝謝!!
EVONNE- 初級會員
- 文章總數 : 96
年齡 : 54
來自 : 苓雅區
職業 : 繪圖
愛好 : 看書
個性 : 尚可
使用年資 : 10
使用版本 : 2014 2016
積分 : 1
經驗值 : 4653
威望值 : 36
注冊日期 : 2011-07-18
回復: [分享]LISP複製圖塊及更名
超讚用的好東西..可以事半功倍喔 節省很多時間
rickey0228- 一般會員
- 文章總數 : 19
年齡 : 49
來自 : 桃園
職業 : 室內裝潢設計及機械
愛好 : 爬山玩電腦
個性 : 大而化之由繁而簡
使用年資 : 6個月
使用版本 : 2012
經驗值 : 4364
威望值 : 12
注冊日期 : 2011-05-16
回復: [分享]LISP複製圖塊及更名
Tiger&蘋果爸 寫到:
▼重複圖塊更名
*^C^CRBLOCK;\\
蘋爸~這個問題,老忘記請問~
關於巨集前面加個* 就會怪怪的~一直再跑數據~直到選到圖塊才會停止~

judyyai- 管理顧問
- 文章總數 : 7779
年齡 : 45
來自 : 台南
職業 : 機械製圖
愛好 : 電腦相關
個性 : think too much...
使用年資 : 10↑
使用版本 : AC2019(開始於2019年底末月)
AutoCAD基礎篇等級 : 10星級
積分 : 393
最佳解答 : 1
經驗值 : 29742
威望值 : 3606
發帖精華 : 2
回帖精華 : 4
注冊日期 : 2008-11-19
回復: [分享]LISP複製圖塊及更名
剛剛測試發現我使用2013也會,這問題之前沒有注意到,可能是程式與巨集語法有衝突。judyyai 寫到:蘋爸~這個問題,老忘記請問~Tiger&蘋果爸 寫到:
▼重複圖塊更名
*^C^CRBLOCK;\\
關於巨集前面加個* 就會怪怪的~一直再跑數據~直到選到圖塊才會停止~

____________________________________________________________________________________
👉[好康]加入專屬B取得大補帖及看2D+3D課程(點我)👈
👉[2022優惠活動]AutoCAD 2D進化論教學包(點我)👈
回復: [分享]LISP複製圖塊及更名
感謝蘋果爸分享,
這LISP太實用了,
以後可以更放心的用CTRL+SHIFT+C/V了XD
這LISP太實用了,
以後可以更放心的用CTRL+SHIFT+C/V了XD
RyanGuo- 初級會員
- 文章總數 : 206
年齡 : 40
來自 : 屏東
職業 : 機械繪圖
愛好 : 玩遊戲
個性 : 嗚嗚男
使用年資 : 1年多
使用版本 : 2011
積分 : 3
經驗值 : 4897
威望值 : 316
注冊日期 : 2013-04-18
回復: [分享]LISP複製圖塊及更名
感謝蘋果爸分享及介紹相關網站供學習!
et1029et- 初級會員
- 文章總數 : 356
年齡 : 42
來自 : 桃園
職業 : 行政繪圖
愛好 : 學習
個性 : 隨和
使用年資 : 新手初學
使用版本 : 2013
積分 : 4
經驗值 : 5244
威望值 : 324
注冊日期 : 2013-07-02
回復: [分享]LISP複製圖塊及更名
好實用,多謝分享!
櫻子- 一般會員
- 文章總數 : 82
年齡 : 40
來自 : l彰化
職業 : 繪圖員
愛好 : 繪圖
個性 : 內向+外向
使用年資 : 愛安靜
使用版本 : 2004
經驗值 : 3562
威望值 : 54
注冊日期 : 2014-05-27
回復: [分享]LISP複製圖塊及更名
好用的工具,節省不少時間
poiuyy- 初級會員
- 文章總數 : 219
年齡 : 48
來自 : 台中
職業 : 小監
愛好 : 電影
個性 : 中庸
使用年資 : 5
使用版本 : 2010
積分 : 2
經驗值 : 4082
威望值 : 84
注冊日期 : 2014-06-24
回復: [分享]LISP複製圖塊及更名
感謝分享,來研究看看,順便研究如何把lisp指令放到選項版上。
s45638239- 一般會員
- 文章總數 : 14
年齡 : 35
來自 : 台北
職業 : 機械
愛好 : cad
個性 : 聰明
使用年資 : 3
使用版本 : 2008
經驗值 : 3181
威望值 : 12
注冊日期 : 2014-07-31
回復: [分享]LISP複製圖塊及更名
讚哦!而且也可以用在動態圖塊,感謝LEE-MAC的貢獻,還有無私分享的蘋果爸!

ginse0727- 高級會員
- 文章總數 : 256
年齡 : 48
來自 : 台北巿
職業 : 帷幕牆
愛好 : 電玩,漫畫,網路小說
個性 : 宅男/正直/死腦筋
使用年資 : 退伍後工作迄今,10年以上
使用版本 : 2012
積分 : 14
經驗值 : 6163
威望值 : 499
發帖精華 : 1
注冊日期 : 2010-07-13
回復: [分享]LISP複製圖塊及更名
這真是太實用了!!!
馬上來試看看
非常感謝!
馬上來試看看
非常感謝!
sam87187898- 初級會員
- 文章總數 : 24
年齡 : 32
來自 : 新竹
職業 : 工程師
愛好 : 看電影
個性 : 開朗
使用年資 : 7年
使用版本 : 2022
積分 : 1
經驗值 : 3063
威望值 : 6
注冊日期 : 2014-12-15
回復: [分享]LISP複製圖塊及更名
選了圖塊出現
Error: Automation 錯誤。
程式中斷
Error: Automation 錯誤。
程式中斷
jasminyouto- 一般會員
- 文章總數 : 21
年齡 : 48
來自 : 高雄市
職業 : 遊艇內裝
愛好 : 大自然
個性 : 隨和
使用年資 : 19年
使用版本 : 2016
經驗值 : 4757
威望值 : 6
注冊日期 : 2010-04-19
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第1頁(共2頁)
這個論壇的權限:
您 無法 在這個版面回復文章