;PROGRAM-20) Çevrim tablosu kullanmaya örnek program. 7 segment 
;display üzerinde "5" sayısını gösterir. NOT: Program 5 sayısına 
;karşılık gelen h'6D' sayısını seçmek için kullanılan PC ve çevrim 
;tablolarının kullanılmasını açıklaması bakımından önemlidir. 

;===PROG20.ASM====18/05/2005================================
		LIST	P=16F628A
		INCLUDE	"P16F628A.INC"
		__CONFIG _INTRC_OSC_NOCLKOUT & _WDT_OFF & _PWRTE_ON & _MCLRE_ON & _BODEN_OFF & _LVP_OFF & _DATA_CP_OFF & _CP_OFF
;-----------------------------------------------------------
		ORG		h'00'	;Prog kodlarının başlangıç adresi
		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'05'	;W ? h'05'(dallanma sayısı)
		CALL		CEV_TAB
		MOVWF	PORTB
DONGU
		GOTO 	DONGU
CEV_TAB
		ADDWF	PCL, F	;PCL=PCL+W(h'05)
		RETLW	h'3F'
		RETLW	h'06'
		RETLW	h'5B'
		RETLW	h'4F'
		RETLW	h'66'
		RETLW	h'52'	;W ? h'6D'
		RETLW	h'7D'
		RETLW	h'07'
		RETLW	h'7F'
		RETLW	h'6F'
		RETLW	h'77'
		RETLW	h'7C'
		RETLW	h'39'
		RETLW	h'5E'
		RETLW	h'79'
		RETLW	h'71'
		RETLW	h'80'
		END
;-----------------------------------------------------------
