Скачать или смотреть Pic programing speed control led - Hız kontrollü blink uygulamsı - Pic programlama #01

------------------Kod------------------------

Not : köşeli parantezleri unutmayınız. (Don't forget the square brackets.)

#include 16f877a.h

#fuses XT, NOWDT, NOPROTECT, BROWNOUT, NOLVP, PUT, NOWRT, NODEBUG, NOCPD

#use delay(clock=4000000)
#use fast_io(a)
#use fast_io(b)

int on_off = 0 ;
int isik = 48;
int hiz_secim = 1;
long sayac = 0;
long sn1 = 1600000;


void main()
{
setup_psp(PSP_DISABLED);
setup_spi(SPI_SS_DISABLED);
setup_timer_1(T1_DISABLED);
setup_timer_2(T2_DISABLED,0,1);
setup_adc_ports(NO_ANALOGS);
setup_adc(ADC_OFF);
setup_CCP1(CCP_OFF);
setup_CCP2(CCP_OFF);


set_tris_a(0x0F);
set_tris_b(0xF0);

output_b(0x00);
while(1)

{
// On_off

if(input(pin_a0) == 1)
{
on_off ++;
if(on_off == 1)
{
output_high(pin_b3);

}
else if(on_off == 2)
{

on_off = 0;
output_b(0x00);
}
delay_ms(300);
}


// Sistem Başlangıç
// System Start
if(on_off == 1 )
{
sayac = sayac+1;

// led change
if(input(pin_a1) == 1)
{
output_low(isik);
isik++ ;
if(isik == 51) isik = 48;
delay_ms(300);

}

// speed chage
if(input(pin_a2) == 1)
{
hiz_secim++;
if(hiz_secim == 1 ) sn1 = 1600000;
if(hiz_secim == 2 ) sn1 = 800000;
if(hiz_secim == 3 ) sn1 = 400000;
if(hiz_secim == 4 ) sn1 = 200000;
if(hiz_secim == 5 ) hiz_secim = 1;
}

// Leds
if(sayac == (sn1)) output_high(isik);
if(sayac == (sn1*2)) output_low(isik);
if(sayac == (sn1*2)) sayac = 0;


}


}

}