Твердотельное моделирование камеры ракетного двигателя с применением системы CATIA (120

. 41. = %

+ %$ % % * % %$ & , < % Stop, % < & % Stop macro recording.

= H %$ . ; % % :

Tools > Macro > Macros... > Disk1 MS VBA > Run. + < % % 8 & VBA:

Tools > Macro > Macros > Edit.

X $ &8 ' :

Dim shapeFactory1 As ShapeFactory

Set shapeFactory1 = part1.ShapeFactory Dim pad1 As Pad

Set pad1 = shapeFactory1.AddNewPad(sketch1, 20#) Dim limit1 As Limit

Set limit1 = pad1.FirstLimit Dim length8 As Length

Set length8 = limit1.Dimension length8.Value = 5.5 part1.Update

End Sub

+ < , < % 8 . B , % , 8 8 , & ' H_Disk. B % H_Disk < % 8 & H- # InputBox:

H_Disk = InputBox("Enter the Extrusion Distance:", "H_Disk")

length8.Value = H_Disk

31

( < $ . % VBA % -Disk1: Tools > Macro > Macros…> Disk1. B %$Disk1 %$ $ $ %-( . 42). +$ $ 88 8

$ % . 43.

. 42. InputBox

. 43. $ 8

; % * %$ - :

1)8 ( . . 40). ' % ' H < ;

2)8 $ $ % H , % < % * ;

3)8 $ $ % H , % < % .

32

= N

8 % . 44,$ , % 8 -% , – . 45.

1.) 8 H # $ %$.

2." ' & 8 H # , % % %$ % .

33

/?

%$ ' % $ $ % 8 & H # Pad Shaft, $ %$ ' % %$ Rib (% Sketch-Based Features). + @ %$ $ $ $ % Rib Definition, @ '- &8 &, % @ . + @ < &8 %# :

Keep angle – $ < % H ' &8 ;

Pulling direction – %$ %$ % H$ % < ' &8 ;

Reference Surface – %$ $ < % $ % % &.

+ ' % % . 46.

. 46. ' %

)

! %$& ' 8$ - $ $ % % < &8 % % . ! % % . 47.

)$ ' :

1) ' % %$ ;

34

. 47. ! %

2)& $ < -;

3)' % , %$8 @ -;

4)' %-, %$8 % .

0

) # ' %$ '@ , %$ $ 8 (%-1), 8 (% 2), $$(% 3), &8 # ' * (% 4) 8 (% 5). " H-% 5 8 % %-8 . % % $# % . 48. B %# $ 8 < % $ % . B '-D = 200 .

; # %$ 8 @ -. = 8$ % @ % 8 &Axis. ; # % . 49.$ % <$ < &8 % #-

35

. + #n = 72 % . 50.

. 48. % % $ #

. 49. ; #

36

. 50. ) #

?

)' J" 8$ $ %$ ' Assembly Design CATIA V5.

+ ' % - # , ' % #$ @ $. % $ ' . ; H-% . = ' $ -$&$ &8 : Existing Component, Fix, Coincidence, Contact, Reuse Pattern, Offset, Multi Instantiation, Angle.

8 , H , 8 . ; % % # %$. + < ' %$ $ $ ' @ -&8 % . + ' H ' .

+ %$ H J" % . 51–53.

X-

% %$ $ , -$ %$ ' & H & # &

37

. 51. X$ $

. 52. X$

38

+ ' % . 55.

. 55. G$ '

)$ ' :

1)% 8 & # & $ $;

2)' $ ;

3)# & $ $;

4)' $ ;

5)% 8 & # & $ * $;

6)' * $ .

40