.include "m16def.inc"

.equ CLOCK = 6000000				;Taktfrequenz für Quarz
.equ BAUD  = 9600					;Baudrate von RS232
.equ UBRRVAL  = CLOCK/(BAUD*16)-1	;Ausrechnen der Baudrate

.def Temp = r16						;Temporäres Register
.def Send = r17


jmp Reset 		;Reset Handler
reti		 	;IRQ0 Handler
reti 			;IRQ1 Handler
reti 			;Timer2 Compare Handler
reti 			;Timer2 Overflow Handler
reti 			;Timer1 Capture Handler
reti			;Timer1 CompareA Handler
reti			;Timer1 CompareB Handler
reti 			;Timer1 Overflow Handler
reti			;Timer0 Overflow Handler
reti			;SPI Transfer Complete Handler
jmp int_rxc		;USART RX Complete Handler
reti			;UDR Empty Handler
reti			;USART TX Complete Handler
reti			;ADC Conversion Complete Handler
reti			;EEPROM Ready Handler
reti			;Analog Comparator Handle



Reset:
	ldi Temp, LOW(RAMEND)   
    out SPL, Temp       	;Setzt Stackpointer LowByte
    ldi Temp, HIGH(RAMEND)   
    out SPH, Temp       	;Setzt Stackpointer HighByte


	ldi	Temp,UBRRVAL		;Baudrate einstellen
	out	UBRR,Temp

	ldi Temp, (1<<URSEL)|(1<<USBS)|(3<<UCSZ0)
    out UCSRC, Temp

	ldi Temp, (1<<RXEN)|(1<<RXCIE)(1<<TXEN)
    out UCSRB,Temp

	ldi Temp,0xFF	 	
	out DDRB, Temp          ;PORTB  als Ausgang (LED) konfigurieren

sei




;******* Hauptprogramm macht nichts **************************************************
Main:
	NOP
			   
	rjmp Main
;******* Hauptprogramm macht nichts **************************************************




;******* Empfangen von PC-Terminal ***************************************************
int_rxc:
	in	Temp,SREG			 ;CPU-Status sichern
	push Temp                ;temp auf dem Stack sichern
   	in Send, UDR             ;später Wert ausgeben
	out PORTB, Send
   	pop Temp      
	out sreg, Temp           ;CPU-Status aus dem Stack wieder herstellen

	rcall SerOut
reti  
;******* Empfangen von PC-Terminal ***************************************************




;******* Zeichen an PC senden *********************************************************
SerOut:
	sbis UCSRA,UDRE     ;Warten bis UDR für das Byte bereit ist
    rjmp Serout
    out UDR, Send
ret 
;******* Zeichen an PC senden *********************************************************