Programowanie Parametryczne

Nie otworu tylko całego złożonego konturu. Każda współrzędna liniowa X oraz Y miała swoje Q które co LBL parametrycznie za pomocą trygonometrii przeliczało półkę niżej. Wiem że kłopoty miałem z promieniami konturu, ale coś tam wymyśliłem żeby to grało. To było ponad 10 lat temu...

Można skorzystać też z cykli SL i tylko tam dać zmienne, nie trzeba parametryzować każdej współrzędnej, niech się komputer martwi... dodatkowo (z pewnymi zastrzeżeniami) można korzystać z programowania FK wewnątrz takiego zapętlonego SL-cyklu.

Witam
napisałem program na planowanie, ale nie potrafię napisać tak żeby w osi y narzędzie przesuwało się o zadaną wartość x razy.
Np wpisując długość boku y200 i ilość przejść 4 program jechał w x o zadaną wartość następnie przejeżdżał w y o 50mm i z powrotem x i tak dalej
Czy ktoś ma jakiś pomysł?





0 BEGIN PGM q MM
1 BLK FORM 0.1 Z X+0 Y+0 Z-100
2 BLK FORM 0.2 X+100 Y+100 Z+1
3 ;
4 TOOL CALL 20 Z S900
5 ;
6 ;-----OS Z------
7 FN 0: Q1 =+5 ;dosuw
8 FN 0: Q2 =+10 ;glebokosc
9 FN 0: Q3 =+2000 ;posuw frezowania
10 FN 0: Q5 =+150 ;dlugosc x
11 ;
12 ;----OS Y-----
13 ;
14 FN 0: Q10 =+50 ;dlugosc y
15 FN 0: Q11 =+4 ;ilosc przejsc y
16 FN 4: Q12 =+Q10 DIV +Q11
17 ;
18 FN 0: Q4 =+Q1
19 FN 11: IF +Q4 GT +Q2 GOTO LBL 3
20 FN 12: IF +Q4 LT +Q2 GOTO LBL 1
21 ;
22 LBL 1
23 CALL LBL 2
24 FN 1: Q4 =+Q4 + +Q1
25 FN 11: IF +Q4 GT +Q2 GOTO LBL 3
26 FN 10: IF +Q4 NE +Q2 GOTO LBL 1
27 FN 12: IF +Q4 LT +Q2 GOTO LBL 1
28 LBL 0
29 ;
30 LBL 2
31 FN 9: IF +Q11 EQU +1 GOTO LBL 11
32 FN 11: IF +Q11 GT +1 GOTO LBL 13
33 LBL 0
34 L Z+100 R0 FMAX M2
35 ;
36 LBL 13
37 L X-30 Y+0 R0 FMAX M3
38 L Z-Q4 F1000
39 LBL 130
40 L X+Q5 R0 FQ3
41 L IY+Q12 R0 FMAX
42 L X-30 R0 FQ3
43 L IY+Q12 R0 FMAX
44 CALL LBL 130 REPQ13
45 LBL 0
46 L Z+100 R0 FMAX M2
47 ;
48 LBL 11
49 L X+0 Y+0 R0 FMAX M3
50 L Z-Q4 FMAX
51 L X+Q5 FQ3
52 LBL 0
53 L Z+100 R0 FMAX M2
54 ;
55 LBL 3
56 L Z+400 R0 FMAX
57 LBL 0
58 END PGM q MM

To co kolega napisał to bzdura po co tyle tych skokow bezsensownych ?
Najprosciej to by miało tak wygladac


0 PLANOWANIE
1 BLK FORM 0.1 Z X-50 Y0 Z-5
2 BLK FORM 0.2 X+200 Y+200 Z+0
3 TOOL CALL 7 Z S1000
4 L X-50 Y+0 F MAX
5 L Z+100 F1000
6 FN 0: Q1 = +50;KROK W Y
7 FN 0: Q2 = +200;SZEROKOSC W Y
8 FN 0: Q3 = +1000;POSUW
9 FN 0: Q4 = +0;START Y
10 CALL LBL1
11 L Z+100 R0 F MAX M30
12 LBL 1
13 L Z-1 R0 F1000
14 L X+150 R0 FQ3
15 FN 1:Q4 =+Q4++Q1-LICZNIK DODAWANIE
16 L Y+Q4 R0 FQ3
17 L X-50 FQ3
18 FN 1:Q4 =+Q4++Q1-LICZNIK DODAWANIE
19 L Y+Q4 R0 FQ3
20 L X+150 R0 FQ3
21 FN 12:IF +Q4 LT+Q2 GOTO LBL 1
22 LBL 0