Fagor CNC 8070 - Page 99

E
XAMPLES MANUAL
Chapter 4
Page 93 of 96
Parametric
programming
Exercise 4. Wedge
CNC 8070
DOING THE EXERCISE
P100=100Length in X
P101=100 Lenth in Y
P102=75 Movement in X
P103=50 Depth
P106=2
G0 Z100 Z position
T4 D1
M6 Calling a tool
S1000 M3
Y0
N1: Label number 1
X0
Z0
G1 XP100 F1000 Initial X position
G1 G91 XP102 Z-P103
G90 YP106
G1 Z10
N2:
P106=P106+2
$IF P106<P101 $GOTO N1Comparison. If P106 is smaller than P101, the tool returns to label 1
#RPT[N1,N2] Repetition. Last pass
G0 Z100
M30