mirror of
https://github.com/pret/pokered.git
synced 2024-10-23 06:58:24 +00:00
23 lines
437 B
NASM
Executable file
23 lines
437 B
NASM
Executable file
DoClearSaveDialogue:
|
|
call ClearScreen
|
|
call RunDefaultPaletteCommand
|
|
call LoadFontTilePatterns
|
|
call LoadTextBoxTilePatterns
|
|
ld hl, ClearSaveDataText
|
|
call PrintText
|
|
coord hl, 14, 7
|
|
lb bc, 8, 15
|
|
ld a, NO_YES_MENU
|
|
ld [wTwoOptionMenuID], a
|
|
ld a, TWO_OPTION_MENU
|
|
ld [wTextBoxID], a
|
|
call DisplayTextBoxID
|
|
ld a, [wCurrentMenuItem]
|
|
and a
|
|
jp z, Init
|
|
callba ClearSAV
|
|
jp Init
|
|
|
|
ClearSaveDataText:
|
|
TX_FAR _ClearSaveDataText
|
|
db "@"
|