12.01.2015 Views

pic16f877-ev-icin-hirsiz-alarmi - 320Volt

pic16f877-ev-icin-hirsiz-alarmi - 320Volt

pic16f877-ev-icin-hirsiz-alarmi - 320Volt

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

C. Selçuk KAHYALAR, Bitirme Öd<strong>ev</strong>i, Niğde Üniversitesi, Mühendislik-Mimarlık<br />

Fakültesi, Elektrik-Elektronik Mühendisliği Bölümü, 2001-2002 Eğitim- Öğretim Yılı<br />

karsilastir4:<br />

read 4,hane55<br />

if hane55 = hane5 then setreset<br />

goto tekrarhak<br />

setreset:<br />

if hane7 = 15 then yenisifregir<br />

if kur = 30 then reset<br />

if beskur = 10 then reset<br />

alarmkur:<br />

i = -1<br />

kur = 30<br />

alarmkur1:<br />

high portb.0<br />

pause 25<br />

low portb.0<br />

pause 35<br />

if portb.1 = 1 then alarm<br />

goto basla<br />

sifreyaz:<br />

i = 0<br />

hane1 = 30<br />

hane7 = 15<br />

goto basla<br />

yenisifregir: hane8 = 16<br />

high portb.3<br />

pause 700<br />

i = 0<br />

goto basla<br />

yenisifregir1:<br />

low portb.3<br />

write 0,hane1<br />

pause 10<br />

write 1,hane2<br />

pause 10<br />

write 2,hane3<br />

pause 10<br />

write 3,hane4<br />

pause 10<br />

write 4,hane5<br />

pause 10<br />

high portb.3<br />

33

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!