ex5-2.txt

《ANSYS机械工程应用实例》-周宁-源代码-3795 程序部分

FINI
/CLE
RESUME,EX5-2,db
/FILENAME,EX5-2,1
/TITLE,The Transient Analysis of the Moto_frame
/PREP7
ET,2,BEAM4
R,2,716,39769,39769,30,30
R,3,314,7838,7838,20,20 
!
N,30000,360,-330,0
TYPE,2
MAT,1
REAL,2
E,30000,588
E,30000,870
E,30000,20796
E,30000,20058
E,30000,20787
E,30000,20049
E,30000,6000
E,30000,12778
E,588,20796
E,870,20058
E,20796,20787
E,20058,20049
E,20787,6000
E,20049,12778
E,6000,588
E,12778,870
!
N,30001,-29.52,-167.42,0  
N,30002,-106.03,-601.32,0  
N,30003,1014.18,-396.12,87.83  
N,30004,1014.18,-396.12,-87.83 
REAL,3 
E,30001,30002
E,30003,8671
E,30004,9562
EPLOT
!
NSEL,S,NODE,,1964
NSEL,A,NODE,,2014
NSEL,A,NODE,,2383
NSEL,A,NODE,,13100
NSEL,A,NODE,,30001
CERIG,30001,ALL,ALL
ALLSEL,ALL
SAVE
!
/SOLU
!定义X方向集中力数据表
*DIM,FORCEX,TABLE,36,1,1,TIME,X
!时间
*SET,FORCEX(1,0,1) , 0.00025
*SET,FORCEX(2,0,1) , 0.0005 
*SET,FORCEX(3,0,1) , 0.00075
*SET,FORCEX(4,0,1) , 0.001  
*SET,FORCEX(5,0,1) , 0.00125
*SET,FORCEX(6,0,1) , 0.0015 
*SET,FORCEX(7,0,1) , 0.00175
*SET,FORCEX(8,0,1) , 0.002  
*SET,FORCEX(9,0,1) , 0.00225
*SET,FORCEX(10,0,1) , 0.0025
*SET,FORCEX(11,0,1) , 0.00275   
*SET,FORCEX(12,0,1) , 0.003 
*SET,FORCEX(13,0,1) , 0.00325   
*SET,FORCEX(14,0,1) , 0.0035
*SET,FORCEX(15,0,1) , 0.00375   
*SET,FORCEX(16,0,1) , 0.004 
*SET,FORCEX(17,0,1) , 0.00425   
*SET,FORCEX(18,0,1) , 0.0045
*SET,FORCEX(19,0,1) , 0.00475   
*SET,FORCEX(20,0,1) , 0.005 
*SET,FORCEX(21,0,1) , 0.00525   
*SET,FORCEX(22,0,1) , 0.0055
*SET,FORCEX(23,0,1) , 0.00575   
*SET,FORCEX(24,0,1) , 0.006 
*SET,FORCEX(25,0,1) , 0.00625   
*SET,FORCEX(26,0,1) , 0.0065
*SET,FORCEX(27,0,1) , 0.00675   
*SET,FORCEX(28,0,1) , 0.007 
*SET,FORCEX(29,0,1) , 0.00725   
*SET,FORCEX(30,0,1) , 0.0075
*SET,FORCEX(31,0,1) , 0.00775   
*SET,FORCEX(32,0,1) , 0.008 
*SET,FORCEX(33,0,1) , 0.00825   
*SET,FORCEX(34,0,1) , 0.0085
*SET,FORCEX(35,0,1) , 0.00875   
*SET,FORCEX(36,0,1) , 0.009 
!X方向
*SET,FORCEX(1,1,1) , 7.8886090522101e-031   
*SET,FORCEX(2,1,1) , 454.28 
*SET,FORCEX(3,1,1) , 917.08 
*SET,FORCEX(4,1,1) , 1368.5 
*SET,FORCEX(5,1,1) , 1863.31
*SET,FORCEX(6,1,1) , 2518.65
*SET,FORCEX(7,1,1) , 3085.02
*SET,FORCEX(8,1,1) , 3584.75
*SET,FORCEX(9,1,1) , 4080.59
*SET,FORCEX(10,1,1) , 4232.16   
*SET,FORCEX(11,1,1) , 4378.03   
*SET,FORCEX(12,1,1) , 4217.56   
*SET,FORCEX(13,1,1) , 3817.4
*SET,FORCEX(14,1,1) , 3284.51   
*SET,FORCEX(15,1,1) , 2647.13   
*SET,FORCEX(16,1,1) , 1858.25   
*SET,FORCEX(17,1,1) , 1161.42   
*SET,FORCEX(18,1,1) , 536.83
*SET,FORCEX(19,1,1) , 0
*SET,FORCEX(20,1,1) , -454.28   
*SET,FORCEX(21,1,1) , -917.08   
*SET,FORCEX(22,1,1) , -1368.5   
*SET,FORCEX(23,1,1) , -1863.31  
*SET,FORCEX(24,1,1) , -2518.65  
*SET,FORCEX(25,1,1) , -3085.02  
*SET,FORCEX(26,1,1) , -3584.75  
*SET,FORCEX(27,1,1) , -4080.59  
*SET,FORCEX(28,1,1) , -4232.16  
*SET,FORCEX(29,1,1) , -4378.03  
*SET,FORCEX(30,1,1) , -4217.56  
*SET,FORCEX(31,1,1) , -3817.4   
*SET,FORCEX(32,1,1) , -3284.51  
*SET,FORCEX(33,1,1) , -2647.13  
*SET,FORCEX(34,1,1) , -1858.25  
*SET,FORCEX(35,1,1) , -1161.42  
*SET,FORCEX(36,1,1) , -536.83  
!定义Y方向集中力数据表
*DIM,FORCEY,TABLE,36,1,1,TIME,Y
!时间
*SET,FORCEY(1,0,1) , 0.00025
*SET,FORCEY(2,0,1) , 0.0005 
*SET,FORCEY(3,0,1) , 0.00075
*SET,FORCEY(4,0,1) , 0.001  
*SET,FORCEY(5,0,1) , 0.00125
*SET,FORCEY(6,0,1) , 0.0015 
*SET,FORCEY(7,0,1) , 0.00175
*SET,FORCEY(8,0,1) , 0.002  
*SET,FORCEY(9,0,1) , 0.00225
*SET,FORCEY(10,0,1) , 0.0025
*SET,FORCEY(11,0,1) , 0.00275   
*SET,FORCEY(12,0,1) , 0.003 
*SET,FORCEY(13,0,1) , 0.00325   
*SET,FORCEY(14,0,1) , 0.0035
*SET,FORCEY(15,0,1) , 0.00375   
*SET,FORCEY(16,0,1) , 0.004 
*SET,FORCEY(17,0,1) , 0.00425   
*SET,FORCEY(18,0,1) , 0.0045
*SET,FORCEY(19,0,1) , 0.00475   
*SET,FORCEY(20,0,1) , 0.005 
*SET,FORCEY(21,0,1) , 0.00525   
*SET,FORCEY(22,0,1) , 0.0055
*SET,FORCEY(23,0,1) , 0.00575   
*SET,FORCEY(24,0,1) , 0.006 
*SET,FORCEY(25,0,1) , 0.00625   
*SET,FORCEY(26,0,1) , 0.0065
*SET,FORCEY(27,0,1) , 0.00675   
*SET,FORCEY(28,0,1) , 0.007 
*SET,FORCEY(29,0,1) , 0.00725   
*SET,FORCEY(30,0,1) , 0.0075
*SET,FORCEY(31,0,1) , 0.00775   
*SET,FORCEY(32,0,1) , 0.008 
*SET,FORCEY(33,0,1) , 0.00825   
*SET,FORCEY(34,0,1) , 0.0085
*SET,FORCEY(35,0,1) , 0.00875   
*SET,FORCEY(36,0,1) , 0.009 
!Y方向
*SET,FORCEY(1,1,1) , 2752.18   
*SET,FORCEY(2,1,1) , 2565.66
*SET,FORCEY(3,1,1) , 2492.53
*SET,FORCEY(4,1,1) , 2378.91
*SET,FORCEY(5,1,1) , 2242.35
*SET,FORCEY(6,1,1) , 2108.36
*SET,FORCEY(7,1,1) , 1781.03
*SET,FORCEY(8,1,1) , 1306.32
*SET,FORCEY(9,1,1) , 727.24
*SET,FORCEY(10,1,1) , 0  
*SET,FORCEY(11,1,1) ,  -786.58 
*SET,FORCEY(12,1,1) ,  -1548.24 
*SET,FORCEY(13,1,1) , -2304.00
*SET,FORCEY(14,1,1) , -2856.08  
*SET,FORCEY(15,1,1) , -3159.43   
*SET,FORCEY(16,1,1) , -3235.28  
*SET,FORCEY(17,1,1) , -3191.82   
*SET,FORCEY(18,1,1) , -3049.03
*SET,FORCEY(19,1,1) , -2895.60   
*SET,FORCEY(20,1,1) , -2565.66   
*SET,FORCEY(21,1,1) , -2492.53   
*SET,FORCEY(22,1,1) , -2378.91  
*SET,FORCEY(23,1,1) , -2242.35 
*SET,FORCEY(24,1,1) , -2108.36  
*SET,FORCEY(25,1,1) , -1781.03  
*SET,FORCEY(26,1,1) , -1306.32  
*SET,FORCEY(27,1,1) , -727.24
*SET,FORCEY(28,1,1) ,  0 
*SET,FORCEY(29,1,1) , 786.58
*SET,FORCEY(30,1,1) , 1548.24   
*SET,FORCEY(31,1,1) , 2304.00 
*SET,FORCEY(32,1,1) , 2856.08
*SET,FORCEY(33,1,1) , 3159.43  
*SET,FORCEY(34,1,1) , 3235.28  
*SET,FORCEY(35,1,1) , 3191.82  
*SET,FORCEY(36,1,1) , 3049.03 
!
ANTYPE,4
TIME,0.009
DELTIM,0.00025
AUTOTS,OFF
OUTRES,BASIC,ALL
KBC,1
TIMINT,ON
D,30002,UX
D,30002,UY
D,30002,UZ
D,30002,ROTX
D,30002,ROTY
D,30003,UX
D,30003,UY
D,30003,UZ
D,30004,UX
D,30004,UY
D,30004,UZ
F,30000,FX,%FORCEX% !施加X集中力载荷  
F,30000,FY,%FORCEY% !施加Y集中力载荷  
ALLSEL
SOLVE
FINISH
/POST26
NSOL,2,5245,U,Y,UY5245
NSOL,3,7129,U,Y,UY7129
NSOL,4,8061,U,Y,UY8061
NSOL,5,14536,U,Y,UY14536
NSOL,6,19068,U,Y,UY19068
PLVAR,2,3,4,5,6
PRVAR,2
FINISH
/EXIT,ALL