; Brief custom boot splash shown on the fastboot path. Loads a real 2bpp
; graphic (gfx/slop/intro.png -> tiles+tilemap via rgbgfx) into VRAM and holds
; it, then MainMenu's autoload continues into the game.

DEF SLOP_INTRO_NUM_TILES EQU 164

SECTION "Slop Intro", ROMX

SlopSplash::
	call ClearScreen
; load the custom tiles into the 0x8000 block (unsigned addressing)
	ld hl, vChars0
	ld de, SlopIntroTiles
	ld b, BANK(SlopIntroTiles)
	ld c, SLOP_INTRO_NUM_TILES
	call CopyVideoData
	ldh a, [rLCDC]
	or LCDC_BLOCK01                    ; BG/window tile data at 0x8000
	ldh [rLCDC], a
; blit the 20x18 tilemap through wTileMap so the 20->32 row stride is handled.
; Use the BG map (vBGMap0): the map load on continue overwrites it, so nothing
; is left corrupting the overworld (unlike the window map vBGMap1).
	ld hl, SlopIntroTilemap
	ld de, wTileMap
	ld bc, SlopIntroTilemapEnd - SlopIntroTilemap
	call CopyData
	ld b, HIGH(vBGMap0)
	call CopyScreenTileBufferToVRAM
	xor a
	ldh [hSCX], a
	ldh [hSCY], a
	ld a, LCDC_ON | LCDC_BLOCK01 | LCDC_BG_9800 | LCDC_BG_ON ; BG only, tiles @0x8000
	ldh [rLCDC], a
	call GBPalNormal
	ld c, 120                          ; ~2 seconds
	call DelayFrames
	call GBFadeOutToWhite
; restore the default LCDC so the overworld renders correctly: signed tile data
; (BLOCK21) for the BG *and* OBJ back on so entity sprites reappear
	ld a, LCDC_DEFAULT
	ldh [rLCDC], a
	ret

SlopIntroTiles:
	INCBIN "gfx/slop/intro.2bpp"
SlopIntroTilesEnd:

SlopIntroTilemap:
	INCBIN "gfx/slop/intro.tilemap"
SlopIntroTilemapEnd: