PIC 16F84A y LED intermitente

Hola buenas, tengo un pic 16f84A conectado a un oscilador de 4MHz y 2 condensadores de 27 picofaradios que estan conectados junto con VSS a tierra y en la salida RA2 salida un LED con su resistencia. MCLR\ tiene un R de 4,7Kohm y esta unida +5V junto con VDD.

El problema viene cuando lo enciendo, el LED se queda iluminado todo el tiempo. pongo el programa del pic por si es eso.

#Include <Pic16f84A.h>

#Fuses XT ,NOWDT ,NOTPROTECT
#Huse delay(clock= 4000000)

#Define LED pin_A2

Void main()

While (1)
{
outoput_high (LED); // Encender LED, estado ALTO de la salida A2.
delay_ms(1000); // Esperar 1 sec.
Outoput_low(LED); // Apagar LED, estado BAJO de la salida A2.
delay_ms(1000); // Esperar 1 sec.
}

}

Hola....yo tambien tengo duda con eso, el unico detale es que mi led lo tengo en RB7....Yo quiero q mientras haya un cero en RB4 el led empieze a oscilar cada medio segundo...les paso mi programa....Mi problema es que el Led no prende ni apaga para nada!

;PROGRAMA QUE ENCIENDE UN LED CADA MEDIO SEGUNDO

__CONFIG _CP_OFF& _WDT_OFF& _PWRTE_ON& _XT_OSC

LIST P=16F84A
INCLUDE P16F84A.INC



UNO_LED EQU b'10000000'
CERO_LED EQU b'00000000'
ORG 0
INICIO

MOVLW b'11111111'
MOVF TRISA; TODOS BITS PTOA DE ENTRADA
CLRF TRISB; TODOS BITS PTOB DE SALIDA

OP_PUSH BTFSC PORTA,0
GOTO OP_PUSH
LED
MOVLW UNO_LED
MOVWF PORTB
CALL Retardo_500micros
MOVLW CERO_LED
MOVWF PORTB
CALL Retardo_500micros
GOTO LED

#INCLUDE <RETARDOS.INC>

END

que mas monomanio y darrenz?

yo creo que el problema de ambos radica en no definir si son o no entradas y salidas los puertos, en el caso de monomanio, lo haces desde el banco 0, cosa que no se puede, tiene que switchear al banco 1 para que tenga efecto... asi:

Código: Seleccionar todo


               ORG      0

INICIO         BCF      STATUS,RP1
               BSF      STATUS,RP0
               MOVLW   b'11111111'
               MOVF   TRISA         ;TODOS BITS PTOA DE ENTRADA
               CLRF   TRISB         ;TODOS BITS PTOB DE SALIDA
               BCF      STATUS,RP0


de resto esta bien, para darrenz... bueno, si el programa como lo tienes corre es un milagro... perdona que te lo diga y mi intencion no es regañarlo, pero tiene algunos errores, espero que sea transcribiendolo al foro que cambiaron, el caso es que, tienes que agregarle la funcion set_tris_a(0x00) para que el puerto a quede como salida, y asi asegurar de que funcione, por que de resto el programa esta bien, espero les sirva esta info... cuidensen...

Muchas gracias por contestar...ya lo´corregí, ahora el problema es que sigue asiendo lo mismo...es algo realmente raro por que cuando le acerco el dedo al pic el Led se prende asi como si nada.... la verdad no sé que onda con esto...el programa asi esta..

Código: Seleccionar todo



;PROGRAMA QUE ENCIENDE UN LED CADA MEDIO SEGUNDO

__CONFIG _CP_OFF& _WDT_OFF& _PWRTE_ON& _XT_OSC

LIST        P=16F84A
INCLUDE    P16F84A.INC


         
   UNO_LED      EQU      b'10000000'      
   CERO_LED   EQU      b'00000000'    
            ORG 0
INICIO

         BCF      STATUS,RP1 ; ACCESO AL BANCO CERO
         BSF      STATUS,RP0 ; ACCESO AL BANCO UNO      
         MOVLW   b'11111111'
         MOVF   TRISA; TODOS BITS PTOA DE ENTRADA
         CLRF   TRISB; TODOS BITS PTOB DE SALIDA   
         BCF      STATUS,RP0 ; REGRESAR AL BANCO CERO

OP_PUSH      BTFSS   PORTA,0
         GOTO   OP_PUSH
LED
         MOVLW   UNO_LED
         MOVWF   PORTB
         CALL    Retardo_500micros
         MOVLW   CERO_LED
         MOVWF   PORTB
         CALL   Retardo_500micros
         GOTO    LED

#INCLUDE <RETARDOS.INC>

END


¿el código quedaría a si o lo he puesto en mal sitio?

#Include <Pic16f84A.h>

#Fuses XT ,NOWDT ,NOTPROTECT
#Huse delay(clock= 4000000)

#Define LED pin_A2

Void main()

set_tris_a(0x00);

While (1)
{
outoput_high (LED); // Encender LED, estado ALTO de la salida A2.
delay_ms(1000); // Esperar 1 sec.
Outoput_low(LED); // Apagar LED, estado BAJO de la salida A2.
delay_ms(1000); // Esperar 1 sec.
}

}

que mas monomanio y darrenz?

para el caso de monomanio, veo que el problema no esta en la cuestion del programa (por que a mi me sirve perfectamente) si no en el montaje del circuito, es lo que considero yo, sin embargo, le aconsejo que revise bien las conexiones, no se, un problema de tierra, un problema con el oscilador, o algo, no se, por que es muy raro que prenda al momento de acercar el dedo, luego, hmm no se, bastante raro...

para darrenz, fijate,

Código: Seleccionar todo


#include <16f84A.h>

#fuses XT ,NOWDT
#use delay(clock=4000000)

#define LED pin_A2

void main()
{      //esto hace falta, el corchete de inicio
   set_tris_a(0x00);

   while (1)
   {
      output_high (LED); // Encender LED, estado ALTO de la salida A2.
      delay_ms(1000); // Esperar 1 sec.
      output_low(LED); // Apagar LED, estado BAJO de la salida A2.
      delay_ms(1000); // Esperar 1 sec.
   }
}


asi lo haria yo, de acuerdo? no se si su compilador lo permita pero el mio no me permite mayusculas al principio (de hecho, creo que ningunno), y la funcion es "output..." no "outoput...", de acuerdo, pruebalo, me comentan cualquier cosa...

Deberias checar si todos los componentes dan continuidad si lo has hecho en una proto, tambien en mi blog e puesto como hacer eso que pides (un led intermitente) pero esta programado en mikrobasic si te interesa lo puedes ver el blog esta en mi firma saludos

Hola

A mi ya me pasó y era por un FUSE, no pongas XT sino HS. Al parecer XT es para velocidades de reloj inferiores a 4 MHz (creo recordar), para 4 MHz o más tienes que usar HS (High Speed).

Suerte

Al fina lo he conseguido, cambie de TX a HS y quité un condensador del circuito oscilador, entonces comenzó a funcionar xD.

Muchas gracias

ferny XT es para osciladores de 4 mhz para abajo