Program Example
Explanation of the
program
22) WORK C3;
23) GOSUB P500;
24) ORIGIN;
25) MOVEL [J01]0 [J02]0 F500000;
26) END;
Subprogram
01) PROG P500 Q00000003;
02) MOVEL [J01]0 [J02]0 F500000;
03) MOVEL [J01]1000 [J02]1000 F300000;
04) MOVEL [J01]2000;
05) MOVEL [J02]2000;
06) MOVEL [J01]1000;
07) MOVEL [J02]1000;
08) MOVEL [J01]0 [J02]0;
09) RETURN;
Main program
01) A program No. and axes to be used are specified.
02) to 04) Offset values for workpiece coordinate systems C1 to C3 are
changed.
05) The axes move from the present position to the origin on the machine
coordinate system.
06) The coordinate system is switched from the machine coordinate to the
workpiece coordinate C1.
07) The subprogram (P0500) is called and executed.
08) The coordinate system is switched back to the machine coordinate.
09) The axes return to the origin on the machine coordinate system.
10) to 13) After return to the origin, 1 is output to the general output
(OW0BA0) and the program will wait until the general input
(IW0B00) becomes 1. Once the general input (IW0B00) becomes
1, the general output (OW0BA0) will be reset, and the program will
advance to the next block.
14) The coordinate system is switched from the machine coordinate to the
workpiece coordinate C2.
15) The subprogram (P0500) is called and executed.
16) The coordinate system is switched back to the machine coordinate.
17) The axes return to the origin on the machine coordinate system.
18) to 21) After return to the origin, 1 is output to the general output
(OW0BA0) and the program will wait until the general input
(IW0B00) becomes 1. Once the general input (IW0B00) becomes
1, the general output (OW0BA0) will be reset, and the program will
advance to the next block.
22) The coordinate system is switched from the machine coordinate to the
workpiece coordinate C3.
23) The subprogram (P0500) is called and executed.
24) The coordinate system is switched back to the machine coordinate.
25) The axes return to the origin on the machine coordinate system.
26) The program is completed.
Section 10-1
579