第一種是為不熟悉命令的用戶準備的,根據提示輸入數據即可。
而且這樣做還有一個重要的理由,就是看上去好像挺有學問。
/prep7
multipro,'start',3 !橢圓中心位置輸入
*cset,1,3,x0,'X-coordinate of ellipse center',0
*cset,4,6,y0,'Y-coordinate of ellipse center',0
*cset,7,9,z0,'Z-coordinate of ellipse center',0
multipro,'end'
multipro,'start',4 !橢圓長軸
*cset,1,3,xmcomp,'Major axis X-component vector',1
*cset,4,6,ymcomp,'Major axis Y-component vector',0
*cset,7,9,zmcomp,'Major axis Z-component vector',0
*cset,10,12,major,'Major axis length',24
multipro,'end'
multipro,'start',4 !橢圓短軸
*cset,1,3,xncomp,'Minor axis X-component vector',0
*cset,4,6,yncomp,'Minor axis Y-component vector',1
*cset,7,9,zncomp,'Minor axis Z-component vector',0
*cset,10,12,minor,'Minor axis length',12
multipro,'end'
ratio=minor/major !根據輸入繪制橢圓
csys,0
wplane,,x0,y0,z0,x0 xmcomp*major,y0 ymcomp*major,z0 zmcomp*major,x0 xncomp*minor,y0 yncomp*minor,z0 zncomp*minor cswpla,11,1,ratio,1
而且這樣做還有一個重要的理由,就是看上去好像挺有學問。
/prep7
multipro,'start',3 !橢圓中心位置輸入
*cset,1,3,x0,'X-coordinate of ellipse center',0
*cset,4,6,y0,'Y-coordinate of ellipse center',0
*cset,7,9,z0,'Z-coordinate of ellipse center',0
multipro,'end'
multipro,'start',4 !橢圓長軸
*cset,1,3,xmcomp,'Major axis X-component vector',1
*cset,4,6,ymcomp,'Major axis Y-component vector',0
*cset,7,9,zmcomp,'Major axis Z-component vector',0
*cset,10,12,major,'Major axis length',24
multipro,'end'
multipro,'start',4 !橢圓短軸
*cset,1,3,xncomp,'Minor axis X-component vector',0
*cset,4,6,yncomp,'Minor axis Y-component vector',1
*cset,7,9,zncomp,'Minor axis Z-component vector',0
*cset,10,12,minor,'Minor axis length',12
multipro,'end'
ratio=minor/major !根據輸入繪制橢圓
csys,0
wplane,,x0,y0,z0,x0 xmcomp*major,y0 ymcomp*major,z0 zmcomp*major,x0 xncomp*minor,y0 yncomp*minor,z0 zncomp*minor cswpla,11,1,ratio,1
k,,major,,,
k,,major,90,,
k,,major,180,,
k,,major,270,,
l,kp(major,0,0),kp(major,90,0)
l,kp(major,90,0),kp(major,180,0)
l,kp(major,180,0),kp(major,270,0)
l,kp(major,270,0),kp(major,0,0)
csys,0
第二種是為了獎勵有耐心看下來的同志,省事省時又好用。
/prep7
pcirc,10, ,
adele,1
lsscale,all, , , ,ratio
k,,major,90,,
k,,major,180,,
k,,major,270,,
l,kp(major,0,0),kp(major,90,0)
l,kp(major,90,0),kp(major,180,0)
l,kp(major,180,0),kp(major,270,0)
l,kp(major,270,0),kp(major,0,0)
csys,0
第二種是為了獎勵有耐心看下來的同志,省事省時又好用。
/prep7
pcirc,10, ,
adele,1
lsscale,all, , , ,ratio
我轉載這篇文章的另外一個目的是第一種方法里面的用multipro和*cset命令編寫輸入框。
相關文章
- 2014-09-06后勤部機關經濟適用住房總平面位置圖
- 2014-07-23工業廠房門式架布置圖CAD施工圖下載
- 2014-07-22帶天車多層廠房建筑施工圖CAD圖紙下載
- 2013-06-17臨湖獨棟精品雙層別墅室內裝修施工圖
- 2012-03-03AutoCAD2010注冊機下載(含激活圖文教程)
- 2011-08-24PKPM廣廈天正探索者等常用字體下載
- 2011-08-24PKPM 理正 天正 鋼筋字庫,萬能字體庫下載
- 2011-07-28CAD萬能字體可以解決最新PKPM、理正、天正等多種軟件
- 2011-03-10KP1015.2-2TkLPC20.22E單段錘式破碎機總圖
- 2011-01-08任意角彎頭展開放樣軟件