pokehacks/pokecrystal-board
0
0
Fork 0
mirror of https://gitlab.com/xCrystal/pokecrystal-board.git synced 2025-04-09 05:44:44 -07:00
Code Issues Packages Projects Releases Wiki Activity

Level selection menu: entry transition events (#12) (#35) [commit 4/4]

Browse Source
This commit is contained in:
xCrystal
2024-02-04 14:23:58 +01:00
parent d3b397fd37
commit 5005ca7bd0
7 changed files with 185 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
engine/menus/game_menu.asm
View File

@@ -155,9 +155,8 @@ GameMenu_WorldMap:
cp CLEARED_LEVEL
jr nz, .save_and_return
; if CLEARED_LEVEL:
; show post-level screen, clear level, unlock levels, advance ToD, request appropriate LSM events
; show post-level screen, clear level, unlock levels, request appropriate LSM events
farcall ClearedLevelScreen
call AdvanceTimeOfDay
ld hl, wLevelSelectionMenuEntryEventQueue
set LSMEVENT_ANIMATE_TIME_OF_DAY, [hl]
ld a, [wLastUnlockedLevelsCount]

90
engine/menus/level_selection_menu.asm
View File

@@ -118,6 +118,89 @@ LevelSelectionMenu::
call LevelSelectionMenu_DrawStageTrophies
call LevelSelectionMenu_RefreshTextboxAttrs
ld a, [wLevelSelectionMenuEntryEventQueue]
bit LSMEVENT_ANIMATE_TIME_OF_DAY, a
jp z, .main_loop
call LevelSelectionMenu_Delay10Frames
ld bc, SPRITEOAMSTRUCT_LENGTH
ld e, 3 * TILE_WIDTH
.tod_symbol_upwards_loop
farcall PlaySpriteAnimationsAndDelayFrame
ld hl, wShadowOAM + $4 * SPRITEOAMSTRUCT_LENGTH + SPRITEOAMSTRUCT_YCOORD
dec [hl]
add hl, bc
dec [hl]
add hl, bc
dec [hl]
add hl, bc
dec [hl]
dec e
jr nz, .tod_symbol_upwards_loop
ld a, [wTimeOfDay]
ld [wLevelSelectionMenuStartingToD], a
cp NITE_F
ld e, -4
jr z, .change_tod_symbol
cp EVE_F
ld e, -2
jr z, .change_tod_symbol
cp DAY_F
ld e, 4
jr z, .change_tod_symbol
ld e, 2
.change_tod_symbol
ld hl, wShadowOAM + $4 * SPRITEOAMSTRUCT_LENGTH + SPRITEOAMSTRUCT_TILE_ID
ld bc, SPRITEOAMSTRUCT_LENGTH
ld d, 2 * 2
.change_tod_symbol_loop
ld a, [hl]
add e
ld [hl], a
add hl, bc
dec d
jr nz, .change_tod_symbol_loop
call AdvanceTimeOfDay
xor a
ld [wLevelSelectionMenuToDFadeStep], a
ld b, CGB_LEVEL_SELECTION_MENU_TOD_CHANGE
call GetCGBLayout
call LevelSelectionMenu_Delay4Frames
ld a, 1
ld [wLevelSelectionMenuToDFadeStep], a
ld b, CGB_LEVEL_SELECTION_MENU_TOD_CHANGE
call GetCGBLayout
call LevelSelectionMenu_Delay4Frames
ld a, 2
ld [wLevelSelectionMenuToDFadeStep], a
ld b, CGB_LEVEL_SELECTION_MENU_TOD_CHANGE
call GetCGBLayout
call LevelSelectionMenu_Delay4Frames
ld a, 3
ld [wLevelSelectionMenuToDFadeStep], a
ld b, CGB_LEVEL_SELECTION_MENU_TOD_CHANGE
call GetCGBLayout
ld bc, SPRITEOAMSTRUCT_LENGTH
ld e, 3 * TILE_WIDTH
.tod_symbol_downwards_loop
farcall PlaySpriteAnimationsAndDelayFrame
ld hl, wShadowOAM + $4 * SPRITEOAMSTRUCT_LENGTH + SPRITEOAMSTRUCT_YCOORD
inc [hl]
add hl, bc
inc [hl]
add hl, bc
inc [hl]
add hl, bc
inc [hl]
dec e
jr nz, .tod_symbol_downwards_loop
.main_loop
farcall PlaySpriteAnimations
call DelayFrame
@@ -1030,13 +1113,16 @@ LevelSelectionMenu_GetNewPage:
ld a, 1
ret
LevelSelectionMenu_Delay4Frames:
ld a, 4
jr LevelSelectionMenu_Delay10Frames.loop
LevelSelectionMenu_Delay10Frames:
; Delay 10 frames while playing sprite anims
ld a, 10
.loop
push af
farcall PlaySpriteAnimations
call DelayFrame
farcall PlaySpriteAnimationsAndDelayFrame
pop af
dec a
jr nz, .loop