;*** Zacetek programa ***
	LIST	P=16F88
	ORG	0

;*** Inicializacija: nastavim PORTB vsi izhodi ***
	BSF	3,5	;RP0=1 nastavim banko 1 za dostop do TRIS
	MOVLW	0	;TRISB=0
	MOVWF	6
	MOVLW	0	;ANSEL=0
	MOVWF	1B
	BCF	3,5	;RP0=0 nastavim banko 0 za dostop do PORTB

	MOVLW	0FF	;zacetna vrednost deljenja
	MOVWF	30

ZANKA	MOVF	30,0	;logicni shift v levo	
	ADDWF	30,1

	MOVLW	1	;00000001=1 za XOR
	BTFSC	30,6	;pristej izhod 6
	XORWF	30,1
	BTFSC	30,7	;pristej izhod 7
	XORWF	30,1

	MOVF	30,0	;izpis na LED na port B
	MOVWF	6

TIPKA	BTFSS	5,4
	GOTO	TIPKA

	CALL	KASNI
	GOTO	ZANKA

KASNI	NOP	;zakasnitev 256 ciklov*3
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	DECFSZ	31,1
	GOTO	KASNI
	RETURN

;*** Nastavi konfiguracijo PICa 16F88 ***
	ORG	2007	;naslov konfiguracijske besede
	DW	2950	;CP=OFF, CCPMX=RB3, DEBUG=OFF, WRT=0000-0FFF,
;CPD=OFF, LVP=OFF, BOREN=ON, MCLRE=OFF, PWRTEN=ON, WDTE=OFF, OSC=INTRC
; notranji Brown-Out RESET in notranja ura 31kHz

	END
;*** Konec programa ***