mirror of
https://github.com/pret/pokered.git
synced 2024-10-24 15:27:10 +00:00
85 lines
2.2 KiB
NASM
Executable file
85 lines
2.2 KiB
NASM
Executable file
DisplayStartMenu::
|
|
ld a,BANK(StartMenu_Pokedex)
|
|
ld [H_LOADEDROMBANK],a
|
|
ld [MBC1RomBank],a
|
|
ld a,[wWalkBikeSurfState] ; walking/biking/surfing
|
|
ld [wWalkBikeSurfStateCopy],a
|
|
ld a, SFX_START_MENU
|
|
call PlaySound
|
|
|
|
RedisplayStartMenu::
|
|
callba DrawStartMenu
|
|
callba PrintSafariZoneSteps ; print Safari Zone info, if in Safari Zone
|
|
call UpdateSprites
|
|
.loop
|
|
call HandleMenuInput
|
|
ld b,a
|
|
.checkIfUpPressed
|
|
bit 6,a ; was Up pressed?
|
|
jr z,.checkIfDownPressed
|
|
ld a,[wCurrentMenuItem] ; menu selection
|
|
and a
|
|
jr nz,.loop
|
|
ld a,[wLastMenuItem]
|
|
and a
|
|
jr nz,.loop
|
|
; if the player pressed tried to go past the top item, wrap around to the bottom
|
|
CheckEvent EVENT_GOT_POKEDEX
|
|
ld a,6 ; there are 7 menu items with the pokedex, so the max index is 6
|
|
jr nz,.wrapMenuItemId
|
|
dec a ; there are only 6 menu items without the pokedex
|
|
.wrapMenuItemId
|
|
ld [wCurrentMenuItem],a
|
|
call EraseMenuCursor
|
|
jr .loop
|
|
.checkIfDownPressed
|
|
bit 7,a
|
|
jr z,.buttonPressed
|
|
; if the player pressed tried to go past the bottom item, wrap around to the top
|
|
CheckEvent EVENT_GOT_POKEDEX
|
|
ld a,[wCurrentMenuItem]
|
|
ld c,7 ; there are 7 menu items with the pokedex
|
|
jr nz,.checkIfPastBottom
|
|
dec c ; there are only 6 menu items without the pokedex
|
|
.checkIfPastBottom
|
|
cp c
|
|
jr nz,.loop
|
|
; the player went past the bottom, so wrap to the top
|
|
xor a
|
|
ld [wCurrentMenuItem],a
|
|
call EraseMenuCursor
|
|
jr .loop
|
|
.buttonPressed ; A, B, or Start button pressed
|
|
call PlaceUnfilledArrowMenuCursor
|
|
ld a,[wCurrentMenuItem]
|
|
ld [wBattleAndStartSavedMenuItem],a ; save current menu selection
|
|
ld a,b
|
|
and a,%00001010 ; was the Start button or B button pressed?
|
|
jp nz,CloseStartMenu
|
|
call SaveScreenTilesToBuffer2 ; copy background from wTileMap to wTileMapBackup2
|
|
CheckEvent EVENT_GOT_POKEDEX
|
|
ld a,[wCurrentMenuItem]
|
|
jr nz,.displayMenuItem
|
|
inc a ; adjust position to account for missing pokedex menu item
|
|
.displayMenuItem
|
|
cp a,0
|
|
jp z,StartMenu_Pokedex
|
|
cp a,1
|
|
jp z,StartMenu_Pokemon
|
|
cp a,2
|
|
jp z,StartMenu_Item
|
|
cp a,3
|
|
jp z,StartMenu_TrainerInfo
|
|
cp a,4
|
|
jp z,StartMenu_SaveReset
|
|
cp a,5
|
|
jp z,StartMenu_Option
|
|
|
|
; EXIT falls through to here
|
|
CloseStartMenu::
|
|
call Joypad
|
|
ld a,[hJoyPressed]
|
|
bit 0,a ; was A button newly pressed?
|
|
jr nz,CloseStartMenu
|
|
call LoadTextBoxTilePatterns
|
|
jp CloseTextDisplay
|