Subversion Repositories svnkaklik

Rev

Go to most recent revision | Details | Last modification | View Log

Rev Author Line No. Line
52 kaklik 1
#include "blik.h"
2
 
3
 
4
void main()
5
{
6
 
460 kaklik 7
int i;
8
 
52 kaklik 9
   setup_adc_ports(NO_ANALOGS|VSS_VDD);   // parametry
10
   setup_adc(ADC_OFF);
11
   setup_spi(FALSE);
12
   setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
13
   setup_timer_1(T1_DISABLED);
14
   setup_timer_2(T2_DISABLED,0,1);
15
   setup_comparator(NC_NC_NC_NC);
16
   setup_vref(FALSE);
17
   setup_oscillator(False);
18
 
19
   while(true) // nekonecny cyklus
20
   {
21
      output_high(PIN_B0);    // nastav B0 na 1
460 kaklik 22
      Delay_ms(50);           // pockej 50ms
23
      output_high(PIN_B1);    // nastav B0 na 1
24
      Delay_ms(50);           // pockej 50ms
25
      output_high(PIN_B2);    // nastav B0 na 1
26
 
27
      for(i=0;i<=100;i++)
28
      {
29
        Output_high(PIN_A2);
30
        Delay_ms(1);
31
        Output_low(PIN_A2);
32
        Delay_ms(1);
33
      }
34
 
52 kaklik 35
      output_low(PIN_B0);     //nastav B0 na 0
36
      Delay_ms(50);           // pockej 50ms
460 kaklik 37
      output_low(PIN_B1);     //nastav B0 na 0
38
      Delay_ms(50);           // pockej 50ms
39
      output_low(PIN_B2);     //nastav B0 na 0
40
      Delay_ms(50);           // pockej 50ms
41
   }                          // opakuj cyklus
52 kaklik 42
 
43
}