[發問]取得line的角度

請問有辦法取得 線 的角度多少嗎
假如劃一條離x軸 45度的線
用性質看可以看出 他角度寫45度
但使用 (setq en (entsel "線"))
(setq en_data (entget (car en)))
卻找不到有角度的串列
請問是否有方式可以點取線後取得 線角度多少?

可以用

代碼:

(angle 點1 點2)

取得二點的角度弳度值

如須從弳度值轉成一般角度值，要除PI和乘上180
線的角度
點1是群組碼10(起點)
點2是群組碼11(終點)

代碼:

(angle (cdr(assoc 10 en_data)) (cdr(assoc 11 en_data)))

轉成一般角度值

代碼:

(* 180.0 (/ (angle (cdr(assoc 10 en_data)) (cdr(assoc 11 en_data))) pi))

感謝大大回覆 我在研究看看

關於你的問題
可以透過entget搭配entnext向下探
基本上性質看的到的值都探的到只是他藏在裡層而已
https://i.servimg.com/u/f29/20/38/27/99/ao10.png
https://i.servimg.com/u/f29/20/38/27/99/entget10.png

這是我寫得原碼
由此可知其實我探了3層而長寬高剛剛好就是第三層頁籤
(assoc 40 (reverse (entget (cdr (assoc 360 (entget (cdr (assoc 360 (entget (cdr(assoc 350 (entget (car (entsel))))))))))))))