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

【分享】半自動順序編號

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

【分享】半自動順序編號

發表 由 蔣秉澔 于 2013-12-24, 09: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)
)
avatar
蔣秉澔
初級會員
初級會員

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

回頂端 向下

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

發表 由 Tiger&蘋果爸 于 2013-12-27, 02:47

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

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

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

回頂端 向下

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

發表 由 eazy0623 于 2015-05-07, 04:50

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

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

回頂端 向下

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

發表 由 a810328 于 2015-08-07, 04:02

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

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

回頂端 向下

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

發表 由 jackiehover 于 2016-01-05, 07:13

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

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

回頂端 向下

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


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