Bosch Rexroth IndraMotion MTX 15VRS Anwendungsbeschreibung Seite 98

96/131 Bosch Rexroth AG
Konfiguration
25
□50 □50
Ø26
Ø40
Ø12
Ø6
Abb. 10-6: Form-Senker 12x6 mit radialem Winkelkopf
Das Mesh des Winkelkopfs ist durch Extrudieren zu erzeugen.
Die Abszisse des Koordinatensystems für diese Kontur ist mit ei‐
nem roten Pfeil, die Ordinate mit einem grünen Pfeil gekennzeich‐
net. Der Nullpunkt der Kontur muss mit dem Nullpunkt an der
Werkzeugaufnahme übereinstimmen, weil die Geometrie in Werk‐
zeuglängsrichtung den Nullpunkt an der Werkzeugaufnahme
überragt. Die Richtung zum Extrudieren ist in diesem Fall Y.
Programm:
TNAME$=DBT1.Hd.SKQ
IF (TNAME$<>"")AND(ORIPLANE$="G19")AND(EDREF%>0) THEN
L_1=DBT1.UD.Ed[EDREF%].Geo.L1 : REM Get length correction L1
L_2=DBT1.UD.Ed[EDREF%].Geo.L2 : REM Get length correction L2
; Validation for angle head incl. collet chucks
IF (L_1>50)AND(L_2>55) THEN
HOLDER$="EXT,0,-22,,40,"+STR$(-L_1-10)+",,CCW15,"+STR$(-L_1-25)
HOLDER$=HOLDER$+",25,,-30,"+STR$(-L_1+25)+",,,-22,Y-25,TH50"
ARBOR$="REV,34,,40,3,,17,34,20,26,,,25"
IF (TY%=0)AND(TNAME$="FormCounterSink 12x6") THEN
SHAFTLEN=L_2-30-25-35
IF SHAFTLEN>=0 THEN
SHAFT$="REV,12,,,"+STR$(L_2-35)
CUTT$="REV,,,6,2,,13.5,CW1.5,9,15,12,,,35"
ENDIF
ENDIF
DOK-MTX***-NC*SIM**V15-AP01-DE-P
IndraMotion MTX 15VRS NC-Simulation
L1
: REM Get ident from tool dataset
; Tool not empty and radially oriented.
; Contours for angle head and collet chucks
; Branching for form countersink
: REM remaining shaft length
: REM shaft length sufficient?
; Contours for shaft and cutting edge
40
0
-22
-30
25
20
0
35
15
2
0