Codigo de multiplicacion para el PIC16F628A

Multi.asm

;***********************************************************************
;* Autor: Felipe Moctezuma
;* Descripcion: Se va a evaluar la multiplicacion de 2 enteros 
;*              decimales de un solo digito
;***********************************************************************
    
    LIST P=16F628A
    #INCLUDE p16f628a.inc
    
    ORG 0X00
    GOTO CONF

CONF
    VAR1 EQU H'20'  ;Nombro el registro 20h como VAR1
    VAR2 EQU H'21'  ;Nombro el registro 21h como VAR2
    MOVLW 3	    ;Escribo el numero 3 decimal en el registro W
    MOVWF VAR1	    ;Muevo el valor de W a VAR1	
    MOVLW 2	    ;Escribo el numero 2 decimal en el registro W
    MOVWF VAR2	    ;Muevo el valor de W a VAR2	
    GOTO OPER	    ;Ir hasta la etiqueta OPER
SUM 
    ADDWF VAR2,0    ;Sumar el valor de VAR2 al registro W
    GOTO OPER	    ;Ir hasta la etiqueta OPER
  
OPER
    DECFSZ VAR1,1   ;Decrementar el valor de VAR1 y reasignarlo al mismo registro, 
    GOTO SUM	    ;Ir hasta la etiqueta SUM
    MOVWF VAR2	    ;Mover el valor de W a VAR2
    END