Mikro Bilgisayarlı Sistem Tasarımı - Fırat Üniversitesi
Mikro Bilgisayarlı Sistem Tasarımı - Fırat Üniversitesi
Mikro Bilgisayarlı Sistem Tasarımı - Fırat Üniversitesi
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
MOVLW h „FF‟ ; W kayıtçısına h„FF‟ yükle<br />
MOVWF TRISA ; PortA‟nın uçlarını giriş yap<br />
BCF STATUS,5 ; BANK0‟a geç<br />
TEST_PORTA<br />
BTFSC PORTA,2 ; A portunun 2. bitini test et<br />
GOTO TEST_PORTA; 0 değilse tekrar test et<br />
MOVLW h „FF‟ ; W kayıtçısına b „11111111‟ yükle<br />
MOVWF PORTB ; W içeriğini PortB‟ye gönder.<br />
DONGU<br />
GOTO DONGU<br />
END<br />
Örnek 9.4: PORTA „nın 0. bitine bağlı butona basıldığında B portuna bağlı ledlerin yanmasını, 1.<br />
bitine bağlı butona basıldığında B portundaki ledleri söndüren program.<br />
Basla<br />
Hayır<br />
Hayır<br />
LIST p=16F877<br />
INCLUDE “p16F877”<br />
Org 0x00<br />
Goto Basla<br />
Basla<br />
İlk_degerler:<br />
2. adım<br />
A0 Kontrol<br />
Led'leri yak<br />
A1 kontrol<br />
Ledleri söndür<br />
Son<br />
İbrahim Türkoğlu, <strong>Fırat</strong> <strong>Üniversitesi</strong> - Elektronik ve Bilgisayar Eğitimi Bölümü, Elazığ- 2010. 105<br />
Evet<br />
Evet<br />
CLRF PORTA ; PORTA yazmacını temizle<br />
CLRF PORTB ; PORTB yazmacını temizle<br />
BSF STATUS,5 ; Bank1 e geç<br />
BCF OPTION_REG,NOT_RBPU<br />
CLRF TRISB ; TRISB‟yi temizle<br />
MOVLW H „03‟ ; A0 ve A1 giriş butonları bağlı<br />
MOVWF TRISA<br />
BCF STATUS,5