Esempio di codice per il lampeggio di led per Motorola 68k

* Descrizione programma: Programma per far lampeggiare dei led su sistema basato su Motorola 68008
* Autore:                iostream (reboot.ms)
START   ORG $1000                           * Inizia il programma al quarto kilobyte
        * Creiamo un pattern in cui i led si accendono uno alla volta per poi incontrarsi al centro e accendersi tutti
        MOVE.B  #$FF,   OUTPUT              * 1111 1111
        BSR     WAIT                        * Esegui una pausa
        MOVE.B  #$81,   OUTPUT              * 1000 0001
        BSR     WAIT
        MOVE.B  #$42,   OUTPUT              * 0100 0010
        BSR     WAIT
        MOVE.B  #$24,   OUTPUT              * 0010 0100
        BSR     WAIT
        MOVE.B  #$18,   OUTPUT              * 0001 1000
        BSR     WAIT

        JMP     START                       * Ritorna all'inizio

***********************************************************************
* Funzione che esegue una pausa                                       *
* Funzionamento: mette un numero in D0 e lo decrementa finché non è 0 *
***********************************************************************
WAIT:   MOVE.L  #DELAY, D0                  * Carica il valore 'DELAY' in D0
_WLOOP: SUBI.L  #1,     D0                  * [Loop per aspettare] Sottrai uno a D0
        CMPI.L  #0,     D0                  * Compara 0 a D0
        JNE     _DLOOP                      * Se non è uguale, ritorna all'inizio del loop
        RTS                                 * Altrimenti ritorna alla funzione principale

        SIMHALT                             * Istruzione necessaria ad EASy68k per terminare il simulatore

* Variabili e costanti
OUTPUT  EQU $60000                          * Porta di output
DELAY   EQU 50000                           * Il valore di delay è 70000

    END START