0  BEGIN PGM 8130-IT MM 
1  ;Contapezzi
2  ;All'inizio del programma si definisce il numero
3  ;di ripetizioni desiderate.
4  ;All'avvio del programma, sullo schermo viene
5  ;visualizzato il numero di esecuzioni attuali.
6  ;Una volta raggiunto il numero programmato,
7  ;viene segnalato anche questo, e il contatore
8  ;viene azzerato.
9  ;
10 ;
11 ;Immissione delle ripetizioni desiderate
12 QR2 = 8 ;NUMERO DI RIPETIZIONI
13 ;
14 ;Visualizzazione del numero di ripetizioni attuali
15 FN 16: F-PRINT 81301-it.a / Screen:
16 ;
17 QR1 = QR1 + 1 ;Ripresa contatore
18 ;
19 ;
20 ;Esecuzione della lavorazione desiderata event.
21 ;con PGM CALL, nel programma chiamato non può
22 ;essere presente alcuna funzione M2 o M30.
23 CALL PGM 81303-it.h
24 STOP
25 ;
26 ;
27 ;Confronto se il numero di ripetizioni è stato
28 ;raggiunto
29 FN 12: IF +QR1 LT +QR2 GOTO LBL 99
30 ;Visualizzazione che il numero di ripetizioni è
31 ;stato raggiunto
32 FN 16: F-PRINT 81302-it.a / Screen:
33 ;
34 QR1 = 0 ;Reset del contatore
35 QR2 = 0 ;Reset delle ripetizioni desiderate
36 ;
37 ;Fine programma
38 M30
39 ;
40 ;Label di salto se sono necessarie ulteriori
41 ;ripetizioni
42 LBL 99
43 ;Fine programma
44 M30
45 END PGM 8130-IT MM