;------------------------------------------------------------
; timer1.asm
;------------------------------------------------------------

.include "m8515def.inc"
.def temp = r16
.def leds = r17
.equ start = 62606;   2 hoch 16 minus 7812
.equ highValue = high(start)
.equ lowValue  = low(start) 

rjmp RESET ; Reset Handler
rjmp INT0addr	; External Interrupt Request 0
rjmp INT1addr	; External Interrupt Request 1
rjmp ICP1addr	; Timer/Counter1 Capture Event
rjmp OC1Aaddr	; Timer/Counter1 Compare Match A
rjmp OC1Baddr	; Timer/Counter1 Compare MatchB
rjmp OVF1addr	; Timer/Counter1 Overflow
rjmp OVF0addr	; Timer/Counter0 Overflow
rjmp SPIaddr	; Serial Transfer Complete
rjmp URXCaddr	; UART, Rx Complete
rjmp UDREaddr	; UART Data Register Empty
rjmp UTXCaddr	; UART, Tx Complete
rjmp ACIaddr	; Analog Comparator
rjmp INT2addr	; External Interrupt Request 2
rjmp OC0addr	; Timer 0 Compare Match
rjmp ERDYaddr	; EEPROM Ready
rjmp SPMRaddr	; Store Program Memory Ready


RESET: 
ldi r16,high(RAMEND); Main program start
out SPH,r16 ; Set Stack Pointer to top of RAM
ldi r16,low(RAMEND)
out SPL,r16
sei ; Enable interrupts

	ldi temp, 0xFF
	out DDRB, temp ; PORTB configured for output
	ldi leds, 0xFF
	out PORTB, leds ; LEDs ausschalten

	ldi temp, 1<<TOIE1  ; 1000 0000  
	out TIMSK, temp  ; Timer 1 interrupt ein

	; Startwert des Timers einstellen:
	ldi temp, highValue 
	out TCNT1H, temp  
	ldi temp, lowValue 
	out TCNT1L, temp  

	ldi temp, 0b00000101 
	out TCCR1B, temp  ; Timer 1 starten mit Vorteiler 1024

main:
	loop:
	rjmp loop 	


;--------------------------------------------------
timer1:
	com leds
	out PORTB, leds

	; Startwert des Timers neu einstellen:
	ldi temp, highValue 
	out TCNT1H, temp  
	ldi temp, lowValue 
	out TCNT1L, temp  

reti