mirror of https://github.com/pret/pokecrystal.git
37 lines
702 B
NASM
37 lines
702 B
NASM
|
_DeleteSaveData: ; 4d54c
|
||
|
farcall BlankScreen
|
||
|
ld b, SCGB_DIPLOMA
|
||
|
call GetSGBLayout
|
||
|
call LoadStandardFont
|
||
|
call LoadFontsExtra
|
||
|
ld de, MUSIC_MAIN_MENU
|
||
|
call PlayMusic
|
||
|
ld hl, .Text_ClearAllSaveData
|
||
|
call PrintText
|
||
|
ld hl, .NoYesMenuHeader
|
||
|
call CopyMenuHeader
|
||
|
call VerticalMenu
|
||
|
ret c
|
||
|
ld a, [wMenuCursorY]
|
||
|
cp $1
|
||
|
ret z
|
||
|
farcall EmptyAllSRAMBanks
|
||
|
ret
|
||
|
|
||
|
.Text_ClearAllSaveData: ; 0x4d580
|
||
|
; Clear all save data?
|
||
|
text_jump UnknownText_0x1c564a
|
||
|
db "@"
|
||
|
|
||
|
.NoYesMenuHeader: ; 0x4d585
|
||
|
db 0 ; flags
|
||
|
menu_coords 14, 7, SCREEN_WIDTH - 1, TEXTBOX_Y - 1
|
||
|
dw .MenuData
|
||
|
db 1 ; default option
|
||
|
|
||
|
.MenuData: ; 0x4d58d
|
||
|
db STATICMENU_CURSOR | STATICMENU_NO_TOP_SPACING ; flags
|
||
|
db 2 ; items
|
||
|
db "NO@"
|
||
|
db "YES@"
|