[软件应用交流]创建地层弹簧的循环语句 [复制链接]

已知一些节点（编号不连续、无规律），将这些点沿某一坐标轴复制（比如：偏移量Y=2100），分别在原来的点和复制之后的点之间一一对应的生成弹簧单元：type,3   mat,2  real,31， m4Wn$Z  
模型较小节点数量较少时，可以采用GUI操作；由于模型很大，节点非常多，希望采用APDL循环语句实现在两节点之间创建单元的命令。 ;6b#I$-J-  
有高手提供一下循环语句，操作时总是有错误提示，不知道问题出在哪儿，请各位过路大侠指点迷津！谢谢！ d<7J)zUm3  
*GET,NOD_NUM,NODE,0,COUNT HB`pK'gz  
*GET,NOD_I,NODE,0,NUM,MIN ;wQWt_OtuJ  
*DO,I,1,NOD_NUM    !对选择集合内所有节点进行循环     d;<n [)@  
ND_X=Nx(NOD_I)   !获取节点I的坐标 }7=a,1T  
ND_Y=Ny(NOD_I) ZVp\5V*  
ND_Z=NZ(NOD_I)             N0vd>b  
N,tmpNodeID,ND_X,ND_Y+2100,ND_Z !创建新结点 3^Yk?kFE  
type,3 ~#a1]w  
mat,2 b7AuKY{L  
real,31 k)v[
/#I  
E,NOD_I,tmpNodeID {yb\p9q{Yo  
tmpNodeID=tmpNodeID+1 INbjk;k  
NOD_I=Ndnext(NOD_I)  !获取下个结点编号 M@'V4oUz  
*ENDDO Yn<0D|S;X  
U[A*A^$c}  

非常感谢，确实不错！   

非常感谢，确实不错！