AutoCAD矩形交叉口框短邊切圓一

autocad矩形交叉口框短邊切圓，繪製長方形，並以中心為圓形短邊為半徑畫圓，並擷取對角線，**如下。

(defun c:test()

(setvar "cmdecho" 0)

(setq pt1 (getpoint "\n第一角點："))

(setq pt3 (getcorner pt1 "\n另一角點："))

(setq pt2 (list (car pt3) (cadr pt1)))

(setq pt4 (list (car pt1) (cadr pt3)))

(command "rectang" pt1 pt3)

(setq int (inters pt1 pt3 pt2 pt4))

(setq ww (distance pt1 pt2))

(setq hh (distance pt2 pt3))

(setq cir1 (/ (min ww hh) 2))

(command "circle" int cir1)

(setq en1 (entlast))

(command "line" pt1 pt3 "")

(setq en2 (entlast))

(command "line" pt2 pt4 "")

(setq en3 (entlast))

(command "trim" en1 "" (list en2 pt1) (list en2 pt3) (list en3 pt2) (list en3 pt4) "")

(prin1)

)

AutoCAD介面設定

找介面中的小齒輪即草圖與介面設定為經典cad介面 調整單位為公釐 快捷鍵un 讓原點不動 檢視 顯示 ucs圖示 原點 或檢視 顯示 ucs圖示 開 這樣就看不見原點了 工具 選項 注意自動儲存檔案位置 卡機 停電 或快捷鍵op 選項 顯示 圖形背景顏色 黑色 這樣游標自動為白色 選項 顯示 布局元...

Autocad 安裝問題

最近執行autocad 2012 64位 時總會彈出這樣乙個畫面 上網找了許多，最後驗證用管理員身份執行可以解決。再又認真研究了autocad2012在startup資料夾中的快捷方式，發現是這樣的。其中的start in，是乙個很怪的位置 c program files autodesk auto...

AutoCAD系統變數 EDGEMODE

在對兩條直線進行剪裁 trim 時，如果這兩條線不相交，你會怎麼辦？通常的做法是先延長兩條直線以使其相交，之後再進行trim操作。如果在繪圖中，這種不相交的情況大量存在，剪裁豈不是很麻煩？autocad已經為我們考慮到了這種情況，通過修改系統變數edgemode，我們可以輕鬆實現對不相交的直線進行t...