;
; portd 3-7 blinken lights ;)
;
; author: hackbard@hackdaworld.dyndns.org
;

.include "../include/2313def.inc"

; RESET
rjmp INIT

; INT0
reti

; INT1
reti

; T1 CAPT1
reti

; T1 COMP1
reti

; T1 OVF1
rjmp T1_OVF1

; T0 OVF0
reti

; UART RX
rjmp UART_RX

; UART UDRE
reti

; UART TX
reti

; ANA_COMP
reti

T1_OVF1:
out DDRD, r17
rol r17
sbrs r17, 7
reti
ldi r17, 4
reti

UART_RX:
in r16, UDR
andi r16, $7C
out UDR, r16
out DDRD, r16
reti

INIT:
ldi r16, Low(RAMEND)
out SPL, r16

; baudrate einstellen
ldi r16, 11 ; "38400 bps wert" in r16
out UBRR, r16 ; write to uart baudrate register
sbi UCR, (RXEN|TXEN|RXCIE) ; enable tx at uart control register

ldi r16, 0x7C
out DDRD, r16

ldi r17, 4

ldi r16, 5
out TCCR1B, r16

ldi r16, (1<<TOIE1)
out TIMSK, r16

sei

MAIN:
rjmp MAIN