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

Sinclair QL

Avendo citato il Sinclair QL in un blog precedente non potevo mancare di parlare di questo favoloso e strambo computer partorito dalla mente vulcanica e dal braccino corto di Sir Clive Sinclair.  Il Sinclair QL è un computer a 32 bit annunciato da Sinclair Research nel 1984. Nel tentativo ambizioso di creare un computer desktop avanzato e versatile che potesse competere con computer come l'Apple Macintosh e il Commodore Amiga. Le caratteristiche chiave del QL (Quantum Leap) includevano: Architettura Hardware: 1. Processore: Motorola 68008 a 8/32 bit con una frequenza di clock di 7,5 MHz e bus esterno a 8 bit.  2. Memoria RAM: 128 KB di RAM di cui 32KB veniva condivisa con la memoria video. Poteva essere espansa fino a 640KB 3. Memoria ROM: Il sistema operativo e le utility erano memorizzati in una ROM da 48 KB espandibile con cartucce esterne. 4. Archiviazione: Il QL utilizza due microdrive, sistemi di memorizzazione a nastro magnetico e immagazzinano fino a 100 KB di dati ciascuno
Continua a leggere

Amstrad CPC 472

 Quando la politica insiste a legiferare nel mondo dell'informatica senza nemmeno lontanamente conoscerlo produce delle porcherie mostruose. Lo vediamo tutti i giorni quello che combinano i legiferatori in campo informatico e siamo nel 2023, figuriamoci nel 1985. Un vero disastro e uno di questi è legato alla storia del Amstrad CPC 472. L'ambizione di Sir Alan, come molti imprenditori, era quella di vendere i suoi favolosi computer in tutta Europa e la Spagna era uno degli obbiettivi. 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, ma con alcune modifiche significative per adattarsi alle esigenze e alle normative spagnole dell'epoca. Amstrad numerava i modelli con il primo numero ad indicare la serie e le cifre restanti la quantità di memoria, quindi intuiamo che il CPC 472 ha 72KB di ram. Questa quantità curiosa è dovuta al fatto che nel settembre del 1985,
Continua a leggere