#include <16f84a.h> // pic a utilizar
#use delay(clock=4000000) // cristal a utilizar
#fuses xt,nowdt,noprotect // fusibles
int1 activo; // Flag para saber si esta activado
int8 datos[9] = { 0b00000001, 0b00100010, 0b01000100, 0b10001000, 0b00010000, 0b00100000, 0b01000000, 0b10000000, 0b00000000};
void main(void)
{
int i=0;
set_tris_b(0); // Se programa el puerto B como salida
output_b(0); // Inicialmente todo estara apagado
while(true) // Bucle infinito...
{
if(!input(pin_a0)) //pregunto si el pulsador en RA0 es cero "0"
{
delay_ms(10); //Antirebote
while(!input(pin_a0));
activo ^= 1;
}
if(activo)
{
output_b(datos[i++]);
delay_ms(200);
if(i==9) i=0
}
}
}