mirror of https://github.com/pret/pokecrystal.git
1243 lines
18 KiB
NASM
Executable File
1243 lines
18 KiB
NASM
Executable File
GFX_49c0c: ; 49c0c
|
|
INCBIN "gfx/unknown/049c0c.2bpp"
|
|
; 49cdc
|
|
|
|
MainMenu: ; 49cdc
|
|
xor a
|
|
ld [wc2d7], a
|
|
call Function49ed0
|
|
ld b, SCGB_08
|
|
call GetSGBLayout
|
|
call SetPalettes
|
|
ld hl, GameTimerPause
|
|
res 0, [hl]
|
|
call Function49da4
|
|
ld [wcf76], a
|
|
call Function49e09
|
|
ld hl, MenuDataHeader_0x49d14
|
|
call LoadMenuDataHeader
|
|
call Function49de4
|
|
call WriteBackup
|
|
jr c, .quit
|
|
call ClearTileMap
|
|
ld a, [MenuSelection]
|
|
ld hl, Jumptable_49d60
|
|
rst JumpTable
|
|
jr MainMenu
|
|
|
|
.quit
|
|
ret
|
|
; 49d14
|
|
|
|
MenuDataHeader_0x49d14: ; 49d14
|
|
db $40 ; flags
|
|
db 00, 00 ; start coords
|
|
db 07, 16 ; end coords
|
|
dw MenuData2_0x49d1c
|
|
db 1 ; default option
|
|
; 49d1c
|
|
|
|
MenuData2_0x49d1c: ; 49d1c
|
|
db $80 ; flags
|
|
db 0 ; items
|
|
dw MainMenuItems
|
|
dw Function1f79
|
|
dw MainMenuText
|
|
; 49d20
|
|
|
|
MainMenuText: ; 49d24
|
|
db "CONTINUE@"
|
|
db "NEW GAME@"
|
|
db "OPTION@"
|
|
db "MYSTERY GIFT@"
|
|
db "MOBILE@"
|
|
db "MOBILE STUDIUM@"
|
|
|
|
Jumptable_49d60: ; 0x49d60
|
|
dw MainMenu_Continue
|
|
dw MainMenu_NewGame
|
|
dw MainMenu_Options
|
|
dw MainMenu_MysteryGift
|
|
dw MainMenu_Mobile
|
|
dw MainMenu_MobileStudium
|
|
; 0x49d6c
|
|
|
|
CONTINUE EQU 0
|
|
NEW_GAME EQU 1
|
|
OPTION EQU 2
|
|
MYSTERY_GIFT EQU 3
|
|
MOBILE EQU 4
|
|
MOBILE_STUDIUM EQU 5
|
|
|
|
MainMenuItems:
|
|
|
|
NewGameMenu: ; 0x49d6c
|
|
db 2
|
|
db NEW_GAME
|
|
db OPTION
|
|
db $ff
|
|
|
|
ContinueMenu: ; 0x49d70
|
|
db 3
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db $ff
|
|
|
|
MobileMysteryMenu: ; 0x49d75
|
|
db 5
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db MYSTERY_GIFT
|
|
db MOBILE
|
|
db $ff
|
|
|
|
MobileMenu: ; 0x49d7c
|
|
db 4
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db MOBILE
|
|
db $ff
|
|
|
|
MobileStudiumMenu: ; 0x49d82
|
|
db 5
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db MOBILE
|
|
db MOBILE_STUDIUM
|
|
db $ff
|
|
|
|
MysteryMobileStudiumMenu: ; 0x49d89
|
|
db 6
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db MYSTERY_GIFT
|
|
db MOBILE
|
|
db MOBILE_STUDIUM
|
|
db $ff
|
|
|
|
MysteryMenu: ; 0x49d91
|
|
db 4
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db MYSTERY_GIFT
|
|
db $ff
|
|
|
|
MysteryStudiumMenu: ; 0x49d97
|
|
db 5
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db MYSTERY_GIFT
|
|
db MOBILE_STUDIUM
|
|
db $ff
|
|
|
|
StudiumMenu: ; 0x49d9e
|
|
db 4
|
|
db CONTINUE
|
|
db NEW_GAME
|
|
db OPTION
|
|
db MOBILE_STUDIUM
|
|
db $ff
|
|
|
|
|
|
Function49da4: ; 49da4
|
|
nop
|
|
nop
|
|
nop
|
|
ld a, [wSaveFileExists]
|
|
and a
|
|
jr nz, .next
|
|
ld a, $0
|
|
ret
|
|
|
|
.next
|
|
ld a, [hCGB]
|
|
cp $1
|
|
ld a, $1
|
|
ret nz
|
|
ld a, BANK(s0_abe5)
|
|
call GetSRAMBank
|
|
ld a, [s0_abe5]
|
|
cp $ff
|
|
call CloseSRAM
|
|
jr nz, .done
|
|
ld a, [StatusFlags]
|
|
bit 7, a
|
|
ld a, $1
|
|
jr z, .ok
|
|
jr .ok
|
|
|
|
.ok
|
|
jr .ok2
|
|
|
|
.ok2
|
|
ld a, $1
|
|
ret
|
|
|
|
.done
|
|
ld a, [StatusFlags]
|
|
bit 7, a
|
|
jr z, .ok3
|
|
jr .ok3
|
|
|
|
.ok3
|
|
jr .ok4
|
|
|
|
.ok4
|
|
ld a, $6
|
|
ret
|
|
; 49de4
|
|
|
|
Function49de4: ; 49de4
|
|
call SetUpMenu
|
|
.asm_49de7
|
|
call Function49e09
|
|
ld a, [wcfa5]
|
|
set 5, a
|
|
ld [wcfa5], a
|
|
call Function1f1a
|
|
ld a, [wcf73]
|
|
cp $2
|
|
jr z, .asm_49e07
|
|
cp $1
|
|
jr z, .asm_49e02
|
|
jr .asm_49de7
|
|
|
|
.asm_49e02
|
|
call PlayClickSFX
|
|
and a
|
|
ret
|
|
|
|
.asm_49e07
|
|
scf
|
|
ret
|
|
; 49e09
|
|
|
|
Function49e09: ; 49e09
|
|
ld a, [wSaveFileExists]
|
|
and a
|
|
ret z
|
|
xor a
|
|
ld [hBGMapMode], a
|
|
call Function49e27
|
|
ld hl, Options
|
|
ld a, [hl]
|
|
push af
|
|
set 4, [hl]
|
|
call Function49e3d
|
|
pop af
|
|
ld [Options], a
|
|
ld a, $1
|
|
ld [hBGMapMode], a
|
|
ret
|
|
; 49e27
|
|
|
|
|
|
Function49e27: ; 49e27
|
|
call Function6e3
|
|
and $80
|
|
jr nz, .asm_49e39
|
|
hlcoord 0, 14
|
|
ld b, $2
|
|
ld c, $12
|
|
call TextBox
|
|
ret
|
|
|
|
.asm_49e39
|
|
call SpeechTextBox
|
|
ret
|
|
; 49e3d
|
|
|
|
|
|
Function49e3d: ; 49e3d
|
|
ld a, [wSaveFileExists]
|
|
and a
|
|
ret z
|
|
call Function6e3
|
|
and $80
|
|
jp nz, Function49e75
|
|
call UpdateTime
|
|
call GetWeekday
|
|
ld b, a
|
|
decoord 1, 15
|
|
call Function49e91
|
|
decoord 4, 16
|
|
ld a, [hHours]
|
|
ld c, a
|
|
callba PrintHour
|
|
ld [hl], ":"
|
|
inc hl
|
|
ld de, hMinutes
|
|
lb bc, PRINTNUM_LEADINGZEROS | 1, 2
|
|
call PrintNum
|
|
ret
|
|
; 49e70
|
|
|
|
; 49e70
|
|
db "min.@"
|
|
; 49e75
|
|
|
|
Function49e75: ; 49e75
|
|
hlcoord 1, 14
|
|
ld de, .TimeNotSet
|
|
call PlaceString
|
|
ret
|
|
; 49e7f
|
|
|
|
.TimeNotSet ; 49e7f
|
|
db "TIME NOT SET@"
|
|
; 49e8c
|
|
|
|
UnknownText_0x49e8c: ; 49e8c
|
|
text_jump UnknownText_0x1c5182
|
|
db "@"
|
|
; 49e91
|
|
|
|
Function49e91: ; 49e91
|
|
push de
|
|
ld hl, .Days
|
|
ld a, b
|
|
call GetNthString
|
|
ld d, h
|
|
ld e, l
|
|
pop hl
|
|
call PlaceString
|
|
ld h, b
|
|
ld l, c
|
|
ld de, .Day
|
|
call PlaceString
|
|
ret
|
|
; 49ea8
|
|
|
|
.Days
|
|
db "SUN@"
|
|
db "MON@"
|
|
db "TUES@"
|
|
db "WEDNES@"
|
|
db "THURS@"
|
|
db "FRI@"
|
|
db "SATUR@"
|
|
.Day
|
|
db "DAY@"
|
|
; 49ed0
|
|
|
|
Function49ed0: ; 49ed0
|
|
xor a
|
|
ld [hMapAnims], a
|
|
call ClearTileMap
|
|
call LoadFontsExtra
|
|
call LoadStandardFont
|
|
call ResetTextRelatedRAM
|
|
ret
|
|
; 49ee0
|
|
|
|
|
|
MainMenu_NewGame: ; 49ee0
|
|
callba NewGame
|
|
ret
|
|
; 49ee7
|
|
|
|
MainMenu_Options: ; 49ee7
|
|
callba OptionsMenu
|
|
ret
|
|
; 49eee
|
|
|
|
MainMenu_Continue: ; 49eee
|
|
callba Continue
|
|
ret
|
|
; 49ef5
|
|
|
|
MainMenu_MysteryGift: ; 49ef5
|
|
callba MysteryGift
|
|
ret
|
|
; 49efc
|
|
|
|
MainMenu_Mobile: ; 49efc
|
|
call ClearBGPalettes
|
|
ld a, MUSIC_MOBILE_ADAPTER_MENU
|
|
ld [wMapMusic], a
|
|
ld de, MUSIC_MOBILE_ADAPTER_MENU
|
|
call Function4a6c5
|
|
Function49f0a: ; 49f0a
|
|
call ClearBGPalettes
|
|
call Function4a3a7
|
|
call Function4a492
|
|
call ClearBGPalettes
|
|
Function49f16: ; 49f16
|
|
call Function4a071
|
|
ld c, 12
|
|
call DelayFrames
|
|
hlcoord 4, 0
|
|
ld b, $a
|
|
ld c, $a
|
|
call Function48cdc
|
|
hlcoord 6, 2
|
|
ld de, MobileString1
|
|
call PlaceString
|
|
hlcoord 0, 12
|
|
ld b, $4
|
|
ld c, $12
|
|
call TextBox
|
|
xor a
|
|
ld de, String_0x49fe9
|
|
hlcoord 1, 14
|
|
call PlaceString
|
|
call Function3200
|
|
call SetPalettes
|
|
call Function1bc9
|
|
ld hl, MenuSelection2
|
|
ld b, [hl]
|
|
push bc
|
|
jr .asm_49f5d
|
|
|
|
.asm_49f55
|
|
call Function1bd3
|
|
ld hl, MenuSelection2
|
|
ld b, [hl]
|
|
push bc
|
|
|
|
.asm_49f5d
|
|
bit 0, a
|
|
jr nz, .asm_49f67
|
|
bit 1, a
|
|
jr nz, .asm_49f84
|
|
jr .asm_49f97
|
|
|
|
.asm_49f67
|
|
ld hl, MenuSelection2
|
|
ld a, [hl]
|
|
cp $1
|
|
jp z, Function4a098
|
|
cp $2
|
|
jp z, Function4a0b9
|
|
cp $3
|
|
jp z, Function4a0c2
|
|
cp $4
|
|
jp z, Function4a100
|
|
ld a, $1
|
|
call Function1ff8
|
|
|
|
.asm_49f84
|
|
pop bc
|
|
call ClearBGPalettes
|
|
call ClearTileMap
|
|
ld a, MUSIC_MAIN_MENU
|
|
ld [wMapMusic], a
|
|
ld de, MUSIC_MAIN_MENU
|
|
call Function4a6c5
|
|
ret
|
|
|
|
.asm_49f97
|
|
ld hl, MenuSelection2
|
|
ld a, [hl]
|
|
dec a
|
|
ld hl, MobileStrings2
|
|
call GetNthString
|
|
ld d, h
|
|
ld e, l
|
|
hlcoord 1, 13
|
|
ld b, $4
|
|
ld c, $12
|
|
call ClearBox
|
|
hlcoord 1, 14
|
|
call PlaceString
|
|
jp .asm_49fb7
|
|
|
|
.asm_49fb7
|
|
call Function4a071
|
|
pop bc
|
|
ld hl, MenuSelection2
|
|
ld [hl], b
|
|
ld b, $a
|
|
ld c, $1
|
|
hlcoord 5, 1
|
|
call ClearBox
|
|
jp .asm_49f55
|
|
; 49fcc
|
|
|
|
|
|
MobileString1: ; 49fcc
|
|
db "めいしフ,ルダー"
|
|
next "あいさつ"
|
|
next "プロフィール"
|
|
next "せ", $1e, "い"
|
|
next "もどる"
|
|
db "@"
|
|
; 49fe9
|
|
|
|
|
|
MobileStrings2:
|
|
|
|
String_0x49fe9: ; 49fe9
|
|
db "めいし¯つくったり"
|
|
next "ほぞんしておける フ,ルダーです@"
|
|
; 4a004
|
|
|
|
String_0x4a004: ; 4a004
|
|
db "モバイルたいせんや じぶんのめいしで"
|
|
next "つかう あいさつ¯つくります@"
|
|
; 4a026
|
|
|
|
String_0x4a026: ; 4a026
|
|
db "あなた%じゅうしょや ねんれいの"
|
|
next "せ", $1e, "い¯かえられます@"
|
|
; 4a042
|
|
|
|
String_0x4a042: ; 4a042
|
|
db "モバイルセンター", $1d, "せつぞくするとき"
|
|
next "ひつような こと¯きめます@"
|
|
; 4a062
|
|
|
|
String_0x4a062: ; 4a062
|
|
db "まえ%がめん ", $1d, "もどります"
|
|
next "@"
|
|
; 4a071
|
|
|
|
Function4a071: ; 4a071 (12:6071)
|
|
ld hl, wcfa1
|
|
ld a, $2
|
|
ld [hli], a
|
|
ld a, $5
|
|
ld [hli], a
|
|
ld a, $5
|
|
ld [hli], a
|
|
ld a, $1
|
|
ld [hli], a
|
|
ld [hl], $0
|
|
set 5, [hl]
|
|
inc hl
|
|
xor a
|
|
ld [hli], a
|
|
ld a, $20
|
|
ld [hli], a
|
|
ld a, $1
|
|
add $40
|
|
add $80
|
|
add $2
|
|
ld [hli], a
|
|
ld a, $1
|
|
rept 2
|
|
ld [hli], a
|
|
endr
|
|
ret
|
|
|
|
Function4a098: ; 4a098 (12:6098)
|
|
ld a, $2
|
|
call Function1ff8
|
|
call Function1bee
|
|
call WaitBGMap
|
|
call LoadStandardMenuDataHeader
|
|
callba Function89de0
|
|
call Call_ExitMenu
|
|
call Function49351
|
|
call Function4a485
|
|
pop bc
|
|
jp Function49f16
|
|
|
|
Function4a0b9: ; 4a0b9 (12:60b9)
|
|
ld a, $2
|
|
call Function1ff8
|
|
pop bc
|
|
jp Function4a4c4
|
|
|
|
Function4a0c2: ; 4a0c2 (12:60c2)
|
|
ld a, $2
|
|
call Function1ff8
|
|
ld a, BANK(sPlayerData)
|
|
call GetSRAMBank
|
|
ld hl, sPlayerData + PlayerName - wPlayerData
|
|
ld de, PlayerName
|
|
ld bc, $6
|
|
call CopyBytes
|
|
call CloseSRAM
|
|
callba Function150b9
|
|
ld c, 2
|
|
call DelayFrames
|
|
ld c, $1
|
|
call Function4802f
|
|
push af
|
|
call ClearBGPalettes
|
|
pop af
|
|
and a
|
|
jr nz, .asm_4a0f9
|
|
callba _SaveData
|
|
.asm_4a0f9
|
|
ld c, 5
|
|
call DelayFrames
|
|
jr asm_4a111
|
|
|
|
Function4a100: ; 4a100 (12:6100)
|
|
ld a, $2
|
|
call Function1ff8
|
|
call ClearBGPalettes
|
|
call Function4a13b
|
|
call ClearBGPalettes
|
|
call ClearTileMap
|
|
|
|
asm_4a111: ; 4a111 (12:6111)
|
|
pop bc
|
|
call LoadFontsExtra
|
|
jp Function49f0a
|
|
|
|
Function4a118: ; 4a118 (12:6118)
|
|
ld hl, wcfa1
|
|
ld a, $1
|
|
ld [hli], a
|
|
ld a, $d
|
|
ld [hli], a
|
|
ld a, $3
|
|
ld [hli], a
|
|
ld a, $1
|
|
ld [hli], a
|
|
ld [hl], $0
|
|
set 5, [hl]
|
|
inc hl
|
|
xor a
|
|
ld [hli], a
|
|
ld a, $20
|
|
ld [hli], a
|
|
ld a, $1
|
|
add $2
|
|
ld [hli], a
|
|
ld a, $1
|
|
rept 2
|
|
ld [hli], a
|
|
endr
|
|
ret
|
|
|
|
Function4a13b: ; 4a13b (12:613b)
|
|
call Function4a3a7
|
|
call Function4a492
|
|
call Function4a373
|
|
ld c, 10
|
|
call DelayFrames
|
|
|
|
Function4a149: ; 4a149 (12:6149)
|
|
hlcoord 1, 2
|
|
ld b, $6
|
|
ld c, $10
|
|
call Function48cdc
|
|
hlcoord 3, 4
|
|
ld de, String_4a1ef
|
|
call PlaceString
|
|
hlcoord 0, 12
|
|
ld b, $4
|
|
ld c, $12
|
|
call TextBox
|
|
ld a, [MenuSelection2]
|
|
dec a
|
|
ld hl, Strings_4a23d
|
|
call GetNthString
|
|
ld d, h
|
|
ld e, l
|
|
hlcoord 1, 13
|
|
ld b, $4
|
|
ld c, $12
|
|
call ClearBox
|
|
hlcoord 1, 14
|
|
call PlaceString
|
|
callba Function104148
|
|
call SetPalettes
|
|
call Function1bc9
|
|
ld hl, MenuSelection2
|
|
ld b, [hl]
|
|
push bc
|
|
jr asm_4a19d
|
|
|
|
Function4a195: ; 4a195 (12:6195)
|
|
call Function1bd3
|
|
ld hl, MenuSelection2
|
|
ld b, [hl]
|
|
push bc
|
|
|
|
asm_4a19d: ; 4a19d (12:619d)
|
|
bit 0, a
|
|
jr nz, .asm_4a1a7
|
|
bit 1, a
|
|
jr nz, .asm_4a1ba
|
|
jr .asm_4a1bc
|
|
.asm_4a1a7
|
|
ld hl, MenuSelection2
|
|
ld a, [hl]
|
|
cp $1
|
|
jp z, Function4a20e
|
|
cp $2
|
|
jp z, Function4a221
|
|
ld a, $1
|
|
call Function1ff8
|
|
.asm_4a1ba
|
|
pop bc
|
|
ret
|
|
.asm_4a1bc
|
|
ld hl, MenuSelection2
|
|
ld a, [hl]
|
|
dec a
|
|
ld hl, Strings_4a23d
|
|
call GetNthString
|
|
ld d, h
|
|
ld e, l
|
|
hlcoord 1, 13
|
|
ld b, $4
|
|
ld c, $12
|
|
call ClearBox
|
|
hlcoord 1, 14
|
|
call PlaceString
|
|
jr .asm_4a1db
|
|
.asm_4a1db
|
|
call Function4a373
|
|
pop bc
|
|
ld hl, MenuSelection2
|
|
ld [hl], b
|
|
lb bc, 6, 1
|
|
hlcoord 2, 3
|
|
call ClearBox
|
|
jp Function4a195
|
|
; 4a1ef (12:61ef)
|
|
|
|
String_4a1ef: ; 4a1ef
|
|
db "モバイルセンター¯えらぶ"
|
|
next "ログインパスワード¯いれる"
|
|
next "もどる@"
|
|
; 4a20e
|
|
|
|
Function4a20e: ; 4a20e (12:620e)
|
|
ld a, $1
|
|
call Function1ff8
|
|
callba Function1719c8
|
|
call ClearBGPalettes
|
|
call DelayFrame
|
|
jr Function4a239
|
|
|
|
Function4a221: ; 4a221 (12:6221)
|
|
ld a, $1
|
|
call Function1ff8
|
|
call Function4a28a
|
|
jr c, Function4a239
|
|
call Function4a373
|
|
ld a, $2
|
|
ld [MenuSelection2], a
|
|
jr .asm_4a235
|
|
.asm_4a235
|
|
pop bc
|
|
jp Function4a149
|
|
|
|
Function4a239: ; 4a239 (12:6239)
|
|
pop bc
|
|
jp Function4a13b
|
|
; 4a23d (12:623d)
|
|
|
|
Strings_4a23d: ; 4a23d
|
|
db "いつも せつぞく¯する"
|
|
next "モバイルセンター¯えらびます@"
|
|
|
|
db "モバイルセンター", $1d, "せつぞくするとき"
|
|
next "つかうパスワード¯ほぞんできます@"
|
|
|
|
db "まえ%がめん ", $1d, "もどります@"
|
|
|
|
db "@"
|
|
; 4a28a
|
|
|
|
Function4a28a: ; 4a28a (12:628a)
|
|
hlcoord 2, 3
|
|
lb bc, 6, 1
|
|
ld a, " "
|
|
call Function4a6d8
|
|
call Function1bee
|
|
call WaitBGMap
|
|
call LoadStandardMenuDataHeader
|
|
ld a, $5
|
|
call GetSRAMBank
|
|
ld a, [$aa4b]
|
|
call CloseSRAM
|
|
and a
|
|
jr z, .asm_4a2df
|
|
hlcoord 12, 0
|
|
ld b, $5
|
|
ld c, $6
|
|
call Function48cdc
|
|
hlcoord 14, 1
|
|
ld de, String_4a34b
|
|
call PlaceString
|
|
callba Function104148
|
|
call Function4a118
|
|
call Function1bd3
|
|
push af
|
|
call PlayClickSFX
|
|
pop af
|
|
bit 1, a
|
|
jr nz, .asm_4a33b
|
|
ld a, [MenuSelection2]
|
|
cp $2
|
|
jr z, .asm_4a2f0
|
|
cp $3
|
|
jr z, .asm_4a33b
|
|
.asm_4a2df
|
|
callba Function11765d
|
|
call ClearBGPalettes
|
|
call Call_ExitMenu
|
|
call LoadFontsExtra
|
|
scf
|
|
ret
|
|
.asm_4a2f0
|
|
call Function1bee
|
|
ld hl, UnknownText_0x4a358
|
|
call PrintText
|
|
hlcoord 14, 7
|
|
ld b, $3
|
|
ld c, $4
|
|
call TextBox
|
|
callba Function104148
|
|
ld hl, MenuDataHeader_0x4a362
|
|
call LoadMenuDataHeader
|
|
call InterpretMenu2
|
|
bit 1, a
|
|
jr nz, .asm_4a338
|
|
ld a, [MenuSelection2]
|
|
cp $2
|
|
jr z, .asm_4a338
|
|
ld a, $5
|
|
call GetSRAMBank
|
|
ld hl, $aa4b
|
|
xor a
|
|
ld bc, $11
|
|
call ByteFill
|
|
call CloseSRAM
|
|
ld hl, UnknownText_0x4a35d
|
|
call PrintText
|
|
call JoyWaitAorB
|
|
.asm_4a338
|
|
call ExitMenu
|
|
.asm_4a33b
|
|
call Call_ExitMenu
|
|
callba Function104148
|
|
xor a
|
|
ret
|
|
; 4a346 (12:6346)
|
|
|
|
MenuDataHeader_0x4a346: ; 0x4a346
|
|
db $40 ; flags
|
|
db 00, 12 ; start coords
|
|
db 06, 19 ; end coords
|
|
|
|
String_4a34b: ; 4a34b
|
|
db "いれなおす"
|
|
next "けす"
|
|
next "もどる@"
|
|
; 4a358
|
|
|
|
UnknownText_0x4a358: ; 0x4a358
|
|
; Delete the saved LOG-IN PASSWORD?
|
|
text_jump UnknownText_0x1c5196
|
|
db "@"
|
|
; 0x4a35d
|
|
|
|
UnknownText_0x4a35d: ; 0x4a35d
|
|
; Deleted the LOG-IN PASSWORD.
|
|
text_jump UnknownText_0x1c51b9
|
|
db "@"
|
|
; 0x4a362
|
|
|
|
MenuDataHeader_0x4a362: ; 0x4a362
|
|
db $40 ; flags
|
|
db 07, 14 ; start coords
|
|
db 11, 19 ; end coords
|
|
dw MenuData2_0x4a36a
|
|
db 2 ; default option
|
|
; 0x4a36a
|
|
|
|
MenuData2_0x4a36a: ; 0x4a36a
|
|
db $e0 ; flags
|
|
db 2 ; items
|
|
db "はい@"
|
|
db "いいえ@"
|
|
; 0x4a373
|
|
|
|
Function4a373: ; 4a373 (12:6373)
|
|
ld hl, wcfa1
|
|
ld a, $4
|
|
ld [hli], a
|
|
ld a, $2
|
|
ld [hli], a
|
|
ld a, $3
|
|
ld [hli], a
|
|
ld a, $1
|
|
ld [hli], a
|
|
ld [hl], $0
|
|
set 5, [hl]
|
|
inc hl
|
|
xor a
|
|
ld [hli], a
|
|
ld a, $20
|
|
ld [hli], a
|
|
ld a, $1
|
|
add $40
|
|
add $80
|
|
add $2
|
|
ld [hli], a
|
|
ld a, $1
|
|
rept 2
|
|
ld [hli], a
|
|
endr
|
|
ret
|
|
; 4a39a (12:639a)
|
|
|
|
Function4a39a: ; 4a39a
|
|
call Function4a485
|
|
call Function4a492
|
|
call Function4a3aa
|
|
call SetPalettes
|
|
ret
|
|
; 4a3a7
|
|
|
|
Function4a3a7: ; 4a3a7 (12:63a7)
|
|
call Function4a485
|
|
Function4a3aa: ; 4a3aa
|
|
hlcoord 0, 0
|
|
lb bc, 3, 1
|
|
xor a
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, $1
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
xor a
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, $1
|
|
call Function4a6d8
|
|
lb bc, 4, 1
|
|
ld a, $2
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, $3
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, " "
|
|
call Function4a6d8
|
|
hlcoord 1, 0
|
|
ld a, $1
|
|
lb bc, 3, 18
|
|
call Function4a6d8
|
|
lb bc, 1, 18
|
|
ld a, $0
|
|
call Function4a6d8
|
|
lb bc, 1, 18
|
|
ld a, $1
|
|
call Function4a6d8
|
|
lb bc, 1, 18
|
|
ld a, $2
|
|
call Function4a6d8
|
|
lb bc, 11, 18
|
|
ld a, " "
|
|
call Function4a6d8
|
|
hlcoord 19, 0
|
|
lb bc, 3, 1
|
|
ld a, $0
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, $1
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
xor a
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, $1
|
|
call Function4a6d8
|
|
lb bc, 4, 1
|
|
ld a, $2
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, $3
|
|
call Function4a6d8
|
|
lb bc, 1, 1
|
|
ld a, " "
|
|
call Function4a6d8
|
|
ret
|
|
; 4a449 (12:6449)
|
|
|
|
Function4a449: ; 4a449
|
|
ld bc, 3 * SCREEN_WIDTH
|
|
ld a, $0
|
|
hlcoord 0, 0
|
|
call ByteFill
|
|
ld bc, 2 * SCREEN_WIDTH
|
|
ld a, $1
|
|
call ByteFill
|
|
ld bc, 2 * SCREEN_WIDTH
|
|
ld a, $0
|
|
call ByteFill
|
|
ld bc, 2 * SCREEN_WIDTH
|
|
ld a, $1
|
|
call ByteFill
|
|
ld bc, SCREEN_WIDTH
|
|
ld a, $2
|
|
call ByteFill
|
|
ld bc, SCREEN_WIDTH
|
|
ld a, $3
|
|
call ByteFill
|
|
ld bc, SCREEN_WIDTH
|
|
ld a, " "
|
|
call ByteFill
|
|
ret
|
|
; 4a485
|
|
|
|
Function4a485: ; 4a485 (12:6485)
|
|
ld de, GFX_49c0c
|
|
ld hl, VTiles2 tile $00
|
|
lb bc, BANK(GFX_49c0c), $d
|
|
call Get2bpp
|
|
ret
|
|
|
|
Function4a492: ; 4a492 (12:6492)
|
|
call Function4936e
|
|
ret
|
|
|
|
|
|
MainMenu_MobileStudium: ; 4a496
|
|
ld a, [StartDay]
|
|
ld b, a
|
|
ld a, [StartHour]
|
|
ld c, a
|
|
ld a, [StartMinute]
|
|
ld d, a
|
|
ld a, [StartSecond]
|
|
ld e, a
|
|
push bc
|
|
push de
|
|
callba MobileStudium
|
|
call ClearBGPalettes
|
|
pop de
|
|
pop bc
|
|
ld a, b
|
|
ld [StartDay], a
|
|
ld a, c
|
|
ld [StartHour], a
|
|
ld a, d
|
|
ld [StartMinute], a
|
|
ld a, e
|
|
ld [StartSecond], a
|
|
ret
|
|
; 4a4c4
|
|
|
|
|
|
Function4a4c4: ; 4a4c4 (12:64c4)
|
|
call ClearBGPalettes
|
|
call Function4a3a7
|
|
call Function4a492
|
|
call Function4a680
|
|
call ClearBGPalettes
|
|
ld c, 20
|
|
call DelayFrames
|
|
hlcoord 2, 0
|
|
ld b, $a
|
|
ld c, $e
|
|
call Function48cdc
|
|
hlcoord 4, 2
|
|
ld de, String_4a5c5
|
|
call PlaceString
|
|
hlcoord 4, 4
|
|
ld de, String_4a5cd
|
|
call PlaceString
|
|
hlcoord 4, 6
|
|
ld de, String_4a5da
|
|
call PlaceString
|
|
hlcoord 4, 8
|
|
ld de, String_4a5e6
|
|
call PlaceString
|
|
hlcoord 4, 10
|
|
ld de, String_4a5f2
|
|
call PlaceString
|
|
hlcoord 0, 12
|
|
ld b, $4
|
|
ld c, $12
|
|
call TextBox
|
|
xor a
|
|
ld hl, Strings_4a5f6
|
|
ld d, h
|
|
ld e, l
|
|
hlcoord 1, 14
|
|
call PlaceString
|
|
ld a, $1
|
|
ld hl, Strings_4a5f6
|
|
call GetNthString
|
|
ld d, h
|
|
ld e, l
|
|
hlcoord 1, 16
|
|
call PlaceString
|
|
call Function3200
|
|
call SetPalettes
|
|
call Function1bc9
|
|
ld hl, MenuSelection2
|
|
ld b, [hl]
|
|
push bc
|
|
jr asm_4a54d
|
|
|
|
Function4a545: ; 4a545 (12:6545)
|
|
call Function1bd3
|
|
ld hl, MenuSelection2
|
|
ld b, [hl]
|
|
push bc
|
|
|
|
asm_4a54d: ; 4a54d (12:654d)
|
|
bit 0, a
|
|
jr nz, .asm_4a557
|
|
bit 1, a
|
|
jr nz, .asm_4a574
|
|
jr .asm_4a57e
|
|
.asm_4a557
|
|
ld hl, MenuSelection2
|
|
ld a, [hl]
|
|
cp $1
|
|
jp z, Function4a6ab
|
|
cp $2
|
|
jp z, Function4a6ab
|
|
cp $3
|
|
jp z, Function4a6ab
|
|
cp $4
|
|
jp z, Function4a6ab
|
|
ld a, $1
|
|
call Function1ff8
|
|
.asm_4a574
|
|
pop bc
|
|
call ClearBGPalettes
|
|
call ClearTileMap
|
|
jp Function49f0a
|
|
.asm_4a57e
|
|
ld hl, MenuSelection2
|
|
ld a, [hl]
|
|
dec a
|
|
add a
|
|
push af
|
|
ld hl, Strings_4a5f6
|
|
call GetNthString
|
|
ld d, h
|
|
ld e, l
|
|
hlcoord 1, 13
|
|
ld b, $4
|
|
ld c, $12
|
|
call ClearBox
|
|
hlcoord 1, 14
|
|
call PlaceString
|
|
pop af
|
|
inc a
|
|
ld hl, Strings_4a5f6
|
|
call GetNthString
|
|
ld d, h
|
|
ld e, l
|
|
hlcoord 1, 16
|
|
call PlaceString
|
|
jp Function4a5b0
|
|
|
|
Function4a5b0: ; 4a5b0 (12:65b0)
|
|
call Function4a680
|
|
pop bc
|
|
ld hl, MenuSelection2
|
|
ld [hl], b
|
|
ld b, $a
|
|
ld c, $1
|
|
hlcoord 3, 1
|
|
call ClearBox
|
|
jp Function4a545
|
|
; 4a5c5 (12:65c5)
|
|
|
|
String_4a5c5: ; 4a5c5
|
|
db "じこしょうかい@"
|
|
String_4a5cd: ; 4a5cd
|
|
db "たいせん ", $4a, "はじまるとき@"
|
|
String_4a5da: ; 4a5da
|
|
db "たいせん ", $1d, "かったとき@"
|
|
String_4a5e6: ; 4a5e6
|
|
db "たいせん ", $1d, "まけたとき@"
|
|
String_4a5f2: ; 4a5f2
|
|
db "もどる@"
|
|
; 4a5f6
|
|
|
|
Strings_4a5f6: ; 4a5f6
|
|
db "めいし や ニュース ", $1d, "のせる@"
|
|
db "あなた%あいさつです@"
|
|
db "モバイル たいせん", $4a, "はじまるとき@"
|
|
db "あいて", $1d, "みえる あいさつです@"
|
|
db "モバイル たいせんで かったとき@"
|
|
db "あいて", $1d, "みえる あいさつです@"
|
|
db "モバイル たいせんで まけたとき@"
|
|
db "あいて", $1d, "みえる あいさつです@"
|
|
db "まえ%がめん ", $1d, "もどります@"
|
|
db "@"
|
|
; 4a680
|
|
|
|
Function4a680: ; 4a680 (12:6680)
|
|
ld hl, wcfa1
|
|
ld a, $2
|
|
ld [hli], a
|
|
ld a, $3
|
|
ld [hli], a
|
|
ld a, $5
|
|
ld [hli], a
|
|
ld a, $1
|
|
ld [hli], a
|
|
ld [hl], $0
|
|
set 5, [hl]
|
|
inc hl
|
|
xor a
|
|
ld [hli], a
|
|
ld a, $20
|
|
ld [hli], a
|
|
ld a, $1
|
|
add $40
|
|
add $80
|
|
add $2
|
|
ld [hli], a
|
|
ld a, $1
|
|
rept 2
|
|
ld [hli], a
|
|
endr
|
|
xor a
|
|
rept 3
|
|
ld [hli], a
|
|
endr
|
|
ret
|
|
|
|
Function4a6ab: ; 4a6ab (12:66ab)
|
|
ld a, $2
|
|
call Function1ff8
|
|
call ClearBGPalettes
|
|
ld b, SCGB_08
|
|
call GetSGBLayout
|
|
callba Function11c1ab
|
|
pop bc
|
|
call LoadFontsExtra
|
|
jp Function4a4c4
|
|
|
|
Function4a6c5: ; 4a6c5 (12:66c5)
|
|
ld a, $5
|
|
ld [MusicFade], a
|
|
ld a, e
|
|
ld [MusicFadeIDLo], a
|
|
ld a, d
|
|
ld [MusicFadeIDHi], a
|
|
ld c, 22
|
|
call DelayFrames
|
|
ret
|
|
|
|
Function4a6d8: ; 4a6d8 (12:66d8)
|
|
push bc
|
|
push hl
|
|
.asm_4a6da
|
|
ld [hli], a
|
|
dec c
|
|
jr nz, .asm_4a6da
|
|
pop hl
|
|
ld bc, $14
|
|
add hl, bc
|
|
pop bc
|
|
dec b
|
|
jr nz, Function4a6d8
|
|
ret
|