ORG(0)						;Reset vector address
		goto	rese

rese
				banksel	OPTION_REG

				MOVLW	B'10000000'	;Set PIC options (See datasheet).
				MOVWF	OPTION_REG	;Write the OPTION register.
				MOVLW	B'00000000'
				MOVWF	TRISB		;RB0 > RB7 are output.
				MOVLW	B'00000000'	
				MOVWF	TRISA
				MOVLW	B'00000000'	
				MOVWF	TRISC
				MOVLW	b'00000111'
				movwf	CMCON
				movlw	b'10000000'
				movwf	ADCON1
				;bsf		PIE1,TMR1IE
				bank0
				clrf	ADCON0
				movlw	b'00000000'
				movwf	INTCON		;Disable interrupts
				movlw	b'00000000'
				movwf	T1CON
				clrf	SSPCON
				clrf	temp
				clrf	PORTA
				clrf	PORTB
				clrf	PORTC
				clrf	prozentt
				clrf	prozentt1