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

已知一些节点（编号不连续、无规律），将这些点沿某一坐标轴复制（比如：偏移量Y=2100），分别在原来的点和复制之后的点之间一一对应的生成弹簧单元：type,3   mat,2  real,31， n(Y%Vmy  
模型较小节点数量较少时，可以采用GUI操作；由于模型很大，节点非常多，希望采用APDL循环语句实现在两节点之间创建单元的命令。 %oykcf,#  
有高手提供一下循环语句，操作时总是有错误提示，不知道问题出在哪儿，请各位过路大侠指点迷津！谢谢！ &Y>zT9]$K  
*GET,NOD_NUM,NODE,0,COUNT 8|1^|B(l  
*GET,NOD_I,NODE,0,NUM,MIN yf1CXldi  
*DO,I,1,NOD_NUM    !对选择集合内所有节点进行循环     +54aO  
ND_X=Nx(NOD_I)   !获取节点I的坐标 j}HFs0<L  
ND_Y=Ny(NOD_I) 'w/qcD-  
ND_Z=NZ(NOD_I)             &&8'0.M{  
N,tmpNodeID,ND_X,ND_Y+2100,ND_Z !创建新结点 Q%=YM4;  
type,3 X~T/qFS  
mat,2 K\!#4>yd  
real,31 N0TeqOi4Y  
E,NOD_I,tmpNodeID <+`(\  
tmpNodeID=tmpNodeID+1 !F4;_A`X  
NOD_I=Ndnext(NOD_I)  !获取下个结点编号 6o&ZIYJ9k  
*ENDDO HZJL/=;  
+",S2Qmo  

非常感谢，确实不错！   

非常感谢，确实不错！