ÖRNEK PROGRAM-5a

ETİKET

KOMUT

ADRES/VERİ

AÇIKLAMA

; SUBWF komutu

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

SAYI_1

EQU

0X0C

SAYI_2

EQU

0X0D

BSF

STATUS,5

;BANK1

CLRF

TRISB

;TRISB= (0000 0000 )b, PORTB çıkış

BCF

STATUS,5

;BANK0

MOVLW

.8

;W= 8d

MOVWF

SAYI_1

;W à SAYI_1 ,  SAYI_1 = 8d

MOVLW

.3

;W= 3d

MOVWF

SAYI_2

;W à SAYI_2,  SAYI_1 =8d

MOVF

SAYI_2,W

;SAYI_2 à W

SUBWF

SAYI_1,W

;SAYI_1 - SAYI_2 à W  8 – 3 = 5  W=5d

MOVWF

PORTB

; W à PORTB, D1 D3 ledleri ışık verir.

END

;Son