hangi led yanıyorsa butona devamlı basınca o led yanık kalır
list p=16f84A/pic tanıtılıyor
#include "p16f84A.inc"/kütüphane dosyası ekleniyor
sayac1 equ h'0C'/ramde değişken tanımı yapılıyor
sayac2 equ h'0D'/ramde değişken tanımı yapılıyor
clrf PORTB/b portu siliniyor
bcf STATUS0/elde biti siliniyor
bsf STATUS5/bank 1'e geçiliyor
clrf TRISB/portb çıkış yapılıyor
bcf STATUS5/bank 0'a geçiliyor
basla
movlw h'01'/w'ye 01 atanıyor
movwf PORTB/bu değer portb'de
TEKRAR
call gecikme/gecikme altprogramı çağırılıyor
rlf PORTBF/portb bir bit sola kaydırılıyor
btfss STATUS0/elde biti test ediliyor
test
btfss PORTA1/port a'daki buton test ediliyor buton basılımı
goto test/basılı
goto TEKRAR/basılı değil
sekiz
btfss PORTB7/portb 7.bit test ediliyor
goto bir/diğer bit test ediliyor
bsf PORTB7/portb 7.bit 1 yapılıyor
bir
btfss PORTB6/portb 6.bit test ediliyor
goto iki//diğer bit test ediliyor
bsf PORTB6/portb 6.bit bir yapılıyor
iki
btfss PORTB5/portb 5.bit test ediliyor
goto uc/diğer bit test ediliyor
bsf PORTB5//portb 5.bit bir yapılıyor
uc
btfss PORTB4/portb 4.bit test ediliyor
goto dort/diğer bit test ediliyor
bsf PORTB4//portb 4.bit bir yapılıyor
dort
btfss PORTB3/portb 3.bit test ediliyor
goto bes/diğer bit test ediliyor
bsf PORTB3//portb 3.bit bir yapılıyor
bes
btfss PORTB2/portb 2.bit test ediliyor
goto alti/diğer bit test ediliyor
bsf PORTB2//portb 2.bit bir yapılıyor
alti
btfss PORTB1/portb 1.bit test ediliyor
goto yedi/diğer bit test ediliyor
bsf PORTB1//portb 1.bit bir yapılıyor
yedi
btfss PORTB0/portb 0.bit test ediliyor
goto sekiz/diğer bit test ediliyor
bsf PORTB0//portb 0.bit bir yapılıyor
goto sekiz
DONGU /gecikme alt programı
goto DONGU
gecikme
movlw h'FF'
movwf sayac1/sayac1
dongu1
movlw h'FF'
movwf sayac2/sayac2
dongu2
decfsz sayac2F/sayac 1 azaltılıyor sıfır olup olmadığına bakılıyor
goto dongu2/sayac sıfır değil
decfsz sayac1F/sayac 1 azaltılıyor sıfır olup olmadığına bakılıyor
goto dongu1/sayac sıfır değil
return
end
sormak istediğiniz bir şey olursa
[email protected] yada
[email protected] asorabilirsiniz.
