顧問教學
加入贊助
聯絡我們[分享]LISP複製圖塊及更名
+26
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&蘋果爸
30 posters
![[分享]LISP複製圖塊及更名 - 頁 2 Empty](https://2img.net/i/empty.gif)
[分享]LISP複製圖塊及更名
由 Tiger&蘋果爸 2012-08-21, 09:11
主題回顧 :
分享Lee Mac提供的lisp圖塊複製更名範例，有需要的朋友請下載使用吧~
CBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，再透過MOVE指令將新建立的圖塊移出。
RBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，會刪除圖面中原來的圖塊。
![[分享]LISP複製圖塊及更名 - 頁 2 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程式下載（*回覆可見*）：
分享Lee Mac提供的lisp圖塊複製更名範例，有需要的朋友請下載使用吧~
CBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，再透過MOVE指令將新建立的圖塊移出。
RBlock指令說明：複製完圖塊後，再更名新的圖塊名稱，會刪除圖面中原來的圖塊。
![[分享]LISP複製圖塊及更名 - 頁 2 Aoc210](https://servimg.com/r/3112315966/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 次修改
____________________________________________________________________________________
👉[訂購]AutoCAD圖層大師課程(點我)...全新到貨👈
![[分享]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&蘋果爸- 系統管理員
- 文章總數 : 20357
年齡 : 46
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 83412
威望值 : 16184
注冊日期 : 2008-04-23
-
jgt2035- 初級會員
- 文章總數 : 38
年齡 : 60
來自 : 台東縣
職業 : 水利工程
愛好 : 園藝
個性 : 勤快-老實
使用年資 : 5
使用版本 : 2010
積分 : 1
經驗值 : 4156
威望值 : 13
注冊日期 : 2011-11-11
Monkey.D- 一般會員
- 文章總數 : 56
年齡 : 37
來自 : 嘉義
職業 : Auto Cad
愛好 : 待業
個性 : 交朋友
使用年資 : 1
使用版本 : 新手初學
經驗值 : 4113
威望值 : 12
注冊日期 : 2012-03-19
hugh817- 一般會員
- 文章總數 : 31
年齡 : 46
來自 : 台南
職業 : 工
愛好 : 發呆
個性 : 懶散
使用年資 : 5
使用版本 : 5
經驗值 : 3918
威望值 : 6
注冊日期 : 2012-06-02
瘋瘋的熊- 初級會員
- 文章總數 : 218
年齡 : 35
來自 : 屏東縣
職業 : 工程師
愛好 : 機縫、木工、竉物繪畫
個性 : 懶的要命
使用年資 : 2003年起至今
使用版本 : 2021
積分 : 1
經驗值 : 4084
威望值 : 84
注冊日期 : 2014-09-22
回復： [分享]LISP複製圖塊及更名
由 Tiger&蘋果爸 2016-01-18, 10:10
已經更新下載連結網址！瘋瘋的熊 寫到:謝謝分享，感覺很實用，可是無法下載耶...
____________________________________________________________________________________
👉[訂購]AutoCAD圖層大師課程(點我)...全新到貨👈
Tiger&蘋果爸- 系統管理員
- 文章總數 : 20357
年齡 : 46
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 83412
威望值 : 16184
注冊日期 : 2008-04-23
-
winnie- 贊助會員
- 文章總數 : 58
年齡 : 42
來自 : 台北縣
職業 : 工程業
愛好 : 文書
個性 : 溫和
使用年資 : 一年
使用版本 : 2008
經驗值 : 4951
威望值 : 0
注冊日期 : 2009-11-25
aqurius32- 初級會員
- 文章總數 : 82
年齡 : 47
來自 : 台北
職業 : 繪圖
愛好 : 泡茶
個性 : 大眾化
使用年資 : 10
使用版本 : 2005,2012
積分 : 1
經驗值 : 4358
威望值 : 24
注冊日期 : 2011-11-28
qaz6605- 初級會員
- 文章總數 : 193
年齡 : 44
來自 : 台南市
職業 : 繪圖員
愛好 : 有關電腦的
個性 : 外向
使用年資 : 剛剛初道
使用版本 : 2006
積分 : 2
經驗值 : 5839
威望值 : 82
注冊日期 : 2008-12-31
swcforest- 初級會員
- 文章總數 : 113
年齡 : 42
來自 : 台中市南區
職業 : 土木工程設計
愛好 : 遊山玩水及AutoLISP
個性 : 開朗活潑
使用年資 : 六七年了
使用版本 : AutoCAD 2016
積分 : 1
經驗值 : 5461
威望值 : 10
注冊日期 : 2008-07-27
白宗禮- 專屬會員
- 文章總數 : 24
年齡 : 42
來自 : 台灣
職業 : 學生
個性 : 帥
經驗值 : 4990
威望值 : 0
注冊日期 : 2009-05-23
AutoCAD顧問 :: 技術(發言等級:一般會員) :: :: 進階討論
第2頁(共2頁)
這個論壇的權限：
您 無法 在這個版面回復文章![[分享]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 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 RQvAhqF](https://i.imgur.com/RQvAhqF.png)
![[分享]LISP複製圖塊及更名 - 頁 2 YdKelqY](https://i.imgur.com/ydKelqY.png)
![[分享]LISP複製圖塊及更名 - 頁 2 K410yWG](https://i.imgur.com/k410yWG.png)