.include "m644def.inc"			;Datei fuer µC
.def temp = r20					;eine Direktive definieren

.org 0x000						;Startadresse des Programms
	rjmp main					;bei Reset Interruptvektoren überspringen
.org INT0addr						;nicht verwendete Interrupts mit reti auffüllen
	reti
.org INT1addr
	reti
.org INT2addr
	reti
.org PCI0addr
	reti
.org PCI1addr
	reti
.org PCI2addr
	reti
.org PCI3addr
	rjmp taster1





main:							
						
		ldi temp, LOW(RAMEND)	;benötigt für Stack
		out SPL, temp			;benötigt für Stack
		ldi temp, HIGH(RAMEND)	;benötigt für Stack
		out SPH, temp			;benötigt für Stack


		ldi r16, 0xFF			;Port A komplett auf Ausgang
		out DDRA, r16			;
		
		ldi r16, 0xFF			;Port B komplett auf Ausgang
		out DDRB, r16

		ldi r16, 0b11111100		;Port C 0-1 Eingang, 2-7 Ausgang
		out DDRC, r16			
		
		ldi r16, 0b00000011		;Port C 0-1 mit Pullup + Ausgänge 2-7 auf 0 setzen (Initialzustand)
		out PORTC, r16

		ldi r16, 0b00000000		;Port D komplett als Eingang
		out DDRD, r16
		
		ldi r16, 0b11111110		;Port D alle Pins mit Pullup
		out PORTD, r16	
		
		ldi r17, (1<<PCINT24)		;Auswahl des entsprechenden Pins, hier PORTD,0 = PCINT24, für Pinchange,
		sts PCMSK3, r17			;durch setzen einer 1 für den entsprechenden Pin im PCMSKx-Register
			
		ldi r17, (1<<PCIE3)		;Aktivieren des Interrupts für den zugehörigen Vektor, durch setzen des entsprechenden
		sts	PCICR, r17		;Bits, hier PCIE3, im PCICR-Register

		sei				;globales Interruptflag aktivieren
		
		jmp attractmodus
		
taster1:
		in r19, PIND			;Port D einlesen
		sbrs r19,0
		jmp taster1aus
		sbi PORTA, 2			;Transistor 1 anschalten
		sbi PORTB, 4			;Transistor 2 anschalten
		sbi PORTC, 2			;Transistor 3 anschalten
		reti					;Rücksprung

taster1aus:
		cbi PORTA, 2			;Transistor 1 ausschalten
		cbi PORTB, 4			;Transistor 2 ausschalten
		cbi PORTC, 2			;Transistor 3 ausschalten
		reti

attractmodus:					;Permanente Endlosschleife
												
		jmp attractmodus		;Schleife des Attractmodus