src/ubox/ubox_set_tiles_colors.z80


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

.globl _ubox_set_tiles_colors

LDIRVM = 0x005c

_ubox_set_tiles_colors::
	ld de, #0x2000
	ld bc, #256 * 8
	push hl
	call LDIRVM
	pop hl

	ld de, #0x2000 + 256  * 8
	ld bc, #256 * 8
	push hl
	call LDIRVM
	pop hl

	ld de, #0x2000 + 256  * 8 * 2
	ld bc, #256 * 8
	jp LDIRVM