Leds Viajeros

Recuerdan el auto fantástico? Bueno como se ve en la imagen, tenía una tira de LEDs que iban y venían de un lado a otro. Vamos a ver como podemos hacer esto con un PIC usando 8 LEDs y pudiendo cambiar el tiempo en que cada uno esté encendido. Para esto usaremos el compilador CCS y Proteus para la simulación.

Circuito

Bien simple, un PIC16F873A, una barra de 10 LEDs y un potenciómetro que permitirá regular el tiempo de encendido y dos resistencias: una fija un uno lógico en el pin MCLR y la otra limita la corriente por los LEDs.

Código
Con estas nuestro código aparecerá como el que

void main(){
long tiempo;
setup_adc_ports(AN0);
setup_adc(ADC_CLOCK_INTERNAL);
setup_spi(SPI_SS_DISABLED);
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
set_tris_b(0x00);
set_tris_c(0x00);
portb = 0;
portc = 0;
set_adc_channel(0);
do{
output_high(PIN_B0);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B0);
output_high(PIN_B1);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B1);
output_high(PIN_B2);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B2);
output_high(PIN_B3);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B3);
output_high(PIN_B4);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B4);
output_high(PIN_B5);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B5);
output_high(PIN_B6);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B6);
output_high(PIN_B7);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B7);
output_high(PIN_C0);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_C0);
output_high(PIN_C1);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_C1);
output_high(PIN_C0);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_C0);
output_high(PIN_B7);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B7);
output_high(PIN_B6);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B6);
output_high(PIN_B5);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B5);
output_high(PIN_B4);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B4);
output_high(PIN_B3);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B3);
output_high(PIN_B2);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B2);
output_high(PIN_B1);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B1);
output_high(PIN_B0);
tiempo = read_adc();
delay_ms(tiempo);
output_low(PIN_B0);
}while(TRUE);}

Simulación

El resultado de la simulación se puede ver en este video, observar como varía el tiempo de encendido de cada LED a medida que se varía el potenciómetro:

Advertisement