; === Gombok vizsgálata ===
VIZSGAL1
	BTFSS	PORTA,4
	GOTO	GOMB1LENYOMVA1
	GOTO	GOMB1FELENGEDVE1
	GOMB1LENYOMVA1
		CALL	KIIR1
		CALL	PRELL
		; Várakozás felengedésig
		BTFSS	PORTA,4
		GOTO	GOMB1LENYOMVA1		; Lenyomva
		GOTO	GOMB1FELENGEDVE2	; Felengedve
		GOMB1FELENGEDVE2
			CALL	KIIR1
			CALL	PRELL
			; Idő megállítása
			MOVLW	B'1'
			MOVWF	NOVELES
			; Digit beállítása
			MOVLW	D'1'
			MOVWF	DIGIT
			; Várakozás lenyomásig
			BTFSS	PORTB,6
			GOTO	GOMB3LENYOMVA1
			; Várakozás lenyomásig
			BTFSS	PORTB,7
			GOTO	GOMB2LENYOMVA1
			; Várakozás lenyomásig
			BTFSS	PORTA,4
			GOTO	GOMB1LENYOMVA3
			GOTO	GOMB1FELENGEDVE2
			GOMB1LENYOMVA3
				CALL	KIIR1
				CALL	PRELL
				; Várakozás felengedésig
				BTFSS	PORTA,4
				GOTO	GOMB1LENYOMVA3		; Lenyomva
				GOTO	GOMB1FELENGEDVE4	; Felengedve
				GOMB1FELENGEDVE4
					; Idő visszaállítása
					MOVLW	B'0'
					MOVWF	NOVELES
					GOTO	KIIR			; Vissza
			GOMB3LENYOMVA1
				CALL	KIIR1
				CALL	PRELL
				; Várakozás felengedésig
				BTFSS	PORTB,7
				GOTO	GOMB3LENYOMVA1		; Lenyomva
				GOTO	GOMB3FELENGEDVE2	; Felengedve
				GOMB3FELENGEDVE2
					; Szám növelése
					CALL	SZAMNOVELESE
					GOTO	GOMB1FELENGEDVE2
			GOMB2LENYOMVA1
				CALL	KIIR1
				CALL	PRELL
				; Várakozás felengedésig
				BTFSS	PORTB,7
				GOTO	GOMB2LENYOMVA1		; Lenyomva
				GOTO	GOMB2FELENGEDVE2	; Felengedve
				GOMB2FELENGEDVE2
					; Digit növelése
					CALL	SZAMNOVELESE
					GOTO	GOMB1FELENGEDVE2
	GOMB1FELENGEDVE1
		GOTO	KIIR	; Ha nincs gombnyomás: vissza

PRELL	; Prell kiszűrése
	CLRF	COUNT1
	eleje1
	NOP
	INCF	COUNT1,F
	MOVFW	COUNT1
	XORLW	D'100'
	BTFSS	STATUS,Z
	GOTO	eleje1
	return

; === Funkciók ===

SZAMNOVELESE
	MOVFW	MPERC1
	XORLW	B'1001'
	BTFSS	STATUS,Z
	GOTO	KISEBBMPERC1GOMB
	GOTO	NAGYOBBMPERC1GOMB
	KISEBBMPERC1GOMB
		INCF	MPERC1,F
		GOTO	GOMB1FELENGEDVE2
	NAGYOBBMPERC1GOMB
		CLRF	MPERC1
		GOTO	GOMB1FELENGEDVE2