我有一个球型网壳的命令流，不知道哪里有问题，大神帮看，跪求

FINISH
/Clear
/title,wangke
/prep7
et,1,beam188
csys,2
fi=5
r=50
theta=15
mp,ex,1,2.1e+11
mp,prxy,1,0.3
mp,gxy,1,8e+10
*do,i,1,6,1
*do,j,1,23,1
k,24*(i-1)+j,24*(i-1)+j+1,2000
*enddo
k,i*24,i*24-23,2000
*enddo
!径杆
*do,i,1,5,1
*do,j,1,24,1
l,24*(i-1)+j,24*(i-1)+j+24,2000
*enddo
!环杆与径杆的界面
sectype,1,beam,ctube,,0
secdata,0.09,0.0925,36
!斜杆截面
sectype,2,beam,ctube,,0
secdata,0.08,0.083,36
!建立模型
!模型节点
*do,i,1,6,1
*enddo
n,1000,50,0,90 !网壳定点节点
*do,i,121,144,1
k,i,1000,2000
*enddo
！/pnum,node,1
eplot
type,1
real,1
mat,1
secnum,2
*do,j,1,24,1
n,24*(i-1)+j,r,(j-1)*theta,(i-1)*fi+60
*enddo
*enddo
n,2000,100,0,90 !确定方向的节点
type,1
mat,1
secnum,1
!环杆
!斜杆
*do,i,1,5,1
*do,j,1,23,1
l,24*(i-1)+j,24*(i-1)+j+25,2000
*enddo
l,i*24,i*24+1,2000
*enddo
*nummrg,all
*numcmp,all
finish
/solu
csys,2
nsel,s,loc,z,60
nplot
d,all,ux
d,all,uy
d,all,uz
allsel
eplot