Correction d'un programme en assembleur (pic

Bonjour,
svp! aidez-moi à corriger ce programme! plz





LIST p = 16F84A
include p16F84A.inc
__config H'3FF9'



Pas EQU 0x0c ;0C correspond à l'adresse d'un registre de temporaire


org 0x00


bsf STATUS, RP0 ; passage en banque 1
clrf TRISB
movlw 0xFF
movwf TRISA
movlw 0x96
movwf OPTION_REG ; bit 7 (/RBPU) = 1 : désactivation des résistances de pull-up du port B
; bit 6 (INTEDG)= 0 : (non utilisé)
; bit 5 (T0CS) = 0 : le timer est piloté par l'horloge interne
; bit 4 (T0SE) = 1 : l'horloge avance sur front descendant
; bit 3 (PSA) = 0 : le facteur de division: 128
; bit 2 (PS2)= 1
; bit 1 (PS1) = 1
; bit 0 (PS0) = 0
bcf STATUS, RP0 ; passage en banque 0
clrf PORTB ; mise à 0 des sorties du port B
clrf Pas
clrf TMR0
goto Debut


Table addwf PCL, f
retlw 0x0C
retlw 0x06
retlw 0x03
retlw 0x09


Debut btfss TMR0, 7
goto main
clrf TMR0


Droite btfsc PORTA, 0
goto Gauche
incf Pas, f
movlw 0x04
subwf Pas, w
btfsc STATUS, C
clrf Pas
call Table
movwf PORTB
goto main


Gauche btfsc PORTA, 1
goto main
decf Pas, f
movlw 0x03
btfsc Pas, 7
movwf Pas
call Table
movwf PORTB
goto main


end