Bueno vamos por partes:
- En el primer hilo hablas del “pc basic pro”, por eso la indicación de que estas trabajando con el Basic del Pic Simulator Ide o abreviando Basic PSI.
- En segundo lugar hablas del puerto A pin RB4 y me imagino que quieres decir puerto A pin RA4, ya que el RB4 es del puerto B.
- En tercer lugar no te puedo ayudar con la nomenclatura del cristal, imagino que si lo pediste de 4Mhz, será correcta, pero el tema del cristal no tiene importancia si no has probado el circuito en la realidad.
- Y curto según el datasheets del Pic16F84 el puerto A tiene un pin llamado RA4 que es de colector abierto, esto quiere decir que solo puede suministrar dos valores 0 o alta impedancia, nunca puede suministrar valor 1. Así que para iluminar un led con este pin tienes que usar lógica negativa.
Adjunto el enlace a la pagina del datasheet que indica los modos de trabajo del puerto A:
http://imageshack.us/photo/my-images/803/pic16f84atable11.jpg/Entonces llegados hasta aquí, si no construiste el circuito y solo lo estás simulando, te diré que en el simulador del entorno de trabajo del Basic del Pic Simulator IDE (PSI) si funciona, esto es independiente de la frecuencia de reloj que le pongas, pero es normal que funcione en el simulador ya que son una ficción y funcionan aunque se omitan polarizaciones, configuraciones y un largo etc que en la realidad no se pueden omitir.
Te adjunto también el programa que he simulado, de todas formas si sigo sin entenderte completamente, pues sigue exponiendo el tema a ver si logro sintonizar con los problemas que tienes realmente.
'***** PIC16F84 *****
Define CONF_WORD = 0x3ff9 'Configuración de Bit
Define CLOCK_FREQUENCY = 4 'Frecuencia de trabajo 4Mhz
Define SIMULATION_WAITMS_VALUE = 1 'Acelera los Wait, solo para simulación
TRISA = %00000
TRISB = %00000000
PORTB = %00000000
PORTA = %00000
inicio:
High PORTA.0
WaitMs 500
Low PORTA.0
WaitMs 500
High PORTA.1
WaitMs 500
Low PORTA.1
WaitMs 500
High PORTA.2
WaitMs 500
Low PORTA.2
WaitMs 500
High PORTA.3
WaitMs 500
Low PORTA.3
WaitMs 500
High PORTA.4
WaitMs 500
Low PORTA.4
WaitMs 500
High PORTB.0
WaitMs 500
Low PORTB.0
WaitMs 500
High PORTB.1
WaitMs 500
Low PORTB.1
WaitMs 500
High PORTB.2
WaitMs 500
Low PORTB.2
WaitMs 500
High PORTB.3
WaitMs 500
Low PORTB.3
WaitMs 500
High PORTB.4
WaitMs 500
Low PORTB.4
WaitMs 500
High PORTB.5
WaitMs 500
Low PORTB.5
WaitMs 500
High PORTB.6
WaitMs 500
Low PORTB.6
WaitMs 500
High PORTB.7
WaitMs 500
Low PORTB.7
WaitMs 500
Goto inicio
End
Puedes pegar el esquema del circuito, si lo tienes, esto suele facilitar que te echen una mano.