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

Join the forum, it's quick and easy

AutoCAD顧問
還沒有註冊嗎...即日起免費註冊,所有最完整的AutoCAD討論、教學及資源都在論壇裡喔~
AutoCAD顧問
Would you like to react to this message? Create an account in a few clicks or log in to continue.
【分享】半自動順序編號 Aoe1-113【分享】半自動順序編號 Ioaoe110【分享】半自動順序編號 2020-310【分享】半自動順序編號 Oiu15010【分享】半自動順序編號 2020-211【分享】半自動順序編號 Ia15010【分享】半自動順序編號 Aizyao10【分享】半自動順序編號 Uos15010【分享】半自動順序編號 BPl3tjj【分享】半自動順序編號 Ziao1510
【分享】半自動順序編號 Aoe15010【分享】半自動順序編號 Oo-2-110【分享】半自動順序編號 Zuoiy_10【分享】半自動順序編號 Aizyao11【分享】半自動順序編號 Iyb_1510【分享】半自動順序編號 Aoe1-112【分享】半自動順序編號 Uos15011【分享】半自動順序編號 Aoe2da10【分享】半自動順序編號 Aoe2da11【分享】半自動順序編號 Aoe10

【分享】半自動順序編號

5 posters

向下

【分享】半自動順序編號 Empty 【分享】半自動順序編號

發表 由 蔣秉澔 周二 24 12月 2013 - 17:03

最近常常在用EXPRESS工具的TCOUNT指令,發現還是有點小麻煩,剛好有在學LISP,就寫了一個簡易型的(有參考一些高手的方式),我用起來還滿順手的,呵呵!!
(defun c:AW()
(setvar "cmdecho" 0)
(SETQ INTXT1 (GETSTRING "\n 代碼 :"))
(SETQ I (GETSTRING "\n 起始數字 :"))  
(SETQ ENT (ENTSEL "\n 選擇一個文字"))
(WHILE ENT
(SETQ ENDATA1 (ENTGET (CAR ENT)))  
(SETQ ENDATA1 (SUBST (CONS 1 (STRCAT INTXT1 I)) (ASSOC 1 ENDATA1) ENDATA1))
(ENTMOD ENDATA1)
(SETQ I (RTOS(1+ (ATOF I))))
(SETQ ENT (ENTSEL "\下一個"))
)
(prin1)
)
蔣秉澔
蔣秉澔
初級會員
初級會員

文章總數 : 211
年齡 : 47
來自 : 嘉義市
職業 : 大電力系統設計、製程、檢測
愛好 : 電腦相關,出遊踏青
個性 : 待人隨和,對事執著
使用年資 : 8年
使用版本 : 2011 Electrical,2014
積分 : 4
經驗值 : 5415
威望值 : 198
注冊日期 : 2013-08-31
顧問外掛程式 藍鵲661號
男 金牛座 蛇

回頂端 向下

【分享】半自動順序編號 Empty 回復: 【分享】半自動順序編號

發表 由 Tiger&蘋果爸 周五 27 12月 2013 - 10:47

謝謝你的熱心分享~
有需要的朋友可以試試!
 微笑 

____________________________________________________________________________________
👉快速比例設定與出圖技巧-線上課程(點我)👈
編輯個人資料 Sesa2011 編輯個人資料 Youtub11 編輯個人資料 Oiea2011 編輯個人資料 Oe20011 編輯個人資料 Fbi20011 編輯個人資料 Line2011
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

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

回頂端 向下

【分享】半自動順序編號 Empty 回復: 【分享】半自動順序編號

發表 由 eazy0623 周四 7 五月 2015 - 11:50

感謝前輩分享,用起來真的很順手!!! 認同
eazy0623
eazy0623
一般會員
一般會員

文章總數 : 26
年齡 : 36
來自 : Taichung
職業 : 電力規劃設計
愛好 : 運動
個性 : 獨立
使用年資 : 1
使用版本 : 2012
經驗值 : 4652
威望值 : 0
注冊日期 : 2012-07-18
男 巨蟹座 龍

回頂端 向下

【分享】半自動順序編號 Empty 回復: 【分享】半自動順序編號

發表 由 a810328 周五 7 8月 2015 - 11:02

用起來很順手,感謝前輩分享。 微笑
a810328
a810328
一般會員
一般會員

文章總數 : 17
年齡 : 40
來自 : 彰化
職業 : 畫CAD,作網頁
愛好 : PC
個性 : 還好
使用年資 : 7
使用版本 : 2014
經驗值 : 5368
威望值 : -3
注冊日期 : 2010-06-11
女 摩羯座 豬

回頂端 向下

【分享】半自動順序編號 Empty 回復: 【分享】半自動順序編號

發表 由 jackiehover 周二 5 1月 2016 - 15:13

想請問,如果數字下去會有小數點後四位怎麼辦呢?

____________________________________________________________________________________

jackiehover
jackiehover
初級會員
初級會員

文章總數 : 160
年齡 : 38
來自 : 桃園市八德區
職業 : 消防設備、水電設計
愛好 : 上網、遊戲、網拍
個性 : 平易近人
使用年資 : 2014/09至今
使用版本 : 2014、15、16
積分 : 1
經驗值 : 4207
威望值 : 96
注冊日期 : 2015-08-31
藍鵲699號
男 水瓶座 虎

回頂端 向下

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
【分享】半自動順序編號 Aoe1-113【分享】半自動順序編號 Ioaoe110【分享】半自動順序編號 2020-310【分享】半自動順序編號 Oiu15010【分享】半自動順序編號 2020-211【分享】半自動順序編號 Ia15010【分享】半自動順序編號 Aizyao10【分享】半自動順序編號 Uos15010【分享】半自動順序編號 BPl3tjj【分享】半自動順序編號 Ziao1510
【分享】半自動順序編號 Aoe15010【分享】半自動順序編號 Oo-2-110【分享】半自動順序編號 Zuoiy_10【分享】半自動順序編號 Aizyao11【分享】半自動順序編號 Iyb_1510【分享】半自動順序編號 Aoe1-112【分享】半自動順序編號 Uos15011【分享】半自動順序編號 Aoe2da10【分享】半自動順序編號 Aoe2da11【分享】半自動順序編號 Aoe10