ansys命令大全

㈠ 關於ansys選擇相關命令的整理

ksel,type,item,comp,vmin,vmax,vinc,kabs

type --選擇類型標識

  =s：全集選出一組子集

  =r:當前子集再選一組新子集

  =a:從全集另外選擇一組子集添加到當前子集中

  =u:從當前子集中去掉一組子集

  =all:重新選擇當前子集為所有，即全集

  =none:不選擇任何，當前子集為空集

  =lnve:選擇與當前子集相反的部分，形成新的當前子集

  =stat:顯示當前子集狀態

item --選擇數據標識，僅當type=S,R,A,U時可以，預設為KP。

  =kp：以關鍵點號選擇

  =ext：選擇當前子集中線的最外面關鍵點，其後無參數賦值

  =hpt：以硬點號選擇

  =loc：以當前坐標系中的坐標值選擇

  =mat:以跟關鍵點相關的材料號選擇

  =real：以跟關鍵點相關的實常數號選擇

  =type：以跟關鍵點相關的單元類型號選擇

  =esys:以跟關鍵點相關的單元坐標選擇

comp --當item為loc是，為x/y/z坐標軸，其他item無comp標識

vmin --選擇項目范圍的最小值；當vmin為元件名時，vmax和vinc被忽略

vmax --選擇項目范圍的最大值，預設時vmax=vmin，但存在選擇誤差

vinc --在選擇范圍內的增量，應為整數且非負，卻省時為1

kabs --絕對值控制標識，與vmax相關，可為0或1.

注意 ：不建議採用item=kp,容易出現誤選

ksll,type type可為s,r,a,u。ksln與其類似。

lsel,type,item,comp,vmin,vmax,vinc,kswp

type --同ksel命令

item --選擇數據標識，僅當type=s,r,a,u。卻省為line

  =line:以線號選擇

  =ext:選擇當前線子集中面的最外面線

  =loc:以當前坐標系中的坐標值選擇，comp為xyz,而xyz為線的中點坐標，當前坐標

  =tan1：以線始點外切單位矢量選擇，omp為xyz，後無參數

  =tan2：以線末點外切單位矢量選擇，omp為xyz，後無參數

  =ndiv:以指定線的劃分數目選擇

  =space：以線的劃分間隔率選擇

  =mat,type,real,esys同ksel相關參數

  =sec:以截面ID號選擇

  =length：以線的長度選擇

  =radius：以線的半徑選擇

  =hpt：僅選擇包含硬點的線

  =lcca:僅選擇連接線（用lccat命令創建的線）

vmin,vmax,vinc 同ksel相應參數

kswp --控制選擇方式

  =0（預設）時，僅選擇線

  =1時，選擇與線相關的關鍵點，節點，單元，且僅在type=s時有效。

lsla,type       type可為s,r,a,u。

lslk,type,lskey

type 同上

lskey :包含控制點控制

  =0（預設）時，則只要線的任意一個關鍵點在選擇集中（使用了ksel命令），則選擇線

  =1，則要求線的所有關鍵點均在選擇集中才選擇線。

asel,type,item,comp,vmin,vmax,vinc,kswp

type --選擇類型標識

  =s

  =r

  =a

  =u

  =all

  =none

  =inve

=stat

item --僅適用於type=S,R,U,A時，預設為area

  =area：以面號選擇

  =ext：選擇當前體子集中最外側的表面，其後無參數賦值

  =loc：以當前坐標系中的坐標值選擇，comp可為xyz,xyz為面的中心坐標

  =mat,type,real,esys，同ksel

  =secn：以與面相關的截面選擇

  =hpt：僅選擇包含硬點的面

  =acca：僅選擇連接面，由accat命令穿件的面

vmin，vmax，vinc 同上

kswp --控制選擇方式

  =0（預設）時，僅選擇面

  =1時，選擇與面相關的線，關鍵點，節點，單元，且僅在type=s時有效。

asll,type,arke y

type 同上

arkey :包含控制點控制

  =0（預設）時，則只要面的任意一條線在選擇集中（使用了lsel命令），則選擇面

  =1，則要求面的所有線均在選擇集中才選擇面。

aslv,type      type同上，只有s,r,a,u四個。

vsel,type,item,comp,vmin,vmax,vinc,kswp

type--同asel

item --同上，預設時為volu

  =volu:以體號選擇

  =loc:以當前坐標系中的坐標值選擇，其中comp可為xyz,xyz為體的中心坐標

  =mat,type,real,esys

vmin,vmax,vinc 同asel相應參數

kswp --控制選擇方式

  =0（預設）時，僅選擇體

  =1時，選擇與體相關的面，線，關鍵點，節點，單元，且僅在type=s時有效。

vsla,type,vlkey

type 同上

vlkey 意義同asll中的類似。

nsel,type,item,comp,vmin,vmax,vinc,kabs

type :選擇類型標識

  =s：全集選出一組子集

  =r:當前子集再選一組新子集

  =a:從全集另外選擇一組子集添加到當前子集中

  =u:從當前子集中去掉一組子集

  =all:重新選擇當前子集為所有，即全集

  =none:不選擇任何，當前子集為空集

  =lnve:選擇與當前子集相反的部分，形成新的當前子集

  =stat:顯示當前子集狀態

item --選擇數據標識，僅當type=S,R,A,U時可以，預設為node。

  =node：以節點號選擇

  =ext：選擇當前子集中線的最外面節點，其後無參數賦值

  =loc：以當前坐標系中的坐標值選擇

  =ang:xy,yz,zx選擇角

  =M:主節點號（master node number)

  =cp:耦合子集號（coupled set number）

  =ce：約束方程子集號（constrnint equation set number）

  =d:任一xyz結構位移，如果復雜，僅振幅（amplitude only,if complex）總而言之各種自由度穩定壓力荷載等

  =f:結構力

comp:

  當item=loc時，可為x/y/z

  當item=ang時，可為xy.yz.za

  當item=d時，可為U（ux,uy,uz），ux,uy，uz,ROT(rotx,y,z)，rotx,roty,rotz,temp,tbot,,,pres,,等等

  當item=f時，可為f(fx,fy,fz),fx,fy,fz,m,mx,my,mz,heat，flow等等

vmin --選擇項目范圍的最小值；可以是節點號、元件名、坐標、荷載值、元件名及與選擇項目相適應的數據結果（result values）。當vmin為元件名時，vmax和vinc被忽略

vmax --選擇項目范圍的最大值，預設時vmax=vmin，但存在選擇誤差。對於result values（結果值）如果vmax是正的則默認為無窮大，或如果vmin是負的vmax為0（or to zero if vmin is neative）

vinc --在選擇范圍內的增量，應為整數且非負，卻省時為1

kabs --絕對值控制標識，與vmax相關，可為0或1.

先整理到這里，後面邊學習邊補充……

㈡ 有關ansys中keyopt命令。

1、首先，按照圖中所示步驟建立一個關鍵點。

㈢ ansys中secdata這個命令怎麼使用

sect,2,shell,, 指的是定義編號2號殼體單元

secdata,0.015,1,0,3 指的是命令:SECDATA, Sec_IDn,XLOC,YLOC,ZLOC

其中Sec_IDn---已經定義的梁截面識別號，用於端點1(I)和2(J)截面ID。XLOC,YLOC,ZLOC---整體坐標系中Sec_IDn的位置坐標。

secoffset,MID 指的是 SECOFFSET, Location,OFFSET

Location---偏移也有4個選擇位置，分別為:TOP:殼節點偏移到頂面。MID:殼節點偏移到中面。BOT:殼節點偏移到底面。USER:用戶定義，偏移梁由OFFSET指定。

OFFSET---僅當Location=USER時，相對於中面的偏移距離。

seccontrol,0,0,0,0,1,1,1指的是SECCONTROL命令控制橫截面剪切剛度(預設值)。

sect,2,shell,, !The SECT command is used to specify the intermediate

!beam section positions which are to be reported for the selected elements or

!groups.

secdata,0.015,1,0,3 !Describes the geometry of a section.

secoffset,MID !Defines the section offset for cross sections.

seccontrol,0,0,0,0,1,1,1 !SECCONTROL is supported when importing files

!from the Mechanical APDL application

(3)ansys命令大全擴展閱讀：

ANSYS程序提供了使用便捷、高質量的對CAD模型進行網格劃分的功能。包括四種網格劃分方法：延伸劃分、映像劃分、自由 劃分和自適應劃分。延伸網格劃分可將一個二維網格延伸成一個三維網格。映像網格劃分允許用戶將幾何模型分解成簡單的幾部分，然後 選擇合適的單元屬性和網格控制，生成映像網格。

ANSYS程序的自由網格劃分器功能是十分強大的，可對復雜模型直接劃分，避免了 用戶對各個部分分別劃分然後進行組裝時各部分網格不匹配帶來的麻煩。

自適應網格劃分是在生成了具有邊界條件的實體模型以後，用戶 指示程序自動地生成有限元網格，分析、估計網格的離散誤差，然後重新定義網格大小，再次分析計算、估計網格的離散誤差，直至誤差 低於用戶定義的值或達到用戶定義的求解次數。

㈣ ANSYS命令流 幫忙解釋下

下面的所有東西，希望樓主拷貝到記事本裡面查看，不要選擇自動換行！

/PREP7!進入前處理器

ET,1,BEAM4!定義單元beam4,是個三維梁單元

KEYOPT,1,2,0!定義單元的關鍵選項，如果後面是0，代表默認的，可以先不用理解，

KEYOPT,1,6,0

KEYOPT,1,7,1!這里定義第七個關鍵選項，定義為編號1，也就是計算陀螺阻尼矩陣方程，要求

!IYY等於IZZ，也就是兩個轉動慣量要相等，這兩個量要在實常數中定義

!也就是下面的命令R

KEYOPT,1,9,0

KEYOPT,1,10,0

*SET,p,acos(-1)!定義三個參數，分別是派（4.1315）、第一個半徑R1，第二個半徑r2

*SET,R1,5

*SET,R2,60!半徑的單位

!定義單元的實常數，有兩個，因為有兩個半徑，分別就是下面的R,1

!和r,2

!r命令的定義中需要根據使用單元beam4來一一對應，不同的單元R命令

!定義的意思是不一樣的,具體每個意思，下圖看，一定要一一對應

!這里就先是截面積，Z向轉動慣量，Y像轉動慣量，是一樣的，從上面的

!關鍵選項定義中可以看的出來，KEYOPT,1,7,1

R,1,p*R1**2,p*R1**4/4,p*R1**4/4,2*R1,2*R1,,

RMORE,,p*R1**4/2,,,2175,,!這個也是定義實常數，因為命令只能定義6個數，從第七個

!就要使用這個命令，編號可以從下圖中對應下

R,2,p*R2**2,p*R2**4/4,p*R2**4/4,2*R2,2*R2,,!定義第二個實常數R，2

RMORE,,p*R2**4/2,,,2175,,

MPTEMP,,,,,,,,!這里來定義材料屬性，目前樓主提供的是GUI操作以後的

!，這個需要相應簡化,因為GUi操作中一般包括了溫度的考慮，所以使用了幾個溫度的命令

!目前看來只是有一個溫度，所以不用考慮溫度，簡化後的，在後面的注釋中，注釋開始是!（感嘆號）

MPTEMP,1,0

MPDATA,EX,1,,2e5

MPDATA,PRXY,1,,.3

MPTEMP,,,,,,,,

MPTEMP,1,0

MPDATA,DENS,1,,1e-10

!簡化後的材料屬性

!mp,ex,1,2e5!分別定義彈性模量，泊松比，密度，其中的1代表第一個材料屬性

!mp,PRXY,1,0.3

!mp,DENS,1,1e-10

MPTEMP,,,,,,,,!這里就是定義第二個材料屬性了！同樣包括彈性模量，泊松比，密度

MPTEMP,1,0

MPDATA,EX,2,,2E5

MPDATA,PRXY,2,,.3

MPTEMP,,,,,,,,

MPTEMP,1,0

MPDATA,DENS,2,,8E-8

K,,,,,!定義兩個關鍵點，第一個是0，第二個坐標是：(100,0,0)

K,,100,,,

TYPE,1!選擇第一個單元，也就是beam4

MAT,1!選擇第一個材料屬性

REAL,1!選擇第一個實常數

ESYS,0!選擇默認的單元坐標系統

LSTR,1,2!用剛才生成的兩個關鍵點，建立一條直線

LESIZE,ALL,,,200,,1,,,1,!把建立的這條直線劃分為200個

LMESH,1!根據劃分的線的段數，網格這條線，從而生成有限元模型

D,1,UX!對於第一個節點（也就是原點位置的那個節點）進行約束，三個平移方向都約束，但是轉動方向不約束，

!因為單元beam4是有六個自由度的

D,1,UY

D,1,UZ

D,102,UY!對於第102個節點，這樣來算他的位置，總共長度是100，劃分為200分，那麼102是那個位置，樓主應該知道了吧

!選擇了Y方向和Z方向的平移約束

D,102,UZ

FLST,2,1,2,ORDE,1!後面的兩個命令結合起來就是選擇了第200個節點，但是沒有具體操作，

!只是有了拾取選擇這個點的操作，這兩個命令一般是GUI直接生成的，寫命令流的一般不使用這兩個操作

!所以這兩個命令其實什麼任務都沒有做目前

FITEM,2,200

對上面的命令一一般是需要簡化的，簡化後的就是：

/PREP7

ET,1,BEAM4

KEYOPT,1,7,1

*SET,p,acos(-1)

*SET,R1,5

*SET,R2,60

R,1,p*R1**2,p*R1**4/4,p*R1**4/4,2*R1,2*R1,,

RMORE,,p*R1**4/2,,,2175,,

R,2,p*R2**2,p*R2**4/4,p*R2**4/4,2*R2,2*R2,,

RMORE,,p*R2**4/2,,,2175,,

mp,ex,1,2e5

mp,PRXY,1,0.3

mp,DENS,1,1e-10

mp,ex,2,2e5

mp,PRXY,2,0.3

mp,DENS,2,8e-8

K,1,,,,

K,2,100,,,

MAT,1

REAL,1

LSTR,1,2

LESIZE,ALL,,,200

LMESH,1

D,1,UX

D,1,UY

D,1,UZ

D,102,UY

D,102,UZ

FLST,2,1,2,ORDE,1

FITEM,2,200

簡化後的命令樓主結合本人說的，可以理解下

這段話因為只是在建模，所以沒有執行什麼計算的，思路其實我已經說的很明確了：

首先定義單元，指定一個關鍵選項包括了陀螺阻尼效果，然後再定義兩個實常數，然後定義了兩個材料屬性，然後建立一個一個線，使用第一個實常數，和第一個材料屬性對這個線進行了網格！其次再對這個線進行了約束的施加，原點位置三個平移方向全約束，對102個節點位置，進行了兩個方向的約束

㈤ 有關ansys中一些基本命令的應用，高手求救

都是與體（volume）相關的命令。vsel，選擇體單元，VSEL,S,VOLUME,,1為談做螞選擇編號為1的含埋體單元。 vatt，對體單元賦予材料屬性。VATT,1,,1為賦予選擇的胡則體單元1號材料屬性。 vlist，列出選擇的體單元

㈥ ANSYS中各種命令的使用格式

/prep7
m1=0.009
m2=0.0108
m3=0.012
k1=1.064
k2=7.311
k3=3.378
c1=0.09
c3=0.111
ks=82.3

*dim,disp,array,80,2
!以上為定義參數

et,1,beam3
r,1,2326,3.39e6,115
mp,ex,1,69000
mp,prxy,1,0.3
mp,dens,1,3e-9
!以上為定義單元屬性和材料屬性

et,2,mass21
keyopt,2,1,0
keyopt,2,2,0
keyopt,2,3,4
et,3,combin14
keyopt,3,1,0
keyopt,3,2,0
keyopt,3,3,2
!又定義了兩種單元，並分別建立了一些關鍵點

r,2,2.7692e-3
r,3,3778.8
r,4,m1
r,5,m2
r,6,m3
r,7,k1,c1
r,8,k2
r,9,k3,c3

r,10,ks
!以上為定義單元實常數

k,1,0,0,0
k,2,80000,
l,1,2
lsel,s,line,,1
latt,1,1,1
lesize,1,,,80
lmesh,1

type,2
real,2
*do,i,1,9
e,node(8000*i,0,0)
*enddo

*do,i,0,8
n,82+i,8000+8000*i,1000,0
type,3
real,3
e,82+i,10+8*i
*enddo

*do,i,0,79
n,91+4*i,1000+1000*i,-1000,0
n,92+4*i,1000+1000*i,-2000,0
n,93+4*i,1000+1000*i,-3000,0
n,94+4*i,1000+1000*i,-4000,0
*enddo

*do,i,0,79
type,2
real,4
e,91+4*i
type,2
real,5
e,92+4*i
type,2
real,6
e,93+4*i
type,3
real,7
e,91+4*i,92+4*i
type,3
real,8
e,92+4*i,93+4*i
type,3
real,9
e,93+4*i,94+4*i
*enddo

*do,i,0,78
type,3
real,10
e,3+i,91+4*i
*enddo
type,3
real,10
e,2,407
!以上均為建模的各種命令，其中使用了循環命令即*do-*enddo，其他的都是基本的命令

d,1,all
d,2,all
d,82,all,,,90,
d,10,ux,,,74,8
finish
!以上為施加約束

/config,nres,5000

/solu
antype,trans
trnopt,full
timint,on
nlgeom,on
sstif,on
nropt,full
outres,all,all
autots,on
estif,1e-12
esel,s,elem,,99,658
ekill,all
allsel,all

time,0.03
nsubst,10
kbc,1
esel,s,elem,,99,104
esel,a,elem,,579
ealive,all
nsel,s,node,,95,410
d,all,all
allsel,all

d,91,ux
d,92,ux
d,93,ux
d,94,all
f,91,fy,120
!以上是為求解做了一些設置，其中又夾雜著一些約束和載荷的施加命令。

solve

!求解命令

*get,disp(80,1),node,2,u,y
*get,disp(80,2),node,407,u,y
!獲得兩個節點的y向位移值，並保存在數組disp中

finish
/post26
numvar,200
*do,i,0,78
esol,i+2,579+i,3+i,f,y
*enddo
save
*status,disp
!post26的一些後處理命令

另，這些命令都是基本的命令，這樣一下都貼上來，是在是不知道從何說起，只能大概說一下作用，具體的意思還得自己塌下心來自己查資料並理解。

㈦ 幫忙翻譯一下ansys命令流

!以下命令是劃分網格時自動生成的命令流，現分句解釋如下：
TYPE, 1 !設置單元類型為1
MAT, 1!設置材料屬性為1
REAL, !設置實常數，默認
ESYS, 0 !設置單元坐標系為0
SECNUM, !設置截面編號，默認
!*
MSHAPE,0,3D !設置劃分單元類型，為3D，即體單元
MSHKEY,1!設置劃分網格方法，1為採用映射網格劃分方法
!*
FLST,5,2,6,ORDE,2 ! 以下8句為軟體自己生成的命令，作用是選擇被劃分的體並自定義組件
FITEM,5,1
FITEM,5,-2
CM,_Y,VOLU
VSEL, , , ,P51X
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y
!*
VMESH,_Y1 !劃分網格
!*
CMDELE,_Y !以下三句為刪除自定義的組件
CMDELE,_Y1
CMDELE,_Y2
!*

㈧ ansys 網格劃分的命令有哪些

整理了一些ANSYS常用的命令；但深知自己的水平，還不敢保證完全正確；給大家一些參考，望指正： 1. A，P1，P2，…，P17，P18（以點定義面） 2. AADD，NA1，NA2，…NA8，NA9（面相加） 3. AATT，MAT，REAL，TYPE，ESYS，SECN（指定面的單元屬性） 【注】ESYS為坐標系統號、SECN為截面類型號。 4. *ABBR，Abbr，String（定義一個縮略詞） 5. ABBRES，Lab，Fname，Ext（從文件中讀取縮略詞） 6. ABBSAVE，Lab，Fname，Ext（將當前定義的縮略詞寫入文件） 7. ABS，IR，IA，--，--，Name，--，--，FACTA（取絕對值） 【注】************* 8. ACCAT，NA1，NA2（連接面） 9. ACEL，ACEX，ACEY，ACEZ（定義結構的線性加速度） 10. ACLEAR，NA1，NA2，NINC（清除面單元網格） 11. ADAMS，NMODES，KSTRESS，KSHELL 【注】************* 12. ADAPT, NSOLN, STARGT, TTARGT, FACMN, FACMX, KYKPS, KYMAC 【注】************* 13. ADD，IR, IA, IB, IC, Name, --,-- , FACTA, FACTB, FACTC（變數加運算） 14. ADELE，NA1，NA2，NINC，KSWP（刪除面） 【注】KSWP =0刪除面但保留面上關鍵點、1刪除面及面上關鍵點。 15. ADRAG，NL1，NL2，…，NL6，NLP1，NLP2，…，NLP6（將既有線沿一定路徑拖拉成面） 16. AESIZE，ANUM，SIZE（指定面上劃分單元大小） 17. AFILLT，NA1，NA1，RAD（兩面之間生成倒角面） 18. AFSURF，SAREA，TLINE（在既有面單元上生成重疊的表面單元） 19. *AFUN, Lab（指定參數表達式中角度單位） 20. AGEN, ITIME, NA1, NA2, NINC, DX, DY, DZ, KINC, NOELEM, IMOVE（復制面） 21. AGLUE，NA1，NA2，…，NA8，NA9（面間相互粘接） 22. AINA，NA1，NA2，…，NA8，NA9（被選面的交集） 23. AINP，NA1，NA2，…，NA8，NA9（面集兩兩相交） 24. AINV，NA，NV（面體相交） 25. AL，L1，L2，…，L9，L10（以線定義面） 26. ALIST，NA1，NA2，NINC，Lab（列表顯示面的信息） 【注】Lab=HPT時，顯示面上硬點信息，默認為空。 27. ALLSEL，LabT，Entity（選擇所有實體） 【注】LabT=ALL（指定實體及其所有下層實體）、BELOW（指定實體及其下一層實體）； Entity=ALL、VOLU、AREA、LINE、KP、ELEM、NODE。 28. AMESH，NA1，NA2，NINC（劃分面生成面單元） AMESH，AREA，KP1，KP2，KP3，KP4（通過點劃分面單元） 29. /AN3D，Kywrd，KEY（三維注釋） 30. ANCNTR，NFRAM，DELAY，NCYCL（在POST1中生成結構變形梯度線的動畫） 31. ANCUT，NFRAM，DELAY，NCYCL，QOFF，KTOP，TOPOFF，NODE1，NODE2，NODE3（在POST1中生成等勢切面雲圖動畫） 32. ANDATA，DELAY，NCYCL，RSLTDAT，MIN，MAX，INCR，FRCLST，AUTOCNTRKY（生成某一范圍內的結果數據的順序梯度線動畫） 33. ANDSCL，NFRAM，DELAY，NCYCL（在POST1中生成結構變形的動畫） 34. ANFLOW，NFRAM，DELAY，NCYCL，TIME，SPACING，SIZE，LENGTH（生成粒子流或帶電粒子運動的動畫） 35. /ANGLE，WN，THETA，Axis，KINC

㈨ ANSYS中的編程命令解釋

程序中的變數行和列 寫的顛倒了 不太好理解
*IF,ENO,EQ,0,THEN
K=COLU_COUNT-I+1
DYPX(K,J)=1
ENO=ENO+1
DYPX數組最後一行第一列是1 DYPX(COLU_COUNT,1)=1
*ELSE
K=COLU_COUNT-I+1
DYPX(K,J)=ELNEXT(ENO)
ENO=ENO+1
*ENDIF
ELNEXT(ENO) 意思是所選擇的單元號比ENO稍微大一點的單元
比如 SELECT 單元 1 4 9 12 14 ，ENO=1 那麼ELNEXT(ENO)=4

這個數組的意思就是把單元號從小到大依次寫入數組
但寫入的順序是從後面往前面寫

㈩ 請 幫忙 解釋下 ANSYS 程序 命令流

esel,s,mat,,1 !選擇材料編號為1的單元
*get,enum1,elem,0,count ! 獲得單元數
*get,el,elem,0,num,min ! 獲得所選單元的最小編號
ksel,all ! 選擇所有keypoint
*get,nkp1,kp,0,num,max ! 獲得keypoint最大編號
ksel,none ! 不選擇keypoint
asel,none ! 不選擇面
vsel,none ! 不選擇體
/post1 ! 後處理
set,last ! 讀入最後一個載荷步結果
/prep7 ! 前處理
SHPP,OFF ! 關閉單元形狀警告
UPGEOM,1,LAST,LAST,'filname','rst',' ' !把最後載荷步的結果（位移）寫入幾何模型
！這里相當於給定一個初始干擾位移
*do,i,1,enum1 ! 循環（循環次數為單元數enum1）
*do,j,1,3 ! 內循環3次
nd=nelem(el,j) ！nd為最小編號單元的j節點編號
！若為四邊形單元（i，j，k，l）退化的三角形k,l重合.若為三角形（i，j，k）
！具體可看相應單元的介紹
knum1=nkp1+4*(i-1)+j !按上面的參數解釋做相應的計算
k,knum1,nx(nd),ny(nd),nz(nd) ! 建立keypoint knum1 坐標為節點nd的坐標
*enddo ！結束內循環
nd=nelem(el,j+2) ！nd等於單元el的j+2節點編號
k,knum1+1,nx(nd),ny(nd),nz(nd) ！建立keypoint
v,knum1-2,knum1-1,knum1,knum1+1 ！建體
el=elnext(el) ！elnext(el)意思是el的下一個單元
！比如我所選擇的單元為1 3 6 11 如果el=3 那麼elnext（el）=6
*enddo ！結束循環
numm,kp ！壓縮keypoint編號
cm,aal1,area ！建立面組建aal1
asel,r,ext ！重新選擇面
cm,aext,area ！建立組建aext
vdel,all ！刪除體
va,all ！通過選擇的所有面建立體
cmsel,s,aal1 ！選擇面組建aal1
cmsel,u,aext ！不選擇aext
adel,all,,,1 ！刪除所有面