End space effect (#22)

This commit is contained in:
xCrystal
2023-10-21 18:00:59 +02:00
parent b0e2e7aef3
commit 961d2f0b6e
7 changed files with 70 additions and 7 deletions

View File

@@ -275,9 +275,10 @@ _DoRGBFadeEffect::
RGBFadeEffectJumptable:
; entries correspond to RGBFADE_* constants (see constants/cgb_pal_constants.asm)
table_width 2, RGBFadeEffectJumptable
dw _RGBFadeToBlack_6BGP
dw _RGBFadeToLighter_6BGP
dw _RGBFadeToWhite_6BGP_2OBP
dw _RGBFadeToBlack_6BGP ; RGBFADE_TO_BLACK_6BGP
dw _RGBFadeToLighter_6BGP ; RGBFADE_TO_LIGHTER_6BGP
dw _RGBFadeToWhite_6BGP_2OBP ; RGBFADE_TO_WHITE_6BGP_2OBP
dw _RGBFadeToWhite_8BGP_8OBP ; RGBFADE_TO_WHITE_8BGP_8OBP
assert_table_length NUM_RGB_FADE_EFFECTS
_RGBFadeToBlack_6BGP:
@@ -344,4 +345,35 @@ _RGBFadeToWhite_6BGP_2OBP:
pop bc
dec c
jr nz, .loop
ret
ret
_RGBFadeToWhite_8BGP_8OBP:
ld c, 32 / 2
.loop
push bc
; fade BGP to white
ld de, wBGPals2
ld c, 8 * NUM_PAL_COLORS
call FadeStepColorsToWhite
; commit pals
ld a, TRUE
ldh [hCGBPalUpdate], a
call DelayFrame
; fade OBP to white
ld de, wOBPals2
ld c, 8 * NUM_PAL_COLORS
call FadeStepColorsToWhite
; commit pals and apply delay
ld a, TRUE
ldh [hCGBPalUpdate], a
ld c, 2
call DelayFrames
pop bc
dec c
jr nz, .loop
ret