5-Pic-Butonla Led Yakma

Örnek: a portunun 2 numaralı bacağına bağlı bir buton yardımı ile b portunun 3 numaralı bacağına bağlı bir led yakma programı
LIST P=16F84;**************************************************
STATUS EQU H'03'
PORTA EQU H'05'
PORTB EQU H'06'
TRISA EQU H'85'
TRISB EQU H'86'
CLRF PORTB
CLRF PORTA
;************************************************
BSF STATUS,5 ;bank 1 e geçiş yapıldı
CLRF TRISB ;b portu çıkış yapıldı
MOVLW H'FF' ;
MOVWF TRISA ;a portu giriş yapıldı
BCF STATUS,5
;****************************************************
BASLA
BT1 BTFSS PORTA,2 ; portanın 2 numaralı bacağına bağlı butona basılmışsa potb,3 ‘e 5 volt ver
GOTO BT1
BSF PORTB,3 ;portb 3 numaralı bacağına bağlı led yak
GOTO BASLA
;******************************************************
END