Minor title screen fixes

This commit is contained in:
mid-kid 2020-08-03 22:55:50 +02:00
parent e59b08ce85
commit 58b45443e8
2 changed files with 7 additions and 10 deletions

View File

@ -969,7 +969,7 @@ IntroSequence:
StartTitleScreen: StartTitleScreen:
ldh a, [rSVBK] ldh a, [rSVBK]
push af push af
ld a, BANK(wBGPals1) ld a, BANK(wLYOverrides)
ldh [rSVBK], a ldh [rSVBK], a
call .TitleScreen call .TitleScreen

View File

@ -74,7 +74,7 @@ _TitleScreen:
; 'CRYSTAL VERSION' ; 'CRYSTAL VERSION'
hlbgcoord 5, 9 hlbgcoord 5, 9
ld bc, NAME_LENGTH ; length of version text ld bc, 11 ; length of version text
ld a, 1 ld a, 1
call ByteFill call ByteFill
@ -85,7 +85,7 @@ _TitleScreen:
call ByteFill call ByteFill
; Back to VRAM bank 0 ; Back to VRAM bank 0
ld a, $0 ld a, 0
ldh [rVBK], a ldh [rVBK], a
; Decompress logo ; Decompress logo
@ -108,14 +108,14 @@ _TitleScreen:
hlcoord 0, 3 hlcoord 0, 3
lb bc, 7, 20 lb bc, 7, 20
ld d, $80 ld d, $80
ld e, $14 ld e, 20
call DrawTitleGraphic call DrawTitleGraphic
; Draw copyright text ; Draw copyright text
hlbgcoord 3, 0, vBGMap1 hlbgcoord 3, 0, vBGMap1
lb bc, 1, 13 lb bc, 1, 13
ld d, $c ld d, $c
ld e, $10 ld e, 16
call DrawTitleGraphic call DrawTitleGraphic
; Initialize running Suicune? ; Initialize running Suicune?
@ -125,14 +125,12 @@ _TitleScreen:
; Initialize background crystal ; Initialize background crystal
call InitializeBackground call InitializeBackground
; Save WRAM bank ; Update palette colors
ldh a, [rSVBK] ldh a, [rSVBK]
push af push af
; WRAM bank 5
ld a, BANK(wBGPals1) ld a, BANK(wBGPals1)
ldh [rSVBK], a ldh [rSVBK], a
; Update palette colors
ld hl, TitleScreenPalettes ld hl, TitleScreenPalettes
ld de, wBGPals1 ld de, wBGPals1
ld bc, 16 palettes ld bc, 16 palettes
@ -143,7 +141,6 @@ _TitleScreen:
ld bc, 16 palettes ld bc, 16 palettes
call CopyBytes call CopyBytes
; Restore WRAM bank
pop af pop af
ldh [rSVBK], a ldh [rSVBK], a
@ -201,7 +198,7 @@ _TitleScreen:
ld a, -112 ld a, -112
ldh [hWY], a ldh [hWY], a
ld a, $1 ld a, 1
ldh [hCGBPalUpdate], a ldh [hCGBPalUpdate], a
; Update BG Map 0 (bank 0) ; Update BG Map 0 (bank 0)