.nolist
.include "m2560def.inc"
.list
;
.equ fq = 1000 				; frequenz auf 1k Hz festlegen
;
;
.def qmp = R16				; R16 entspricht ab jetzt qmp
;
ldi qmp,0xFF				; lade 255 in qmp
out DDRA,qmp 				;festlegen von Port a als ausgang
out DDRD,qmp				;festlegen von Port d als ausgang
;
;
loop:
	ldi R17,0xFF			; lade 255 in R17
	out PORTA,R17			; gebe 255 in Port a aus
	ldi R18,0b00001000			; lade 6 in R17
	out PORTD,R18			; gebe 6 in Port d aus
	rjmp loop				; springe zurrück zu loop