ANSYS_结构稳态(静力)分析之经典实例-扳手

Chelsea

1. /FILNAME,Allen-wrench,1     !     Jobname to use for all subsequent files
   
2. /TITLE,Static analysis of an Allen wrench
   
3. /UNITS,SI        ! Reminder that the SI system of units is used
   
4. /SHOW            ! Specify graphics driver for interactive run; for batch
   
5.                  ! run plots are written to pm02.grph
   
6. 
   
7.                  ! Define parameters for future use
   
8. 
   
9. EXX=2.07E11      ! Young's modulus (2.07E11 Pa = 30E6 psi)
   
10. W_HEX=.01        ! Width of hex across flats (.01m=.39in)
    
11. *AFUN,DEG        ! Units for angular parametric functions定义弧度单位
    
12. W_FLAT=W_HEX*TAN(30)        ! Width of flat
    
13. L_SHANK=.075     ! Length of shank (short end) (.075m=3.0in)
    
14. L_HANDLE=.2      ! Length of handle (long end) (.2m=7.9 in)
    
15. BENDRAD=.01      ! Bend radius of Allen wrench (.01m=.39 in)
    
16. L_ELEM=.0075     ! Element length (.0075 m = .30 in)
    
17. NO_D_HEX=2       ! Number of divisions on hex flat
    
18. TOL=25E-6        ! Tolerance for selecting nodes (25e-6 m = .001 in)
    
19. 
    
20. /PREP7
    
21. ET,1,SOLID45     ! 3维实体结构单元；Eight-node brick element
    
22. ET,2,PLANE42     ! 2维平面结构；Four-node quadrilateral (for area mesh)
    
23. MP,EX,1,EXX      ! Young's modulus for material 1；杨氏模量
    
24. MP,PRXY,1,0.3    ! Poisson's ratio for material 1；泊松比
    
25. 
    
26. RPOLY,6,W_FLAT   ! Hexagonal area创建规则的多边形
    
27. 
    
28. K,7              ! Keypoint at (0,0,0)
    
29. K,8,,,-L_SHANK   ! Keypoint at shank-handle intersection
    
30. K,9,,L_HANDLE,-L_SHANK    ! Keypoint at end of handle
    
31. 
    
32. L,4,1            ! Line through middle of hex shape
    
33. L,7,8            ! Line along middle of shank
    
34. L,8,9            ! Line along handle
    
35. LFILLT,8,9,BENDRAD        ! Line along bend radius between shank and handle! 产生一个倒角圆，并生成三个点
    
36. 
    
37. /VIEW,,1,1,1     ! Isometric view in window 1
    
38. /ANGLE,,90,XM    ! Rotates model 90 degrees about X! 不用累积的旋转
    
39. /TRIAD,ltop
    
40. /PNUM,LINE,1     ! Line numbers turned on
    
41. LPLOT
    
42.                  ! Line numbers off
    
43.                  !
    
44. /PNUM,KP,1
    
45. KPLOT
    
46. L,1,4            ! Hex section is cut into two quadrilaterals
    
47. ASBL,1,7,,,KEEP  !  to satisfy mapped meshing requirements for bricks! 减线从面中
    
48. CM,BOTAREA,AREA  ! Component name BOTAREA for the two areas
    
49. 
    
50.                        ! Generate area mesh for later drag
    
51. 
    
52. /PNUM,KP,0
    
53. LPLOT
    
54. LESIZE,1,,,NO_D_HEX    ! Number of divisions along line 1 为线指定网格尺寸
    
55. LESIZE,2,,,NO_D_HEX
    
56. LESIZE,6,,,NO_D_HEX
    
57. TYPE,2                 ! PLANE42 elements to be meshed first
    
58. MSHAPE,0,2D            ! Mapped quad mesh 指定单元要划分的形状和维数
    
59. MSHKEY,1               ! 指定了映射网格划分
    
60. SAVE                   ! Save database before meshing
    
61. AMESH,ALL
    
62. 
    
63. 
    
64. /TITLE,Meshed hex wrench end to be used in vdrag
    
65. EPLOT
    
66.                        ! Now drag the 2-D mesh to produce 3-D elements
    
67. TYPE,1                 ! Type pointer set to SOLID45
    
68. ESIZE,L_ELEM           ! Element size  
    
69. VDRAG,2,3,,,,,8,10,9   ! Drag operation to create 3-D mesh面掠生成体
    
70. 
    
71. /TYPE,,HIDP            ! Precise hidden line display  显示要求是精确
    
72. /TITLE,Meshed hex wrench
    
73. EPLOT
    
74. 
    
75. CMSEL,,BOTAREA         ! Select BOTAREA component and! 选择一个子集
    
76. ACLEAR,ALL             !    delete the 2-D elements! 清楚选择单元的几点和单元
    
77. ASEL,ALL
    
78.                        
    
79. FINISH                 ! Apply loads and obtain the solution
    
80. /SOLU
    
81. ANTYPE,STATIC          ! Static analysis (default)
    
82. 
    
83. /TITLE,Allen wrench -- Load step 1
    
84.                        ! First fix all nodes around bottom of shank
    
85. CMSEL,,BOTAREA         ! Bottom areas of shank 选择以前建立的一个单元面积的组合
    
86. LSEL,,EXT              ! Exterior lines of those areas 显示线
    
87. NSLL,,1                ! Nodes on those lines
    
88. D,ALL,ALL              ! Displacement constraints
    
89. 
    
90. LSEL,ALL
    
91. /PBC,U,,2              ! Displacement symbols turned on 显示位移约束的符号
    
92. /TITLE,Boundary conditions on end of wrench
    
93. NPLOT
    
94. 
    
95.                                 !Now apply pressure on handle to represent 100-N (22.5-lb) finger force
    
96. ASEL,,LOC,Y,BENDRAD,L_HANDLE    ! Areas on handle
    
97. ASEL,R,LOC,X,W_FLAT/2,W_FLAT    ! Two areas on one side of handle...
    
98. NSLA,,1                         !  ...and all corresponding nodes
    
99. NSEL,R,LOC,Y,L_HANDLE+TOL,L_HANDLE-(3.0*L_ELEM)-TOL   ! Reselects nodes at  位置
    
100.                                 ! back end of handle (3 element lengths)
     
101. *GET,MINYVAL,NODE,,MNLOC,Y      ! Get minimum Y value of selected nodes预处理中的结点项；问题是得到一个什么样的值，结点的什么？
     
102. *GET,MAXYVAL,NODE,,MXLOC,Y      ! Get maximum Y value of selected nodes是中心位置的值吗？
     
103. PTORQ=100/(W_HEX*(MAXYVAL-MINYVAL))   ! Pressure equivalent to 100 N
     
104. SF,ALL,PRES,PTORQ               ! PTORQ pressure on all selected nodes 指定节点上的表面力的载荷
     
105. 
     
106. ALLSEL                          ! Restores full set of all entities
     
107. /PSF,PRES,,2                    ! Pressure symbols turned on 以箭头显示载荷
     
108. /TITLE,Boundary conditions on wrench for load step 1
     
109. NPLOT
     
110. LSWRITE                         ! Writes first load step
     
111. 
     
112. 
     
113. 
     
114. /TITLE, Allen wrench -- load step 2
     
115.                                 ! Downward pressure on top of handle, representing 20-N (4.5 -lb) force
     
116. PDOWN=20/(W_FLAT*(MAXYVAL-MINYVAL))
     
117. 
     
118. ASEL,,LOC,Z,-(L_SHANK+(W_HEX/2))   ! Area on top flat of handle...
     
119. NSLA,,1                            !  ...and all corresponding nodes
     
120. NSEL,R,LOC,Y,L_HANDLE+TOL,L_HANDLE-(3.0*L_ELEM)-TOL   ! Reselects nodes at
     
121.                                 ! back end of handle (3 element lengths)
     
122. SF,ALL,PRES,PDOWN               ! PDOWN pressure at all selected nodes
     
123. ALLSEL
     
124. /TITLE,Boundary conditions on wrench for load step 2
     
125. NPLOT
     
126. LSWRITE                         ! Writes second load step
     
127. 
     
128. SAVE                            ! Save database before solution
     
129. LSSOLVE,1,2                     ! Initiates solution for load step files 1 and 2
     
130. 
     
131.                         !Review the results
     
132. FINISH
     
133. /POST1
     
134. SET,1                   ! Reads load step 1 results
     
135. PRRSOL                  ! Reaction solution listing
     
136. /PBC,DEFA               ! No BC symbols  重新安排规格说明
     
137. /PSF,DEFA               ! No surface load symbols 重新安排载荷的显示
     
138. /EDGE,,1                ! Edges only, no interior element outlines 只显示边缘单元的显示
     
139. /TITLE,Deformed allen wrench caused by torque
     
140. PLDISP,2                ! Deformed shape overlaid with undeformed edge plot 显示结构转移
     
141. 
     
142. /GSAVE,pldisp,gsav      ! Saves graphics specifications on pldisp.gsav 保存为此图形文件，稍后再用
     
143. 
     
144. /PLOPTS,INFO,ON         ! Turns on entire legend column 打开边框形式；开启全部的图形圆柱
     
145. /PLOPTS,LEG1,OFF        ! Turns off legend header 关闭图形轮廓线的标题（头部）
     
146. /ANGLE,,120,YM,1        ! Additional rotation about model Y (to see high stress areas)
     
147. /TITLE,Stress intensity contours caused by torque
     
148. PLNSOL,S,INT            ! Stress intensity（应力强度） contours 组元应力
     
149. 
     
150. /GSAVE,plnsol,gsav      ! Saves graphics specifications to plnsol.gsav
     
151. 
     
152. 
     
153. SET,2                   ! Reads load step 2 results
     
154. PRRSOL                  ! Reaction solution listing
     
155. 
     
156. /GRESUME,pldisp,gsav    ! 恢复pldisp文件；Resumes graphics specifications from pldisp.gsav
     
157. /TITLE,Deformed allen wrench caused by torque and force
     
158. PLDISP,2
     
159. 
     
160. /GRESUME,plnsol,gsav    ! Resumes graphics specifications from plnsol.gsav
     
161. 
     
162. /TITLE,Stress intensity contours caused by torque and force
     
163. PLNSOL,S,INT
     
164. 
     
165. WPOF,,,-0.067           ! 把工作平面在Z方向偏移，达到后面要的截面的位置Offset the working plane for cross-section view从Z轴方向偏移工作平面
     
166. /TYPE,1,5               ! Capped hidden display 显示剖面
     
167. /CPLANE,1               ! 以共工作平面来剪切截面 Cutting plane defined to use the WP 把平面切开
     
168. 
     
169. /VIEW, 1 ,WP            ! View will be normal to the WP正切于当前的工作平面
     
170. /DIST,1,.01             ! Zoom in on the cross section 指定详细的扩大倍数进行查看
     
171. 
     
172. /TITLE,Cross section of the allen wrench under torque and force loading
     
173. PLNSOL,S,INT
     
174. 
     
175. 
     
176. 
     
177. 
     
178. 
     
179. 
     
180. 
     
181. 
     
182. ! ***********************************GUI操作后的一些log文件命令流的解释说明 ***********************************
     
183. 
     
184. /BATCH  
     
185. /COM,ANSYS RELEASE 11.0SP1 UP20070830       15:05:16    02/20/2009
     
186. /TITLE,Static Analysis of an Allen Wrench   
     
187. *AFUN,DEG   
     
188. *SET,EXX,       2.07E11
     
189. *SET,W_HEX,     .01  
     
190. *SET,W_FLAT,    W_HEX*TAN(30)   
     
191. *SET,L_SHANK,   .075   
     
192. *SET,L_HANDLE,  .2   
     
193. *SET,L_ELEM,    .0075   
     
194. *SET,NO_D_HEX,  2
     
195. *SET,TOL,       25E-6  
     
196. *SET,BENDRAD,   .01
     
197. 
     
198. /PREP7  
     
199. 
     
200. ET,1,SOLID45
     
201. ET,2,PLANE42
     
202. 
     
203. 
     
204. MPTEMP,,,,,,,,  
     
205. MPTEMP,1,0  
     
206. MPDATA,EX,1,,EXX             ! 与温度相对应的材料属性
     
207. MPDATA,PRXY,1,,0.3  
     
208. 
     
209. RPOLY,6,W_FLAT,              ! 创建规则的多边形
     
210.   
     
211. K,7,,,,
     
212. K,8,,,-L_SHANK,
     
213. K,9,,L_HANDLE,-L_SHANK,
     
214. 
     
215. !*  
     
216. /VIEW, 1 ,1,1,1
     
217. /ANG, 1
     
218. /REP,FAST   
     
219. !*  
     
220. /ANGLE,1,90,XS,0         ! 不用累积的旋转  
     
221. 
     
222. LSTR,       4,       1   ! 两点定义一条直线  
     
223. LSTR,       7,       8  
     
224. LSTR,       8,       9  
     
225. LFILLT,8,9,BENDRAD, ,   ! 产生一个倒角圆，并生成三个点
     
226. SAVE
     
227. 
     
228. APLOT   
     
229. FLST,2,1,5,ORDE,1   
     
230. FITEM,2,1   
     
231. LPLOT   
     
232. 
     
233. FLST,3,1,4,ORDE,1   
     
234. FITEM,3,7   
     
235. ASBL,P51X,P51X, , ,KEEP          ! 减线从面中
     
236. CM,BOTAREA,AREA                  ! 创建一个面的组合
     
237. FLST,5,3,4,ORDE,3   
     
238. FITEM,5,1   
     
239. FITEM,5,-2  
     
240. FITEM,5,6   
     
241. CM,_Y,LINE  
     
242. LSEL, , , ,P51X
     
243. CM,_Y1,LINE
     
244. CMSEL,,_Y   
     
245. 
     
246. LESIZE,_Y1, , ,NO_D_HEX, , , , ,1   
     
247. 
     
248. TYPE,   2   
     
249. MAT,       1
     
250. REAL,   
     
251. ESYS,       0   
     
252. SECNUM,
     
253. TSHAP,LINE  
     
254. !*  
     
255. MOPT,AMESH,DEFA
     
256. MOPT,QMESH,DEFA
     
257. MOPT,VMESH,DEFA
     
258. MOPT,TIMP,1
     
259. MOPT,PYRA,ON
     
260. MOPT,AORD,0
     
261. MOPT,SPLIT,1
     
262. MSHKEY,1
     
263. MSHMID,0
     
264. MSHPATTERN,0
     
265. KEYW,ACCEPT,0   
     
266. !*  
     
267. MSHAPE,0,2D
     
268. MSHAPE,0,3D
     
269. !*  
     
270. SAVE
     
271. FLST,5,2,5,ORDE,2   
     
272. FITEM,5,2   
     
273. FITEM,5,-3  
     
274. CM,_Y,AREA  
     
275. ASEL, , , ,P51X
     
276. CM,_Y1,AREA
     
277. CHKMSH,'AREA'   
     
278. CMSEL,S,_Y  
     
279. !*  
     
280. AMESH,_Y1   
     
281. !*  
     
282. CMDELE,_Y   
     
283. CMDELE,_Y1  
     
284. CMDELE,_Y2  
     
285. !*  
     
286. 
     
287. EPLOT   
     
288. TYPE,   1   
     
289. MAT,       1
     
290. REAL,   
     
291. ESYS,       0   
     
292. SECNUM,
     
293. TSHAP,LINE  
     
294. !*  
     
295. ESIZE,L_ELEM,0,     ! 指定线的份数
     
296.   
     
297. LPLOT   
     
298. FLST,2,2,5,ORDE,2   
     
299. FITEM,2,2   
     
300. FITEM,2,-3  
     
301. FLST,8,2,4  
     
302. FITEM,8,8   
     
303. FITEM,8,10  
     
304. VDRAG,P51X, , , , , ,P51X   
     
305. /AUTO,1
     
306. /REP,FAST   
     
307. EPLOT   
     
308. SAVE
     
309. CMSEL,S,BOTAREA           ! 选择一个子集
     
310. FLST,2,2,5,ORDE,2   
     
311. FITEM,2,2   
     
312. FITEM,2,-3  
     
313. ACLEAR,P51X               ! 清楚选择单元的几点和单元
     
314. ALLSEL,ALL  
     
315. EPLOT   
     
316. CMSEL,S,BOTAREA
     
317. LSEL,S,EXT  
     
318. NSLL,S,1
     
319. FINISH  
     
320. 
     
321. 
     
322. FLST,2,18,1,ORDE,4  
     
323. FITEM,2,1   
     
324. FITEM,2,-10
     
325. FITEM,2,17  
     
326. FITEM,2,-24
     
327. /solu
     
328. 
     
329. D,P51X, , , , , ,ALL, , , , ,   
     
330. LSEL,ALL
     
331. 
     
332. 
     
333. 
     
334. ASEL,S,LOC,Y,BENDRAD,L_HANDLE   
     
335. ASEL,R,LOC,X,W_FLAT/2,W_FLAT
     
336. NSLA,S,1
     
337. NSEL,R,LOC,Y,L_HANDLE+TOL,L_HANDLE-(3.0*L_ELEM)-TOL
     
338. !*  
     
339. *GET,minyval,NODE,,MNLOC,Y, , , ,   
     
340. 
     
341. *GET,maxyval,NODE,,MXLOC,X, , ,,   
     
342. 
     
343. *SET,PTORQ,100/(W_HEX*(MAXYVAL-MINYVAL))
     
344. ALLSEL,ALL  
     
345. FLST,2,364,1,ORDE,2
     
346. FITEM,2,1   
     
347. FITEM,2,-364
     
348. 
     
349. SF,P51X,PRES,PTORQ  
     
350. ALLSEL,ALL  
     
351. NPLOT   
     
352. SAVE
     
353. LSWRITE,1,  
     
354. 
     
355. *SET,PDOWN,20/(W_FLAT*(MAXYVAL-MINYVAL))
     
356. 
     
357. ASEL,S,LOC,Z,-(L_SHANK+(W_HEX/2))   
     
358. NSLA,S,1
     
359. NSEL,R,LOC,Y,L_HANDLE+TOL,L_HANDLE-(3.0*L_ELEM)-TOL
     
360. ALLSEL,ALL  
     
361. FLST,2,364,1,ORDE,2
     
362. FITEM,2,1   
     
363. FITEM,2,-364
     
364. 
     
365. SF,P51X,PRES,PDOWN  
     
366. ALLSEL,ALL  
     
367. NPLOT   
     
368. LSWRITE,2,  
     
369. SAVE
     
370. LSSOLVE,1,2,1,  
     
371. FINISH  
     
372. /POST1  
     
373. SET,FIRST   
     
374. PRRSOL,
     
375. 
     
376. 
     
377. /PBC,ALL, ,0
     
378. /REP
     
379.   
     
380. /EDGE,1,1,45
     
381. /GLINE,1,0  
     
382. 
     
383. PLDISP,1
     
384. /GSAVE,'pldisp','gsa',' '   
     
385. !*  
     
386. /ANGLE,1,120,YM,1   
     
387. /REPLOT
     
388. 
     
389. /EFACET,1   
     
390. PLNSOL, S,INT, 0,1.0
     
391. /GSAVE,'plnsol','gsa',' '   
     
392. 
     
393. SET,NEXT
     
394. PRRSOL,
     
395. /GRESUME,'pldisp','gsa',' '
     
396. PLDISP,1
     
397. /GRESUME,'plnsol','gsa',' '
     
398. !*  
     
399. /EFACET,1   
     
400. PLNSOL, S,INT, 0,1.0
     
401. wprot,0,0,-0.067
     
402. /GRAPHICS,POWER
     
403. !*  
     
404. /TYPE,1,5   
     
405. /CPLANE,1   
     
406. /SHADE,1,1  
     
407. /HBC,1,0
     
408. /REPLOT
     
409. !*  
     
410. /VIEW, 1 ,WP
     
411. /REP,FAST   
     
412. /REPLOT,RESIZE  
     
413. /VIEW,1,1,2,3   
     
414. /ANG,1  
     
415. /REP,FAST   
     
416. FINISH  
     
417. ! /EXIT,NOSAV

复制代码

July750

很好的例子，就是没有注释，看起来有点费劲