#include "p16f887.inc"
; CONFIG1
; __config 0xEFC4
__CONFIG _CONFIG1, _FOSC_INTRC_NOCLKOUT & _WDTE_OFF & _PWRTE_ON & _MCLRE_OFF & _CP_OFF & _CPD_OFF & _BOREN_ON & _IESO_ON & _FCMEN_ON & _LVP_OFF
; CONFIG2
; __config 0xFFFF
__CONFIG _CONFIG2, _BOR4V_BOR40V & _WRT_OFF
REGISTROS UDATA 0X0000
ORG 0X0000
GOTO INICIO
INICIO
BANKSEL TRISA
BCF TRISA, RA0
BCF TRISA, RA1
BCF TRISA, RA2
BSF PORTB, RB0
BSF PORTB, RB1
BSF PORTB, RB2
BSF PORTB, RB3
BSF PORTB, RB4
BSF PORTB, RB5
BSF PORTB, RB6
BSF PORTB, RB7
BANKSEL ANSEL
CLRF ANSEL
BANKSEL ANSELH
CLRF ANSELH
BANKSEL PORTB
REGIS_A RES 1
REGIS_B RES 1
REGIS_C RES 1
REGIS_Z RES 1
GOTO BUCLE
BUCLE
BTFSC PORTB, RB0
INCF REGIS_A
INCF REGIS_B
BTFSC PORTB, RB1
INCF REGIS_A
INCF REGIS_B
BTFSC PORTB, RB2
INCF REGIS_A
INCF REGIS_B
BTFSC PORTB, RB3
INCF REGIS_A
INCF REGIS_B
BTFSC PORTB, RB4
INCF REGIS_A
INCF REGIS_B
BTFSC PORTB, RB5
INCF REGIS_A
INCF REGIS_B
BTFSC PORTB, RB6
INCF REGIS_A
INCF REGIS_B
BTFSC PORTB, RB7
INCF REGIS_A
INCF REGIS_B
MOVF REGIS_B, W
SUBWF REGIS_A
BTFSS STATUS,C
GOTO A_MENOR
BTFSS STATUS,Z
GOTO A_MAYOR
GOTO A_IGUAL
A_MENOR
MOVLW 0XAA
BCF PORTA, RA0
BCF PORTA, RA1
BCF PORTA, RA2
GOTO BUCLE
A_MAYOR
MOVLW 0X55
BCF PORTA, RA0
BCF PORTA, RA1
BSF PORTA, RA2
GOTO BUCLE
A_IGUAL
MOVLW 0XFF
BCF PORTA, RA0
BSF PORTA, RA1
BCF PORTA, RA2
GOTO BUCLE
END
Ese es el código que tengo
sss.png(21.59 kB, 432x460 - visto 392 veces) Debería activarse las salidas RA0, RA1, RA2 según una comparación (resta) de REG_A - REG_B; ¿Hay algo que le hace falta al código?
