;DISPLAY A 7 SEGMENTI contatore


	PROCESSOR	16F84			
	ORG			0
	BSF		3,5             ; seleziona il banco 1 
	CLRF	6				; PORTB a TUTTE USCITE
	MOVLW   1F
	MOVWF	5               ; PORT A tutti ingressi
	BCF		3,5
	CLRF	5

	MOVLW	B'00111111'		;ZERO
	MOVWF	30
	MOVLW	B'00000110'		;1
	MOVWF	31
	MOVLW	B'01011011'		;2
	MOVWF	32
	MOVLW	B'01001111'		;3
	MOVWF	33
	MOVLW	B'01100110'		;4
	MOVWF	34
	MOVLW	B'01101101'		;5
	MOVWF	35
	MOVLW	B'01111101'		;6
	MOVWF	36
	MOVLW	B'00000111'		;7
	MOVWF	37
	MOVLW	B'01111111'		;8
	MOVWF	38
	MOVLW	B'01100111'		;9
	MOVWF	39
	MOVLW	B'10000000'		;DOT POINT
	MOVWF	40

	INIZIO:
	MOVLW	2F
	MOVWF	4				;FSR (Indirect addr)
	LOOP:
	INCF	4,1
	MOVLW	3F
	SUBWF	4,0
	BTFSC	3,2
	GOTO    INIZIO			
	NOP
	NOP
	NOP

	MOVF	0,0	
	MOVWF	6
	GOTO	LOOP
	END



	END