[練習]繪圖小技巧12 - 文字佈點

由 **Tiger&蘋果爸** 2013-04-02, 12:52

任務：把圖面中所有「文字」物件，在文字插入點中放置點(POINT)。

▼原始圖面

▼完成佈點圖面

※其實還有很多快速方式可以達成，希望大家可以先分享自己的作法，再來看以下的「方式一」快速解決方式！
練習完成後請說明「步驟」、「貼圖」，回答的會員朋友可以得到（威望值+6）。

方式一：
範例中使用較為進階的方式，透過「資料萃取」+「腳本檔」方式佈點，以下操作供大家參考，有其他方式也請會員朋友們一同提出分享喔！

▼腳本檔語法

代碼:: POINT 2379.4179,1437.5231 POINT 2354.6868,1428.6014 POINT 2372.8862,1453.3571 POINT 2348.1552,1444.4353

▼影片展示： https://youtu.be/I7aFPy8rGog

▼範例DWG檔案下載(2000圖面格式)：

附件

: TEXTINS-TEST.zip 您無權下載這里的附件。(11 Kb) 下載 54 次

由 **Joan** 2013-04-02, 15:05

感謝蘋果爸給予練習機會
讓我們更進一步熟悉AutoCAD功能

附件

: 文字插入點.jpg 您無權下載這里的附件。(20 Kb) 下載 2 次

由 **單親爸** 2013-04-02, 17:28

我先在"格式(O)"中的"點型式(P)..."選取我需要的點型式；點大小(S):1.0000%；以絕對單位設定大小(A)
然後在指令列下POINT，再以物件鎖點中的"插入點(S)"+空白鍵，依序將POINT種到每組文字的插入點
但這是個笨方法，如果要做的物件數量很多的話，蘋爸教的方法，速度上會快上很多、很多...

感謝蘋爸所提供的小技巧

由 **Tanya** 2013-04-02, 17:30

[練習]繪圖小技巧12 - 文字佈點 42k2X7MkodaaaYEn3nV6ebNPnJc_mQXxFz6LG5YBTLw?size=1280x960

我也是用萃取方式再加以編輯，在轉腳本，完成。
萃取X.Y座標後，還可以做很多不同用途喔。

由 **judyyai** 2013-04-02, 20:45

沒想過這個問題~
我還是土法煉鋼~ 先設定點型式
再設定自動鎖插入點~用繪製多點去繪製點~
這個方法很慢~ 來學習蘋爸方法

[練習]繪圖小技巧12 - 文字佈點 2013-04-02_204350

由 **Atsai** 2013-04-02, 22:36

看到蘋果爸的題目，順手寫個小lisp。
(defun c:test ()
(setq os (getvar "osmode"))
(setvar "osmode" 0)
(setvar "cmdecho" 0)
(setq ss (ssget '((0 . "*TEXT"))))
(setq l (sslength ss))
(setq i 0)
(repeat l
(setq pt (cdr (assoc 10 (entget (ssname ss i)))))
(command "_point" pt)
(setq i (1+ i))
)
(setvar "osmode" os)
(princ)
)

由 **judyyai** 2013-04-02, 23:38

Atsai 寫到:看到蘋果爸的題目，順手寫個小lisp。
(defun c:test ()
(setq os (getvar "osmode"))
(setvar "osmode" 0)
(setvar "cmdecho" 0)
(setq ss (ssget '((0 . "*TEXT"))))
(setq l (sslength ss))
(setq i 0)
(repeat l
(setq pt (cdr (assoc 10 (entget (ssname ss i)))))
(command "_point" pt)
(setq i (1+ i))
)
(setvar "osmode" os)
(princ)
)