1:MACRO/M1,AA,BB,OC
2:GOTO/X,AA,Y,BB,Z,OC
3:TERMAC
4:MACRO/M2
5:CALL/Ml,lO,20,30
6:VECT/Z,-lO,E,323
S:TERMAC
9:FROM/X,O,Y,O,Z,O
lO:CALL/N,2,M2
TERMAC
I
1 :PN/Etoile
2:ND-S
3:ANGI-O
4:INe-360/ND
5:MACRO/DENT,DlRECTION
6:FROM
7:GOTO/C,DlRECTION
S:ANGUL/A,DlRECTION
9:DOWN/L,-lO,E,323
lO:EXPAN/R,20,RET
11:TERMAC
12:MACRO/TOUR
13:CALL/DENT, ANGI
14:ANGI-ANGI
INC
15:TERMAC
16:FROM/X,O,Y,O,Z,O,C,O
17:CALL/ N,ND,TOUR
lS:ANGUL/OFF
19:GOTO/X,O,Y,O,Z,O,C,O
20:END
Definition des parametres du Macro M1 (AA,BB,OC)
Dep1acement sans usinage au point X-AA, Y-BB, Z-ec
Fin du Macro M1
Definition du 2eme Macro
Execution du Macro M1 en fixant AA-10, BB-20, OC-30
Usinage lineaire en Z
Suite du programme
Fin du Macro M2
Debut du programme principal
Execution 2 fois de suite du Macro M2
Suite du programme
emploi de macros et variables
nombre de dents
angle de depart
increment de l'angle
position de l'electrode
blocage de l'angle de la dent consideree
usinage en plongee
usinage de la dent en translation unidirectionnelle
macro d'incrementation appelant le premier
usinage de la dent dans la direction ANGI
(appel du Macro DENT)
dent suivante
debut du programme
usinage encha1ne des S dents (appel du Macro TOUR)