Nuovo Compilatore Z80...

 Sono passati mesi dall'ultima volta che ho inserito qualche notizia o novità. Per pigrizia o forse perchè non mi è mai piaciuto tenere un diario :-O Comunque sia ad un certo punto guardando il sorgente in LiveCode del compilatore Z80 questo era diventato un coacervo di codice ridondante con funzioni duplicate e in alcuni casi dissonanti tra loro. A quel punto la decisione di ripartire da zero per la terza volta ma ora con le idee più chiare (forse) e una lista di funzioni base per riconoscere i vari dati, d'altronde non ha senso inventare ogni volta la ruota.  Ad aprile è nato il SAM ovvero Strange And Messy Compiler hahahaha. Il codice assembler generato non è proprio ottimizzato e spesso è arzigogolato ma funziona alla grande, per lo meno sul mio 6128 plus. Questi i comandi e funzioni implementate finora:

ASM,BORDER,CALL,CLS,COLORFG,COLORBG,COLORINV,CURSOR,DIM,ELSE,END,ENDIF,FOR,GET,GOTO,IF,IFG,IFP,INPUT,INK,NEXT,LABEL,LOCATE,MODE,PEEK,POKE,PRINT,RANDOMIZE,READGET,REM,RND,SAY,TAB,THEN,TO,STEP,VAR,WAITKEY,WEND,WHILE

 CPCVER,FREEMEM,LEN,MID,MIN,MAX,REVERSE,RND,TIME,VAL

Si lo so SAY e GET hanno il sapore del buon vecchio Clipper Summer 87 e i comandi IFG e IFP sono degli if mirati per i salti e la stampa a video, per evitare di scrivere IF nidificate :-) Diciamolo nella mia generazione di programmatori molti sono pigri e per non scrivere un else o un endif in più si crea un comando specifico hahahaha

Ecco un esempio:

temp = cpcver()
IFP temp = 0 print "Amstrad CPC 464"
IFP temp = 1 print "Amstrad CPC 664"
IFP temp = 2 print "Amstrad CPC 6128"
IFP temp = 3 print "Amstrad CPC 464 plus"
IFP temp = 4 print "Amstrad CPC 6128 plus"
IFP temp > 4 print "Unrecognized

oppure

IFG scelta = 1 goto InsArt
IFG scelta = 2 goto ModArt
IFG scelta = 3 goto StaArt
IFG scelta = 4 goto CanArt
IFG scelta = 5 goto RicArt
IFG scelta = 0 goto Uscita

In effetti è più leggibile e corto che scrivere:

IF temp = 0 then
    print "Amstrad CPC 464"
ELSE
    IF temp = 1 then
        print "Amstrad CPC 664"
    ELSE
        IF temp = 2 then
            print "Amstrad CPC 6128"
        ELSE
            IF temp = 3 then
                print "Amstrad CPC 464 plus"
            ELSE
                IF temp = 4 then
                    print "Amstrad CPC 6128 plus"
                ELSE
                    print "Unrecognized
                ENDIF
            ENDIF
        ENDIF
    ENDIF
ENDIF
Ovviamente se si deve scrivere solo il comando PRINT o GOTO.
Mi auguro di poter rilasciare un versione usabile nei prossimi mesi.
Buona serata
Paolo

Commenti

Posta un commento

Post popolari in questo blog

Amstrad CPC 472

Quando la politica insiste nel legiferare nel mondo dell'informatica senza nemmeno conoscerlo, produce delle porcherie mostruose. Lo vediamo ogni giorno nei disastri combinati dai legislatori nel campo informatico, e siamo nel 2023: figuriamoci nel 1985! Uno di questi disastri è legato alla storia dell’Amstrad CPC 472. Come molti imprenditori, Sir Alan Sugar aveva l’ambizione di vendere i suoi favolosi computer in tutta Europa, e la Spagna era uno degli obiettivi principali. L’Amstrad CPC 472 è un computer prodotto da Amstrad per il mercato spagnolo negli anni '80. Questo modello è una variante specifica dell’Amstrad CPC 464, con alcune modifiche significative per adattarsi alle normative spagnole dell’epoca. Amstrad numerava i modelli con il primo numero a indicare la serie e le cifre restanti la quantità di memoria; quindi, intuiamo che il CPC 472 ha 72 KB di RAM. Questa strana quantità è dovuta al fatto che, nel settembre del 1985, il governo spagnolo introdusse una tassa su...
Continua a leggere

Amstrad Computer

 Parlo sempre dei miei computer Amstrad,  nel periodo che va dalla metà degli anni '80 agli anni '90, Amstrad ha consolidato la sua posizione nel mercato dei computer domestici mediante la produzione di una serie di dispositivi con processore Z80 noti come Amstrad CPC. Questi sistemi, che includevano il CPC 464, il CPC 664, il CPC 6128 e, successivamente, i modelli CPC Plus, avevano una base tecnologica comune ma presentavano alcune differenze significative. - Amstrad CPC 464 (1984): Questo modello presentava un processore Z80A a 4 MHz, 64 KB di RAM e un lettore di cassette integrato. La tastiera era incorporata nella parte superiore del case. - Amstrad CPC 664 (1985): Simile al CPC 464, il modello 664 aveva le stesse specifiche tecniche ma includeva un drive per floppy disk integrato da 3 pollici. Inoltre, la tastiera era stata migliorata per un'esperienza utente più confortevole. - Amstrad CPC 6128 (1985): Il CPC 6128 era il modello di punta della serie originale. Condivi...
Continua a leggere

Sinclair QL

Meno famoso rispetto allo ZX Spectrum, il Sinclair QL è un computer che avevo già citato in un blog precedente e di cui non potevo non parlare ancora. Questo favoloso e strambo computer è frutto della mente vulcanica – e del braccino corto – di Sir Clive Sinclair. Il Sinclair QL (Quantum Leap) è un computer a 32 bit annunciato da Sinclair Research nel 1984, un tentativo ambizioso di creare un desktop avanzato e versatile che potesse competere con sistemi come l’Apple Macintosh e il Commodore Amiga. Le caratteristiche chiave del QL includevano: Architettura Hardware: Processore : Motorola 68008 a 8/32 bit, con una frequenza di clock di 7,5 MHz e bus esterno a 8 bit. Memoria RAM : 128 KB di RAM, di cui 32 KB condivisi con la memoria video. Poteva essere espansa fino a 640 KB. Memoria ROM : Il sistema operativo e le utility erano memorizzati in una ROM da 48 KB, con possibilità di espansione tramite cartucce esterne. Archiviazione : Il QL utilizzava due microdrive, sistemi di memorizzazio...
Continua a leggere