mirror of
https://github.com/pret/pokecrystal.git
synced 2024-11-27 23:30:26 +00:00
More radio labels
This commit is contained in:
PikalaxALT
parent
96b0e448c4
commit
b68913a782
@ -113,3 +113,6 @@ BATTLETOWER_NROFPKMNS EQU 3
|
||||
BATTLETOWER_TRAINERDATALENGTH EQU $24
|
||||
BATTLETOWER_NROFTRAINERS EQU 7
|
||||
|
||||
NUM_WILDMONS_PER_AREA_TIME_OF_DAY EQU 7
|
||||
WILDMON_GRASS_STRUCTURE_LENGTH EQU 2 + 3 * (1 + 2 * NUM_WILDMONS_PER_AREA_TIME_OF_DAY)
|
||||
|
||||
|
||||
@ -1,15 +1,92 @@
|
||||
const_def
|
||||
const OAKS_POKEMON_TALK
|
||||
const POKEDEX_SHOW
|
||||
const POKEMON_MUSIC
|
||||
const LUCKY_CHANNEL
|
||||
const BUENAS_PASSWORD
|
||||
const PLACES_AND_PEOPLE
|
||||
const LETS_ALL_SING
|
||||
const ROCKET_RADIO
|
||||
const POKE_FLUTE_RADIO
|
||||
const UNOWN_RADIO
|
||||
const EVOLUTION_RADIO
|
||||
const OAKS_POKEMON_TALK ; $00
|
||||
const POKEDEX_SHOW ; $01
|
||||
const POKEMON_MUSIC ; $02
|
||||
const LUCKY_CHANNEL ; $03
|
||||
const BUENAS_PASSWORD ; $04
|
||||
const PLACES_AND_PEOPLE ; $05
|
||||
const LETS_ALL_SING ; $06
|
||||
const ROCKET_RADIO ; $07
|
||||
const POKE_FLUTE_RADIO ; $08
|
||||
const UNOWN_RADIO ; $09
|
||||
const EVOLUTION_RADIO ; $0a
|
||||
const OAKS_POKEMON_TALK_2 ; $0b
|
||||
const OAKS_POKEMON_TALK_3 ; $0c
|
||||
const OAKS_POKEMON_TALK_4 ; $0d
|
||||
const OAKS_POKEMON_TALK_5 ; $0e
|
||||
const OAKS_POKEMON_TALK_6 ; $0f
|
||||
const OAKS_POKEMON_TALK_7 ; $10
|
||||
const OAKS_POKEMON_TALK_8 ; $11
|
||||
const OAKS_POKEMON_TALK_9 ; $12
|
||||
const POKEDEX_SHOW_2 ; $13
|
||||
const POKEDEX_SHOW_3 ; $14
|
||||
const POKEDEX_SHOW_4 ; $15
|
||||
const POKEDEX_SHOW_5 ; $16
|
||||
const POKEMON_MUSIC_2 ; $17
|
||||
const POKEMON_MUSIC_3 ; $18
|
||||
const POKEMON_MUSIC_4 ; $19
|
||||
const POKEMON_MUSIC_5 ; $1a
|
||||
const POKEMON_MUSIC_6 ; $1b
|
||||
const POKEMON_MUSIC_7 ; $1c
|
||||
const LETS_ALL_SING_2 ; $1d
|
||||
const LUCKY_NUMBER_SHOW_2 ; $1e
|
||||
const LUCKY_NUMBER_SHOW_3 ; $1f
|
||||
const LUCKY_NUMBER_SHOW_4 ; $20
|
||||
const LUCKY_NUMBER_SHOW_5 ; $21
|
||||
const LUCKY_NUMBER_SHOW_6 ; $22
|
||||
const LUCKY_NUMBER_SHOW_7 ; $23
|
||||
const LUCKY_NUMBER_SHOW_8 ; $24
|
||||
const LUCKY_NUMBER_SHOW_9 ; $25
|
||||
const LUCKY_NUMBER_SHOW_10 ; $26
|
||||
const LUCKY_NUMBER_SHOW_11 ; $27
|
||||
const LUCKY_NUMBER_SHOW_12 ; $28
|
||||
const LUCKY_NUMBER_SHOW_13 ; $29
|
||||
const LUCKY_NUMBER_SHOW_14 ; $2a
|
||||
const LUCKY_NUMBER_SHOW_15 ; $2b
|
||||
const PLACES_AND_PEOPLE_2 ; $2c
|
||||
const PLACES_AND_PEOPLE_3 ; $2d
|
||||
const PLACES_AND_PEOPLE_4 ; $2e
|
||||
const PLACES_AND_PEOPLE_5 ; $2f
|
||||
const PLACES_AND_PEOPLE_6 ; $30
|
||||
const PLACES_AND_PEOPLE_7 ; $31
|
||||
const ROCKET_RADIO_2 ; $32
|
||||
const ROCKET_RADIO_3 ; $33
|
||||
const ROCKET_RADIO_4 ; $34
|
||||
const ROCKET_RADIO_5 ; $35
|
||||
const ROCKET_RADIO_6 ; $36
|
||||
const ROCKET_RADIO_7 ; $37
|
||||
const ROCKET_RADIO_8 ; $38
|
||||
const ROCKET_RADIO_9 ; $39
|
||||
const ROCKET_RADIO_10 ; $3a
|
||||
const OAKS_POKEMON_TALK_10 ; $3b
|
||||
const OAKS_POKEMON_TALK_11 ; $3c
|
||||
const OAKS_POKEMON_TALK_12 ; $3d
|
||||
const OAKS_POKEMON_TALK_13 ; $3e
|
||||
const OAKS_POKEMON_TALK_14 ; $3f
|
||||
const BUENAS_PASSWORD_2 ; $40
|
||||
const BUENAS_PASSWORD_3 ; $41
|
||||
const BUENAS_PASSWORD_4 ; $42
|
||||
const BUENAS_PASSWORD_5 ; $43
|
||||
const BUENAS_PASSWORD_6 ; $44
|
||||
const BUENAS_PASSWORD_7 ; $45
|
||||
const BUENAS_PASSWORD_8 ; $46
|
||||
const BUENAS_PASSWORD_9 ; $47
|
||||
const BUENAS_PASSWORD_10 ; $48
|
||||
const BUENAS_PASSWORD_11 ; $49
|
||||
const BUENAS_PASSWORD_12 ; $4a
|
||||
const BUENAS_PASSWORD_13 ; $4b
|
||||
const BUENAS_PASSWORD_14 ; $4c
|
||||
const BUENAS_PASSWORD_15 ; $4d
|
||||
const BUENAS_PASSWORD_16 ; $4e
|
||||
const BUENAS_PASSWORD_17 ; $4f
|
||||
const BUENAS_PASSWORD_18 ; $50
|
||||
const BUENAS_PASSWORD_19 ; $51
|
||||
const BUENAS_PASSWORD_20 ; $52
|
||||
const BUENAS_PASSWORD_21 ; $53
|
||||
const RADIO_SCROLL ; $54
|
||||
const POKEDEX_SHOW_6 ; $55
|
||||
const POKEDEX_SHOW_7 ; $56
|
||||
const POKEDEX_SHOW_8 ; $57
|
||||
|
||||
const_def
|
||||
const BUENA_MON
|
||||
|
||||
766
engine/radio.asm
766
engine/radio.asm
File diff suppressed because it is too large
Load Diff
404
engine/radio2.asm
Normal file
404
engine/radio2.asm
Normal file
@ -0,0 +1,404 @@
|
||||
_UpdateRadioStation: ; 9163e (24:563e)
|
||||
jr UpdateRadioStation
|
||||
|
||||
Function91640: ; 91640 (24:5640)
|
||||
push bc
|
||||
call .TuningKnob
|
||||
pop bc
|
||||
ld a, [wRadioTuningKnob]
|
||||
ld hl, $6
|
||||
add hl, bc
|
||||
ld [hl], a
|
||||
ret
|
||||
|
||||
.TuningKnob: ; 9164e (24:564e)
|
||||
ld hl, hJoyLast
|
||||
ld a, [hl]
|
||||
and D_DOWN
|
||||
jr nz, .down
|
||||
ld a, [hl]
|
||||
and D_UP
|
||||
jr nz, .up
|
||||
ret
|
||||
|
||||
.down
|
||||
ld hl, wRadioTuningKnob
|
||||
ld a, [hl]
|
||||
and a
|
||||
ret z
|
||||
rept 2
|
||||
dec [hl]
|
||||
endr
|
||||
jr .update
|
||||
|
||||
.up
|
||||
ld hl, wRadioTuningKnob
|
||||
ld a, [hl]
|
||||
cp 80
|
||||
ret nc
|
||||
rept 2
|
||||
inc [hl]
|
||||
endr
|
||||
|
||||
.update
|
||||
|
||||
UpdateRadioStation: ; 9166f (24:566f)
|
||||
ld hl, wRadioTuningKnob
|
||||
ld d, [hl]
|
||||
ld hl, RadioChannels
|
||||
.loop
|
||||
ld a, [hli]
|
||||
cp -1
|
||||
jr z, .nostation
|
||||
cp d
|
||||
jr z, .foundstation
|
||||
rept 2
|
||||
inc hl
|
||||
endr
|
||||
jr .loop
|
||||
|
||||
.nostation
|
||||
call NoRadioStation
|
||||
ret
|
||||
|
||||
.foundstation
|
||||
ld a, [hli]
|
||||
ld h, [hl]
|
||||
ld l, a
|
||||
ld de, .returnafterstation
|
||||
push de
|
||||
jp [hl]
|
||||
.returnafterstation
|
||||
ld a, [wc6d9]
|
||||
and a
|
||||
ret z
|
||||
xor a
|
||||
ld [hBGMapMode], a
|
||||
hlcoord 2, 9
|
||||
call PlaceString
|
||||
ld a, $1
|
||||
ld [hBGMapMode], a
|
||||
ret
|
||||
; 916a1 (24:56a1)
|
||||
|
||||
Function916a1: ; 916a1
|
||||
ld [wc6d9], a
|
||||
ld a, [hli]
|
||||
ld [wc6da], a
|
||||
ld a, [hli]
|
||||
ld [wc6db], a
|
||||
ret
|
||||
; 916ad
|
||||
|
||||
|
||||
RadioChannels:
|
||||
; frequencies and the shows that play on them.
|
||||
; frequency value given here = 4 × ingame_frequency − 2
|
||||
dbw 16, .PkmnTalkAndPokedexShow
|
||||
dbw 28, .PokemonMusic
|
||||
dbw 32, .LuckyChannel
|
||||
dbw 40, .BuenasPassword
|
||||
dbw 52, .RuinsOfAlphRadio
|
||||
dbw 64, .PlacesAndPeople
|
||||
dbw 72, .LetsAllSing
|
||||
dbw 78, .PokeFluteRadio
|
||||
dbw 80, .EvolutionRadio
|
||||
db $ff
|
||||
|
||||
.PkmnTalkAndPokedexShow
|
||||
; Pokédex Show in the morning
|
||||
; Oak's Pokémon Talk in the afternoon and evening
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
ld a, [TimeOfDay]
|
||||
and a
|
||||
jp z, LoadStation_PokedexShow
|
||||
jp LoadStation_OaksPokemonTalk
|
||||
|
||||
.PokemonMusic
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
jp LoadStation_PokemonMusic
|
||||
|
||||
.LuckyChannel
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
jp LoadStation_LuckyChannel
|
||||
|
||||
.BuenasPassword
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
jp LoadStation_BuenasPassword
|
||||
|
||||
.RuinsOfAlphRadio
|
||||
ld a, [wc6d8]
|
||||
cp RUINS_OF_ALPH
|
||||
jr nz, .NoSignal
|
||||
jp LoadStation_UnownRadio
|
||||
|
||||
.PlacesAndPeople
|
||||
call .InJohto
|
||||
jr c, .NoSignal
|
||||
ld a, [wPokegearFlags]
|
||||
bit 3, a
|
||||
jr z, .NoSignal
|
||||
jp LoadStation_PlacesAndPeople
|
||||
|
||||
.LetsAllSing
|
||||
call .InJohto
|
||||
jr c, .NoSignal
|
||||
ld a, [wPokegearFlags]
|
||||
bit 3, a
|
||||
jr z, .NoSignal
|
||||
jp LoadStation_LetsAllSing
|
||||
|
||||
.PokeFluteRadio
|
||||
call .InJohto
|
||||
jr c, .NoSignal
|
||||
ld a, [wPokegearFlags]
|
||||
bit 3, a
|
||||
jr z, .NoSignal
|
||||
jp LoadStation_PokeFluteRadio
|
||||
|
||||
.EvolutionRadio
|
||||
; This station airs in the Lake of Rage area when Rocket are still in Mahogany.
|
||||
|
||||
ld a, [StatusFlags]
|
||||
bit 4, a
|
||||
jr z, .NoSignal
|
||||
|
||||
ld a, [wc6d8]
|
||||
cp MAHOGANY_TOWN
|
||||
jr z, .ok
|
||||
cp ROUTE_43
|
||||
jr z, .ok
|
||||
cp LAKE_OF_RAGE
|
||||
jr nz, .NoSignal
|
||||
.ok
|
||||
jp LoadStation_EvolutionRadio
|
||||
|
||||
.NoSignal
|
||||
call NoRadioStation
|
||||
ret
|
||||
|
||||
.InJohto
|
||||
; if in Johto or on the S.S. Aqua, set carry
|
||||
; otherwise clear carry
|
||||
ld a, [wc6d8]
|
||||
cp FAST_SHIP
|
||||
jr z, .johto
|
||||
cp KANTO_LANDMARK
|
||||
jr c, .johto
|
||||
.kanto
|
||||
and a
|
||||
ret
|
||||
.johto
|
||||
scf
|
||||
ret
|
||||
|
||||
|
||||
|
||||
LoadStation_OaksPokemonTalk: ; 91753 (24:5753)
|
||||
xor a ; OAKS_POKEMON_TALK
|
||||
ld [wd002], a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, OaksPkmnTalkName
|
||||
ret
|
||||
|
||||
LoadStation_PokedexShow: ; 91766 (24:5766)
|
||||
ld a, POKEDEX_SHOW
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, PokedexShowName
|
||||
ret
|
||||
|
||||
LoadStation_PokemonMusic: ; 9177b (24:577b)
|
||||
ld a, POKEMON_MUSIC
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, PokemonMusicName
|
||||
ret
|
||||
|
||||
LoadStation_LuckyChannel: ; 91790 (24:5790)
|
||||
ld a, LUCKY_CHANNEL
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, LuckyChannelName
|
||||
ret
|
||||
|
||||
LoadStation_BuenasPassword: ; 917a5 (24:57a5)
|
||||
ld a, BUENAS_PASSWORD
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, NotBuenasPasswordName
|
||||
ld a, [StatusFlags2]
|
||||
bit 0, a
|
||||
ret z
|
||||
ld de, BuenasPasswordName
|
||||
ret
|
||||
; 917c3 (24:57c3)
|
||||
|
||||
BuenasPasswordName: db "BUENA'S PASSWORD@"
|
||||
NotBuenasPasswordName: db "@"
|
||||
|
||||
LoadStation_UnownRadio: ; 917d5 (24:57d5)
|
||||
ld a, UNOWN_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, UnknownStationName
|
||||
ret
|
||||
|
||||
LoadStation_PlacesAndPeople: ; 917ea (24:57ea)
|
||||
ld a, PLACES_AND_PEOPLE
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, PlacesAndPeopleName
|
||||
ret
|
||||
|
||||
LoadStation_LetsAllSing: ; 917ff (24:57ff)
|
||||
ld a, LETS_ALL_SING
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, LetsAllSingName
|
||||
ret
|
||||
; 91814 (24:5814)
|
||||
|
||||
LoadStation_RocketRadio: ; 91814
|
||||
ld a, ROCKET_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, LetsAllSingName
|
||||
ret
|
||||
; 91829
|
||||
|
||||
LoadStation_PokeFluteRadio: ; 91829 (24:5829)
|
||||
ld a, POKE_FLUTE_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, PokeFluteStationName
|
||||
ret
|
||||
|
||||
LoadStation_EvolutionRadio: ; 9183e (24:583e)
|
||||
ld a, EVOLUTION_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Radio_BackUpFarCallParams
|
||||
ld de, UnknownStationName
|
||||
ret
|
||||
; 91853 (24:5853)
|
||||
|
||||
LoadStation_Dummy: ; 91853
|
||||
ret
|
||||
|
||||
RadioMusicRestartDE: ; 91854 (24:5854)
|
||||
push de
|
||||
ld a, e
|
||||
ld [wc6dc], a
|
||||
ld de, MUSIC_NONE
|
||||
call PlayMusic
|
||||
pop de
|
||||
ld a, e
|
||||
ld [wMapMusic], a
|
||||
call PlayMusic
|
||||
ret
|
||||
|
||||
RadioMusicRestartPokemonChannel: ; 91868 (24:5868)
|
||||
push de
|
||||
ld a, $fe
|
||||
ld [wc6dc], a
|
||||
ld de, MUSIC_NONE
|
||||
call PlayMusic
|
||||
pop de
|
||||
ld de, MUSIC_POKEMON_CHANNEL
|
||||
call PlayMusic
|
||||
ret
|
||||
|
||||
Radio_BackUpFarCallParams: ; 9187c (24:587c)
|
||||
ld [wc6d9], a
|
||||
ld a, l
|
||||
ld [wc6da], a
|
||||
ld a, h
|
||||
ld [wc6db], a
|
||||
ret
|
||||
|
||||
NoRadioStation: ; 91888 (24:5888)
|
||||
call NoRadioMusic
|
||||
call NoRadioName
|
||||
xor a
|
||||
ld [wc6d9], a
|
||||
ld [wc6da], a
|
||||
ld [wc6db], a
|
||||
ld a, $1
|
||||
ld [hBGMapMode], a ; $ff00+$d4
|
||||
ret
|
||||
|
||||
NoRadioMusic: ; 9189d (24:589d)
|
||||
ld de, MUSIC_NONE
|
||||
call PlayMusic
|
||||
ld a, $ff
|
||||
ld [wc6dc], a
|
||||
ret
|
||||
|
||||
NoRadioName: ; 918a9 (24:58a9)
|
||||
xor a
|
||||
ld [hBGMapMode], a ; $ff00+$d4
|
||||
hlcoord 1, 8
|
||||
ld bc, $312
|
||||
call ClearBox
|
||||
hlcoord 0, 12
|
||||
ld bc, $412
|
||||
call TextBox
|
||||
ret
|
||||
; 918bf
|
||||
|
||||
OaksPkmnTalkName: db "OAK's <PK><MN> Talk@"
|
||||
PokedexShowName: db "#DEX Show@"
|
||||
PokemonMusicName: db "#MON Music@"
|
||||
LuckyChannelName: db "Lucky Channel@"
|
||||
UnknownStationName: db "?????@"
|
||||
PlacesAndPeopleName: db "Places & People@"
|
||||
LetsAllSingName: db "Let's All Sing!@"
|
||||
PokeFluteStationName: db "# FLUTE@"
|
||||
; 9191c
|
||||
@ -273,7 +273,7 @@ endm
|
||||
dict $24, PlacePOKE
|
||||
dict $25, NextChar
|
||||
dict2 $1f, " "
|
||||
dict $5f, Char5F
|
||||
dict "<DEXEND>", PlaceDexEnd
|
||||
dict "<TARGET>", PlaceMoveTargetsName
|
||||
dict "<USER>", PlaceMoveUsersName
|
||||
dict "<ENEMY>", PlaceEnemysName
|
||||
@ -590,7 +590,7 @@ ContText:: ; 1345
|
||||
; 1356
|
||||
|
||||
|
||||
Char5F:: ; 1356
|
||||
PlaceDexEnd:: ; 1356
|
||||
; Legacy: ends a Pokédex entry (Red).
|
||||
; Dex entries are now regular strings.
|
||||
ld [hl], "."
|
||||
|
||||
1
hram.asm
1
hram.asm
@ -26,6 +26,7 @@ hJoypadSum EQU $ffa5
|
||||
hJoyReleased EQU $ffa6
|
||||
hJoyPressed EQU $ffa7
|
||||
hJoyDown EQU $ffa8
|
||||
hJoyLast EQU $ffa9
|
||||
|
||||
hConnectionStripLength EQU $ffaf
|
||||
hConnectedMapWidth EQU $ffb0
|
||||
|
||||
@ -301,3 +301,5 @@
|
||||
charmap "<TRNER>", $5d
|
||||
charmap "<ROCKET>", $5e
|
||||
charmap "<......>", $56
|
||||
charmap "<START>", $00
|
||||
charmap "<DEXEND>", $5f
|
||||
|
||||
643
main.asm
643
main.asm
@ -9768,10 +9768,10 @@ MenuData2_0xe477: ; 0xe477
|
||||
; 0xe47f
|
||||
|
||||
Strings_e47f: ; e47f
|
||||
db "WITHDRAW ", $e1, $e2, "@"
|
||||
db "DEPOSIT ", $e1, $e2, "@"
|
||||
db "WITHDRAW <PK><MN>@"
|
||||
db "DEPOSIT <PK><MN>@"
|
||||
db "CHANGE BOX@"
|
||||
db "MOVE ", $e1, $e2, " W/O MAIL@"
|
||||
db "MOVE <PK><MN> W/O MAIL@"
|
||||
db "SEE YA!@"
|
||||
|
||||
Jumptable_e4ba: ; e4ba (3:64ba)
|
||||
@ -47515,22 +47515,22 @@ PartyMenuStrings: ; 0x504d2
|
||||
ChooseAMonString: ; 0x504e4
|
||||
db "Choose a #MON.@"
|
||||
UseOnWhichPKMNString: ; 0x504f3
|
||||
db "Use on which ", $e1, $e2, "?@"
|
||||
db "Use on which <PK><MN>?@"
|
||||
WhichPKMNString: ; 0x50504
|
||||
db "Which ", $e1, $e2, "?@"
|
||||
db "Which <PK><MN>?@"
|
||||
TeachWhichPKMNString: ; 0x5050e
|
||||
db "Teach which ", $e1, $e2, "?@"
|
||||
db "Teach which <PK><MN>?@"
|
||||
MoveToWhereString: ; 0x5051e
|
||||
db "Move to where?@"
|
||||
ChooseAFemalePKMNString: ; 0x5052d ; UNUSED
|
||||
db "Choose a ♀", $e1, $e2, ".@"
|
||||
db "Choose a ♀<PK><MN>.@"
|
||||
ChooseAMalePKMNString: ; 0x5053b ; UNUSED
|
||||
db "Choose a ♂", $e1, $e2, ".@"
|
||||
db "Choose a ♂<PK><MN>.@"
|
||||
ToWhichPKMNString: ; 0x50549
|
||||
db "To which ", $e1, $e2, "?@"
|
||||
db "To which <PK><MN>?@"
|
||||
|
||||
YouHaveNoPKMNString: ; 0x50556
|
||||
db "You have no ", $e1, $e2, "!@"
|
||||
db "You have no <PK><MN>!@"
|
||||
|
||||
|
||||
Function50566: ; 50566
|
||||
@ -66891,20 +66891,15 @@ Unknown_8e6a5: ; 8e6a5
|
||||
|
||||
|
||||
Unknown_8e706: ; 8e706
|
||||
dbbw $80, $01, Unknown_8e72a
|
||||
dbbw $80, $01, Unknown_8e72a
|
||||
dbbw $80, $01, Unknown_8e72a
|
||||
dbbw $80, $01, Unknown_8e72a
|
||||
dbbw $10, $37, Unknown_8e72a
|
||||
dbbw $10, $11, Unknown_8e72a
|
||||
dbbw $10, $39, Unknown_8e72a
|
||||
dbbw $10, $24, Unknown_8e72a
|
||||
dbbw $10, $21, Unknown_8e72a
|
||||
|
||||
Unknown_8e72a:
|
||||
; 8e72a
|
||||
|
||||
|
||||
dbbw $80, $01, Function8e72a
|
||||
dbbw $80, $01, Function8e72a
|
||||
dbbw $80, $01, Function8e72a
|
||||
dbbw $80, $01, Function8e72a
|
||||
dbbw $10, $37, Function8e72a
|
||||
dbbw $10, $11, Function8e72a
|
||||
dbbw $10, $39, Function8e72a
|
||||
dbbw $10, $24, Function8e72a
|
||||
dbbw $10, $21, Function8e72a
|
||||
|
||||
Function8e72a: ; 8e72a
|
||||
add $10
|
||||
@ -69886,7 +69881,7 @@ Function910f9: ; 910f9 (24:50f9)
|
||||
ld hl, $3
|
||||
add hl, bc
|
||||
ld [hl], $8
|
||||
call Function9163e
|
||||
call _UpdateRadioStation
|
||||
ld hl, wcf63
|
||||
inc [hl]
|
||||
ret
|
||||
@ -70541,410 +70536,7 @@ ClockTilemapRLE: ; 915db
|
||||
INCBIN "gfx/unknown/0915db.tilemap.rle"
|
||||
; 9163e
|
||||
|
||||
Function9163e: ; 9163e (24:563e)
|
||||
jr UpdateRadioStation
|
||||
|
||||
Function91640: ; 91640 (24:5640)
|
||||
push bc
|
||||
call Function9164e
|
||||
pop bc
|
||||
ld a, [wd958]
|
||||
ld hl, $6
|
||||
add hl, bc
|
||||
ld [hl], a
|
||||
ret
|
||||
|
||||
Function9164e: ; 9164e (24:564e)
|
||||
ld hl, $ffa9
|
||||
ld a, [hl]
|
||||
and D_DOWN
|
||||
jr nz, .down
|
||||
ld a, [hl]
|
||||
and D_UP
|
||||
jr nz, .up
|
||||
ret
|
||||
|
||||
.down
|
||||
ld hl, wd958
|
||||
ld a, [hl]
|
||||
and a
|
||||
ret z
|
||||
rept 2
|
||||
dec [hl]
|
||||
endr
|
||||
jr .update
|
||||
|
||||
.up
|
||||
ld hl, wd958
|
||||
ld a, [hl]
|
||||
cp 80
|
||||
ret nc
|
||||
rept 2
|
||||
inc [hl]
|
||||
endr
|
||||
|
||||
.update
|
||||
|
||||
UpdateRadioStation: ; 9166f (24:566f)
|
||||
ld hl, wd958
|
||||
ld d, [hl]
|
||||
ld hl, RadioChannels
|
||||
.asm_91676
|
||||
ld a, [hli]
|
||||
cp $ff
|
||||
jr z, .asm_91682
|
||||
cp d
|
||||
jr z, .asm_91686
|
||||
rept 2
|
||||
inc hl
|
||||
endr
|
||||
jr .asm_91676
|
||||
|
||||
.asm_91682
|
||||
call NoRadioStation
|
||||
ret
|
||||
|
||||
.asm_91686
|
||||
ld a, [hli]
|
||||
ld h, [hl]
|
||||
ld l, a
|
||||
ld de, .asm_9168e
|
||||
push de
|
||||
jp [hl]
|
||||
.asm_9168e
|
||||
ld a, [wc6d9]
|
||||
and a
|
||||
ret z
|
||||
xor a
|
||||
ld [hBGMapMode], a
|
||||
hlcoord 2, 9
|
||||
call PlaceString
|
||||
ld a, $1
|
||||
ld [hBGMapMode], a
|
||||
ret
|
||||
; 916a1 (24:56a1)
|
||||
|
||||
Function916a1: ; 916a1
|
||||
ld [wc6d9], a
|
||||
ld a, [hli]
|
||||
ld [wc6da], a
|
||||
ld a, [hli]
|
||||
ld [wc6db], a
|
||||
ret
|
||||
; 916ad
|
||||
|
||||
|
||||
RadioChannels:
|
||||
; frequencies and the shows that play on them.
|
||||
; frequency value given here = 4 × ingame_frequency − 2
|
||||
dbw 16, .PkmnTalkAndPokedexShow
|
||||
dbw 28, .PokemonMusic
|
||||
dbw 32, .LuckyChannel
|
||||
dbw 40, .BuenasPassword
|
||||
dbw 52, .RuinsOfAlphRadio
|
||||
dbw 64, .PlacesAndPeople
|
||||
dbw 72, .LetsAllSing
|
||||
dbw 78, .PokeFluteRadio
|
||||
dbw 80, .EvolutionRadio
|
||||
db $ff
|
||||
|
||||
.PkmnTalkAndPokedexShow
|
||||
; Pokédex Show in the morning
|
||||
; Oak's Pokémon Talk in the afternoon and evening
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
ld a, [TimeOfDay]
|
||||
and a
|
||||
jp z, Function91766
|
||||
jp Function91753
|
||||
|
||||
.PokemonMusic
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
jp Function9177b
|
||||
|
||||
.LuckyChannel
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
jp Function91790
|
||||
|
||||
.BuenasPassword
|
||||
call .InJohto
|
||||
jr nc, .NoSignal
|
||||
jp Function917a5
|
||||
|
||||
.RuinsOfAlphRadio
|
||||
ld a, [wc6d8]
|
||||
cp RUINS_OF_ALPH
|
||||
jr nz, .NoSignal
|
||||
jp Function917d5
|
||||
|
||||
.PlacesAndPeople
|
||||
call .InJohto
|
||||
jr c, .NoSignal
|
||||
ld a, [wPokegearFlags]
|
||||
bit 3, a
|
||||
jr z, .NoSignal
|
||||
jp Function917ea
|
||||
|
||||
.LetsAllSing
|
||||
call .InJohto
|
||||
jr c, .NoSignal
|
||||
ld a, [wPokegearFlags]
|
||||
bit 3, a
|
||||
jr z, .NoSignal
|
||||
jp Function917ff
|
||||
|
||||
.PokeFluteRadio
|
||||
call .InJohto
|
||||
jr c, .NoSignal
|
||||
ld a, [wPokegearFlags]
|
||||
bit 3, a
|
||||
jr z, .NoSignal
|
||||
jp Function91829
|
||||
|
||||
.EvolutionRadio
|
||||
; This station airs in the Lake of Rage area when Rocket are still in Mahogany.
|
||||
|
||||
ld a, [StatusFlags]
|
||||
bit 4, a
|
||||
jr z, .NoSignal
|
||||
|
||||
ld a, [wc6d8]
|
||||
cp MAHOGANY_TOWN
|
||||
jr z, .ok
|
||||
cp ROUTE_43
|
||||
jr z, .ok
|
||||
cp LAKE_OF_RAGE
|
||||
jr nz, .NoSignal
|
||||
.ok
|
||||
jp Function9183e
|
||||
|
||||
.NoSignal
|
||||
call NoRadioStation
|
||||
ret
|
||||
|
||||
.InJohto
|
||||
; if in Johto or on the S.S. Aqua, set carry
|
||||
; otherwise clear carry
|
||||
ld a, [wc6d8]
|
||||
cp FAST_SHIP
|
||||
jr z, .johto
|
||||
cp KANTO_LANDMARK
|
||||
jr c, .johto
|
||||
.kanto
|
||||
and a
|
||||
ret
|
||||
.johto
|
||||
scf
|
||||
ret
|
||||
|
||||
|
||||
|
||||
Function91753: ; 91753 (24:5753)
|
||||
xor a ; OAKS_POKEMON_TALK
|
||||
ld [wd002], a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, OaksPkmnTalkName
|
||||
ret
|
||||
|
||||
Function91766: ; 91766 (24:5766)
|
||||
ld a, POKEDEX_SHOW
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, PokedexShowName
|
||||
ret
|
||||
|
||||
Function9177b: ; 9177b (24:577b)
|
||||
ld a, POKEMON_MUSIC
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, PokemonMusicName
|
||||
ret
|
||||
|
||||
Function91790: ; 91790 (24:5790)
|
||||
ld a, LUCKY_CHANNEL
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, LuckyChannelName
|
||||
ret
|
||||
|
||||
Function917a5: ; 917a5 (24:57a5)
|
||||
ld a, BUENAS_PASSWORD
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, NotBuenasPasswordName
|
||||
ld a, [StatusFlags2]
|
||||
bit 0, a
|
||||
ret z
|
||||
ld de, BuenasPasswordName
|
||||
ret
|
||||
; 917c3 (24:57c3)
|
||||
|
||||
BuenasPasswordName: db "BUENA'S PASSWORD@"
|
||||
NotBuenasPasswordName: db "@"
|
||||
|
||||
Function917d5: ; 917d5 (24:57d5)
|
||||
ld a, UNOWN_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, UnknownStationName
|
||||
ret
|
||||
|
||||
Function917ea: ; 917ea (24:57ea)
|
||||
ld a, PLACES_AND_PEOPLE
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, PlacesAndPeopleName
|
||||
ret
|
||||
|
||||
Function917ff: ; 917ff (24:57ff)
|
||||
ld a, LETS_ALL_SING
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, LetsAllSingName
|
||||
ret
|
||||
; 91814 (24:5814)
|
||||
|
||||
Function91814: ; 91814
|
||||
ld a, ROCKET_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, LetsAllSingName
|
||||
ret
|
||||
; 91829
|
||||
|
||||
Function91829: ; 91829 (24:5829)
|
||||
ld a, POKE_FLUTE_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, PokeFluteStationName
|
||||
ret
|
||||
|
||||
Function9183e: ; 9183e (24:583e)
|
||||
ld a, EVOLUTION_RADIO
|
||||
ld [wd002], a
|
||||
xor a
|
||||
ld [wd005], a
|
||||
ld a, BANK(PlayRadioShow)
|
||||
ld hl, PlayRadioShow
|
||||
call Function9187c
|
||||
ld de, UnknownStationName
|
||||
ret
|
||||
; 91853 (24:5853)
|
||||
|
||||
Function91853: ; 91853
|
||||
ret
|
||||
|
||||
RadioMusicNone: ; 91854 (24:5854)
|
||||
push de
|
||||
ld a, e
|
||||
ld [wc6dc], a
|
||||
ld de, MUSIC_NONE
|
||||
call PlayMusic
|
||||
pop de
|
||||
ld a, e
|
||||
ld [wMapMusic], a
|
||||
call PlayMusic
|
||||
ret
|
||||
|
||||
Function91868: ; 91868 (24:5868)
|
||||
push de
|
||||
ld a, $fe
|
||||
ld [wc6dc], a
|
||||
ld de, MUSIC_NONE
|
||||
call PlayMusic
|
||||
pop de
|
||||
ld de, MUSIC_POKEMON_CHANNEL
|
||||
call PlayMusic
|
||||
ret
|
||||
|
||||
Function9187c: ; 9187c (24:587c)
|
||||
ld [wc6d9], a
|
||||
ld a, l
|
||||
ld [wc6da], a
|
||||
ld a, h
|
||||
ld [wc6db], a
|
||||
ret
|
||||
|
||||
NoRadioStation: ; 91888 (24:5888)
|
||||
call NoRadioMusic
|
||||
call NoRadioName
|
||||
xor a
|
||||
ld [wc6d9], a
|
||||
ld [wc6da], a
|
||||
ld [wc6db], a
|
||||
ld a, $1
|
||||
ld [hBGMapMode], a ; $ff00+$d4
|
||||
ret
|
||||
|
||||
NoRadioMusic: ; 9189d (24:589d)
|
||||
ld de, MUSIC_NONE
|
||||
call PlayMusic
|
||||
ld a, $ff
|
||||
ld [wc6dc], a
|
||||
ret
|
||||
|
||||
NoRadioName: ; 918a9 (24:58a9)
|
||||
xor a
|
||||
ld [hBGMapMode], a ; $ff00+$d4
|
||||
hlcoord 1, 8
|
||||
ld bc, $312
|
||||
call ClearBox
|
||||
hlcoord 0, 12
|
||||
ld bc, $412
|
||||
call TextBox
|
||||
ret
|
||||
; 918bf
|
||||
|
||||
OaksPkmnTalkName: db "OAK's ", $e1, $e2, " Talk@"
|
||||
PokedexShowName: db "#DEX Show@"
|
||||
PokemonMusicName: db "#MON Music@"
|
||||
LuckyChannelName: db "Lucky Channel@"
|
||||
UnknownStationName: db "?????@"
|
||||
PlacesAndPeopleName: db "Places & People@"
|
||||
LetsAllSingName: db "Let's All Sing!@"
|
||||
PokeFluteStationName: db "# FLUTE@"
|
||||
; 9191c
|
||||
INCLUDE "engine/radio2.asm"
|
||||
|
||||
Function9191c: ; 9191c
|
||||
ld hl, Options
|
||||
@ -71181,14 +70773,14 @@ endr
|
||||
|
||||
.StationPointers: ; 91ab9
|
||||
dw Function91acb
|
||||
dw Function91753
|
||||
dw Function91766
|
||||
dw Function9177b
|
||||
dw Function91790
|
||||
dw Function917d5
|
||||
dw Function917ea
|
||||
dw Function917ff
|
||||
dw Function91814
|
||||
dw LoadStation_OaksPokemonTalk
|
||||
dw LoadStation_PokedexShow
|
||||
dw LoadStation_PokemonMusic
|
||||
dw LoadStation_LuckyChannel
|
||||
dw LoadStation_UnownRadio
|
||||
dw LoadStation_PlacesAndPeople
|
||||
dw LoadStation_LetsAllSing
|
||||
dw LoadStation_RocketRadio
|
||||
; 91acb
|
||||
|
||||
Function91acb: ; 91acb
|
||||
@ -71198,11 +70790,11 @@ Function91acb: ; 91acb
|
||||
call UpdateTime
|
||||
ld a, [TimeOfDay]
|
||||
and a
|
||||
jp z, Function91766
|
||||
jp Function91753
|
||||
jp z, LoadStation_PokedexShow
|
||||
jp LoadStation_OaksPokemonTalk
|
||||
|
||||
.kanto
|
||||
jp Function917ea
|
||||
jp LoadStation_PlacesAndPeople
|
||||
; 91ae1
|
||||
|
||||
Function91ae1: ; 91ae1
|
||||
@ -74428,11 +74020,14 @@ SECTION "bank2E", ROMX, BANK[$2E]
|
||||
ReturnFromMapSetupScript:: ; b8000
|
||||
xor a
|
||||
ld [hBGMapMode], a
|
||||
callba Functionb800a
|
||||
; For some reson, GameFreak chose to use a callba here instead of just falling through.
|
||||
; No other function in the game references the function at 2E:400A, here labeled
|
||||
; ReturnFromMapSetupScript.inefficientcallba.
|
||||
callba .inefficientcallba ; this is a waste of 6 ROM bytes and 2 stack bytes
|
||||
ret
|
||||
; b800a
|
||||
|
||||
Functionb800a: ; b800a
|
||||
.inefficientcallba: ; b800a
|
||||
ld a, [MapGroup]
|
||||
ld b, a
|
||||
ld a, [MapNumber]
|
||||
@ -74447,7 +74042,7 @@ Functionb800a: ; b800a
|
||||
jr nz, .asm_b8029
|
||||
|
||||
.asm_b8024
|
||||
ld a, $ff
|
||||
ld a, -1
|
||||
ld [wc2d9], a
|
||||
|
||||
.asm_b8029
|
||||
@ -79976,7 +79571,7 @@ Functione23e9: ; e23e9 (38:63e9)
|
||||
call ClearSprites
|
||||
call Functione2d30
|
||||
call Functione2a8e
|
||||
ld de, String_e34dd
|
||||
ld de, PCString_ChooseaPKMN
|
||||
call Functione2a6e
|
||||
ld a, $5
|
||||
ld [wcb2d], a
|
||||
@ -80041,7 +79636,7 @@ Functione245d: ; e245d (38:645d)
|
||||
ld [CurPartySpecies], a
|
||||
ld a, $17
|
||||
call Functione33d0
|
||||
ld de, String_e34ea
|
||||
ld de, PCString_WhatsUp
|
||||
call Functione2a6e
|
||||
ld a, $1
|
||||
ld [wcfa9], a
|
||||
@ -80088,7 +79683,7 @@ BillsPCDepositFuncDeposit: ; e24a9 (38:64a9)
|
||||
ld [wcb2a], a
|
||||
ret
|
||||
.asm_e24c1
|
||||
ld de, String_e34ea
|
||||
ld de, PCString_WhatsUp
|
||||
call Functione2a6e
|
||||
ret
|
||||
|
||||
@ -80110,7 +79705,7 @@ BillsPCDepositFuncRelease: ; e24e0 (38:64e0)
|
||||
jr c, BillsPCDepositFuncCancel
|
||||
ld a, [wcfa9]
|
||||
push af
|
||||
ld de, String_e34f4
|
||||
ld de, PCString_ReleasePKMN
|
||||
call Functione2a6e
|
||||
call Function1d6e
|
||||
lb bc, 14, 11
|
||||
@ -80136,7 +79731,7 @@ BillsPCDepositFuncRelease: ; e24e0 (38:64e0)
|
||||
pop af
|
||||
ret
|
||||
.asm_e252c
|
||||
ld de, String_e34ea
|
||||
ld de, PCString_WhatsUp
|
||||
call Functione2a6e
|
||||
pop af
|
||||
ld [wcfa9], a
|
||||
@ -80220,15 +79815,15 @@ Functione2583: ; e2583 (38:6583)
|
||||
|
||||
Functione25c8: ; e25c8 (38:65c8)
|
||||
ld a, [wcf63]
|
||||
ld hl, Jumptable_e25d2
|
||||
ld hl, .jumptable
|
||||
call Functione33df
|
||||
jp [hl]
|
||||
|
||||
Jumptable_e25d2: ; e25d2 (38:65d2)
|
||||
.jumptable: ; e25d2 (38:65d2)
|
||||
dw Functione25dc
|
||||
dw Functione2612
|
||||
dw Functione2655
|
||||
dw Functione2675
|
||||
dw BillsPC_Withdraw
|
||||
dw Functione2992
|
||||
|
||||
|
||||
@ -80240,7 +79835,7 @@ Functione25dc: ; e25dc (38:65dc)
|
||||
call ClearSprites
|
||||
call Functione2d30
|
||||
call Functione2a8e
|
||||
ld de, String_e34dd
|
||||
ld de, PCString_ChooseaPKMN
|
||||
call Functione2a6e
|
||||
ld a, $5
|
||||
ld [wcb2d], a
|
||||
@ -80306,26 +79901,26 @@ Functione2655: ; e2655 (38:6655)
|
||||
ld [CurPartySpecies], a
|
||||
ld a, $17
|
||||
call Functione33d0
|
||||
ld de, String_e34ea
|
||||
ld de, PCString_WhatsUp
|
||||
call Functione2a6e
|
||||
ld a, $1
|
||||
ld [wcfa9], a
|
||||
call Functione298d
|
||||
ret
|
||||
|
||||
Functione2675: ; e2675 (38:6675)
|
||||
ld hl, BillsPCWithdrawMenuDataHeader
|
||||
BillsPC_Withdraw: ; e2675 (38:6675)
|
||||
ld hl, .MenuDataHeader
|
||||
call CopyMenuDataHeader
|
||||
ld a, [wcfa9]
|
||||
call Function1d4b
|
||||
call InterpretMenu2
|
||||
jp c, BillsPCWithdrawFuncCancel
|
||||
jp c, .cancel
|
||||
ld a, [wcfa9]
|
||||
dec a
|
||||
and 3
|
||||
ld e, a
|
||||
ld d, 0
|
||||
ld hl, BillsPCWithdrawJumptable
|
||||
ld hl, .jumptable
|
||||
rept 2
|
||||
add hl, de
|
||||
endr
|
||||
@ -80334,30 +79929,30 @@ endr
|
||||
ld l, a
|
||||
jp [hl]
|
||||
|
||||
BillsPCWithdrawJumptable: ; e2699 (38:6699) #mark
|
||||
dw BillsPCWithdrawFuncWithdraw ; Withdraw
|
||||
dw BillsPCWithdrawFuncStats ; Stats
|
||||
dw BillsPCWithdrawFuncRelease ; Release
|
||||
dw BillsPCWithdrawFuncCancel ; Cancel
|
||||
.jumptable: ; e2699 (38:6699) #mark
|
||||
dw .withdraw ; Withdraw
|
||||
dw .stats ; Stats
|
||||
dw .release ; Release
|
||||
dw .cancel ; Cancel
|
||||
|
||||
|
||||
BillsPCWithdrawFuncWithdraw: ; e26a1 (38:66a1)
|
||||
.withdraw: ; e26a1 (38:66a1)
|
||||
call Functione2f18
|
||||
jp c, BillsPCWithdrawFuncCancel
|
||||
call Functione30fa
|
||||
jr c, .asm_e26b9
|
||||
jp c, .cancel
|
||||
call TryWithdrawPokemon
|
||||
jr c, .FailedWithdraw
|
||||
ld a, $0
|
||||
ld [wcf63], a
|
||||
xor a
|
||||
ld [wcb2b], a
|
||||
ld [wcb2a], a
|
||||
ret
|
||||
.asm_e26b9
|
||||
ld de, String_e34ea
|
||||
.FailedWithdraw
|
||||
ld de, PCString_WhatsUp
|
||||
call Functione2a6e
|
||||
ret
|
||||
|
||||
BillsPCWithdrawFuncStats: ; e26c0 (38:66c0)
|
||||
.stats: ; e26c0 (38:66c0)
|
||||
call Function1d6e
|
||||
call Functione2f7e
|
||||
call ExitMenu
|
||||
@ -80368,12 +79963,12 @@ BillsPCWithdrawFuncStats: ; e26c0 (38:66c0)
|
||||
call Functione33d0
|
||||
ret
|
||||
|
||||
BillsPCWithdrawFuncRelease: ; e26d8 (38:66d8)
|
||||
.release: ; e26d8 (38:66d8)
|
||||
ld a, [wcfa9]
|
||||
push af
|
||||
call Functione2f5f
|
||||
jr c, .asm_e2720
|
||||
ld de, String_e34f4
|
||||
jr c, .FailedRelease
|
||||
ld de, PCString_ReleasePKMN
|
||||
call Functione2a6e
|
||||
call Function1d6e
|
||||
lb bc, 14, 11
|
||||
@ -80382,7 +79977,7 @@ BillsPCWithdrawFuncRelease: ; e26d8 (38:66d8)
|
||||
dec a
|
||||
call ExitMenu
|
||||
and a
|
||||
jr nz, .asm_e2720
|
||||
jr nz, .FailedRelease
|
||||
ld a, [wcb2b]
|
||||
ld hl, wcb2a
|
||||
add [hl]
|
||||
@ -80398,28 +79993,28 @@ BillsPCWithdrawFuncRelease: ; e26d8 (38:66d8)
|
||||
ld [wcb2a], a
|
||||
pop af
|
||||
ret
|
||||
.asm_e2720
|
||||
ld de, String_e34ea
|
||||
.FailedRelease
|
||||
ld de, PCString_WhatsUp
|
||||
call Functione2a6e
|
||||
pop af
|
||||
ld [wcfa9], a
|
||||
ret
|
||||
|
||||
BillsPCWithdrawFuncCancel: ; e272b (38:672b)
|
||||
.cancel: ; e272b (38:672b)
|
||||
ld a, $0
|
||||
ld [wcf63], a
|
||||
ret
|
||||
; e2731 (38:6731)
|
||||
|
||||
BillsPCWithdrawMenuDataHeader: ; 0xe2731
|
||||
.MenuDataHeader: ; 0xe2731
|
||||
db $40 ; flags
|
||||
db 04, 09 ; start coords
|
||||
db 13, 19 ; end coords
|
||||
dw BillsPCWithdrawMenuData
|
||||
dw .MenuData
|
||||
db 1 ; default option
|
||||
; 0xe2739
|
||||
|
||||
BillsPCWithdrawMenuData: ; 0xe2739
|
||||
.MenuData: ; 0xe2739
|
||||
db $80 ; flags
|
||||
db 4 ; items
|
||||
db "WITHDRAW@"
|
||||
@ -80491,7 +80086,7 @@ Functione27ba: ; e27ba
|
||||
ld [hBGMapMode], a
|
||||
call ClearSprites
|
||||
call Functione2d30
|
||||
ld de, String_e34dd
|
||||
ld de, PCString_ChooseaPKMN
|
||||
call Functione2a6e
|
||||
ld a, $5
|
||||
ld [wcb2d], a
|
||||
@ -80567,7 +80162,7 @@ Functione283d: ; e283d
|
||||
ld [CurPartySpecies], a
|
||||
ld a, $17
|
||||
call Functione33d0
|
||||
ld de, String_e34ea
|
||||
ld de, PCString_WhatsUp
|
||||
call Functione2a6e
|
||||
ld a, $1
|
||||
ld [wcfa9], a
|
||||
@ -80655,7 +80250,7 @@ Functione28df: ; e28df
|
||||
xor a
|
||||
ld [hBGMapMode], a
|
||||
call Functione2d30
|
||||
ld de, String_e3500
|
||||
ld de, PCString_MoveToWhere
|
||||
call Functione2a6e
|
||||
ld a, $5
|
||||
ld [wcb2d], a
|
||||
@ -80967,7 +80562,7 @@ Functione2a8e: ; e2a8e (38:6a8e)
|
||||
; e2abd (38:6abd)
|
||||
|
||||
String_e2abd:
|
||||
db "PARTY ", $e1, $e2, "@"
|
||||
db "PARTY <PK><MN>@"
|
||||
; e2ac6
|
||||
|
||||
PCMonInfo: ; e2ac6 (38:6ac6)
|
||||
@ -81594,7 +81189,7 @@ Functione2ee5: ; e2ee5
|
||||
ret
|
||||
|
||||
.asm_e2f02
|
||||
ld de, String_e3521
|
||||
ld de, PCString_TheresNoRoom
|
||||
call Functione2a6e
|
||||
ld de, SFX_WRONG
|
||||
call WaitPlaySFX
|
||||
@ -81608,31 +81203,31 @@ Functione2ee5: ; e2ee5
|
||||
Functione2f18: ; e2f18 (38:6f18)
|
||||
ld a, [wcb2e]
|
||||
and a
|
||||
jr nz, .asm_e2f3d
|
||||
jr nz, .Okay
|
||||
ld a, [wcb2c]
|
||||
cp $3
|
||||
jr c, .asm_e2f49
|
||||
jr c, .ItsYourLastPokemon
|
||||
ld a, [wcb2b]
|
||||
ld hl, wcb2a
|
||||
add [hl]
|
||||
ld [CurPartyMon], a
|
||||
callba Functione538
|
||||
jr c, .asm_e2f44
|
||||
jr c, .AllOthersFainted
|
||||
ld a, [wcb32]
|
||||
and a
|
||||
jr nz, .asm_e2f3f
|
||||
.asm_e2f3d
|
||||
jr nz, .HasMail
|
||||
.Okay
|
||||
and a
|
||||
ret
|
||||
.asm_e2f3f
|
||||
ld de, String_e3544
|
||||
jr .asm_e2f4c
|
||||
.asm_e2f44
|
||||
ld de, String_e3531
|
||||
jr .asm_e2f4c
|
||||
.asm_e2f49
|
||||
ld de, String_e350f
|
||||
.asm_e2f4c
|
||||
.HasMail
|
||||
ld de, PCString_RemoveMail
|
||||
jr .NotOkay
|
||||
.AllOthersFainted
|
||||
ld de, PCString_NoMoreUsablePKMN
|
||||
jr .NotOkay
|
||||
.ItsYourLastPokemon
|
||||
ld de, PCString_ItsYourLastPKMN
|
||||
.NotOkay
|
||||
call Functione2a6e
|
||||
ld de, SFX_WRONG
|
||||
call WaitPlaySFX
|
||||
@ -81649,7 +81244,7 @@ Functione2f5f: ; e2f5f (38:6f5f)
|
||||
and a
|
||||
ret
|
||||
.asm_e2f68
|
||||
ld de, String_e3597
|
||||
ld de, PCString_NoReleasingEGGS
|
||||
call Functione2a6e
|
||||
ld de, SFX_WRONG
|
||||
call WaitPlaySFX
|
||||
@ -81799,7 +81394,7 @@ Functione307c: ; e307c (38:707c)
|
||||
call TextBox
|
||||
call WaitBGMap
|
||||
hlcoord 1, 16
|
||||
ld de, String_e3563
|
||||
ld de, PCString_Stored
|
||||
call PlaceString
|
||||
ld l, c
|
||||
ld h, b
|
||||
@ -81812,7 +81407,7 @@ Functione307c: ; e307c (38:707c)
|
||||
and a
|
||||
ret
|
||||
.asm_e30e4
|
||||
ld de, String_e3575
|
||||
ld de, PCString_BoxFull
|
||||
call Functione2a6e
|
||||
ld de, SFX_WRONG
|
||||
call WaitPlaySFX
|
||||
@ -81822,7 +81417,7 @@ Functione307c: ; e307c (38:707c)
|
||||
scf
|
||||
ret
|
||||
|
||||
Functione30fa: ; e30fa (38:70fa)
|
||||
TryWithdrawPokemon: ; e30fa (38:70fa)
|
||||
ld a, [wcb2b]
|
||||
ld hl, wcb2a
|
||||
add [hl]
|
||||
@ -81836,7 +81431,7 @@ Functione30fa: ; e30fa (38:70fa)
|
||||
xor a
|
||||
ld [wd10b], a
|
||||
predef Functiondb3f
|
||||
jr c, .asm_e316a
|
||||
jr c, .PartyFull
|
||||
ld a, $1
|
||||
ld [wd10b], a
|
||||
callba Functione039
|
||||
@ -81853,7 +81448,7 @@ Functione30fa: ; e30fa (38:70fa)
|
||||
call TextBox
|
||||
call WaitBGMap
|
||||
hlcoord 1, 16
|
||||
ld de, String_e356b
|
||||
ld de, PCString_Got
|
||||
call PlaceString
|
||||
ld l, c
|
||||
ld h, b
|
||||
@ -81865,8 +81460,8 @@ Functione30fa: ; e30fa (38:70fa)
|
||||
call DelayFrames
|
||||
and a
|
||||
ret
|
||||
.asm_e316a
|
||||
ld de, String_e3586
|
||||
.PartyFull
|
||||
ld de, PCString_PartyFull
|
||||
call Functione2a6e
|
||||
ld de, SFX_WRONG
|
||||
call WaitPlaySFX
|
||||
@ -81900,7 +81495,7 @@ Functione3180: ; e3180 (38:7180)
|
||||
ld [wd265], a
|
||||
call GetPokemonName
|
||||
hlcoord 1, 16
|
||||
ld de, String_e3551
|
||||
ld de, PCString_ReleasedPKMN
|
||||
call PlaceString
|
||||
ld c, 80
|
||||
call DelayFrames
|
||||
@ -81908,7 +81503,7 @@ Functione3180: ; e3180 (38:7180)
|
||||
ld bc, $112
|
||||
call TextBox
|
||||
hlcoord 1, 16
|
||||
ld de, String_e355e
|
||||
ld de, PCString_Bye
|
||||
call PlaceString
|
||||
ld l, c
|
||||
ld h, b
|
||||
@ -82234,22 +81829,22 @@ PCSelectLZ: INCBIN "gfx/pc.2bpp.lz"
|
||||
PCMailGFX: INCBIN "gfx/pc_mail.2bpp"
|
||||
; e34dd
|
||||
|
||||
String_e34dd: db "Choose a ", $e1, $e2, ".@"
|
||||
String_e34ea: db "What's up?@"
|
||||
String_e34f4: db "Release ", $e1, $e2, "?@"
|
||||
String_e3500: db "Move to where?@"
|
||||
String_e350f: db "It's your last ", $e1, $e2, "!@"
|
||||
String_e3521: db "There's no room!@"
|
||||
String_e3531: db "No more usable ", $e1, $e2, "!@"
|
||||
String_e3544: db "Remove MAIL.@"
|
||||
String_e3551: db "Released ", $e1, $e2, ".@"
|
||||
String_e355e: db "Bye,@"
|
||||
String_e3563: db "Stored @"
|
||||
String_e356b: db "Got @"
|
||||
String_e3570: db "Non.@"
|
||||
String_e3575: db "The BOX is full.@"
|
||||
String_e3586: db "The party's full!@"
|
||||
String_e3597: db "No releasing EGGS!@"
|
||||
PCString_ChooseaPKMN: db "Choose a <PK><MN>.@"
|
||||
PCString_WhatsUp: db "What's up?@"
|
||||
PCString_ReleasePKMN: db "Release <PK><MN>?@"
|
||||
PCString_MoveToWhere: db "Move to where?@"
|
||||
PCString_ItsYourLastPKMN: db "It's your last <PK><MN>!@"
|
||||
PCString_TheresNoRoom: db "There's no room!@"
|
||||
PCString_NoMoreUsablePKMN: db "No more usable <PK><MN>!@"
|
||||
PCString_RemoveMail: db "Remove MAIL.@"
|
||||
PCString_ReleasedPKMN: db "Released <PK><MN>.@"
|
||||
PCString_Bye: db "Bye,@"
|
||||
PCString_Stored: db "Stored @"
|
||||
PCString_Got: db "Got @"
|
||||
PCString_Non: db "Non.@"
|
||||
PCString_BoxFull: db "The BOX is full.@"
|
||||
PCString_PartyFull: db "The party's full!@"
|
||||
PCString_NoReleasingEGGS: db "No releasing EGGS!@"
|
||||
; e35aa
|
||||
|
||||
Functione35aa: ; e35aa (38:75aa)
|
||||
|
||||
Loading…
Reference in New Issue
Block a user