Subversion Repositories svnkaklik

Compare Revisions

Ignore whitespace Rev 459 → Rev 460

/programy/C/PIC_C/test/PIC16F88/blik/blik.BAK
4,7 → 4,7
void main()
{
 
setup_adc_ports(NO_ANALOGS|VSS_VDD);
setup_adc_ports(NO_ANALOGS|VSS_VDD); // parametry
setup_adc(ADC_OFF);
setup_spi(FALSE);
setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
17,9 → 17,17
while(true) // nekonecny cyklus
{
output_high(PIN_B0); // nastav B0 na 1
Delay_ms(50); // pockej 50ms
output_high(PIN_B1); // nastav B0 na 1
Delay_ms(50); // pockej 50ms
output_high(PIN_B2); // nastav B0 na 1
Delay_ms(700); // pockej 700ms
output_low(PIN_B0); //nastav B0 na 0
Delay_ms(50); // pockej 50ms
output_low(PIN_B1); //nastav B0 na 0
Delay_ms(50); // pockej 50ms
output_low(PIN_B2); //nastav B0 na 0
Delay_ms(50); // pockej 50ms
} // opakuj cyklus
 
}