Mikro Bilgisayarlı Sistem Tasarımı - Fırat Üniversitesi

LIST p=16F877
INCLUDE “p16F877”
SAYAC EQU h „20‟ ; Sayac isimli değişken tanımlanması
CLRF PORTB ; PortB‟ye bağlı ledleri söndür
BSF STATUS,5 ; Bank1 e geç
CLRF TRISB ; PortB‟nin uçlarını çıkış yap.
MOVLW h „FF‟ ; W kayıtçısına h „FF‟ yüklenir
MOVWF TRISA ; PortA‟nın uçlarını giriş yap
BCF STATUS,5 ; Bank0 „a geç
BASLA
MOVLW d‟10‟ ; W kayıtçısına d‟10‟ yükle
MOVWF SAYAC ; SAYAC değişkenine W taşı
TEST
BTFSC PORTA,1 ; PortA‟nın 1 biti 0 mı?
GOTO TEST ; Değilse, TEST isimli etikete geri dön
NOP
NOP ; Gecikme zamanı için
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
NOP
DECFSZ SAYAC,F ; SAYAC değişkenin içeriği, 0 mı?
GOTO TEST ; Değilse
BSF PORTB,0 ;PORTB‟nin 0. bitini 1 yap
END
Butona basma sayısı 10‟a ulaşmadan PortB‟nin 0.bitindeki LED‟in yandığı görülmektedir.
Burada pull-up olayı gerçekleşmiştir. Yani butona basılmadığında +5 voltta basıldığında ise 0 V
olmaktadır. Butona basma ve çekme esnasında bir ark oluşur.
+5v
0V
İlk basılış
İkinci basılış
Butona basınca
meydana gelen
ark
Şekilde görüldüğü gibi butona basıldığı zaman gerilim dalgalanmaları yaşanacaktır. PIC
komutlarının icra süreleri genelde 1 komut saykılında gerçekleşmektedir. 15 tane NOP komutu
sadece 15 cplik bir zaman gecikmesi sağlamaktadır. Bu süre hesaplandığı zaman elimizi butondan
çekmemizden daha kısa bir süreye denk gelmektedir. Her defasında 0 V seviyesine inişte butona
İbrahim Türkoğlu, Fırat Üniversitesi - Elektronik ve Bilgisayar Eğitimi Bölümü, Elazığ- 2010. 109