Q1=0,5;ap
Q2=60
Q3=60
Q4=60
Q5=60
Q7=60
Q8=0,5;odjazd od konturu
Q9=10;wysokość fazy
Q10=(Q9/Q1)-1;REP
TOOL CALL 20 Z S2500 F2000
Z+50 R0 FMAX M3
X-70 Y-90 R0 FMAX
Z +10 R0 FMAX
Z +0 F 2500
CALL LBL1
Z +100 R0 FMAX
X +0 Y +100 R0 FMAX
M 30
LBL 1
IZ -Q1 R0FMAX
X-Q2 Y-Q3 R0 F 2500
Y+Q4
X+Q5
Y-Q6
X-Q7
X-70 Y-90 R0 F3500
Q2=Q2+Q8
Q3=Q3+Q8
Q4=Q4+Q8
Q5=Q5+q8
Q6=Q6+Q8
Q7=Q7+Q8
CALL LBL REPQ 10
LBL 0
END PGM
A może tak :X+0 Y+0 w środku kwadratu, kwadrat 80/80,narzędzie R20, narzędzie pracuje R0.Pracuję na 530,ze 155 nie miałem okazji pracować.Pozdrawiam.

Q1=0;DR
Q2=0,5;Przyrost DR
Q3=0,5;Zjazd w Z
Q4=10;Wys fazy
Q5=(Q4/Q3)-1;REP
TOOL CALL 25 Z S2500 F2500
Z+60 RO F MAX M3
X-70 Y-90 RO F MAX
Z+10 RO F MAX
Z+0 F 2500
CALL LBL 1
Z +50 RO F MAX
X+0 Y+100 F MAX
M 30
LBL 1
TOOL CALL 25 Z S2500 F2000 DR+Q1
IZ-Q3 RO F MAX
APPR LCT X-50 Y-50 R5 F2000
Y+50
X+50
Y-50
X-50
X-70 Y-90 RO FMAX
Q1=Q1+Q2
CALL LBL REP Q5
END PGM
Program na fazę na konturze 100/100. Po wykonaniu każdego konturu maszyna wykonuje zjazd w Z o Q3, oraz zwiększa DR o wartość Q2 (czyli odjeżdża od konturu). Co prawda DR służy raczej do innych celów, ale fazę też można zrobić. Pozdrawiam.