Probleme beim Schlichten mit Q

Hallo ihr
da draußen ich habe ein Problem und zwar habe ich mir ein PGM mit Paras . für einen Indexbolzen ( Schwertstift )gebastelt . Die Bearbeitung mit Schruppaufmass läuft gut aber ich habe ein Problem mit dem Schlichten ich wollte da die Kontur nicht gleichmäßig ist das Schlichten des Bolzens über den Werkzeugradius lösen . Ich würde aber gern die Kontur mit einer anderen Tiefe und in den einzelnen Konturstufen abarbeiten wie beim Schruppen auch . Was mir bis jetzt noch nicht so recht gelingt .

Was mache ich verkehrt ????

Über Hilfe würde ich mich sehr freuen .

Ps: Die andere Tiefe wäre nicht ganz so wichtig das Schlichen sollte schon klappen .
Steuerung ist nur eine 310
NC = 28614012

Gruß Ramme


0 BEGIN PGM Schwert2 MM
1 ;Schwertstift 30 Grad ;
2 ;Werte Einstellung *
3 Q1 = 10 ; Max in X
4 Q2 = 15 ; Max in Y
5 Q12 = 4.25 ; Zugestellte Tiefe
6 Q14 = 15 ; Gesamttiefe
7 Q19 = 5000 ; Vorschub
8 Q20 = 1 ; Schlichten ? 0= Nein 1= Ja
9 Q21 = 0.5 ; Schruppaufmass
10 ;***************
11 BLK FORM 0.1 Z X-400 Y+0 Z-6
12 BLK FORM 0.2 X+0 Y+200 Z+12
13 ; Werkzeug *
14 CALL LBL 100
15 LBL 1
16 TOOL CALL 20 Z S1500 DR+Q21
17 LBL 0
18 ;****************
19 SEL TABLE "0"
20 CYCL DEF 7.0 NULLPUNKT
21 CYCL DEF 7.1 #1
22 CYCL DEF 7.0 NULLPUNKT
23 CYCL DEF 7.1 IZ+150
24 L Z+Q18 R0 FMAX
25 L X+Q15 Y+0 R0 FQ17 M13
26 L Z+0
27 LBL 10
28 CALL LBL 11
29 LBL 0
30 FN 1: Q12 =+Q13 + +Q12
31 FN 12: IF +Q12 LT +Q14 GOTO LBL 10
32 FN 0: Q12 =+Q14
33 CALL LBL 10
34 FN 0: Q12 =+Q13
35 FN 0: Q21 =+Q22
36 CALL LBL 1
37 FN 12: IF +Q20 LT +1 GOTO LBL 2
38 FN 0: Q12 =+Q14
39 CALL LBL 10
40 LBL 2
41 L Z+Q18 R0 FMAX
42 L Y+250 R0 FMAX M30
43 ;***********************
44 ; Start PGM ;
45 ;***********************
46 LBL 100
47 ; Rechnenmakro *
48 Q1 = Q1 / 2
49 Q2 = Q2 / 2
50 Q3 = Q1
51 Q4 = Q2
52 Q5 = Q1
53 Q6 = 90 - 9
54 Q7 = Q6 + 18
55 Q8 = 180
56 Q9 = Q8 + 81
57 Q10 = Q9 + 18
58 Q11 = 0
59 Q13 = Q12
60 Q14 = Q14
61 Q15 = Q108 + 20
62 Q17 = Q19 * 12
63 Q18 = Q13 + 100
64 Q22 = Q21 - Q21
65 ;************
66 LBL 0
67 LBL 11
68 L Z-Q12 R0 F250
69 APPR LCT X+Q1 Y+0 R4 RL FQ19
70 CC X+0 Y+0
71 LP PR+Q2 PA-Q6
72 CP PA-Q7 DR-
73 LP PR+Q3 PA-Q8
74 LP PR+Q4 PA-Q9
75 CP PA-Q10 DR-
76 LP PR+Q5 PA-Q11
77 DEP LCT X+Q15 Y+0 R4
78 LBL 0
79 END PGM Schwert2 MM