09-loop.lst

ATTRIBUTE_ADR	EQU 5800
ENTRY_POINT	EQU 8000
		ORG 8000
8000:		label start
8000:210058	LD HL, 5800
8003:AF		XOR A
8004:47		LD B, A
8005:		label loop
8005:77		LD (HL), A
8006:23		INC HL
8007:3C		INC A
8008:05		DEC B
8009:C20580	JP NZ, 8005
800C:C9		RET
800D:		END 8000
Emiting TAP basic loader
Emiting TAP from 8000 to 800C