Subversion Repositories svnkaklik

Rev

Rev 6 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log

Rev 6 Rev 410
1
#include "D:\KAKLIK\programy\PIC_C\mereni\otmer\otackomer.h"
1
#include "D:\KAKLIK\programy\PIC_C\mereni\otmer\otackomer.h"
2
 
2
 
3
#define DATA   PIN_A1
3
#define DATA   PIN_A1
4
#define CP     PIN_A0
4
#define CP     PIN_A0
5
 
5
 
6
void main()
6
void main()
7
{
7
{
8
int i;
8
int i;
9
   setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
9
   setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
10
 
10
 
11
   while(true)
11
   while(true)
12
   {
12
   {
13
      output_high(DATA);
13
      output_high(DATA);
14
      output_high(CP);
14
      output_high(CP);
15
      Delay_ms(100);
15
      Delay_ms(100);
16
      output_low(CP);
16
      output_low(CP);
17
      output_low(DATA);
17
      output_low(DATA);
18
 
18
 
19
      for(i=7;i>0;i--)
19
      for(i=7;i>0;i--)
20
      {
20
      {
21
         Delay_ms(100);
21
         Delay_ms(100);
22
         output_high(CP);
22
         output_high(CP);
23
         Delay_ms(100);
23
         Delay_ms(100);
24
         output_low(CP);
24
         output_low(CP);
25
      }
25
      }
26
   }
26
   }
27
}
27
}