標題:
關於autolisp的問題
[打印本頁]
作者:
yenwang
時間:
2015-4-8 21:25
標題:
關於autolisp的問題
大家好
想請問個問題
我的autocad檔內有不少線條和圓形方塊
請問autocad lisp要怎麼寫
才能單純將線條的兩點座標匯出成文字檔呢？
我需要匯出用excel後續處理
有了座標，可以做定位和長度計算！
作者:
naruto018
時間:
2017-1-25 17:21
可以使用資料萃取功能(指令dataextraction)
這功能可以將圖面資訊匯出到Excel
選擇線或聚合線
品項篩選選擇幾何圖形
性質那裏就會出現你要的點座標和線段長度
作者:
lawrence168
時間:
2017-2-9 22:54
(defun c:TEXTEX()
(setq ffn (getfiled "寫出檔案" "" "" 1))
(princ "\n選取文字...")
(setq ss (ssget))
(setq ff (open ffn "w"))
(setq i 0)
(repeat (sslength ss)
(setq ssn (ssname ss i))
(setq ssdata (entget ssn))
(setq sstyp (cdr (assoc 0 ssdata)))
(if (= sstyp "TEXT")
(progn
(setq txt (cdr (assoc 1 ssdata)))
(princ txt ff)
(princ "\n" ff)
)
)
(setq i (1+ i))
)
(close ff)
(princ (strcat "\n寫出檔案: " ffn))
(prin1)
)
歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)
