Witam

Próbuję napisać program na planowanie powierzchni z wykorzystaniem parametrów Q.
nie mogę poradzić sobie z przesuwem osi y o daną liczbę przejść. Czy ktoś może już pisał taki program?

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 FN 0: Q1 =+5 ;dosuw
7 FN 0: Q2 =+10 ;glebokosc
8 FN 0: Q3 =+2000 ;posuw frezowania
9 FN 0: Q5 =+150 ;dlugosc x
10 FN 0: Q7 =+20 ;dosuw y
11 FN 0: Q9 =+0 ;ilosc powtorzen przeuw y
12 FN 0: Q10 =+50 ;dlugosc y
13 FN 0: Q11 =+4 ;ilosc przejsc y
14 FN 4: Q12 =+Q10 DIV +Q11
15 FN 2: Q13 =+Q11 - +1
16 ;
17 FN 0: Q4 =+Q1
18 FN 11: IF +Q4 GT +Q2 GOTO LBL 3
19 FN 12: IF +Q4 LT +Q2 GOTO LBL 1
20 ;
21 LBL 1
22 CALL LBL 2
23 FN 1: Q4 =+Q4 + +Q1
24 FN 11: IF +Q4 GT +Q2 GOTO LBL 3
25 FN 10: IF +Q4 NE +Q2 GOTO LBL 1
26 FN 12: IF +Q4 LT +Q2 GOTO LBL 1
27 ;
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 LBL 13
36 L X-30 Y+0 R0 FMAX M3
37 L Z-Q4 F1000
38 LBL 130
39 L X+Q5 R0 FQ3
40 L IY+Q12 R0 FMAX
41 L X-30 R0 FQ3
42 L IY+Q12 R0 FMAX
43 CALL LBL 130 REPQ13
44 LBL 0
45 L Z+100 R0 FMAX M2
46 LBL 11
47 L X+0 Y+0 R0 FMAX M3
48 L Z-Q4 FMAX
49 L X+Q5 FQ3
50 LBL 0
51 L Z+100 R0 FMAX M2
52 ;
53 LBL 3
54 L Z+400 R0 FMAX
55 LBL 0
56 END PGM q MM