errorlevel 2	
LIST P=16F876
	#INCLUDE "P16F876.INC"
	__CONFIG _HS_OSC&_CP_OFF&_WDT_OFF&_LVP_OFF

CBLOCK 0X20
SZ
EL
EH
EU
XXH
XXL
ENDC

	org	0x00

	movlw	D'255'
	movwf	XXL
	MOVLW	0
	MOVWF	XXH
	MOVLW	D'255'
	CALL	SZORZAS16X8
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP	
	
SZORZAS16X8

	CLRF	SZ	
	BSF  	SZ,4
	CLRF	EL
	CLRF	EH
	CLRF	EU

VISSZA
	bcf		STATUS,C
	RLF		EL,f
	RLF		EH,f
	RLF		EU,f
	RLF		XXL,F
	RLF		XXH,F
	BTFSC	STATUS,C
	call	OSSZEAD
	DECFSZ	SZ,f
	GOTO	VISSZA
	RETURN


OSSZEAD
	ADDWF	EL,f
	BTFSS	STATUS,C
	return
	INCFSZ	EH,f
	return
	INCF	EU,f
	return

END