EJEMPLO 7 SEGMENTOS

*-----------------------------------------------------------
* Title      :
* Written by :
* Date       :
* Description:
*-----------------------------------------------------------
SEG1 EQU $E00000
    ORG    $1000
START

* Put program code here
    MOVE.L #6,D1            * Vamos a representar el 6 en este ejemplo
    MOVE.L #TABLA,A1
    ADD.L D1,A1
    MOVE.B (A1),SEG1
       *MOVE 0(A1,D1),SEG1  * Esta instrucción con el modo Indirecto + Desplazamiento + Índice
                            * sustituiría las 2 anteriores sin modificar el contenido de A1
    SIMHALT                 * halt simulator
* Put variables and constants here
* DATOS
TABLA *SEG HGFEDCBA
    DC.B %00111111 DIGITO 0   *TABLA
    DC.B %00000110 DIGITO 1   *TABLA+1
    DC.B %01011011 DIGITO 2   *TABLA+2
    DC.B %01001111 DIGITO 3   *TABLA+3
    DC.B %01100110 DIGITO 4
    DC.B %01101101 DIGITO 5
    DC.B %01111101 DIGITO 6
    DC.B %00000111 DIGITO 7
    DC.B %01111111 DIGITO 8
    DC.B %01101111 DIGITO 9   *TABLA+9
    DC.B %00000000 DIGITO OFF *TABLA+10
    DC.B %10000000 PUNTO      *TABLA+11

    END    START            * last line of source