AutoLISP查詢橢圓的相關屬性

2021-09-06 02:56:24 字數 704 閱讀 3540

autolisp查詢橢圓的相關屬性,包括橢圓的中心、長軸、短軸、周長和面積,**如下。

(defun c:elppt    ()

(setq ss (car (entsel "\n請選擇所要查詢的橢圓:")))

(setq ssob (vlax-ename->vla-object ss))

(setq center (vlax-get ssob 'center))

(setq maxr (vlax-get ssob 'majorradius))

(setq minr (vlax-get ssob 'minorradius))

(setq area (vlax-get ssob 'area));;;顯示資訊

(print (strcat "中心:" (rtos (car center)) "," (rtos (cadr center))))

(print (strcat "長軸:" (rtos maxr)))

(print (strcat "短軸:" (rtos minr)))

(print (strcat "周長:" (rtos (+ (* 2 pi minr) (* 4 (- maxr minr))))))

(print (strcat "面積:" (rtos area)))

(princ)

)

**完。

autolisp的各種框(DCL)

一 dcl是什麼?前面的事情,是通過在命令列輸入引數來實現某個指令的,而dcl是通過使用者介面來實現互動的。下圖就是乙個典型的dcl。首先說明,dcl不像lisp,可以直接通過vlide命令呼叫出來,呼叫過程如下 1 通過vlide命令,開啟autolisp對話方塊,選擇檔案 另存為dcl格式的檔案...

橢圓的曲線模擬

圓的模擬只要使用正多邊形就可以實現,主要 如下 private void testcirlce graphics g private listsimulatecircle float x0,float y0,float r,int simulatesidecount return list priv...

python解橢圓方程的例題 如何求橢圓方程

求五個二次曲線方程的一般公式是 a x2 b xy c y2 d x e y f 0。在 一開始我試著用六個點。下面是我的python import numpy as np def conic section p1,p2,p3,p4,p5,p6 def row point return point ...