教學課程
加入贊助
聯絡我們
我請CHATGPT幫我寫了一個"序號球"程式碼
+30
aqurius32
fashow
bondtrd
brucecad
virage7676
EIDOS AB
chunglove
雲菲爾德
wu200090
糖糖的主人
winnie
黃智偉
a8822063
WillChen199903
bondtrd71
ko499111788
ryan0106
kimi27
wuwubaibai
masao_8
ji2342
rickyyang
aromild
鄧韻伶
shyrchu
yuann's
DoveW
EVONNE
Tiger&蘋果爸
hongren24
34 posters
我請CHATGPT幫我寫了一個"序號球"程式碼
由 hongren24 周三 3 1月 2024 - 15:11
主題回顧 :
小弟之前請CHATGPT幫我寫了一個 序號球的程式碼
就是可以接續編號的球，
但是字一直無法在圓心上，
看來是某種代溝，
發上來讓大家看看能否更好，第一次發文若有不合規範或有誤還請見諒，也請不吝跟我說，謝謝各位前輩。
小弟之前請CHATGPT幫我寫了一個 序號球的程式碼
就是可以接續編號的球，
但是字一直無法在圓心上，
看來是某種代溝，
發上來讓大家看看能否更好，第一次發文若有不合規範或有誤還請見諒，也請不吝跟我說，謝謝各位前輩。
- 代碼:
(defun c:CB (/ pt size font_size count)
(setq count 1)
(setq size (getreal "\nEnter circle size: "))
(setq font_size (getreal "\nEnter font size: "))
(while
(setq pt (getpoint "\nSelect position for serial number ball or [Enter to exit]: "))
(if (not pt)
(exit)
)
(command "_circle" pt size "")
(setq text_position (polar pt (/ pi 4) size)) ; Place text at a quarter distance from the circle center
(setq text_position (list (car text_position) (+ (cadr text_position) (* 0.5 font_size)) 0)) ; Adjust text position
(command "-text" text_position font_size 0 (itoa count))
(setq count (+ count 1))
)
)
hongren24- 一般會員
- 文章總數 : 12
年齡 : 28
來自 : 高雄
職業 : 景觀
愛好 : 無
個性 : 無
使用年資 : 3年
使用版本 : 2017
經驗值 : 1189
威望值 : 15
注冊日期 : 2021-12-29
回復： 我請CHATGPT幫我寫了一個"序號球"程式碼
由 chunglove 周三 25 9月 2024 - 8:33
前些時間也有試過，但是對LISP語法不熟，並且是在AUTOCAD 2024 LT版使用，所以在YT看到影片後，下載來看看語法且學習。謝謝分享
chunglove- 一般會員
- 文章總數 : 2
年齡 : 53
來自 : 新北市
職業 : 消費機構設計
愛好 : 攝影
個性 : 內斂
使用年資 : 20
使用版本 : 2024 LT
經驗值 : 2881
威望值 : 0
注冊日期 : 2017-03-13
EIDOS AB- 一般會員
- 文章總數 : 7
年齡 : 45
來自 : 台中
職業 : 待業
愛好 : 爬山
個性 : 樂觀
使用年資 : 初學
使用版本 : 2013
經驗值 : 481
威望值 : 6
注冊日期 : 2023-11-02
virage7676- 一般會員
- 文章總數 : 30
年齡 : 48
來自 : 台中市北屯區
職業 : 自由業
愛好 : 慢跑
個性 : 寡言
使用年資 : 10
使用版本 : CAD2006
經驗值 : 4685
威望值 : -9
注冊日期 : 2012-08-04
回復： 我請CHATGPT幫我寫了一個"序號球"程式碼
由 brucecad 周五 15 11月 2024 - 19:55
來測試看看AI的功力
感謝分享
真棒
感謝分享
真棒
____________________________________________________________________________________
brucecad- 初級會員
- 文章總數 : 65
年齡 : 50
來自 : Hsinchu
職業 : engineer
愛好 : book
個性 : nice
使用年資 : 新手初學
使用版本 : 新手初學
經驗值 : 3856
威望值 : 6
注冊日期 : 2015-05-03
bondtrd- 一般會員
- 文章總數 : 7
年齡 : 41
來自 : 台中
職業 : 繪圖員
愛好 : yt
個性 : 喜愛學習
使用年資 : 12h
使用版本 : 2021
經驗值 : 243
威望值 : 24
注冊日期 : 2024-07-19
回復： 我請CHATGPT幫我寫了一個"序號球"程式碼
由 bondtrd 周日 1 12月 2024 - 10:31
一開始使用產生出來也都是0,後來叫aI改了老半天也改不好,後來設定文字字高為0就正常產生號碼球了..不知道原因
- 附件
- 1733020017026.jpg 您無權下載這里的附件。(88 Kb) 下載 0 次
bondtrd- 一般會員
- 文章總數 : 7
年齡 : 41
來自 : 台中
職業 : 繪圖員
愛好 : yt
個性 : 喜愛學習
使用年資 : 12h
使用版本 : 2021
經驗值 : 243
威望值 : 24
注冊日期 : 2024-07-19
Tiger&蘋果爸 likes this post
fashow- 一般會員
- 文章總數 : 39
年齡 : 25
來自 : 新竹
職業 : 工程師
愛好 : 閱讀
個性 : 隨興和諧
使用年資 : 4年
使用版本 : 2014
經驗值 : 525
威望值 : 6
注冊日期 : 2024-02-20
回復： 我請CHATGPT幫我寫了一個"序號球"程式碼
由 aqurius32 周一 2 12月 2024 - 10:33
謝謝分享。
____________________________________________________________________________________
aqurius32- 初級會員
- 文章總數 : 88
年齡 : 50
來自 : 台北
職業 : 繪圖
愛好 : 泡茶
個性 : 大眾化
使用年資 : 10
使用版本 : 2005,2012
積分 : 1
經驗值 : 5229
威望值 : 24
注冊日期 : 2011-11-28
回復： 我請CHATGPT幫我寫了一個"序號球"程式碼
由 AutoCAD顧問 周一 2 12月 2024 - 15:46
謝謝回報，這程式的確沒有考量STYLE字高0問題，已經更新下載連結(修正STYLE設置字高0問題)。bondtrd 寫到:一開始使用產生出來也都是0,後來叫aI改了老半天也改不好,後來設定文字字高為0就正常產生號碼球了..不知道原因
____________________________________________________________________________________
AutoCAD顧問- 管理顧問
- 文章總數 : 219
年齡 : 66
來自 : 台北
職業 : AutoCAD顧問
愛好 : 新知識
個性 : 嚴肅
使用年資 : 22
使用版本 : 2023
經驗值 : 7131
威望值 : 177
注冊日期 : 2008-05-10
ctest- 一般會員
- 文章總數 : 60
年齡 : 55
來自 : 中壢
職業 : 待業
愛好 : watch
個性 : 溫和
使用年資 : 新手初學
使用版本 : 新手初學
經驗值 : 5143
威望值 : 12
注冊日期 : 2011-09-19
EIDOS AB- 一般會員
- 文章總數 : 7
年齡 : 45
來自 : 台中
職業 : 待業
愛好 : 爬山
個性 : 樂觀
使用年資 : 初學
使用版本 : 2013
經驗值 : 481
威望值 : 6
注冊日期 : 2023-11-02
saii216- 一般會員
- 文章總數 : 27
年齡 : 40
來自 : 桃園
職業 : 繪圖
愛好 : 慢跑
個性 : 隨和
使用年資 : 10
使用版本 : 2012
經驗值 : 3839
威望值 : 0
注冊日期 : 2014-11-27
taushen- 一般會員
- 文章總數 : 6
年齡 : 42
來自 : 新北市
職業 : 現場監工
愛好 : 上網
個性 : 外向
使用年資 : 20年
使用版本 : 2012
經驗值 : 230
威望值 : 0
注冊日期 : 2024-07-02
這個論壇的權限：
您 無法 在這個版面回復文章
*** disclaimer. 免責聲明 ***
“AUTOCAD®, and AUTODESK® are registered trademarks of Autodesk, Inc., its subsidiaries, and/or its affiliates.”
“This website is independent of Autodesk, Inc., and is not affiliated with, authorized, endorsed, sponsored, or otherwise approved of by Autodesk, Inc.”
“AUTOCAD® 和 AUTODESK® 是 Autodesk, Inc. 及其子公司和/或關聯公司的註冊商標。此網站與 Autodesk, Inc. 無關，並且未經 Autodesk, Inc. 授權、認可、贊助或以其他方式批准”
“AutoCAD 顧問論壇為台灣創立之網站，我們以熱忱服務 AutoCAD 用戶，致力於技術討論、知識分享及教學影片（課程）等內容，為 AutoCAD 社群提供支持與貢獻”