[已解決][問題]小弟又來打擾了，詢問lisp自動裁線

我有那旁邊兩條線的圖元資料，也有那兩點交點的座標，要如何把那兩段線裁剪掉，請教各位高手

因為不太清楚你的圖與表達的意思與需求，只能提供一點我的想法
有旁邊兩條線的圖元資料，可以嘗試使用trim，選取旁邊兩條線，在抓兩條線端點的座標相加除與二得到中點
就能把那條短的線段裁切掉

由於沒有看到你的lisp是如何寫的所以我沒辦法提供更多的建議
只能讓其他的高手來解答了

我假設那兩條線的圖元名稱為n1與n2來寫了一小段看看行不行

代碼:

(command "trim" n1 n2 "" (list (/ (+ (cadr (assoc 10 (entget n1))) (cadr (assoc 10 (entget n2)))) 2)
          (/ (+ (caddr (assoc 10 (entget n1))) (caddr (assoc 10 (entget n2)))) 2))
     (list (/ (+ (cadr (assoc 11 (entget n1))) (cadr (assoc 11 (entget n2)))) 2)
          (/ (+ (caddr (assoc 11 (entget n1))) (caddr (assoc 11 (entget n2)))) 2))
"")