1.b Led yakma-söndürme uygulaması

/***** LED YAKMA-SÖNDÜRME UYGULAMASI Yazan: Burak TASASIZ *****/
/*******************************************
YAZILIMIN İŞLEVİ: B portunun 6 numaralı bacağını 500ms
boyunca lojik-1, sonra lojik-0 yapar. Böylelikle B6
pinine bağlanmış led 500ms yanar, sonra söner.
********************************************/

#include <16f628a.h>
#FUSES NOWDT, INTRC, NOPUT, NOPROTECT, NOBROWNOUT, NOMCLR, NOLVP, NOCPD
#use delay(clock=4000000)

void main()
{

setup_timer_0(RTCC_INTERNAL|RTCC_DIV_1);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
setup_comparator(NC_NC_NC_NC);
setup_vref(FALSE);

set_tris_b(0x00); //Port giriş-çıkış ayarları
output_b(0x00); //Port temizlemesi

output_high(pin_b6); //b6 pinini lojik-1 yap
delay_ms(500); //Mikrodenetleyici 500ms bekler
output_low(pin_b6); //b6 pinini lojik-0 yap
}