;
;       Practica 6
;
        option CASE,68020  ; Directiva para cargar el juego de instrucciones del 68020
        entry $400600      ; Directiva para que el programa se empiece a ejecutar a partir de $400600

        ORG $400600        ; Posicion de comienzo de nuestro programa
        BRA INI

                           ;
                           ;
                           ; Variables de nuestro programa
                           ;
                           ;

INI     CLR.L D0           ; Comienzo del programa principal

                           ;
                           ;
                           ; Programa principal
                           ;
                           ;

        TRAP #15           ; Fin programa principal. Para la maquina
        DC.W 0


        ORG $401600
N       DC.W 6             ; Tamaņo de la imagen

Img     DC.B 0             ; Imagen
        DC.B 0
        DC.B 0
        DC.B 0
        DC.B 0
        DC.B 0

        DC.B 0
        DC.B 7
        DC.B 8
        DC.B 90
        DC.B 1
        DC.B 0

        DC.B 0
        DC.B 12
        DC.B 130
        DC.B 14
        DC.B 12
        DC.B 0

        DC.B 0
        DC.B 17
        DC.B 180
        DC.B 19
        DC.B 67
        DC.B 0

        DC.B 0
        DC.B 203
        DC.B 30
        DC.B 21
        DC.B 170
        DC.B 0

        DC.B 0
        DC.B 0
        DC.B 0
        DC.B 0
        DC.B 0
        DC.B 0

ImgMed  DS.B 36         ; Imagen de salida

        END