/* Avtor: Goriçek Tomislav*/ /* "astabilni multivibrator" */ #include /* vkljuŸi datoteko z konstantami za PIC*/ /* KONFIGURACUJSKI BAJT NA NASLOVU 0X2007 */ __CONFIG(_CP_OFF & _PWRTE_ON & _WDT_OFF & _XT_OSC); /* trenutno: _CP_OFF - izkljuŸena zaçŸita vpisanega programa pred kopiranjem _PWRTE_ON - vkljuŸen "power up" _WDT_OFF - izkljuŸen "watch dog timer" _XT_OSC - izbran kristalni osilator */ Cakaj(void) { auto unsigned register i; for(i = 54000 ; --i ;) /* dolzina pavze */ { } }/* end cakaj */ main(void) /* glavni program */ { TRISB = 0; /* vsi pini na PORTB so izhod */ TRISA = 0; /* vsi pini na PORTA so izhod */ PORTA=0; /* ZbrisiPORTA */ PORTB=0; /* ZbrisiPORTB */ for (;;) /* neskoncna zanka */ { PORTA = 0x01; /* vklopi 00000001 */ Cakaj(); /* pavza */ PORTA = 0x02; /* vklopi 00000010 */ Cakaj(); /* pavza */ }/* end for */ }/* end main */