CSYS
CMSE,,ONE
CMSE,A,TWO
*GET,NDS,NODE,,COUNT
*DO,I,1,NDS/2
 ND1=NODE(0,0,-1000)
 ND2=NODE(NX(ND1),NY(ND1),NZ(ND1)+.03)
 CP,3*I-2,AX,ND1,ND2
 CP,3*I-1,AY,ND1,ND2
 CP,3*I,AZ,ND1,ND2
 NSEL,U,,,ND1
 NSEL,U,,,ND2
*ENDDO