;PROGRAM-1) MOVLW ve MOVWF komutlarının çalışmasını gösteren 
;örnek program. PIC’e enerji verildiğinde PORTB’ye bağlı 
;8 adet LED’i birer aralıklı olarak yakan program.
;===PROG1.ASM====25/04/2005=================================
	LIST	P=16F628A
	INCLUDE	"P16F628A.INC"
	__CONFIG _XT_OSC & _WDT_OFF & _PWRTE_ON & _MCLRE_ON & _BODEN_OFF & _LVP_OFF & _DATA_CP_OFF & _CP_OFF
;-----------------------------------------------------------
	ORG		h'0000'	;Programı h’0000’ adresinden başlat
	CLRF		PORTB	;PORTB'ye bağlı LED'leri söndür
	BANKSEL	TRISB	;BANK1'e geç 
	CLRF		TRISB	;PORTB'nin uçlarını çıkış yap
	BANKSEL	PORTB	;BANK0’a geç
BASLA
	MOVLW	h'55'	;W'ye b’01010101’ yaz
	MOVWF	PORTB	;W’deki veriyi PortB’ye gönder
DONGU
	GOTO		DONGU	;Sonsuz döngü
	END				;Program sonu
;-----------------------------------------------------------
