Codice di programma Commento
PROC SUB2 ; Sottoprogramma SUB2
DEF INT VAR2 ; DEFINIZIONE LUD
...
IF (VAR1==1) ; Lettura PUD
VAR1=VAR1+1 ; Lettura e scrittura PUD
VAR2=1 ; Scrittura LUD
ENDIF
SUB3 ;Richiamo sottoprogramma
...
M17
Codice di programma Commento
PROC SUB3 ; Sottoprogramma SUB3
...
IF (VAR1==1) ; Lettura PUD
VAR1=VAR1+1 ; Lettura e scrittura PUD
VAR2=1 ; Errore: LUD in SUB2 non riconosciuta
ENDIF
...
M17
Esempio 3: definizione e uso delle variabili utente del tipo di dati AXIS
Codice di programma Commento
DEF AXIS ASCISSE ; 1. Asse geometrico
DEF AXIS SPINDLE ; Mandrino
...
IF ISAXIS(1)==FALSE GOTOF CONTINUA
ASCISSE = $P_AXN1
CONTINUA:
...
SPINDLE=(S1) 1. Mandrino
OVRA[SPINDLE]=80 ; Override mandrino = 80%
SPINDLE=(S3) 3. Mandrino
Sono bellissimo...
Administrafan