Binario

;********************************************************************
; Ejercicio 1.- Suma de 2 números de 16 bits
; FFFF + FFFF = 1FFFE
; Los números se encuentran cargados en el PIC;********************************************************************

LIST P=16F877A
INCLUDE "P16F877A.INC"
__CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _XT_OSC

DATOA_H EQU 0X20 ; Parte más significativadel número A
DATOA_L EQU 0X21 ; Parte menos significativa del número A
DATOB_H EQU 0X22 ; Parte más significativa del número B
DATOB_L EQU 0X23 ; Parte menos significativa del número BRESULTADO_H EQU 0X24 ; Parte más significativa del resultado
RESULTADO_L EQU 0X25 ; Parte más significativa del número A
AUX EQU 0X26
AUX2 EQU 0X27
ORG 0X00
BSF STATUS,RP0
BCF STATUS,RP1
movlw0x00
movwf TRISB ; Configuración del puerto B como salida
movlw 0x00
movwf TRISC ; Configuración del puerto C como salida
movlw 0xFE
movwf TRISD ; Configuración del bit 0 del puerto D
;como salida

BCF STATUS,RP0

INICIO

movlw 0XFF
movwf DATOB_L ; DATOB_L=FF
movlw 0XFF
movwf DATOB_H ; DATOB_H=FF

movlw 0XFF
movwf DATOA_L ; DATOA_L=FF
movlw 0XFF
movwfDATOA_H ; DATOA_H=FF

call SUMA_L ; Llamada a la subrutina SUMA_L

btfss STATUS,C
movlw 0X00 ; SI C=O, W=0
movlw 0X01 ; SI C=1, W=1
call SUMA_H ; Llamada a la subrutina SUMA_Hbtfss STATUS,C
movlw 0X00 ; SI C=O, W=0
movlw 0X01 ; SI C=1, W=1
call MOSTRAR ; Llamada a la subrutina MOSTRAR

goto INICIO

SUMA_L
movf DATOA_L,0
addwf DATOB_L,0 ; W=DATOA_L +DATOB_L
movwf RESULTADO_L
return

SUMA_H
addwf DATOA_H,0 ; W= DATOA_H + (0/1)
addwf DATOB_H,0 ; W= W + DATOB_H
movwf RESULTADO_H
return

MOSTRAR

movwf AUX ; AUX=Wmovf RESULTADO_L,0
movwf PORTB ; Parte menos significativa del resultado
; mostrada por el puerto B
movf RESULTADO_H,0
movwf PORTC ; Parte más significativa del resultado
;...