;Experiment3 for 5x7 Video Screen
;For PIC16F84 and only F84 chip
;Jumper between collector and emitter of first transistor
;First column of LEDs scan from bottom to top at 1Hz. 



Start   ORG 0x00
	BSF 03,5
	MOVLW 00h
	MOVWF 05h
	MOVWF 06h
	BCF 03,5

Scan 	BCF 03h,0     ;clear the carry flag
	MOVLW 01h
	MOVWF 06h
	CALL DelB
Scan1	RLF 06h,1
	CALL DelB
	GOTO Scan1

DelB 	MOVLW 03
	MOVWF 1Ah
DelB1	DECFSZ 1Bh,1
	GOTO DelB1
	DECFSZ 1Ch,1
	GOTO DelB1
	DECFSZ 1Ah,1
	GOTO DelB1
	RETURN


	END