|
ASM-PRG-1-2
ÖRNEK
PROGRAM-1: PORTB uçlarına bağlı ledlerin kontrolü (MOVLW, MOVWF)
ÖRNEK PROGRAM-1
|
ETİKET
|
KOMUT
|
ADRES/VERİ
|
AÇIKLAMA
|
; MOVLW, MOVWF komutları
|
|
|
LIST
|
P=16F84
|
;PIC entegre no.
|
|
INCLUDE
|
"P16F84.INC”
|
;PIC16f84’e ait SFR
adres tanımlaması
|
|
__CONFIG
|
0X01
|
;konfigürasyon
düzenlemesi
;KOD KORUMASI VAR,
PWRT AÇIK, WDT ;KAPALI, KRİSTAL OSİLATÖR
|
|
BSF
|
STATUS,5
|
;BANK1
|
|
CLRF
|
TRISB
|
;TRISB= (0000 0000
)b, PORTB çıkış
|
|
BCF
|
STATUS,5
|
;BANK0
|
|
MOVLW
|
B’11110000’
|
;W = ( 1111 0000)b
|
|
MOVWF
|
PORTB
|
;W -à PORTB ‘ye, PORTB= (
1111 0000)b
;D8 D7 D6 D5 ledleri
ışık verir.
;D4 D3 D2 D1 ledleri
sönük kalır.
|
|
END
|
|
;Son
|
ÖRNEK
PROGRAM-2: PORTB uçlarına bağlı ledlerden istenileni yakmak (BSF, BCF)
ÖRNEK PROGRAM-2
|
ETİKET
|
KOMUT
|
ADRES/VERİ
|
AÇIKLAMA
|
;
BSF, BCF komutları
|
|
|
LIST
|
P=16F84
|
;PIC entegre no.
|
|
INCLUDE
|
"P16F84.INC”
|
;PIC16f84’e ait SFR
adres tanımlaması
|
|
__CONFIG
|
0X01
|
;konfigürasyon
düzenlemesi
KOD KORUMASI VAR,
PWRT AÇIK, WDT KAPALI, KRİSTAL OSİLATÖR
|
|
BSF
|
STATUS,5
|
;BANK1
|
|
CLRF
|
TRISB
|
;TRISB= (0000 0000
)b, PORTB çıkış
|
|
BCF
|
STATUS,5
|
;BANK0
|
|
BSF
|
PORTB,0
|
;D1 LEDİ IŞIK VERİR
|
|
BSF
|
PORTB,2
|
;D2 LEDİ IŞIK VERİR
|
|
BSF
|
PORTB,4
|
;D4 LEDİ IŞIK VERİR
|
|
END
|
|
;Son
|
|
|
| | |