求助！哪个大神可以解释一下这个命令流的每一步啥意思啊。。

BOFU=5E-3!!!!!!!!!!!!!定义波幅
ALLSEL
et,9,combin39
EDJ=120E6
keyopt,9,1,0
keyopt,9,2,0
keyopt,9,3,3
r,13,-0.1,-(N_N*S_DZB*EDJ/N_COUNT)*0.1,0,0,0.1,(N_N*S_DZB*EDJ/N_COUNT)*0.1
*do,i,1,8*n*2+1
nn_n=11000000+I
LJNODENUM1=NODE((I-1)*KJJJ/2,-S_DZB/2,-H_DZB)
LJNODENUM2=NODE((I-1)*KJJJ/2,-S_SLAB/2,-H_DZB)
LJNODENUM3=NODE((I-1)*KJJJ/2,-S_RAIL/2,-H_DZB)
LJNODENUM5=NODE((I-1)*KJJJ/2,0,-H_DZB)
LJNODENUM7=NODE((I-1)*KJJJ/2,S_RAIL/2,-H_DZB)
LJNODENUM8=NODE((I-1)*KJJJ/2,S_SLAB/2,-H_DZB)
LJNODENUM9=NODE((I-1)*KJJJ/2,S_DZB/2,-H_DZB)
*if,nx(nn_n),le,n_n1,then
type,9
real,13
TSHAP,LINE
E,11000000+I,LJNODENUM1
E,12000000+I,LJNODENUM2
E,13000000+I,LJNODENUM3
E,15000000+I,LJNODENUM5
E,17000000+I,LJNODENUM7
E,18000000+I,LJNODENUM8
E,19000000+I,LJNODENUM9
*elseif,nx(nn_n),gt,n_n1,and,nx(nn_n),le,n_n-n_n1
r,13+I,-0.02,-(N_N*S_DZB*EDJ/N_COUNT)*(0.02-BOFU)*(sin(0.314*(nx(nn_n)-n_n1)/20)),-(BOFU)*sin(0.314*(nx(nn_n)-n_n1)/20),-0.005,0,0
rmore,1,1
type,9
real,13+I
TSHAP,LINE
E,11000000+I,LJNODENUM1
E,12000000+I,LJNODENUM2
E,13000000+I,LJNODENUM3
E,15000000+I,LJNODENUM5
E,17000000+I,LJNODENUM7
E,18000000+I,LJNODENUM8
E,19000000+I,LJNODENUM9
*else,nx(nn_n),gt,n_n-n_n1
type,9
real,13
TSHAP,LINE
E,11000000+I,LJNODENUM1
E,12000000+I,LJNODENUM2
E,13000000+I,LJNODENUM3
E,15000000+I,LJNODENUM5
E,17000000+I,LJNODENUM7
E,18000000+I,LJNODENUM8
E,19000000+I,LJNODENUM9