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

源代码在线查看: ex5-2.txt

软件大小: 9 K
上传用户: zhangtaoai007
关键词: ANSYS 3795 机械工程 应用实例
下载地址: 免注册下载 普通下载 VIP

相关代码

				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
							

相关资源