scene.org File Archive

File download

<root>­/­parties­/­2023­/­lovebyte23­/­16_byte_intro_oldschool/caleidoscope.zip

File size:
22 630 bytes (22.10K)
File date:
2023-02-14 22:56:03
Download count:
all-time: 14

Preview

  • Caleidoscoop/Caleido.lst 1.35K
  • Caleidoscoop/Caleido.p 16B
  • Caleidoscoop/Caleido.png 30.31K
  • Caleidoscoop/caleido.tap 89B
  • Caleidoscoop/Caleido.txt 303B
  • Caleidoscoop/compile.bat 268B

file_id.diz

		org	49152

; Caleidoscope

loop	ld	d,$59		; point to mid of screen
	ld	a,h		; keep HL in 8K ROM
	and	#1f
	ld 	h,a
	out	(254),a		; also border as caleido
	inc	l		; delay repeating pattern 
	inc	l		; 1 write = 3 changes
	ldi			; set colour
delay	djnz	delay		; delay
	jr	loop		; next field