Subversion Repositories svnkaklik

Rev

Rev 410 | Details | Compare with Previous | Last modification | View Log

Rev Author Line No. Line
6 kaklik 1 
#include "D:\@Kaklik\programy\PIC_C\mereni_ultraz\main.h"
2 
#use fast_io(A)
3 
 
4 
void main()
5 
{
6 
 
7 
   setup_counters(RTCC_INTERNAL,WDT_18MS);
8 
 
9 
   set_tris_A(0b11110100);
10 
   output_high(pin_A3);
11 
 
12 
mainloop:
13 
   output_high(pin_A0);
14 
   output_low(pin_A1);
15 
   delay_us(9);
16 
   output_high(pin_A1);
17 
   output_low(pin_A0);
18 
   delay_us(9);
19 
 
20 
   goto mainloop;
21 
 
22 
}
23