ld bc,0xbf77
	ld a,0x03
	out (c),a
	ld hl,palette + 15
	ld bc,0x07ff
f6_loop
	ld a,b
	out (0xf6),a
	outd
	or a
	jr nz,f6_loop
	ld bc,0x07ff
fe_loop
	ld a,b
	out (0xfe),a
	outd
	or a
	jr nz,fe_loop