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

[已解決]這程式為什麼不能運作?

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

[已解決]這程式為什麼不能運作?

發表 由 s924310 于 2011-07-11, 08:53

本來有問題要發問
結果 想了好久 發現問題的所在
感謝CAD顧問論壇給我了靈感!!

(defun c:sb ()
(setq di (getint "\n請輸入縮短距離<-10>:"))
(if (null di )(setq di -10))
(setq en (entsel"\n請選擇切斷的線"))

(while en

(setq po (getpoint "\n請點取切斷點"))
(command "break" en "f" po "@")
(command "LENGTHEN" "DE" di (entsel"\n請選擇縮短的線")"")
(setq en (entsel"\n請選擇切斷的線"))

)

(prin1)
)



Tiger&蘋果爸 在 2011-07-13, 15:00 作了第 4 次修改 (原因 : 將主題顏色改為無)
avatar
s924310
初級會員
初級會員

文章總數 : 31
年齡 : 26
來自 : 高雄
職業 : 電腦繪圖
愛好 : 看熱鬧
個性 : 隨性
使用年資 : 4年
使用版本 : 2006
積分 : 2
經驗值 : 2997
威望值 : 21
注冊日期 : 2009-09-21
男 水瓶座 馬

回頂端 向下

回復: [已解決]這程式為什麼不能運作?

發表 由 Tiger&蘋果爸 于 2011-07-11, 09:47

是的!!
問題就出在少一個ENTER
(command "LENGTHEN" "DE" di (entsel"\n請選擇縮短的線") "" )

跟你分享我使用巨集寫出來的也可達到類似需求,你參考看看~
切斷縮短線巨集語法:
*^c^cBREAK \F \@ LENGTHEN DE \\


影片第一段為你的程式,第二段我使用巨集滿足~

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

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

回頂端 向下

回復: [已解決]這程式為什麼不能運作?

發表 由 tarpon 于 2011-07-12, 01:29

請問蘋果爸
巨集中使用 @ 有何用途謝謝 疑問
avatar
tarpon
中級會員
中級會員

文章總數 : 201
年齡 : 27
來自 : 台北
職業 : 設計
愛好 : 打球
個性 : 溫和
使用年資 : 5年
使用版本 : 2006
積分 : 6
經驗值 : 3530
威望值 : 238
注冊日期 : 2010-07-01
串連貼紙成功 男 巨蟹座 馬

回頂端 向下

回復: [已解決]這程式為什麼不能運作?

發表 由 Tiger&蘋果爸 于 2011-07-12, 04:07

tarpon 寫到:請問蘋果爸
巨集中使用 @ 有何用途謝謝 疑問
當指定點位置跟上一次一樣,這時可以使用@
認同

官網說明:
請為第一和第二點輸入相同的點。您可以輸入 @ 指定第二點,以實現此目的。
http://exchange.autodesk.com/autocad/cht/online-help/search#WS1a9193826455f5ffa23ce210c4a30acaf-4d65.htm

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

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

回頂端 向下

回復: [已解決]這程式為什麼不能運作?

發表 由 tarpon 于 2011-07-12, 07:17

學習了感謝蘋果爸的說明 親一個
avatar
tarpon
中級會員
中級會員

文章總數 : 201
年齡 : 27
來自 : 台北
職業 : 設計
愛好 : 打球
個性 : 溫和
使用年資 : 5年
使用版本 : 2006
積分 : 6
經驗值 : 3530
威望值 : 238
注冊日期 : 2010-07-01
串連貼紙成功 男 巨蟹座 馬

回頂端 向下

回復: [已解決]這程式為什麼不能運作?

發表 由 Tiger&蘋果爸 于 2011-07-12, 09:12

tarpon 寫到:學習了感謝蘋果爸的說明 親一個
不客氣啦~
這個@不只用在BREAK指令,很多地方都可以用,尤其是用在巨集(連續指令)特別好用~
竊喜

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

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

回頂端 向下

回復: [已解決]這程式為什麼不能運作?

發表 由 lingo_st 于 2012-08-09, 17:33

發現一件很好玩的事

差值輸入負值時 可以把任意線段 每次切掉差值長度,同時可連續切除
差值輸入正值時 可以把任意線段 每次伸長差值長度,同時可連續延伸

好像可以用在不同需求的地方喔,如果多條線段需要延伸或縮短固定長度,好像還蠻方便的
可惜不能窗選,殘念
avatar
lingo_st
中級會員
中級會員

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

回頂端 向下

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


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