Fagor CNC 8050 M Manuel D'utilisation page 547

Exemple d'un programme de personnalisation:
Le programme de personnalisation suivant doit être sélectionné comme programme
utilisateur associé au mode Editeur.
Après sélection du mode Editeur et frappe de la touche logiciel UTILISATEUR, ce
programme commence à s'exécuter et permet de réaliser une édition assistée des deux
cycles utilisateur autorisés. Cette édition est réalisée cycle par cycle et autant de fois que
désiré.
; Visualise la page d'édition initiale
N0 (PAGE 10)
; Personnalise les touches logiciel d'accès aux divers modes et demande une option
(SK 1="CICLO 1",SK 2="CICLO 2",SK 7="SALIR")
N5 (WKEY )
(IF KEY EQ $FC00 GOTO N10)
(IF KEY EQ $FC01 GOTO N20)
(IF KEY EQ $FC06 SYSTEM ELSE GOTO N5)
; CYCLE 1
; Visualise la page 11 et définit 2 fenêtres de données
N10 (PAGE 11)
(ODW 1,10,60)
(ODW 2,15,60)
;Edition
(WBUF "( PCALL 1,")
(IB 1=INPUT "X:",-6.5)
(DW 1=IB1)
(WBUF "X",IB1)
(WBUF ",")
(IB 2=INPUT "Y:",-6.5)
(DW 2=IB2)
(WBUF "Y",IB2)
(WBUF ")")
(WBUF )
(GOTO N0)
; CYCLE 2
; Visualise la page 12 et définit 3 fenêtres de données
N20 (PAGE 12)
(ODW 1,10,60)
(ODW 2,13,60)
(ODW 3,16,60)
Page
DECLARATIONS DE CONTROLE DES PROGRAMMES
20
; Ajoute au bloc en cours d'édition (PCALL 1,
; Demande de la valeur de X
; Visualise, dans la fenêtre 1, la valeur introduite
; Ajoute au bloc en cours d'édition X (valeur introduite)
; Ajoute au bloc en cours d'édition ,
; Demande de la valeur de Y
; Visualise, dans la fenêtre 2, la valeur introduite
; Ajoute au bloc en cours d'édition Y (valor introducido)
; Ajoute au bloc en cours d'édition )
; Charge en mémoire le bloc édité. P.e. (PCALL 1, X2, Y3)
Chapitre: 14
;Demander une touche
;Cycle 1
;Cycle 2
;Sortir ou demander une touche
Section:
DÉCLARATIONS DE
PERSONNALISATION