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.
<已解決>請問自動編號的巨集怎麼寫? Ioaoe110<已解決>請問自動編號的巨集怎麼寫? 2020-310<已解決>請問自動編號的巨集怎麼寫? Oiu15010<已解決>請問自動編號的巨集怎麼寫? 2020-211<已解決>請問自動編號的巨集怎麼寫? Ia15010<已解決>請問自動編號的巨集怎麼寫? Aizyao10<已解決>請問自動編號的巨集怎麼寫? Uos15010<已解決>請問自動編號的巨集怎麼寫? BPl3tjj<已解決>請問自動編號的巨集怎麼寫? Ziao1510
<已解決>請問自動編號的巨集怎麼寫? Oo-2-110<已解決>請問自動編號的巨集怎麼寫? Zuoiy_10<已解決>請問自動編號的巨集怎麼寫? Aizyao11<已解決>請問自動編號的巨集怎麼寫? Iyb_1510<已解決>請問自動編號的巨集怎麼寫? Aoe1-111<已解決>請問自動編號的巨集怎麼寫? Uos15011<已解決>請問自動編號的巨集怎麼寫? Aoe2da10<已解決>請問自動編號的巨集怎麼寫? Aoe2da11<已解決>請問自動編號的巨集怎麼寫? Aoe10

<已解決>請問自動編號的巨集怎麼寫?

+13
小香
vl7120
jjch001
平方根
cuter0616
耍寶的泡
Eason
Tiger&蘋果爸
Reicy
JerryJr
judyyai
阿希
135ooooo
17 posters

1頁(共2頁) 1, 2  下一步

向下

<已解決>請問自動編號的巨集怎麼寫? Empty <已解決>請問自動編號的巨集怎麼寫?

發表 由 135ooooo 2009-04-18, 01:57

請問這個自動編號的巨集怎麼寫? 火冒三丈

比如有三字串分別為12,34,56

點選12,12變成12A

再來點選34,34變成34B

最後點選56,56變成56C.....

以此類推,在字串後面編ABC...Z

大大救救~感動


135ooooo 在 2009-04-18, 12:42 作了第 1 次修改
135ooooo
135ooooo
初級會員
初級會員

文章總數 : 46
年齡 : 42
來自 : 高雄
職業 : 品管
愛好 : Auto cad
個性 : 我愛大自然
使用年資 : 上班的時候
使用版本 : 2008,2010
積分 : 1
經驗值 : 5667
威望值 : 6
注冊日期 : 2008-10-20
男 天秤座 雞

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 阿希 2009-04-18, 09:02

135ooooo 寫到:請問這個自動編號的巨集怎麼寫? 火冒三丈

比如有三字串分別為12,34,56

點選12,12變成12A

再來點選34,34變成34B

最後點選56,56變成56C.....

以此類推,在字串後面編ABC...Z

大大救救~感動


妳這部份用巨集似乎太艱難了點 ~ 用lisp似乎比較合適
而且妳後面要加上的字 ~ 是統一 ? 還是有規則性的 ?
avatar
阿希
高級會員
高級會員

文章總數 : 344
年齡 : 43
來自 : 台北
職業 : 水電設計
愛好 : autolisp
個性 : 和平主義者
使用年資 : 5
使用版本 : 2008
積分 : 19
經驗值 : 6566
威望值 : 226
發帖精華 : 1
注冊日期 : 2008-09-22
男 摩羯座 猴

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 135ooooo 2009-04-18, 09:37

阿希 寫到:妳這部份用巨集似乎太艱難了點 ~ 用lisp似乎比較合適
而且妳後面要加上的字 ~ 是統一 ? 還是有規則性的 ?

恩恩~

是規則性,點第一個字串後面加A,再來點第二個後面則加B~ 感動

LISP可以麼?
135ooooo
135ooooo
初級會員
初級會員

文章總數 : 46
年齡 : 42
來自 : 高雄
職業 : 品管
愛好 : Auto cad
個性 : 我愛大自然
使用年資 : 上班的時候
使用版本 : 2008,2010
積分 : 1
經驗值 : 5667
威望值 : 6
注冊日期 : 2008-10-20
男 天秤座 雞

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 阿希 2009-04-18, 09:49

135ooooo 寫到:
阿希 寫到:妳這部份用巨集似乎太艱難了點 ~ 用lisp似乎比較合適
而且妳後面要加上的字 ~ 是統一 ? 還是有規則性的 ?

恩恩~

是規則性,點第一個字串後面加A,再來點第二個後面則加B~ 感動

LISP可以麼?


第一個字串後面加A,再來點第二個後面則加B ~
一直加到z ~ 那之後還有嗎 ?
avatar
阿希
高級會員
高級會員

文章總數 : 344
年齡 : 43
來自 : 台北
職業 : 水電設計
愛好 : autolisp
個性 : 和平主義者
使用年資 : 5
使用版本 : 2008
積分 : 19
經驗值 : 6566
威望值 : 226
發帖精華 : 1
注冊日期 : 2008-09-22
男 摩羯座 猴

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 135ooooo 2009-04-18, 09:59

阿希 寫到:第一個字串後面加A,再來點第二個後面則加B ~
一直加到z ~ 那之後還有嗎 ?


恩恩~最多到J就可以了~ 感動
大大可以麼可以麼?

PS.
可否再使
字串變成紅色,高度3.5,前後加括弧()
且該值輸入一表格 ,
如下圖,全部就是這樣,充滿希望
生氣



<已解決>請問自動編號的巨集怎麼寫? Tm1y.th
135ooooo
135ooooo
初級會員
初級會員

文章總數 : 46
年齡 : 42
來自 : 高雄
職業 : 品管
愛好 : Auto cad
個性 : 我愛大自然
使用年資 : 上班的時候
使用版本 : 2008,2010
積分 : 1
經驗值 : 5667
威望值 : 6
注冊日期 : 2008-10-20
男 天秤座 雞

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 阿希 2009-04-18, 12:33

135ooooo 寫到:
阿希 寫到:第一個字串後面加A,再來點第二個後面則加B ~  
一直加到z ~ 那之後還有嗎 ?
恩恩~最多到J就可以了~
大大可以麼可以麼? 感動
PS.
可否再使
字串變成紅色,高度3.5,前後加括弧()
且該值輸入一表格 ,
如下圖,全部就是這樣,充滿希望生氣
LISP 程式如下 ~ 只是簡易的,未完全考慮可能狀況 ~
至於表格也未加入

LISP程式載入方法 :1 輸入快捷"AP" 找尋LISP檔位置載入
                  2.輸入IT 即可
                      PS :  如須每各圖檔自動載入,可放入公事包內 ^ ^

(defun c:IT()
(setvar "cmdecho" 0)
(SETQ INTXT (GETSTRING "\n Input writing :"))
(SETQ ASI (ASCII INTXT))
(SETQ ENT (ENTSEL "\n SELECT A TEXT"))
(WHILE ENT
(SETQ ENDATA (ENTGET (CAR ENT)))
(SETQ EN_TXT (CDR (ASSOC 1 ENDATA)))
(SETQ NEWTX (STRCAT "(" EN_TXT ")" (CHR ASI)))
(SETQ ENDATA (SUBST (CONS 1 NEWTX) (ASSOC 1 ENDATA) ENDATA))
(ENTMOD ENDATA)
(SETQ ASI (+ ASI 1))
(SETQ ENT (ENTSEL "\N SELECT A TEXT"))
)
(prin1)
)
PS : 將上列程式碼貼到記事本,檔名改為IT.LSP即可

▼20160719補充下載IT.LSP檔▼
附件
<已解決>請問自動編號的巨集怎麼寫? Attachment
IT.zip 您無權下載這里的附件。(1 Kb) 下載 9 次


Tiger&蘋果爸 在 2016-07-19, 17:35 作了第 1 次修改 (原因 : 20160719補充下載IT.LSP檔)
avatar
阿希
高級會員
高級會員

文章總數 : 344
年齡 : 43
來自 : 台北
職業 : 水電設計
愛好 : autolisp
個性 : 和平主義者
使用年資 : 5
使用版本 : 2008
積分 : 19
經驗值 : 6566
威望值 : 226
發帖精華 : 1
注冊日期 : 2008-09-22
男 摩羯座 猴

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 135ooooo 2009-04-18, 12:37

阿希 寫到:

LISP 程式如下 ~ 只是簡易的,未完全考慮可能狀況 ~
至於表格也未加入

LISP程式載入方法 :1 輸入快捷"AP" 找尋LISP檔位置載入
2.輸入IT 即可
PS : 如須每各圖檔自動載入,可放入公事包內 ^ ^

(defun c:IT()
(setvar "cmdecho" 0)
(SETQ INTXT (GETSTRING "\n Input writing :"))
(SETQ ASI (ASCII INTXT))
(SETQ ENT (ENTSEL "\n SELECT A TEXT"))
(WHILE ENT
(SETQ ENDATA (ENTGET (CAR ENT)))
(SETQ EN_TXT (CDR (ASSOC 1 ENDATA)))
(SETQ NEWTX (STRCAT "(" EN_TXT ")" (CHR ASI)))
(SETQ ENDATA (SUBST (CONS 1 NEWTX) (ASSOC 1 ENDATA) ENDATA))
(ENTMOD ENDATA)
(SETQ ASI (+ ASI 1))
(SETQ ENT (ENTSEL "\N SELECT A TEXT"))
)
(prin1)
)


PS : 將上列程式碼貼到記事本,檔名改為IT.LSP即可

謝謝希大大,真是太厲害了,真是佛心來的~ 熱情 熱情 熱情
135ooooo
135ooooo
初級會員
初級會員

文章總數 : 46
年齡 : 42
來自 : 高雄
職業 : 品管
愛好 : Auto cad
個性 : 我愛大自然
使用年資 : 上班的時候
使用版本 : 2008,2010
積分 : 1
經驗值 : 5667
威望值 : 6
注冊日期 : 2008-10-20
男 天秤座 雞

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 judyyai 2009-04-18, 13:15

Spoiler(用來隱藏帖子內容):

以上回覆!點擊可見!

感謝阿希 熱心回覆 積分+1

____________________________________________________________________________________
<已解決>請問自動編號的巨集怎麼寫? Ioaoe110 <已解決>請問自動編號的巨集怎麼寫? Zuoiy_10 <已解決>請問自動編號的巨集怎麼寫? 2020-211 <已解決>請問自動編號的巨集怎麼寫? Aizyao11 <已解決>請問自動編號的巨集怎麼寫? Aoe10
<已解決>請問自動編號的巨集怎麼寫? Aizyao10 <已解決>請問自動編號的巨集怎麼寫? BPl3tjj.png <已解決>請問自動編號的巨集怎麼寫? Ziao1510 <已解決>請問自動編號的巨集怎麼寫? Oo-2-110 <已解決>請問自動編號的巨集怎麼寫? Aoe1-111
judyyai
judyyai
管理顧問
管理顧問

文章總數 : 7782
年齡 : 46
來自 : 台南
職業 : 機械製圖
愛好 : 電腦相關
個性 : think too much...
使用年資 : 10↑
使用版本 : AC2019(開始於2019年底末月)
AutoCAD基礎篇等級 : 10星級
積分 : 393
最佳解答 : 1
經驗值 : 30191
威望值 : 3609
發帖精華 : 2
回帖精華 : 4
注冊日期 : 2008-11-19
2D基礎函授 3D基礎函授 顧問外掛程式 經典問與答讀者 藍鵲2號
2009聚會勳章 串連貼紙成功 女 巨蟹座 蛇

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 JerryJr 2009-04-18, 13:44

這程式似乎不錯
快收起來
多謝阿希了
JerryJr
JerryJr
高級會員
高級會員

文章總數 : 249
年齡 : 47
來自 : 台北
職業 : 建築
愛好 : LOVE GOOD
個性 : GOOD
使用年資 : 10 YEAR OVER
使用版本 : 哪版最新就用哪版
積分 : 39
最佳解答 : 1
經驗值 : 6443
威望值 : 251
回帖精華 : 1
注冊日期 : 2008-09-15
經典問與答讀者 男 射手座 龍

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 阿希 2009-04-18, 14:26

JerryJr 寫到:這程式似乎不錯
快收起來
多謝阿希了

JerryJr前輩你愛說笑 , 這在你面前只是獻醜吧
avatar
阿希
高級會員
高級會員

文章總數 : 344
年齡 : 43
來自 : 台北
職業 : 水電設計
愛好 : autolisp
個性 : 和平主義者
使用年資 : 5
使用版本 : 2008
積分 : 19
經驗值 : 6566
威望值 : 226
發帖精華 : 1
注冊日期 : 2008-09-22
男 摩羯座 猴

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 Reicy 2009-04-18, 17:04

因為不會寫lisp,所以每次看到會寫lisp的人總會肅然起敬,實在好厲害哦....
好棒
Reicy
Reicy
初級會員
初級會員

文章總數 : 132
年齡 : 47
來自 : 台灣
職業 : 繪圖員
愛好 : 看電影
個性 : 開朗
使用年資 : 5
使用版本 : 2008
積分 : 2
經驗值 : 5661
威望值 : 36
注冊日期 : 2009-02-12
藍鵲118號
女 金牛座 龍

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 阿希 2009-04-18, 17:27

Reicy 寫到:因為不會寫lisp,所以每次看到會寫lisp的人總會肅然起敬,實在好厲害哦....
好棒

會LISP ....是閒閒沒事的人才會的.....
蘋果爸也是太忙...所以才把LISP....給遺棄 竊喜
avatar
阿希
高級會員
高級會員

文章總數 : 344
年齡 : 43
來自 : 台北
職業 : 水電設計
愛好 : autolisp
個性 : 和平主義者
使用年資 : 5
使用版本 : 2008
積分 : 19
經驗值 : 6566
威望值 : 226
發帖精華 : 1
注冊日期 : 2008-09-22
男 摩羯座 猴

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 Tiger&蘋果爸 2009-04-18, 18:24

阿希 寫到:
會LISP ....是閒閒沒事的人才會的.....
蘋果爸也是太忙...所以才把LISP....給遺棄
三條線 因為我的功力不夠啦...未來如果有時間及機會,倒是很希望能跟大家一起研究!!

讚啦!!也很感謝阿希的技術支援喔~

ps:但是現在真的是有點小忙!!

____________________________________________________________________________________
👉[好康]🎁加入專屬B取得大補帖及看2D+3D影片(點我)👈
<已解決>請問自動編號的巨集怎麼寫? Sesa2011 <已解決>請問自動編號的巨集怎麼寫? Youtub11 <已解決>請問自動編號的巨集怎麼寫? Oiea2011 <已解決>請問自動編號的巨集怎麼寫? Oe20011 <已解決>請問自動編號的巨集怎麼寫? Fbi20011 <已解決>請問自動編號的巨集怎麼寫? Line2011
Tiger&蘋果爸
Tiger&蘋果爸
系統管理員
系統管理員

文章總數 : 21077
年齡 : 48
來自 : 台北市文山區
職業 : AutoCAD顧問
愛好 : 蹓狗/戶外活動/拍照/吸貓
個性 : 幽默/樂觀/善良
使用年資 : 20↑
使用版本 : AutoCAD 2022
經驗值 : 88422
威望值 : 16930
注冊日期 : 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 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 JerryJr 2009-04-18, 20:47

其實我的lisp功力大多都還課本了
所以這些程式可以多多交流囉
JerryJr
JerryJr
高級會員
高級會員

文章總數 : 249
年齡 : 47
來自 : 台北
職業 : 建築
愛好 : LOVE GOOD
個性 : GOOD
使用年資 : 10 YEAR OVER
使用版本 : 哪版最新就用哪版
積分 : 39
最佳解答 : 1
經驗值 : 6443
威望值 : 251
回帖精華 : 1
注冊日期 : 2008-09-15
經典問與答讀者 男 射手座 龍

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 Eason 2009-05-13, 19:37

這個LISP我要好好研究一下,這樣我就可以將所有尺寸的檢查號碼快速標注了。
Eason
Eason
初級會員
初級會員

文章總數 : 25
年齡 : 46
來自 : Taipei
職業 : 產品工程師
愛好 : 登山~游泳~羽球~單車
個性 : Peace
使用年資 : 7年
使用版本 : AutoCAD 2008
積分 : 1
經驗值 : 5607
威望值 : -1
注冊日期 : 2008-12-16
男 天秤座 蛇

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 耍寶的泡 2009-06-15, 10:03

大家都好厲害唷~我都不懂LISP~~
耍寶的泡
耍寶的泡
一般會員
一般會員

文章總數 : 44
年齡 : 46
來自 : 桃園市
職業 : 建築模型業
愛好 : 戶外活動
個性 : 內向
使用年資 : 3年
使用版本 : 2008
經驗值 : 5722
威望值 : 6
注冊日期 : 2008-10-23
男 摩羯座 蛇

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 Eason 2009-06-15, 10:13

請問各位大大:
阿希前輩寫的LISP是採用ASCII方式,將字串或是數字轉換成ASCII碼,然後將ASCII的內碼+1,再去替換新的字串,達到A->B,B->C的方式,但是有一個問題會發生,就是如果是要增加數字的話,那數字1~9是OK的(因為ASCII的內碼有1~9),但如果是數字10或是之後的號碼的話,則顯示的內容會變成 ; 等符號了(因為ASCII的內碼10是 ; 而不數字10) ,也就是說數字10就不會出現了。請問可以改良這個問題嗎??
Eason
Eason
初級會員
初級會員

文章總數 : 25
年齡 : 46
來自 : Taipei
職業 : 產品工程師
愛好 : 登山~游泳~羽球~單車
個性 : Peace
使用年資 : 7年
使用版本 : AutoCAD 2008
積分 : 1
經驗值 : 5607
威望值 : -1
注冊日期 : 2008-12-16
男 天秤座 蛇

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 阿希 2009-06-16, 10:19

Eason 寫到:請問各位大大:
阿希前輩寫的LISP是採用ASCII方式,將字串或是數字轉換成ASCII碼,然後將ASCII的內碼+1,再去替換新的字串,達到A->B,B->C的方式,但是有一個問題會發生,就是如果是要增加數字的話,那數字1~9是OK的(因為ASCII的內碼有1~9),但如果是數字10或是之後的號碼的話,則顯示的內容會變成 ; 等符號了(因為ASCII的內碼10是 ; 而不數字10) ,也就是說數字10就不會出現了。請問可以改良這個問題嗎??


基本上LISP算是客製化的程式,會因使用者的需求而有所變化,如同我所說的 "未考慮任何可能情況"
Eason說的當然可以做到,只要有規則或有系統的排序都可以
avatar
阿希
高級會員
高級會員

文章總數 : 344
年齡 : 43
來自 : 台北
職業 : 水電設計
愛好 : autolisp
個性 : 和平主義者
使用年資 : 5
使用版本 : 2008
積分 : 19
經驗值 : 6566
威望值 : 226
發帖精華 : 1
注冊日期 : 2008-09-22
男 摩羯座 猴

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 cuter0616 2009-06-16, 21:04

LISP還不太敢去碰
先學起來先,
謝謝提問題的一千三百五十萬及回答問題的阿希
謝謝你們喔
感恩喔
cuter0616
cuter0616
初級會員
初級會員

文章總數 : 41
年齡 : 48
來自 : 板橋
職業 : 裝潢
個性 : 易相處
積分 : 3
經驗值 : 5482
威望值 : 0
注冊日期 : 2009-03-28
男 雙子座 兔

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 多耙文

發表 由 平方根 2009-06-27, 20:37

巨集也可以編圖號嗎??因為我是在畫圖的.
平方根
平方根
一般會員
一般會員

文章總數 : 18
年齡 : 44
來自 : 高雄縣
職業 : 工程師/拍照
愛好 : 電腦跟健行
個性 : 活潑
使用年資 : 2年
使用版本 : 2008
經驗值 : 5400
威望值 : 0
注冊日期 : 2009-06-21
男 天蝎座 羊

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 jjch001 2009-08-21, 21:56

爬文學習中----這個lisp正好可以在工作時用到了 竊喜
jjch001
jjch001
一般會員
一般會員

文章總數 : 20
年齡 : 47
來自 : 高雄縣
職業 : 建築繪圖員
愛好 : 電玩
個性 : 呆呆的
使用年資 : 1?年多
使用版本 : 2008版
經驗值 : 5347
威望值 : 0
注冊日期 : 2009-08-19
女 射手座 龍

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 vl7120 2012-01-21, 09:50

這個LISP我要好好研究一下
因為我的功力不夠啦
這裡的程式可以多多利用與學習

____________________________________________________________________________________
<已解決>請問自動編號的巨集怎麼寫? 078
<已解決>請問自動編號的巨集怎麼寫? Acad1810 <已解決>請問自動編號的巨集怎麼寫? Acad2010 <已解決>請問自動編號的巨集怎麼寫? Acad1810
<已解決>請問自動編號的巨集怎麼寫? Acad1211 <已解決>請問自動編號的巨集怎麼寫? Acad1311 <已解決>請問自動編號的巨集怎麼寫? Acad1511
vl7120
vl7120
初級會員
初級會員

文章總數 : 91
年齡 : 54
來自 : 高雄
職業 : 待業
愛好 : 旅遊
個性 : 木訥
使用年資 : 新手初學
使用版本 : 2000
積分 : 1
經驗值 : 5052
威望值 : 45
注冊日期 : 2011-07-02
藍鵲215號
女 天秤座 雞

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 小香 2012-02-07, 17:07

原來還可以這樣丫,我真的要多多上來看看了
小香
小香
初級會員
初級會員

文章總數 : 32
年齡 : 49
來自 : 台中市
職業 : 繪圖員
愛好 : 畫圖
個性 :
使用年資 : 1年
使用版本 : 2008
積分 : 1
經驗值 : 5055
威望值 : 12
注冊日期 : 2010-10-12
串連貼紙成功 女 天秤座 虎

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 as920029as 2012-07-03, 12:06

Eason 寫到:請問各位大大:
阿希前輩寫的LISP是採用ASCII方式,將字串或是數字轉換成ASCII碼,然後將ASCII的內碼+1,再去替換新的字串,達到A->B,B->C的方式,但是有一個問題會發生,就是如果是要增加數字的話,那數字1~9是OK的(因為ASCII的內碼有1~9),但如果是數字10或是之後的號碼的話,則顯示的內容會變成 ; 等符號了(因為ASCII的內碼10是 ; 而不數字10) ,也就是說數字10就不會出現了。請問可以改良這個問題嗎??
我利用了前面大大的lisp 程式 稍微改了一下
不知是否可以滿足您的條件
首先 做一個 屬性圖塊
http://tw.myblog.yahoo.com/yakuei-smart/article?mid=173&next=149&l=f&fid=9
如上網只那樣@@做個屬性編號的圖塊
然後以下是改過的lisp
(defun c:XX()
(setvar "cmdecho" 0)
(SETQ EN2 (GETSTRING "輸入數字:"))
(SETQ X1 (getpoint EN2))
(WHILE X1
(setq en_data (command "insert" "NO.09-01" "s" "1" "r" "0" X1 EN2))
(ENTMOD en_data)
(SETQ ATT (atoi EN2))
(SETQ EN2 (+ ATT 1))
(SETQ EN2 (itoa EN2))
(SETQ X1 (getpoint EN2))
)
(prin1)
)



只要把(defun c:XX()
的c: 後面的xx改能你想要的指令
跟(setq en_data (command "insert" "NO.09-01" "s" "1" "r" "0" X1 EN2))
的"NO.09-01" " " 內改成你的圖塊名稱就可以了
希望有幫到忙^^"
as920029as
as920029as
一般會員
一般會員

文章總數 : 110
年齡 : 33
來自 : 台南市
職業 : 繪圖員
愛好 : 電腦遊戲
個性 : 開朗
使用年資 : 3年
使用版本 : 2010
經驗值 : 4987
威望值 : 47
注冊日期 : 2012-05-06
男 白羊座 羊

回頂端 向下

<已解決>請問自動編號的巨集怎麼寫? Empty 回復: <已解決>請問自動編號的巨集怎麼寫?

發表 由 lingo_st 2012-07-19, 21:52

135ooooo 寫到:請問這個自動編號的巨集怎麼寫? 火冒三丈

比如有三字串分別為12,34,56

點選12,12變成12A

再來點選34,34變成34B

最後點選56,56變成56C.....

以此類推,在字串後面編ABC...Z

大大救救~感動

請問這邊所謂的"字串"指的是文字?還是...
剛試了一下,不知道作用...
lingo_st
lingo_st
中級會員
中級會員

文章總數 : 211
年齡 : 60
來自 : 新北市
職業 : 營造,建設
愛好 : 學習,服務,電腦軟硬體
個性 : 正直,達觀且無可救藥的雞婆
使用年資 : 使用12年但真的是新手
使用版本 : 2012,2013
積分 : 6
經驗值 : 5726
威望值 : 271
注冊日期 : 2011-12-18
經典問與答讀者 藍鵲238號
男 雙魚座 龍

回頂端 向下

1頁(共2頁) 1, 2  下一步

回頂端


 
這個論壇的權限:
無法 在這個版面回復文章
<已解決>請問自動編號的巨集怎麼寫? Ioaoe110<已解決>請問自動編號的巨集怎麼寫? 2020-310<已解決>請問自動編號的巨集怎麼寫? Oiu15010<已解決>請問自動編號的巨集怎麼寫? 2020-211<已解決>請問自動編號的巨集怎麼寫? Ia15010<已解決>請問自動編號的巨集怎麼寫? Aizyao10<已解決>請問自動編號的巨集怎麼寫? Uos15010<已解決>請問自動編號的巨集怎麼寫? BPl3tjj<已解決>請問自動編號的巨集怎麼寫? Ziao1510
<已解決>請問自動編號的巨集怎麼寫? Oo-2-110<已解決>請問自動編號的巨集怎麼寫? Zuoiy_10<已解決>請問自動編號的巨集怎麼寫? Aizyao11<已解決>請問自動編號的巨集怎麼寫? Iyb_1510<已解決>請問自動編號的巨集怎麼寫? Aoe1-111<已解決>請問自動編號的巨集怎麼寫? Uos15011<已解決>請問自動編號的巨集怎麼寫? Aoe2da10<已解決>請問自動編號的巨集怎麼寫? Aoe2da11<已解決>請問自動編號的巨集怎麼寫? Aoe10