;
;       Practica 5
;
        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


N       EQU 10             ; Tamaņo de los vectores

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

                           ;
                           ;
                           ; Variables de nuestro programa
                           ;
                           ;

INI     CLR D0             ; Comienzo del programa principal

                           ;
                           ;
                           ; Programa principal
                           ;
                           ;

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


        ORG $401600
V1      DC.W 2             ; Vector V1
        DC.W -4
        DC.W -5
        DC.W 32
        DC.W 0
        DC.W 3
        DC.W 25
        DC.W -1
        DC.W 9
        DC.W 34

        ORG $402600
V2      DC.W 3             ; Vector V2
        DC.W 7
        DC.W 1
        DC.W 0
        DC.W -5
        DC.W 56
        DC.W 23
        DC.W 4
        DC.W -89
        DC.W 21

        END