PROGRAMMARE IN ERRE

Recommendations

Info

L’evoluzione del linguaggio Può essere interessante, ed anche divertente, vedere come si è evoluto nel corso del tempo il linguaggio ERRE fino a raggiungere l’attuale assetto. Senza voler essere troppo specifici, vediamo un semplice esempio e precisamente quello riportato sulla retrocopertina del volume. Il programma in oggetto è "STARS.ERRE" che consiste semplicemente nel visualizzare un certo di numero di asterischi sullo schermo, in funzione dell’input dell’utente. Le differenze risultano meglio evidenziate affiancandole le varie versioni in una tabella: 1.3 per VIC-20 2.3 per C-64 3.2 per C-64 e 2.6 per PC PROGRAM ESEMPIO ! PROCEDURE STAMPA FOR I=1 TO J PRINT"*"; NEXT ENDPROCEDURE ! BEGIN PRINT CHR$(147); INPUT "NUMERO";N% IF N%>0 THEN J=N% STAMPA ELSE PRINT"N . Inoltre le chiusure dei cicli vanno scritte tutte unite (eccetto il ciclo FOR che usa ancora NEXT) e END. chiude il programma (alla Pascal). Una caratteristica curiosa di questa versione è che il compilatore non accetta righe bianche e quindi, come fatto nel listato precedente, per spaziare il programma bisogna usare un commento vuoto. La M.C.R. è integrata nell’Editor: si inizia infatti con il modulo EDITOR13 (che include anche il compilatore COMPIL e il formatter FORMAT) e al termine del processo di compilazione (compil task) viene lasciato il programma tradotto in BASIC in memoria (e l’utente se voleva riutilizzarlo doveva salvarselo per conto proprio……). Al termine dell’esecuzione viene ricaricato EDITOR13 e così via. Con la 2.X viene introdotto il primo nucleo dell’ambiente di programmazione attuale e per il linguaggio ERRE il passaggio dei parametri delle procedure (solo per variabili semplici ed elementi di array) che va scritto al contrario della versione odierna e cioè PROCEDURE nome_proc(param. formali uscita param. formali di ingresso) - 206 -
il che spiega il richiamo della procedura STAMPA nell’esempio. Inoltre nella lista dei parametri si usa come separatore “;” anziché “,”. Non è più ammesso usare istruzioni BASIC esplicite nel programma e quindi esiste un elenco di parole-chiave del linguaggio (il file KEY.DAT). Si usa ancora SYS e CLR (alla C-64…) anziché CALL e CLEAR. Nasce qui la prima libreria che è solo per l’alta risoluzione (‘HGR.LIB’) poiché i comandi per il cursore sono integrati nel linguaggio (istruzioni HOME, LEFT, RIGHT, DOWN, UP, CLS, AT) e solo con la versione 3.0 riandranno a costituire la libreria ‘CURSOR.LIB’. Nella 3.0 e 3.1 per C-64 e nella 1.0 per PC END diventa una parola chiave separata (così ENDWHILE diventa END WHILE ecc..), il passaggio parametri delle procedure assume la sintassi attuale e le procedure predefinite vanno scritte con le ‘(‘ – PRINT I; diventa PRINT(I;) e così via: il linguaggio viene così “inquadrato” con i primi diagrammi sintattici e nel contempo migliora sempre di più l’ambiente di sviluppo. L'obiettivo della versione per PC diventa quello di Trent’anni fa … realizzare il documento "Stoneman" cosa che viene raggiunta con la versione 2.6: il codice sorgente del compilatore resta scritto in BASIC "classico", cosicché sia il più semplice possibile trasferire le nuove caratteristiche anche alla versione per C-64. - 207 -
Page 1 and 2:
P PROGRAMMARE IN ERRE Una guida com
Page 3 and 4:
PROGRAMMARE IN ERRE by Pommodore In
Page 5 and 6:
SOMMARIO ▪▪▪▪▪▪▪▪
Page 7 and 8:
INTRODUZIONE Questo volume nasce co
Page 9 and 10:
- 9 -
Page 11 and 12:
CAPITOLO 1 COME NASCE "ERRE" Tornia
Page 13 and 14:
La 3.1 fu la prima versione a dispo
Page 15 and 16:
La versione 2.6 per PC La Versione
Page 17 and 18:
CAPITOLO 2 "HELLO, WORLD!" Di solit
Page 19 and 20:
- 19 -
Page 21 and 22:
• “Focal“ (2.5) 1.01 COMMENT
Page 23 and 24:
CAPITOLO 3 LE BASI La struttura di
Page 25 and 26:
┌──────────
Page 27 and 28:
Il tipo ‘REAL’ non ha uno speci
Page 29 and 30:
6) Se una variabile doppia precisio
Page 31 and 32:
┌──────────
Page 33 and 34:
ABS(X) : valore assoluto di X ACS(X
Page 35 and 36:
Per ciò che riguarda le funzioni p
Page 37 and 38:
END PROGRAM Una regola generale per
Page 39 and 40:
CAPITOLO 4 INPUT E OUTPUT Le istruz
Page 41 and 42:
Un’altra differenza riguarda l’
Page 43 and 44:
3 7.55 3 7.55 Da notare che viene l
Page 45 and 46:
dove il primo “2” è il numero
Page 47 and 48:
END EXCEPTION BEGIN FERROR%=FALSE P
Page 49 and 50:
Per il C-64 una soluzione alternati
Page 51 and 52:
CAPITOLO 5 IL CONTROLLO DEL FLUSSO
Page 53 and 54:
WHILE NOT ODD(NUM%) DO NUM%=NUM%/2
Page 55 and 56:
FOR var=(lista) DO ┌────
Page 57 and 58:
Questa istruzione è sempre stata,
Page 59 and 60:
Soluzione al Problema della Sequenz
Page 61 and 62:
Soluzione al Problema di Ulam PROGR
Page 63 and 64:
CAPITOLO 6 I SOTTOPROGRAMMI: PROCED
Page 65 and 66:
La parole chiave LOCAL (solo per PC
Page 67 and 68:
problema in termini di se stesso, m
Page 69 and 70:
END PROCEDURE PROCEDURE UP WHILE OD
Page 71 and 72:
CAPITOLO 7 LE STRUTTURE DATI Gli ar
Page 73 and 74:
DIM FLAGS%[8190] CONST SIZE%=8190 B
Page 75 and 76:
PROGRAM HILBERT !$INTEGER CONST N=4
Page 77 and 78:
X=X0+(I-1)*32 Y=Y0+10 R[0]=2 D[0]=3
Page 79 and 80:
49: IF N0 THEN GOTO 62 END IF M=M-1
Page 81 and 82:
! (seconda versione) ! !$INTEGER DI
Page 83 and 84:
PRINT(CUSTOMER.NOME$,CUSTOMER.INDIR
Page 85 and 86:
C.REAL#=A.REAL#*B.REAL#-A.IMAG#*B.I
Page 87 and 88:
Queste ultime due caratteristiche d
Page 89 and 90:
....... OPEN("R",1,"CLIENTI.DAT",82
Page 91 and 92:
! LEGGE RECORD !================= C
Page 93 and 94:
! P[.]=array risposte giocatore ( d
Page 95 and 96:
FOR I=J-1 TO 1 STEP -1 DO IF R=T[I]
Page 97 and 98:
CAPITOLO 8 USO AVANZATO DI ERRE Ges
Page 99 and 100:
STACK[SP%]=STACK[SP%]/STACK[SP%+1]
Page 101 and 102:
END -> "-"-> IF SP%>1 THEN SP%=SP%-
Page 103 and 104:
!$DYNAMIC DIM A[0,0] BEGIN PRINT(CH
Page 105 and 106:
NOTHING FOR I=1 TO 10 PRINT(I,D[I])
Page 107 and 108:
● usando un'istruzione CHOOSE: ad
Page 109 and 110:
OPEN sul canale 15 del drive 1541:
Page 111 and 112:
Le direttive di compilazioni non so
Page 113 and 114:
- $TRACE visualizza, in fase di ese
Page 115 and 116:
e va scelta basandosi sul programma
Page 117 and 118:
PROCEDURE WIDTH(ZD$,ZL%) PROCEDURE
Page 119 and 120:
Le specifiche di ERRE non mettono a
Page 121 and 122:
! ! GESTIONE MODO 320X200 VGA A 256
Page 123 and 124:
PROCEDURE QUEUE_POP(->XX,YY) XX=STA
Page 125 and 126:
Versione PC PROGRAM DEMO3D !$KEY DI
Page 127 and 128:
HGR per C-64 HGR per PC IBM - 127 -
Page 129 and 130:
La tastiera del C64 …. …. e que
Page 131 and 132:
CAPITOLO 9 IL COMPILATORE DELL'AMBI
Page 133 and 134:
LIMITI IMPLEMENTATIVI DEL COMPILATO
Page 135 and 136:
La diagnostica dei compilatori La d
Page 137 and 138:
PROCEDURE LIST(A->B) e richiamarla
Page 139 and 140:
hex 0000:0000┌──────
Page 141 and 142:
Il finale Vediamo per finire una se
Page 143 and 144:
Da qui sempre dal menu Comandi sceg
Page 145 and 146:
Premendo un tasto, torniamo al men
Page 147 and 148:
Dal prompt $ richiamiamo l’Editor
Page 149 and 150:
L’esecuzione è identica a quella
Page 151 and 152:
CAPITOLO 10 "MICROPAS": UN ESEMPIO
Page 153 and 154:
DIM PA$[200],BA$[400],VA$[30],TV[30
Page 155 and 156: SKIP_SPACES CB$=CB$+A$ GET_UNSIGNED
Page 157 and 158: PROCEDURE PUSH_VARIABLE_A SS$[SP]=A
Page 159 and 160: PROCEDURE GET_TERM GET_FACTOR IF A$
Page 161 and 162: END IF LOOP GET_IDENTIFIER IF A$=""
Page 163 and 164: Inizia, inoltre, la traduzione vera
Page 165 and 166: Il risultato della traduzione in BA
Page 167 and 168: MICROPAS è stato messo in un disco
Page 169 and 170: CAPITOLO 11 LA VERSIONE 3.0 PER PC
Page 171 and 172: • $USERPTR=xxxx che definisce l'i
Page 173 and 174: PROCEDURE INIT SP=0 END PROCEDURE P
Page 175 and 176: APPENDICE A DIAGRAMMI SINTATTICI DE
Page 177 and 178: DIAGRAMMI SINTATTICI PER ERRE Il me
Page 179 and 180: variabile aggregata ▄ ▄ ▄ ▄
Page 181 and 182: 9) E S P R E S S I O N E ┌──
Page 183 and 184: 10-h) D i c h i a r a z i o n e d i
Page 185 and 186: 11) I S T R U Z I O N E 11─a) L i
Page 187 and 188: │ chiamata di procedure │ │
Page 189 and 190: 12) B L O C C O ┌─────
Page 191 and 192: APPENDICE B TABELLE DEI CODICI ASCI
Page 193 and 194: I codici ASCII del PC Il PC IBM usa
Page 195 and 196: APPENDICE C I CODICI DI ERRORE "RUN
Page 197 and 198: Le due tabelle seguenti riportano i
Page 199 and 200: APPENDICE D LA VERSIONE 1.3 per VIC
Page 201 and 202: La versione 1.3 per VIC-20 Come vis
Page 203 and 204: 4) FOR variabile = espr1 TO espr2 [
Page 205: AT 46 ! Gestione cursore ! per ERRE
Page 209 and 210: APPENDICE E IL DOCUMENTO 'STONEMAN'
Page 211 and 212: DOCUMENTO STONEMAN ▒▒▒ ▒▒
Page 213 and 214: DOCUMENTO STONEMAN [ include declar
Page 215 and 216: DOCUMENTO STONEMAN PRINT[([file-ide
Page 217 and 218: DOCUMENTO STONEMAN #n: dove n è un
Page 219 and 220: DOCUMENTO STONEMAN consuete regole
Page 221 and 222: DOCUMENTO STONEMAN 4.0 PROBLEMI E D
Page 223 and 224: DOCUMENTO STONEMAN 4.1.4 Traduzione
Page 225 and 226: DOCUMENTO STONEMAN APPENDICE DUE Es
Page 227 and 228: DOCUMENTO STONEMAN WORKSPACE 5 | pu
Page 229 and 230: DOCUMENTO STONEMAN INDICE 1.0 INTRO
Page 231 and 232: - 231 -
show all

PROGRAMMARE IN ERRE

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?