
;PROGRAM-7) SUBLW komutunun çalışmasını gösteren örnek program. 
;Program h’05’ sayısından h’04’ sayısı çıkardıktan sonra  STATUS 
;saklayıcıda meydana gelen bit değişikliklerini portB’deki 8 LED’de gösterir.

;Şekil 7 – 9 : PROG7.ASM programının akış diyagramı.

;===PROG7.ASM====04/05/2005=======
	LIST		P=16F628A
	INCLUDE	"P16F628A.INC"
	__CONFIG _RC_OSC_CLKOUT & _WDT_OFF & _PWRTE_ON & _MCLRE_ON & _BODEN_OFF & _LVP_OFF & _DATA_CP_OFF & _CP_OFF
;------------------------------------------------
	BANKSEL	TRISB		;BANK1'e geç 
	CLRF		TRISB		;PORTB uçları çıkış
	BANKSEL	PORTB		;BANK0'a geç
	CLRF		PORTB		;PortB'deki LED'leri söndür.
BASLA
	MOVLW	h'04'		; W <-- h'04'
	SUBLW	h'05'		; W = h'05' - h'04'
	MOVF		STATUS, W		; STATUS'ü W saklayıcısına yaz
	MOVWF	PORTB		; STATUS'ü LED'lerde göster
DONGU
	GOTO		DONGU
	END
;--------------------------------------------------
