.include "m32def.inc"





.def temp1 	 	= r16

.def temp2	 	= r17

.def temp3	 	= r18

	





.CSEG 			; Hier beginnt das Code-Segment

.ORG 0000 		; Die Adresse auf Null

    

	rjmp RESET 			; Reset Handler

	reti; EXT_INT0 		; IRQ0 Handler

	reti; EXT_INT1 		; IRQ1 Handler

	rjmp EXT_INT2 		; IRQ2 Handler

	reti; TIM2_COMP		; Timer2 Compare Handler

	reti; TIM2_OVF 		; Timer2 Overflow Handler

	reti; TIM1_CAPT		; Timer1 Capture Handler

	reti; TIM1_COMPA 	; Timer1 CompareA Handler

	reti; TIM1_COMPB 	; Timer1 CompareB Handler

	reti; TIM1_OVF 		; Timer1 Overflow Handler

	reti; TIM0_COMP 	; Timer0 Compare Handler

	reti; TIM0_OVF 		; Timer0 Overflow Handler

	reti; SPI_STC 		; SPI Transfer Complete Handler

	reti; USART_RXC 	; USART RX Complete Handler

	reti; USART_UDRE 	; UDR Empty Handler

	reti; USART_TXC 	; USART TX Complete Handler

	reti; ADC 			; ADC Conversion Complete Handler

	reti; EE_RDY 		; EEPROM Ready Handler

	reti; ANA_COMP 		; Analog Comparator Handler

	reti; TWI 			; Two-wire Serial Interface Handler

	reti; SPM_RDY 		; Store Program Memory Ready Handler





;************************************INITIALISIERUNG***********************************	;

RESET: 

 	

	ldi r16,high(RAMEND) 	

	out SPH,r16 			;Set Stack Pointer to top of RAM

	ldi r16,low(RAMEND)

	out SPL,r16

	

	in  r16, MCUCSR

	andi r16, 0b10111111

	out MCUCSR, r16			;INT2 auf falling edge einstellen



	in  r16, GICR

	ori r16, 0b00100000

	out GICR, r16			;INT2 aktivieren

	

	sei 					;Enable interrupts, I-Flag im SREG



	ldi r16,0b11000000

	out ddrb, r16			;Datadirection für PORT B

	ldi r16, 0b11000000		;LEDs on

	out portb, r16



	ldi r16,0xff

	out ddra, r16			;Datadirection für PORT A nur ausgang

	out ddrd, r16			;Datadirection für PORT D nur ausgang



	rcall lcd_init			;LC-Display initialisieren

	

	ldi r20, 0x00			;r20 vorsichtshalber löschen

	rjmp MAIN





EXT_INT2:



	ldi temp1, 0b00000000

	out portb, temp1		;LEDs ausschalten

	inc r20

	ldi temp1, 0b11000000	;Cursor einstellen auf Dislpay 1 Zeile 1 Feld 0

	rcall lcd_command

	mov temp1, r20

	ori temp1, 0b00110000	

	rcall lcd_data

	reti



MAIN:

	

	ldi ZL, LOW(text1*2)						

    ldi ZH, HIGH(text1*2)   ;String ausgeben

	rcall strout	

	

;	ldi temp1, 0b11000000	;Cursor einstellen auf Dislpay 1 Zeile 2 Feld 0

;	rcall lcd_command

;	ldi ZL, LOW(text2*2)						

;   ldi ZH, HIGH(text2*2)   ;String ausgeben

;	rcall strout

	

loop:



	in temp1, pinb			;Polling von PORT B

	out pind, temp1	

	

	rjmp loop 





text1:

.db "Servus!",0



text2:

.db "Villamos!",0



.include "lcd-routine.asm"