src/example/spectrum.asm


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

	; Simple example spectrum code
	;
	; To use:
	;
	; LOAD "" CODE
	; RANDOMIZE USR 32768
	;

	option	output-file,spectrum.tap
	option	output-format,spectrum
	option	+spectrum-loader
	option	spectrum-start,start

start:	org 32768

	ld	a,0
loop:
	out	($fe), a
	inc	a
	and	7
	jp	loop