Token Table – Oric Basic

Melbourne House – METEORIC Programming – Anno 1983 – Trascrizione: Francesco Fiorentini

Tempo fa ho acquistato il libro METEORIC Programming – For the ORIC-1 pubblicato in originale da Melbourne House nel 1983
La copia in mio possesso si tratta di una ristampa pubblicata nel 2022 da parte di Acorn Books.
Il libro contiene un gran numero di listati per il computer ORIC-1 ed ho deciso di digitarne qualcuno per arricchire la nostra libreria di RetroLiPS.
Questo listato intitolato Token Table stampa a schermo tutti i TOKEN dell’ORIC-1 e le corrispondenti RESERVED WORDS, cioe’ le stringhe che sono riservate ai comandi del BASIC.

I token ORIC-1 BASIC sono codici speciali (ad un solo Byte) che rappresentano parole chiave (come PRINT, GOTO), funzioni e caratteri di controllo, rendendo i programmi più compatti e veloci rispetto alla memorizzazione di testo; questi token, a cui sono assegnati valori decimali specifici (ad esempio, 115 per SCRN), sono fondamentali per un uso efficiente della memoria del computer, risparmiando spazio e velocizzando l’esecuzione.

Come funzionano i token BASIC su Oric-1:

Velocità di esecuzione: l’interprete legge direttamente i token, saltando l’analisi del testo carattere per carattere, velocizzando così l’esecuzione dei programmi.

Efficienza di archiviazione: invece di memorizzare le lettere “SCRN” (4 byte), il token (ad esempio 115) occupa solo 1 byte, riducendo significativamente le dimensioni del programma.

Se volete saperne di piu’ riguardo all’ORIC, una macchina poco conosciuta in Italia, vi consiglio di leggervi gli articoli “Un fantasmagORICo home computer” parte 1 e 2, apparsi sui numeri 10 ed 11 della nostra rivista a firma di David La Monaca.

Qui di seguito trovate il codice da copiare sul vostro computer Oric.
Il codice é pronto per essere copiato su un emulatore, consigliamo Oricutron.
Una volta avviato l’emulatore cliccate il pulsante destro del mouse e scegliete l’opzione Hardware Options…, dopodiche’ selezionate Oric-1 come hardware (si vedano le immaginio sotto).

Per caricare il codice sull’emulatore, una volta copiato il codice sottostante nella clipboard, pulsante destro e quindi Paste from Clipboard.

Attenzione: l’emulatore Oricutron potrebbe dare problemi con il copia ed incolla, suggeriamo di copiare/incollare il listato in due/tre volte anziche’ in una singola operazione.

Attenzione – Ci siamo resi conto che nel listato i caratteri ‘>’ e ‘<‘ potrebbero venir sostituiti dai rispettivi encoding html ‘&gt’ e ‘&lt’. Nel caso, sostituite questi valori nel listato prima di copiarlo sull’emulatore.

Listato: Token Table – Oric – Basic

1
2
3
4
5
6
7
8
9
10
11
12
13
100 REM * TOKEN TABLE *

110 REM

120 CLS

130 PRINT "NUMBER" , "TOKEN", "RESERVED WORD"

140 PRINT

150 I=49386 : J=1

160 A$=""

170 A=PEEK(I): I=I+1

180 IF A>127 THEN A$=A$+CHR$(A-128) : GOTO 210

190 A$=A$+CHR$(A)

200 GOTO 170

210 PRINT RIGHT$("   "+STR$(J),4),,"$"+RIGHT$(HEX$(J+#80),2), ,A$

220 J=J+1 : IF J<128 THEN 160