| Programma di esempio GETCH.PRT |
; GETCH
;
; Programma per Proteus
;
; (C) 2003 Simone Zanella Productions
;
; Mostra i valori restituiti dalla funzione GETCH per ogni tasto premuto, finché
; l'utente non preme ESC.
REPEAT
S = GETCH()
CONSOLELN PFORMAT("03d", S) " dec " PFORMAT("03x", S) " hex " \
PFORMAT("03o", S) " oct " CHR(S) " ascii"
UNTIL EQ(S, 27)
ABORT 0
| Indice esempi | Prossimo esempio | Esempio precedente | Indice per argomenti | Indice analitico |