1樓：匿名使用者
(defun c:shuru(/ file dwg pt sx sy)
(setvar "cmdecho" 0)
(setq file (getstring "\n輸入待輸入的圖形檔名:"))
(if (not file)(exit)
(progn
(setq dwg(findfile(strcat file ".dwg")))
(if(not dwg)(exit)
(progn
(setq pt(getpoint "\n指定插入點:"))
(if(not pt)(exit)
(progn
(setq sx(getreal "\指定x比例<1>:"))
(if(not sx)(setq sx 1))
(setq sy(getreal "\指定y比例<1>:"))
(if(not sy)(setq sy 1))
(command "-insert" dwg pt sx sy "0")))
))))
(setvar "cmdecho" 0)
(princ)
);;事實上真的是直接使用insert命令也差不多!除非要批量插入才程式設計
;;順手寫了段小**，自己按需要修改一下再用
2樓：匿名使用者
這個不需要程式設計吧，cad中的insert命令可以解決這個問題。
怎樣將cad中已經畫好的圖的一部分，放入新建的一個圖層中？
3樓：匿名使用者
選中你需要修改圖層的物件，右擊特性或在選單欄裡選擇特性，裡面有圖層，直接選擇你需要放入的圖層。
4樓：匿名使用者
先選中你要轉的部分，再點圖層
5樓：朱正偉
修改圖層的話方法有以下：
選擇物件，右鍵，屬性，在屬性裡面修改圖層。
autolisp也可以修改圖層，**如下
求lisp程式，在cad圖中插入事先存在某資料夾裡的一張圖，選擇插入點時，圖形跟著滑鼠移動。。
求lisp程式解決cad插入圖塊
6樓：
(while(setq pt1(read-line f))
(setq rang(last(read(strcat "(" pt1 ")"))))
(setq pt1(read(strcat "(" pt1 ")")))
(setq pt1(list (car pt1)(cadr pt1)))
(command "insert" blockname pt1 "" "' rang ""))
lisp批量開啟cad圖操作
7樓：匿名使用者
我有cad批量列印的軟體，永久使用的，很方便快捷的，你要嗎？
CAD塊不能正常顯示，CAD開啟，圖中的塊中的文字，沒法顯示
你後兩張圖分明塊編輯器，而塊編輯器是autocad 2006新增動態塊功能後才有的。但問題卻說2004模型中，你的問題說得不明白啊。如果是2006以後的版本中做動態塊，轉存為2004版後，是不能顯示原有塊的動態特性的。根據你說的，猜想是不是你在2006以上版本中做了可見性動態塊，在2004版中無法看...
CAD圖中的斜線是什麼意思，CAD圖中的斜線是什麼意思？ 有圖
這個是刪除的意思，圖不是你自己畫的吧。斜線沒什麼意思，可以自己刪了，可能是圖紙做廢的意思。cad中的標註線的斜槓怎麼弄出來，如下圖 以cad2012為例，步驟如下抄 1 開啟baicad，在工具欄選擇 標註樣式 du 2 標註樣式 選項中zhi，選擇 修改dao 3 彈出頁面中，選擇 符號和箭頭 4...
在CAD機械製圖中圖層設定的國標
在機械製圖中 bai都有，在機械工程師du設計手冊zhi中也有，我在用的時候，圖dao層的顏色沒有內什麼特別要求，線容型是固定的，線寬細線用0.18粗的，粗實線用0.35的，一般都用這個規定，當然還有其它的，但是好多情況下都用這個標準，但願能幫到你。還有顏色，儘量選擇鮮豔一點的，要不然列印出來的看不...