Hola otra vez, he seguido haciendo pruebas con el PIC y ahora he probado otras entradas y otro puerto de salida pero me hace lo mismo. Es decir, cuando alimento a 5V la entrada RA1 se activa al momento la salida RB3, pero cuando quito los 5V de la entrada RA1, me tarda 5 segundos en activar la salida RB2.
Os escribo todo el código del programa a ver si alguien sabe que puede pasar.
list p=16f873 ; list directive to define processor
#include <p16f873.inc> ; processor specific variable definitions
__CONFIG _CP_OFF & _WDT_OFF & _BODEN_OFF & _PWRTE_OFF & _HS_OSC & _WRT_ENABLE_ON & _LVP_OFF & _CPD_OFF
org 0x00
goto start ;Vector de reset
org 0x06
MAIN CODE
start
BCF STATUS, RP0
BCF STATUS, RP1
CLRF PORTA
CLRF PORTB
BSF STATUS,RP0
MOVLW 0x06
MOVWF ADCON1
MOVLW 0xFF
MOVWF TRISA
MOVLW 0x00
MOVWF TRISB
BCF STATUS,RP0
estatbaix BTFSC PORTA,1
GOTO estatalt
BCF PORTB,3
BSF PORTB,2
GOTO estatbaix
estatalt BSF PORTB,3
BCF PORTB,2
BTFSS PORTA,1
GOTO estatbaix
GOTO estatalt
END
Muchas gracias!!!