*do，i,1,n !對節點循環
xyz(i,1)=nx(i)!i號節點x坐標存在xyz（i，1）中，即xyz數組i行1列位置
xyz(i,1)=ny(i)!就不多說了
xyz(i,1)=nz(i)
uvw(i,1)=ux(i) !i號節點x方向位移存在uvw（i，1）中
uvw(i,2)=uy(i)
uvw(i,3)=uz(i)
xyzc(i,1)=xyz(i,1)+uvw(i,1)!變形後節點x坐標為變形前x坐標加x方向位移
xyzc(i,2)=xyz(i,2)+uvw(i,2)
xyzc(i,3)=xyz(i,3)+uvw(i,3)
*enddo
這是在Multiphysics下的命令流，不是dyna中的，沒用過dyna，不過感覺思路應該差不多，不知道行不。
如果行的話給我那個“請教‘*vwrite’的用法”捧下場啊，就是做這個問題的時候碰到的，想把上面數組中的數存在文本文檔裏，就不用在ansys中拷貝下來編程處理了。
還可以試試:
UPCOORD, FACTOR, Key
Main Menu>Preprocessor>Loads>Load Step Opts>Other>Updt Node Coord
Main Menu>Solution>Load Step Opts>Other>Updt Node Coord
將原有網格改為變形後網格
我只能幫妳這麽多了,祝妳成功吧!!!!~~~~~~~~~~~~~