#include "tn13def.inc"

		ldi r16,0b00011110		; Pull-Up an allen Tasten einschalten
		out portb,r16

warte:
		in r16,pinb			; Tasten abfragen
		com r16				; alle Bits umkehren 0<->1
		andi r16,0b00011110		; nur die Bits von den 4 Tasten herausfiltern
		breq warte			; Nochmal von vorne, wenn keine Taste gedrückt
		cbi portb,1			; Port B1 auf Low = Led1 an
		sbi ddrb,1			; Port B1 ist Ausgang

ende:	rjmp ende