smallfai 发表于 2009-6-25 00:38

Autolisp-快速注標线段或兩點之間的長度、方位角

Autolisp-快速注標线段或兩點之間的長度、方位角
使用方法:Load入之後在对話窓鍵入db,選擇线段(S)或兩點(T).
1,若選擇线段(直綫),輸入文字風格(TEXT STYLE),若鍵入空白金(space),會選用現行的風格(current).之後選擇线段(直綫),輸入文字高度,最後選擇文字的位置.
2,若選擇兩點,選擇起點後選擇終點(舉例若想知由A点至B点的方位角,先選擇A點後選擇B點),輸入文字風格(TEXT STYLE),若鍵入空白金(space),會選用現行的風格(current),輸入文字高度,最後選擇文字的位置.

P.S.-此程式是在WCS進行,i.e.開始程式後系統會由UCS自動轉為WCS(若你工作的圖是在UCS進行),但完成後會自動轉回UCS.若途中中止(escape),系統會停放在WCS.

這是小弟的另一拙作,希望幫到大家.

phimon 发表于 2013-6-4 18:00

这个不错,感谢分享,下来测试。
页: [1]
查看完整版本: Autolisp-快速注標线段或兩點之間的長度、方位角