Entrada RA0, salida RB0

Me gustaría saber como se hace que al pulsar una entrada con el PIC 16F84A, en su salida se activa el RB0.

Es decir, dejo a 1 la entrada del puerto A RA0, y a su salida se ilumine un LED del puerto B llamado RB0.

De momento tengo un código incompleto aquí.

Código: Seleccionar todo

; ZONA DE DATOS **********************************************************************

   __CONFIG   _CP_OFF &  _WDT_OFF & _PWRTE_ON & _XT_OSC   ; Configuración para el
                                             ; grabador.
   LIST   P=16F84A         ; Procesador.
   INCLUDE <P16F84A.INC>      ; Definición de los operandos utilizados.

; ZONA DE CÓDIGOS ********************************************************************

   CONSTANTE  EQU   b'00000100'
   LOCO   EQU b'10000001'

   ORG    0               ; El programa comienza en la dirección 0 de memoria de
Inicio                     ; programa.
   bsf      STATUS,RP0         ; Pone a 1 el bit 5 del STATUS. Acceso al Banco 1.
   clrf   TRISB            ; Las líneas del Puerto B se configuran como salidas.
   movlw   b'11111111'
   movwf   TRISA            ; Las líneas del Puerto A se configuran como entradas.
   bcf      STATUS,RP0         ; Pone a 0 el bit 5 de STATUS. Acceso al Banco 0.
   

Principal
;   movf    PORTA,W            ; Lee el Puerto A.
;   movwf   PORTB            ; El contenido de W se visualiza por el Puerto B.
;   bsf   LOCO,7
   movf   PORTA,0
   goto    Principal         ; Crea un bucle cerrado.

   END                     ; Fin del programa.

solo hay que modificar:

Código: Seleccionar todo


Principal
   movf    PORTA,W     ; Lee el Puerto A.
   movwf   PORTB       ; El contenido de W se visualiza por el Puerto B.

   goto    Principal      ; Crea un bucle cerrado.

   END   

acuerdate de poner una resistencia (de 470 a 1k) al led

suerte y reporta como te fue