mirror of
https://gitlab.com/xCrystal/pokecrystal-board.git
synced 2024-11-16 11:27:33 -08:00
36 lines
637 B
NASM
36 lines
637 B
NASM
_DeleteSaveData:
|
|
farcall BlankScreen
|
|
ld b, CGB_DIPLOMA
|
|
call GetCGBLayout
|
|
call LoadStandardFont
|
|
call LoadFrame
|
|
ld de, MUSIC_MAIN_MENU
|
|
call PlayMusic
|
|
ld hl, .ClearAllSaveDataText
|
|
call PrintText1bpp
|
|
ld hl, .NoYesMenuHeader
|
|
call CopyMenuHeader
|
|
call VerticalMenu
|
|
ret c
|
|
ld a, [wMenuCursorY]
|
|
cp 1
|
|
ret z
|
|
farcall EmptyAllSRAMBanks
|
|
ret
|
|
|
|
.ClearAllSaveDataText:
|
|
text_far _ClearAllSaveDataText
|
|
text_end
|
|
|
|
.NoYesMenuHeader:
|
|
db 0 ; flags
|
|
menu_coords 14, 7, SCREEN_WIDTH - 1, TEXTBOX_Y - 1
|
|
dw .MenuData
|
|
db 1 ; default option
|
|
|
|
.MenuData:
|
|
db STATICMENU_CURSOR | STATICMENU_NO_TOP_SPACING ; flags
|
|
db 2 ; items
|
|
db "NO@"
|
|
db "YES@"
|