用ansys作動力時程分析的后處理中，一般只能輸出或畫某一個點的時程曲線或某時刻的位移等值線圖，而無法直接輸出許多點在某時刻的速度和加速度文件，更畫不出該時刻的所有節(jié)點的速度和加速度等值線圖。用下列方法可以輸出任意時刻的許多節(jié)點的位移、速度和加速度文件，然后用surfer 可以畫出比ansys更直觀的等值線圖。命令流如下：  

/post26  

dnumtime=4.755 !定義位移最大時刻的時間  

vnumtime=0.885 !定義速度最大時刻的時間  

anumtime=0.88 !定義加速度最大時刻的時間  

FLST,5,351,1,ORDE,93 !挑選等值線的節(jié)點。對于多個節(jié)點，用鼠標(biāo)拾取比較方便  

FITEM,5,845  

FITEM,5,-848  

FITEM,5,857  

FITEM,5,-860  

FITEM,5,865  

FITEM,5,-866  

FITEM,5,887  

FITEM,5,-1014  

FITEM,5,1017  

FITEM,5,-1018  

FITEM,5,1021  

FITEM,5,-1037  

FITEM,5,1039  

FITEM,5,-1089  

FITEM,5,1091  

FITEM,5,-1098  

FITEM,5,1103  

FITEM,5,-1104  

FITEM,5,1115  

FITEM,5,-1118  

FITEM,5,1127  

FITEM,5,-1128  

FITEM,5,1133  

FITEM,5,1137  

FITEM,5,-1138  

FITEM,5,1140  

FITEM,5,1144  

FITEM,5,-1146  

FITEM,5,1149  

FITEM,5,-1150  

FITEM,5,1152  

FITEM,5,1156  

FITEM,5,1158  

FITEM,5,1161  

FITEM,5,-1162  

FITEM,5,1164  

FITEM,5,1167  

FITEM,5,-1168  

FITEM,5,1171  

FITEM,5,-1172  

FITEM,5,1174  

FITEM,5,1177  

FITEM,5,-1178  

FITEM,5,1181  

FITEM,5,-1182  

FITEM,5,1184  

FITEM,5,1189  

FITEM,5,-1192  

FITEM,5,1195  

FITEM,5,-1196  

FITEM,5,1199  

FITEM,5,-1200  

FITEM,5,1202  

FITEM,5,1205  

FITEM,5,-1206  

FITEM,5,1208  

FITEM,5,1210  

FITEM,5,1212  

FITEM,5,1214  

FITEM,5,1216  

FITEM,5,1218  

FITEM,5,1220  

FITEM,5,1222  

FITEM,5,1225  

FITEM,5,-1226  

FITEM,5,1228  

FITEM,5,1231  

FITEM,5,-1232  

FITEM,5,1235  

FITEM,5,-1236  

FITEM,5,1238  

FITEM,5,1240  

FITEM,5,1242  

FITEM,5,1244  

FITEM,5,1247  

FITEM,5,-1248  

FITEM,5,1251  

FITEM,5,-1253  

FITEM,5,1258  

FITEM,5,1260  

FITEM,5,1264  

FITEM,5,1267  

FITEM,5,-1268  

FITEM,5,1270  

FITEM,5,1272  

FITEM,5,4832  

FITEM,5,-4880  

FITEM,5,4882  

FITEM,5,-4886  

FITEM,5,5123  

FITEM,5,-5124  

FITEM,5,5127  

FITEM,5,-5130  

NSEL,R, , ,P51X  

*get,nodemin,node,,num,min  

*get,nodemax,node,,num,max  

*get,nodenum,node,,count  

*dim,nodearray1,array,nodenum,3 !定義位移數(shù)組  

*dim,nodearray2,array,nodenum,1 !定義速度數(shù)組  

*dim,nodearray3,array,nodenum,1 !定義加速度數(shù)組  

numm=1  

*do,i,nodemin,nodemax  

   *if,nsel(i),eq,1,then !若第i個節(jié)點存在  

     nodearray1(numm,1)=nx(i)  

     nodearray1(numm,2)=ny(i)  

     nsol,2,i,u,z !選取第i個節(jié)點的Z方向時程位移  

     deriv,3,2,1 !對位移變量2微分求得速度向量3  

     deriv,4,3,1 !對速度變量3微分求得加速度向量4  

     STORE !此項不可少  

    *GET,kk1,VARI,2,rtime,dnumtime !把獲取位移最大時刻的i點的位移  

    *GET,kk2,VARI,3,rtime,vnumtime !把獲取速度最大時刻的i點的速度  

    *GET,kk3,VARI,4,rtime,anumtime !把獲取加速度最大時刻的i點的加速度  

    nodearray1(numm,3)=kk1*1000000  

    nodearray2(numm)=kk2*1000  

    nodearray3(numm)=kk3  

    numm=numm+1  

   *endif  

*enddo  

*cfopen,contour-uz,dat !輸出位移最大時刻的所選節(jié)點的位移數(shù)據(jù)  

*vwrite, nodearray1(1,1),nodearray1(1,2),nodearray1(1,3)  

(F16.8,' ',F16.8,' ',F16.8,)  

*cfclos  

*cfopen,contour-velo,dat !輸出速度最大時刻的所選節(jié)點的速度數(shù)據(jù)  

*vwrite, nodearray1(1,1),nodearray1(1,2),nodearray2(1,1)  

(F16.8,' ',F16.8,' ',F16.8,)  

*cfclos  

*cfopen,contour-accel,dat !輸出加速度最大時刻的所選節(jié)點的加速度數(shù)據(jù)  

*vwrite, nodearray1(1,1),nodearray1(1,2),nodearray3(1,1)  

(F16.8,' ',F16.8,' ',F16.8,)  

*cfclos