1樓：朱正偉
獲取圓心座標方法，
(setq ent (entlast));獲取最後一個物件(setq obj (vlax-ename->vla-object ent));轉換為vlax物件。
(setq pt1 (vlax-get obj 'center));取得圓心座標
(setq mj1 (vlax-get-area obj));取得物件面積
cad圖紙，autolisp提取圓心座標，發現提取的座標與cad裡面的屬性不一樣，什麼原因；
2樓：匿名使用者
這個圖是由其他的軟體轉過來的，下圖中的洋紅虛線圓的z軸是 -1，你用list命令可以檢視到。我以前見到從ug轉過來的圖中有很多是這樣的，只有重畫一次這個圓
autocad怎麼用autolisp語言，繪製一個以3,4為圓心座標，6位半徑的填充圓。謝謝大家！
3樓：匿名使用者
如果你會lisp命令格式，你可以在cad裡面執行vlisp命令，在對話方塊裡面新建一個lisp編輯框，在裡面寫入命令就可以直接執行，不需要在excel裡面編輯。
autolisp程式設計求助，如何得到螢幕的中點的座標
4樓：朱正偉
取的autocad當前視口中點，**如下：
5樓：
windows api
請採納。。。。
6樓：檀晶進騫堯
很簡單的一個系統變數就能獲得，參見下面**:
(setq
pt(getvar
"viewctr"))
如果你還想獲得螢幕的四個角點的座標，可以利用系統變數viewsizescreensize配合上面得到的螢幕中心座標獲得。
下面在給你個**，可以獲得當前拾取框的高度，在你選取實體的時候這個**很有用:
;|求拾取框的高度
|;(defun
$xdlsp_drawing_getpickboxheight()(*
(/(getvar
"pickbox")
(cadr
(getvar
"screensize")))
(getvar
"viewsize"))
)上面**摘自曉東工具箱裡面的系統**庫裡面的**。
請問lisp語言是如何獲取以原點座標為基準的座標值。
7樓：臨雪一枝梅
獲得指定點的座標 getpoint
已知點pt的x座標 (car pt) y座標 (nth 1 pt) z座標(nth 2 pt)
你這個問題不好說，要學的太多，慢慢來吧……
autolisp 編制一個+100函式，並應用該函式
8樓：朱正偉
autolisp程式裡面，純數值不可以作為函式。要作為函式，可以模仿【1+】函式，比如【100+】，**如下：
(defun 100+ (n / n)
(+ 100 n))
drawoval（）函式怎麼算出圓心的座標
9樓：fly恨不能相愛
設半徑為r；座標為圓心（x，y）；intr=10;intx=50,y=60;drawoval(x-r/2,y-r/2,x+r/2,y+r/2);這樣就可以了。
10樓：匿名使用者
用三角函式啊,兄弟. 舉例,圓o的圓心為(a,b),半徑為r,點a與到x軸的為角α. 則點a的座標為(a+r*cosα,b+r*sinα)
如何用lisp框選一些圓，然後輸出圓心座標到text檔案
11樓：朱正偉
批量選擇圓心座標到記事本
(setvar "cmdecho" 0) ;;關閉變數
(setvar "blipmode" 0);;關閉控制點
(setvar "dimzin" 0)
(vl-load-***) ;;載入vlax擴充套件函式
(setq n 0 ss '()) ;;取得一個空表
(princ "\n請選擇文字")
選擇圓
(if (/= &kw nil);;如果有選擇了圓
(progn
(setq l (sslength &kw)
ff (open "d://圓心到txt.txt" "w");在d盤建立文字《圓心到txt>
);;(repeat l
%k1 (cdr (assoc 10 &k1)) ;;取得圓心座標
ss (cons %k1 ss) ;;加入選擇集
n (+ n 1)))
(setq ss (vl-sort ss (function (lambda (x y)(< (fix (car x)) (fix (car y)))))));;x排序從左到右
(setq ss (vl-sort ss (function (lambda (x y)(> (fix (cadr x)) (fix (cadr y)))))));;y排序從上到下
(setq n 0)
(repeat l
(setq &k1 (nth n ss)
%k1 (rtos (car &k1) 2 3) ;;取得x座標，小數點後三位
%k2 (rtos (cadr &k1) 2 3);;取得y座標，小數點後三位
n (+ n 1)
)(princ "x=" ff) ;;先輸入x=（自己決定是否輸入，不輸入這句話刪除）
(princ %k1 ff) ;;然後輸入x座標
(princ " " ff) ;;一個空格分開
(princ "y=" ff) ;;然後輸入y=（自己決定是否輸入，不輸入這句話刪除）
(princ %k2 ff) ;;然後輸入y座標
(princ "\n" ff) ;;換一行計算
)(close ff);;關閉文字))
(prin1);;結束;;（記事本里面的資料可以匯入**）
)(prompt "\n《c:sx3》座標寫入記事本")
(prin1)
12樓：匿名使用者
什麼叫圓心座標xy排序的「s」形路線，貼一張示例圖出來如何？
autolisp程式設計求助，如何得到螢幕的中點的座標？
13樓：閃靚的星
很簡單的一個系統變數就能獲得，參見下面**：
(setq pt (getvar "viewctr"))
如果你還想獲得螢幕的四個角點的座標，可以利用系統變數viewsize screensize配合上面得到的螢幕中心座標獲得。
下面在給你個**，可以獲得當前拾取框的高度，在你選取實體的時候這個**很有用：
;|求拾取框的高度
|;(defun $xdlsp_drawing_getpickboxheight ()
(* (/ (getvar "pickbox") (cadr (getvar "screensize"))) (getvar "viewsize"))
)上面**摘自曉東工具箱裡面的系統**庫裡面的**。
表示「得到」的英語片語是get，得到的英文怎麼說
get sth得到什麼東西 get sb to do使 某人 做某事 get it一般用來表示明白了某人的話,瞭解，懂得 相當於i understand it get sth得到某物 get sth from off sb從某人那裡得到某物get sb sth獲得 get sth for sb某人那...
C屬性定義。GET與SET訪問器是怎麼一回事
1.屬性的宣告 總的來說，只要注意屬性宣告或者在使用是的一些規定就可以了，還有最為重要的 屬性的操作過程。宣告是用如下語法 型別 屬性名 注意 屬性還可以跟方法一樣有引數，當然限制的是，引數必須是值引數外，引數的列表的宣告與方法的一樣。訪問器包括包含get訪問器和set訪問器 2.get訪問器 ge...
怎麼通過網路賺到錢，怎麼通過網路賺到錢？
網路賺錢的方法很多，但是很多都需要一定的技術門檻。分享個最新整理簡單又有效 網盤連結 提取碼 vgyf 淘客行業是一個不錯的選擇 基本零成本 不需要技術 只要努力 勤快 就可以有不錯的收益 網路確實可以掙到錢，但也不輕鬆，需要有耐心。慢慢進入網路你會自己慢慢琢磨明白的剛開始都很懵逼 網路其實是一種優...