Sooooo, danke schonmal an alle für eure Antworten.
Ich habe das Program mal abgeändert, auch weil ja nach IPA7200 schluss ist. Allerdings hab ich noch ein Problem. Wenn es nicht ganz aufgeht wegen der Gesamttiefe/Zustellung dann fräst er mir zu tief!? Zumindest laut Simulation... Ich wollte das durch den Satz 58 beheben aber irgendwie ist der Satz wirkungslos....
Laut
Simulation ist bei dem angehängten Program die fertige Tiefe bei -2.55 anstatt wie ich es will bei -2
Schauts euch am besten mal im Programierplatz an. Fräser "Seco" hat einen Radius von 10mm.
Ich habe auch mal nachgeschaut, die 430 hat schon die FRAC Funktion. Allerdings bin ich mir noch nicht ganz sicher für was man diese Funktionen (GRAC/INT) am besten einsetzt.
Meine Idee war: das ich die Gesamttiefe geteilt durch Zustellung pro Umdrehung berechnen lasse. Mit diesem Wert mache ich INT. Hiermit habe ich einen wert wie oft ich z.B. das LBL wiederholen lassen kann ohne zu tief zu fahren... Es hört sich für euch Cracks vielleicht abenteuerlich an aber irgendwie muss man sich ja seine Gedanken machen um weiter zu kommen. Kann auch sein das ich es ganz falsch verstanden habe....
Hier also das Program mit meinen ersten IF Versuchen:
0 BEGIN
PGM helixmmversuch MM
1 BLK FORM 0.1 Z X+0 Y+0 Z-30
2 BLK FORM 0.2 X+200 Y+200 Z+0
3 ;
4 ;Fraeserdurchmesser muss min. Q3 betragen
5 ;
6 ;
7 ;Noetige Angaben
8 ;
9 ;Positionen der Loecher ab Satz 33
10 ;
11 FN 0: Q3 =+19 ;Radius Bohrung
12 FN 0: Q8 =+1.136 ;Eintauchtiefe pro Umdrehung
13 FN 0: Q9 =+2 ;Sicherheitsabstand
14 FN 0: Q10 =+2 ;Tiefe+evtl Durchbruchsmass
15 FN 0: Q20 =+130 ;
Vorschub Eintauchen
16 FN 0: Q21 =+300 ;Vorschub Fraesen
17 ;
18 ;
19 ;
20 ;
21 ;
22 ;Berechnungen
23 FN 1: Q5 =+Q9 + +Q10 ;Gesamttiefe berechnen
24 ;Berechnung ende
25 ;
26 ;
27 ;
28 ;
29 ;
30 TOOL CALL "SECO" Z S3200
31 L Z+200 R0 FMAX M3
32 ;
33 FN 0: Q1 =+50 ;Kreismitte X Pos.1
34 FN 0: Q2 =+50 ;Kreismitte Y Pos.1
35 CALL LBL 1
36 ;
37 FN 0: Q1 =+80 ;Kreismitte X Pos.2
38 FN 0: Q2 =+80 ;Kreismitte Y Pos.2
39 CALL LBL 1
40 ;
41 FN 0: Q1 =+115 ;Kreismitte X Pos.3
42 FN 0: Q2 =+115 ;Kreismitte Y Pos.3
43 CALL LBL 1
44 ;
45 ;
46 L Z+200 R0 FMAX M5
47 L X+300 R0 FMAX M2
48 ;
49 LBL 1
50 L X+Q1 Y+Q2 R0 FMAX
51 L Z+Q9 R0 FMAX
52 CC X+Q1 Y+Q2
53 LP PR+Q3 PA+0 RL FQ20
54 LBL 2
55 FN 1: Q99 =+Q99 + +Q8
56 CP IPA-360 IZ-Q8 DR+
57 FN 12: IF +Q99 LT +Q5 GOTO LBL 2
58 FN 11: IF +Q99 GT +Q5 GOTO LBL 3
59 FN 9: IF +Q99 EQU +Q5 GOTO LBL 3
60 LBL 3
61 CP IPA-360 Z-Q10 DR+
62 CP IPA+365 DR+ FQ21
63 LP PR+0 PA+0 R0
64 L Z+Q9 R0 FMAX
65 FN 0: Q99 =+0
66 LBL 0
67 END PGM helixmmversuch MM
Grüße Manuel
Der Beitrag wurde von Bender {MMO} bearbeitet: 30.01.2012, 19:45 Uhr