pokecrystal/engine/std_scripts.asm

2622 lines
48 KiB
NASM

StdScripts: ; bc000
dbw BANK(PokeCenterNurseScript), PokeCenterNurseScript
dbw BANK(UnknownScript_0xbc162), UnknownScript_0xbc162
dbw BANK(UnknownScript_0xbc166), UnknownScript_0xbc166
dbw BANK(UnknownScript_0xbc16a), UnknownScript_0xbc16a
dbw BANK(UnknownScript_0xbc16e), UnknownScript_0xbc16e
dbw BANK(UnknownScript_0xbc172), UnknownScript_0xbc172
dbw BANK(UnknownScript_0xbc176), UnknownScript_0xbc176
dbw BANK(UnknownScript_0xbc17a), UnknownScript_0xbc17a
dbw BANK(UnknownScript_0xbc185), UnknownScript_0xbc185
dbw BANK(UnknownScript_0xbc189), UnknownScript_0xbc189
dbw BANK(UnknownScript_0xbc191), UnknownScript_0xbc191
dbw BANK(UnknownScript_0xbc195), UnknownScript_0xbc195
dbw BANK(UnknownScript_0xbc19d), UnknownScript_0xbc19d
dbw BANK(UnknownScript_0xbc1a5), UnknownScript_0xbc1a5
dbw BANK(UnknownScript_0xbc1b8), UnknownScript_0xbc1b8
dbw BANK(UnknownScript_0xbc1bc), UnknownScript_0xbc1bc
dbw BANK(UnknownScript_0xbc1c0), UnknownScript_0xbc1c0
dbw BANK(UnknownScript_0xbc1c4), UnknownScript_0xbc1c4
dbw BANK(UnknownScript_0xbc23e), UnknownScript_0xbc23e
dbw BANK(UnknownScript_0xbc242), UnknownScript_0xbc242
dbw BANK(UnknownScript_0xbc1af), UnknownScript_0xbc1af
dbw BANK(UnknownScript_0xbc1c8), UnknownScript_0xbc1c8
dbw BANK(UnknownScript_0xbc25c), UnknownScript_0xbc25c
dbw BANK(UnknownScript_0xbc274), UnknownScript_0xbc274
dbw BANK(UnknownScript_0xbc3db), UnknownScript_0xbc3db
dbw BANK(UnknownScript_0xbc574), UnknownScript_0xbc574
dbw BANK(UnknownScript_0xbc62d), UnknownScript_0xbc62d
dbw BANK(UnknownScript_0xbc6e6), UnknownScript_0xbc6e6
dbw BANK(UnknownScript_0xbc6f0), UnknownScript_0xbc6f0
dbw BANK(UnknownScript_0xbc7ce), UnknownScript_0xbc7ce
dbw BANK(UnknownScript_0xbc8ac), UnknownScript_0xbc8ac
dbw BANK(UnknownScript_0xbc98a), UnknownScript_0xbc98a
dbw BANK(UnknownScript_0xbca47), UnknownScript_0xbca47
dbw BANK(UnknownScript_0xbca8f), UnknownScript_0xbca8f
dbw BANK(UnknownScript_0xbcb0a), UnknownScript_0xbcb0a
dbw BANK(UnknownScript_0xbcb35), UnknownScript_0xbcb35
dbw BANK(UnknownScript_0xbcb7f), UnknownScript_0xbcb7f
dbw BANK(UnknownScript_0xbcbc9), UnknownScript_0xbcbc9
dbw BANK(UnknownScript_0xbcbd3), UnknownScript_0xbcbd3
dbw BANK(UnknownScript_0xbcc2d), UnknownScript_0xbcc2d
dbw BANK(UnknownScript_0xbcc87), UnknownScript_0xbcc87
dbw BANK(UnknownScript_0xbcce1), UnknownScript_0xbcce1
dbw BANK(UnknownScript_0xbcd30), UnknownScript_0xbcd30
dbw BANK(UnknownScript_0xbcd5a), UnknownScript_0xbcd5a
dbw BANK(UnknownScript_0xbcd93), UnknownScript_0xbcd93
dbw BANK(UnknownScript_0xbcda0), UnknownScript_0xbcda0
dbw BANK(UnknownScript_0xbcdaa), UnknownScript_0xbcdaa
dbw BANK(UnknownScript_0xbcdb9), UnknownScript_0xbcdb9
dbw BANK(UnknownScript_0xbcdc3), UnknownScript_0xbcdc3
dbw BANK(UnknownScript_0xbc1a9), UnknownScript_0xbc1a9
dbw BANK(UnknownScript_0xbcdcd), UnknownScript_0xbcdcd
dbw BANK(UnknownScript_0xbce7f), UnknownScript_0xbce7f
; bc09c
PokeCenterNurseScript: ; bc09c
; Talking to a nurse in a Pokemon Center
loadfont
; The nurse has different text for:
; Morn
checktime $1
iftrue .morn
; Day
checktime $2
iftrue .day
; Nite
checktime $4
iftrue .nite
; If somehow it's not a time of day at all, we skip the introduction
2jump .heal
.morn
; Different text if we're in the com center
checkevent $032a
iftrue .morn_comcenter
; Good morning! Welcome to ...
3writetext BANK(UnknownText_0x1b0000), UnknownText_0x1b0000
keeptextopen
2jump .heal
.morn_comcenter
; Good morning! This is the ...
3writetext BANK(UnknownText_0x1b008a), UnknownText_0x1b008a
keeptextopen
2jump .heal
.day
; Different text if we're in the com center
checkevent $032a
iftrue .day_comcenter
; Hello! Welcome to ...
3writetext BANK(UnknownText_0x1b002b), UnknownText_0x1b002b
keeptextopen
2jump .heal
.day_comcenter
; Hello! This is the ...
3writetext BANK(UnknownText_0x1b00d6), UnknownText_0x1b00d6
keeptextopen
2jump .heal
.nite
; Different text if we're in the com center
checkevent $032a
iftrue .nite_comcenter
; Good evening! You're out late. ...
3writetext BANK(UnknownText_0x1b004f), UnknownText_0x1b004f
keeptextopen
2jump .heal
.nite_comcenter
; Good to see you working so late. ...
3writetext BANK(UnknownText_0x1b011b), UnknownText_0x1b011b
keeptextopen
2jump .heal
.heal
; If we come back, don't welcome us to the com center again
clearevent $032a
; Ask if you want to heal
3writetext BANK(UnknownText_0x1b017a), UnknownText_0x1b017a
yesorno
iffalse .end
; Go ahead and heal
3writetext BANK(UnknownText_0x1b01bd), UnknownText_0x1b01bd
pause 20
special $009d
; Turn to the machine
spriteface $fe, $2
pause 10
special $001b
playmusic $0000
writebyte $0
special $003e
pause 30
special $003d
spriteface $fe, $0
pause 10
; Has Elm already phoned you about Pokerus?
checkphonecall
iftrue .done
; Has Pokerus already been found in the Pokecenter?
checkflag $000d
iftrue .done
; Check for Pokerus
special $004e ; SPECIAL_CHECKPOKERUS
iftrue .pokerus
.done
; Thank you for waiting. ...
3writetext BANK(UnknownText_0x1b01d7), UnknownText_0x1b01d7
pause 20
.end
; We hope to see you again.
3writetext BANK(UnknownText_0x1b020b), UnknownText_0x1b020b
; Curtsy
spriteface $fe, $1
pause 10
spriteface $fe, $0
pause 10
; And we're out
closetext
loadmovesprites
end
.pokerus
; Different text for com center (excludes 'in a Pokemon Center')
; Since flag $32a is cleared when healing,
; this text is never actually seen
checkevent $032a
iftrue .pokerus_comcenter
; Your Pokemon appear to be infected ...
3writetext BANK(UnknownText_0x1b0241), UnknownText_0x1b0241
closetext
loadmovesprites
2jump .endpokerus
.pokerus_comcenter
; Your Pokemon appear to be infected ...
3writetext BANK(UnknownText_0x1b02d6), UnknownText_0x1b02d6
closetext
loadmovesprites
.endpokerus
; Don't tell us about Pokerus again
setflag $000d
; Trigger Elm's Pokerus phone call
specialphonecall $0001
end
; bc162
UnknownScript_0xbc162: ; 0xbc162
3jumptext $6c, $435a
; 0xbc166
UnknownScript_0xbc166: ; 0xbc166
3jumptext $6c, $4378
; 0xbc16a
UnknownScript_0xbc16a: ; 0xbc16a
3jumptext $6c, $43a3
; 0xbc16e
UnknownScript_0xbc16e: ; 0xbc16e
3jumptext $6c, $43d9
; 0xbc172
UnknownScript_0xbc172: ; 0xbc172
3jumptext $6c, $4448
; 0xbc176
UnknownScript_0xbc176: ; 0xbc176
3jumptext $6c, $4472
; 0xbc17a
UnknownScript_0xbc17a: ; 0xbc17a
loadfont
3writetext $6c, $448d
closetext
special $0026
loadmovesprites
end
; 0xbc185
UnknownScript_0xbc185: ; 0xbc185
3jumptext $6c, $44a0
; 0xbc189
UnknownScript_0xbc189: ; 0xbc189
loadfont
3writetext $6c, $44be
closetext
loadmovesprites
end
; 0xbc191
UnknownScript_0xbc191: ; 0xbc191
3jumptext $6c, $44c9
; 0xbc195
UnknownScript_0xbc195: ; 0xbc195
loadfont
writebyte $0
special $0028
loadmovesprites
end
; 0xbc19d
UnknownScript_0xbc19d: ; 0xbc19d
loadfont
writebyte $4
special $0028
loadmovesprites
end
; 0xbc1a5
UnknownScript_0xbc1a5: ; 0xbc1a5
3jumptext $6c, $4526
; 0xbc1a9
UnknownScript_0xbc1a9: ; 0xbc1a9
loadfont
special $001c
loadmovesprites
end
; 0xbc1af
UnknownScript_0xbc1af: ; 0xbc1af
playsound $0008
pause 15
playsound $0027
end
; 0xbc1b8
UnknownScript_0xbc1b8: ; 0xbc1b8
3jump BANK(UnknownScript_0xcd4b), UnknownScript_0xcd4b
; 0xbc1bc
UnknownScript_0xbc1bc: ; 0xbc1bc
3jump BANK(UnknownScript_0xcf5d), UnknownScript_0xcf5d
; 0xbc1c0
UnknownScript_0xbc1c0: ; 0xbc1c0
3jumptext $6c, $457f
; 0xbc1c4
UnknownScript_0xbc1c4: ; 0xbc1c4
3jumptext $6c, $459c
; 0xbc1c8
UnknownScript_0xbc1c8: ; 0xbc1c8
checkcode $b
if_equal $1, UnknownScript_0xbc1e7
if_equal $2, UnknownScript_0xbc1ec
if_equal $3, UnknownScript_0xbc1f1
if_equal $4, UnknownScript_0xbc1f6
if_equal $5, UnknownScript_0xbc1fb
if_equal $6, UnknownScript_0xbc200
stringtotext UnknownRawText_0xbc205, $0
end
; 0xbc1e7
UnknownScript_0xbc1e7: ; 0xbc1e7
stringtotext UnknownRawText_0xbc20c, $0
end
; 0xbc1ec
UnknownScript_0xbc1ec: ; 0xbc1ec
stringtotext UnknownRawText_0xbc213, $0
end
; 0xbc1f1
UnknownScript_0xbc1f1: ; 0xbc1f1
stringtotext UnknownRawText_0xbc21b, $0
end
; 0xbc1f6
UnknownScript_0xbc1f6: ; 0xbc1f6
stringtotext UnknownRawText_0xbc225, $0
end
; 0xbc1fb
UnknownScript_0xbc1fb: ; 0xbc1fb
stringtotext UnknownRawText_0xbc22e, $0
end
; 0xbc200
UnknownScript_0xbc200: ; 0xbc200
stringtotext UnknownRawText_0xbc235, $0
end
; 0xbc205
UnknownRawText_0xbc205: ; bc205
db "SUNDAY@"
; bc20c
UnknownRawText_0xbc20c: ; bc20c
db "MONDAY@"
; bc213
UnknownRawText_0xbc213: ; bc213
db "TUESDAY@"
; bc21b
UnknownRawText_0xbc21b: ; bc21b
db "WEDNESDAY@"
; bc225
UnknownRawText_0xbc225: ; bc225
db "THURSDAY@"
; bc22e
UnknownRawText_0xbc22e: ; bc22e
db "FRIDAY@"
; bc235
UnknownRawText_0xbc235: ; bc235
db "SATURDAY@"
; bc23e
UnknownScript_0xbc23e: ; 0xbc23e
clearevent $06cd
end
; 0xbc242
UnknownScript_0xbc242: ; 0xbc242
setflag $0013
setevent $06cf
setevent $06d1
clearevent $06ce
clearevent $0025
setevent $0756
specialphonecall $0004
domaptrigger GROUP_MAHOGANY_TOWN, MAP_MAHOGANY_TOWN, $1
end
; 0xbc25c
UnknownScript_0xbc25c: ; 0xbc25c
special $0034
2call UnknownScript_0xbc380
setevent $0747
clearevent $0748
setevent $02d2
warp GROUP_ROUTE_36_NATIONAL_PARK_GATE, MAP_ROUTE_36_NATIONAL_PARK_GATE, $0, $4
applymovement $0, MovementData_0xbcea1
UnknownScript_0xbc274: ; bc274
clearflag $0011
clearevent $02d2
clearevent $0313
clearevent $0314
clearevent $0315
clearevent $0316
loadfont
3writetext $6c, $45bf
closetext
special $0014
RAM2MEM $0
if_equal $1, UnknownScript_0xbc31e
if_equal $2, UnknownScript_0xbc332
if_equal $3, UnknownScript_0xbc343
3writetext $6c, $4681
keeptextopen
waitbutton
verbosegiveitem BERRY, 1
iffalse UnknownScript_0xbc375
3writetext $6c, $46b7
keeptextopen
2jump $42b6
; 0xbc2b1
UnknownScript_0xbc2b1: ; 0xbc2b1
3writetext $6c, $465b
keeptextopen
checkevent $0308
iffalse $42c4
3writetext $6c, $46d9
closetext
special $0017
special $0015
if_equal $0, $42d4
if_equal $2, $42d4
3writetext $6c, $470d
closetext
loadmovesprites
dotrigger $0
domaptrigger GROUP_ROUTE_35_NATIONAL_PARK_GATE, MAP_ROUTE_35_NATIONAL_PARK_GATE, $0
setevent $0716
setevent $0717
setevent $0718
setevent $0719
setevent $071a
setevent $071b
setevent $071c
setevent $071d
setevent $071e
setevent $071f
setevent $0720
setevent $0721
setevent $0722
setevent $0723
setevent $0724
setevent $0725
setevent $0726
setevent $0727
setevent $0728
setevent $0729
setflag $0051
special $003c
end
; 0xbc31e
UnknownScript_0xbc31e: ; 0xbc31e
setevent $0000
itemtotext SUN_STONE, $1
3writetext $6c, $4621
closetext
verbosegiveitem SUN_STONE, 1
iffalse UnknownScript_0xbc354
2jump UnknownScript_0xbc2b1
; 0xbc332
UnknownScript_0xbc332: ; 0xbc332
itemtotext EVERSTONE, $1
3writetext $6c, $4621
closetext
verbosegiveitem EVERSTONE, 1
iffalse UnknownScript_0xbc35f
2jump UnknownScript_0xbc2b1
; 0xbc343
UnknownScript_0xbc343: ; 0xbc343
itemtotext GOLD_BERRY, $1
3writetext $6c, $4621
closetext
verbosegiveitem GOLD_BERRY, 1
iffalse UnknownScript_0xbc36a
2jump UnknownScript_0xbc2b1
; 0xbc354
UnknownScript_0xbc354: ; 0xbc354
3writetext $6c, $48cc
keeptextopen
setevent $0313
2jump UnknownScript_0xbc2b1
; 0xbc35f
UnknownScript_0xbc35f: ; 0xbc35f
3writetext $6c, $48cc
keeptextopen
setevent $0314
2jump UnknownScript_0xbc2b1
; 0xbc36a
UnknownScript_0xbc36a: ; 0xbc36a
3writetext $6c, $48cc
keeptextopen
setevent $0315
2jump UnknownScript_0xbc2b1
; 0xbc375
UnknownScript_0xbc375: ; 0xbc375
3writetext $6c, $48cc
keeptextopen
setevent $0316
2jump $42a9
; 0xbc380
UnknownScript_0xbc380: ; 0xbc380
checkevent $0716
iftrue .skip1
clearevent $0720
.skip1
checkevent $0717
iftrue .skip2
clearevent $0721
.skip2
checkevent $0718
iftrue .skip3
clearevent $0722
.skip3
checkevent $0719
iftrue .skip4
clearevent $0723
.skip4
checkevent $071a
iftrue .skip5
clearevent $0724
.skip5
checkevent $071b
iftrue .skip6
clearevent $0725
.skip6
checkevent $071c
iftrue .skip7
clearevent $0726
.skip7
checkevent $071d
iftrue .skip8
clearevent $0727
.skip8
checkevent $071e
iftrue .skip9
clearevent $0728
.skip9
checkevent $071f
iftrue .skip10
clearevent $0729
.skip10
end
; 0xbc3db
UnknownScript_0xbc3db: ; 0xbc3db
setevent $06cb
setevent $06ce
setevent $06cd
setevent $06d0
setevent $06f3
setevent $06e9
setevent $06f4
setevent $06d5
setevent $06de
setevent $06dd
setevent $06df
setevent $06c0
setevent $06e4
setevent $0025
setevent $06be
setevent $06bf
setevent $06c1
setevent $06f9
setevent $06fd
setevent $06ff
setevent $0700
setevent $0702
setevent $0703
setevent $0704
setevent $070d
setevent $070e
setevent $070f
setevent $0710
setevent $0715
setevent $0716
setevent $0717
setevent $0718
setevent $0719
setevent $071a
setevent $071b
setevent $071c
setevent $071d
setevent $071e
setevent $071f
setevent $0720
setevent $0721
setevent $0722
setevent $0723
setevent $0724
setevent $0725
setevent $0726
setevent $0727
setevent $0728
setevent $0729
setevent $072c
setevent $072f
setevent $072d
setevent $0735
setevent $0736
setevent $073c
setevent $073d
setevent $0741
setevent $0742
setevent $0743
setevent $0744
setevent $02a4
setevent $02af
setevent $0749
setevent $06d3
setevent $074d
setevent $0712
setevent $0713
setevent $0711
setevent $06d4
setevent $0304
setevent $0307
setevent $06d8
setevent $06c3
setevent $06c2
setevent $06c6
setevent $075f
setevent $0731
setevent $074a
setevent $0762
setevent $0738
setevent $073a
setevent $073b
setevent $0733
setevent $073f
setevent $078d
setevent $0766
setevent $0768
setevent $0769
setevent $076a
setevent $078e
setevent $078f
setevent $0790
setevent $0791
setevent $0793
setevent $07a4
setevent $07a4
setevent $07a5
setevent $06ec
setevent $06ed
setevent $06f0
setevent $07a9
setevent $07aa
setevent $06c8
setevent $07ac
setevent $07ad
setevent $07b5
setevent $07b6
setevent $07c5
setevent $07b7
setevent $07b0
setevent $07af
setevent $07ae
setevent $07cf
setflag $000e
setflag $0017
variablesprite $4, $52
variablesprite $5, $4
variablesprite $6, $35
variablesprite $7, $a
variablesprite $8, $a
variablesprite $9, $a
variablesprite $a, $a
variablesprite $b, $28
variablesprite $c, $28
setevent $00fb
setevent $076d
setevent $076c
setevent $076e
setevent $076f
setevent $0773
setevent $0776
setevent $0777
setevent $0779
setevent $0772
setevent $077b
setevent $0036
return
; 0xbc574
UnknownScript_0xbc574: ; 0xbc574
special $005d
checkcode $17
if_equal $5, UnknownScript_0xbc5c9
if_equal $7, UnknownScript_0xbc5ce
if_equal $b, UnknownScript_0xbc5d3
if_equal $d, UnknownScript_0xbc5d8
if_equal $f, UnknownScript_0xbc5dd
if_equal $10, UnknownScript_0xbc5e2
if_equal $11, UnknownScript_0xbc5e7
if_equal $13, UnknownScript_0xbc5ec
if_equal $14, UnknownScript_0xbc5f1
if_equal $16, UnknownScript_0xbc5f6
if_equal $17, UnknownScript_0xbc5fb
if_equal $18, UnknownScript_0xbc600
if_equal $1b, UnknownScript_0xbc605
if_equal $1c, UnknownScript_0xbc60a
if_equal $1d, UnknownScript_0xbc60f
if_equal $1e, UnknownScript_0xbc614
if_equal $20, UnknownScript_0xbc619
if_equal $21, UnknownScript_0xbc61e
if_equal $22, UnknownScript_0xbc623
if_equal $23, UnknownScript_0xbc628
UnknownScript_0xbc5c9: ; bc5c9
3writetext $6c, $49fe
end
; 0xbc5ce
UnknownScript_0xbc5ce: ; 0xbc5ce
3writetext $6c, $4d9f
end
; 0xbc5d3
UnknownScript_0xbc5d3: ; 0xbc5d3
3writetext $6c, $502e
end
; 0xbc5d8
UnknownScript_0xbc5d8: ; 0xbc5d8
3writetext $6c, $542d
end
; 0xbc5dd
UnknownScript_0xbc5dd: ; 0xbc5dd
3writetext $6c, $5800
end
; 0xbc5e2
UnknownScript_0xbc5e2: ; 0xbc5e2
3writetext $6c, $5a71
end
; 0xbc5e7
UnknownScript_0xbc5e7: ; 0xbc5e7
3writetext $6c, $5cd5
end
; 0xbc5ec
UnknownScript_0xbc5ec: ; 0xbc5ec
3writetext $29, $4000
end
; 0xbc5f1
UnknownScript_0xbc5f1: ; 0xbc5f1
3writetext $29, $41c0
end
; 0xbc5f6
UnknownScript_0xbc5f6: ; 0xbc5f6
3writetext $29, $4642
end
; 0xbc5fb
UnknownScript_0xbc5fb: ; 0xbc5fb
3writetext $29, $4829
end
; 0xbc600
UnknownScript_0xbc600: ; 0xbc600
3writetext $29, $4a31
end
; 0xbc605
UnknownScript_0xbc605: ; 0xbc605
3writetext $29, $4ed4
end
; 0xbc60a
UnknownScript_0xbc60a: ; 0xbc60a
3writetext $29, $50d5
end
; 0xbc60f
UnknownScript_0xbc60f: ; 0xbc60f
3writetext $29, $52e2
end
; 0xbc614
UnknownScript_0xbc614: ; 0xbc614
3writetext $29, $5545
end
; 0xbc619
UnknownScript_0xbc619: ; 0xbc619
3writetext $29, $5937
end
; 0xbc61e
UnknownScript_0xbc61e: ; 0xbc61e
3writetext $29, $5bc4
end
; 0xbc623
UnknownScript_0xbc623: ; 0xbc623
3writetext $29, $5dc6
end
; 0xbc628
UnknownScript_0xbc628: ; 0xbc628
3writetext $29, $600c
end
; 0xbc62d
UnknownScript_0xbc62d: ; 0xbc62d
special $005d
checkcode $17
if_equal $5, UnknownScript_0xbc682
if_equal $7, UnknownScript_0xbc687
if_equal $b, UnknownScript_0xbc68c
if_equal $d, UnknownScript_0xbc691
if_equal $f, UnknownScript_0xbc696
if_equal $10, UnknownScript_0xbc69b
if_equal $11, UnknownScript_0xbc6a0
if_equal $13, UnknownScript_0xbc6a5
if_equal $14, UnknownScript_0xbc6aa
if_equal $16, UnknownScript_0xbc6af
if_equal $17, UnknownScript_0xbc6b4
if_equal $18, UnknownScript_0xbc6b9
if_equal $1b, UnknownScript_0xbc6be
if_equal $1c, UnknownScript_0xbc6c3
if_equal $1d, UnknownScript_0xbc6c8
if_equal $1e, UnknownScript_0xbc6cd
if_equal $20, UnknownScript_0xbc6d2
if_equal $21, UnknownScript_0xbc6d7
if_equal $22, UnknownScript_0xbc6dc
if_equal $23, UnknownScript_0xbc6e1
UnknownScript_0xbc682: ; bc682
3writetext $6c, $4a82
end
; 0xbc687
UnknownScript_0xbc687: ; 0xbc687
3writetext $6c, $4e2c
end
; 0xbc68c
UnknownScript_0xbc68c: ; 0xbc68c
3writetext $6c, $50d3
end
; 0xbc691
UnknownScript_0xbc691: ; 0xbc691
3writetext $6c, $54e4
end
; 0xbc696
UnknownScript_0xbc696: ; 0xbc696
3writetext $6c, $587b
end
; 0xbc69b
UnknownScript_0xbc69b: ; 0xbc69b
3writetext $6c, $5b1d
end
; 0xbc6a0
UnknownScript_0xbc6a0: ; 0xbc6a0
3writetext $6c, $5d85
end
; 0xbc6a5
UnknownScript_0xbc6a5: ; 0xbc6a5
3writetext $29, $40a9
end
; 0xbc6aa
UnknownScript_0xbc6aa: ; 0xbc6aa
3writetext $29, $426a
end
; 0xbc6af
UnknownScript_0xbc6af: ; 0xbc6af
3writetext $29, $470b
end
; 0xbc6b4
UnknownScript_0xbc6b4: ; 0xbc6b4
3writetext $29, $48fc
end
; 0xbc6b9
UnknownScript_0xbc6b9: ; 0xbc6b9
3writetext $29, $4b03
end
; 0xbc6be
UnknownScript_0xbc6be: ; 0xbc6be
3writetext $29, $4fc8
end
; 0xbc6c3
UnknownScript_0xbc6c3: ; 0xbc6c3
3writetext $29, $5175
end
; 0xbc6c8
UnknownScript_0xbc6c8: ; 0xbc6c8
3writetext $29, $5383
end
; 0xbc6cd
UnknownScript_0xbc6cd: ; 0xbc6cd
3writetext $29, $5621
end
; 0xbc6d2
UnknownScript_0xbc6d2: ; 0xbc6d2
3writetext $29, $59bc
end
; 0xbc6d7
UnknownScript_0xbc6d7: ; 0xbc6d7
3writetext $29, $5c4b
end
; 0xbc6dc
UnknownScript_0xbc6dc: ; 0xbc6dc
3writetext $29, $5e63
end
; 0xbc6e1
UnknownScript_0xbc6e1: ; 0xbc6e1
3writetext $29, $6076
end
; 0xbc6e6
UnknownScript_0xbc6e6: ; 0xbc6e6
3writetext $6c, $49c4
playsound $0093
waitbutton
keeptextopen
end
; 0xbc6f0
UnknownScript_0xbc6f0: ; 0xbc6f0
checkcode $17
if_equal $5, $4742
if_equal $7, UnknownScript_0xbc749
if_equal $b, UnknownScript_0xbc750
if_equal $d, UnknownScript_0xbc757
if_equal $f, UnknownScript_0xbc75e
if_equal $10, UnknownScript_0xbc765
if_equal $11, UnknownScript_0xbc76c
if_equal $13, UnknownScript_0xbc773
if_equal $14, UnknownScript_0xbc77a
if_equal $16, UnknownScript_0xbc781
if_equal $17, UnknownScript_0xbc788
if_equal $18, UnknownScript_0xbc78f
if_equal $1b, UnknownScript_0xbc796
if_equal $1c, UnknownScript_0xbc79d
if_equal $1d, UnknownScript_0xbc7a4
if_equal $1e, UnknownScript_0xbc7ab
if_equal $20, UnknownScript_0xbc7b2
if_equal $21, UnknownScript_0xbc7b9
if_equal $22, UnknownScript_0xbc7c0
if_equal $23, UnknownScript_0xbc7c7
3writetext $6c, $4adb
closetext
loadmovesprites
end
; 0xbc749
UnknownScript_0xbc749: ; 0xbc749
3writetext $6c, $4e89
closetext
loadmovesprites
end
; 0xbc750
UnknownScript_0xbc750: ; 0xbc750
3writetext $6c, $5136
closetext
loadmovesprites
end
; 0xbc757
UnknownScript_0xbc757: ; 0xbc757
3writetext $6c, $5553
closetext
loadmovesprites
end
; 0xbc75e
UnknownScript_0xbc75e: ; 0xbc75e
3writetext $6c, $58d7
closetext
loadmovesprites
end
; 0xbc765
UnknownScript_0xbc765: ; 0xbc765
3writetext $6c, $5b8e
closetext
loadmovesprites
end
; 0xbc76c
UnknownScript_0xbc76c: ; 0xbc76c
3writetext $6c, $5db9
closetext
loadmovesprites
end
; 0xbc773
UnknownScript_0xbc773: ; 0xbc773
3writetext $29, $40f8
closetext
loadmovesprites
end
; 0xbc77a
UnknownScript_0xbc77a: ; 0xbc77a
3writetext $29, $42ab
closetext
loadmovesprites
end
; 0xbc781
UnknownScript_0xbc781: ; 0xbc781
3writetext $29, $4730
closetext
loadmovesprites
end
; 0xbc788
UnknownScript_0xbc788: ; 0xbc788
3writetext $29, $494d
closetext
loadmovesprites
end
; 0xbc78f
UnknownScript_0xbc78f: ; 0xbc78f
3writetext $29, $4b47
closetext
loadmovesprites
end
; 0xbc796
UnknownScript_0xbc796: ; 0xbc796
3writetext $29, $502e
closetext
loadmovesprites
end
; 0xbc79d
UnknownScript_0xbc79d: ; 0xbc79d
3writetext $29, $51ac
closetext
loadmovesprites
end
; 0xbc7a4
UnknownScript_0xbc7a4: ; 0xbc7a4
3writetext $29, $53de
closetext
loadmovesprites
end
; 0xbc7ab
UnknownScript_0xbc7ab: ; 0xbc7ab
3writetext $29, $5666
closetext
loadmovesprites
end
; 0xbc7b2
UnknownScript_0xbc7b2: ; 0xbc7b2
3writetext $29, $5a28
closetext
loadmovesprites
end
; 0xbc7b9
UnknownScript_0xbc7b9: ; 0xbc7b9
3writetext $29, $5c8e
closetext
loadmovesprites
end
; 0xbc7c0
UnknownScript_0xbc7c0: ; 0xbc7c0
3writetext $29, $5ea8
closetext
loadmovesprites
end
; 0xbc7c7
UnknownScript_0xbc7c7: ; 0xbc7c7
3writetext $29, $60b5
closetext
loadmovesprites
end
; 0xbc7ce
UnknownScript_0xbc7ce: ; 0xbc7ce
checkcode $17
if_equal $5, $4820
if_equal $7, UnknownScript_0xbc827
if_equal $b, UnknownScript_0xbc82e
if_equal $d, UnknownScript_0xbc835
if_equal $f, UnknownScript_0xbc83c
if_equal $10, UnknownScript_0xbc843
if_equal $11, UnknownScript_0xbc84a
if_equal $13, UnknownScript_0xbc851
if_equal $14, UnknownScript_0xbc858
if_equal $16, UnknownScript_0xbc85f
if_equal $17, UnknownScript_0xbc866
if_equal $18, UnknownScript_0xbc86d
if_equal $1b, UnknownScript_0xbc874
if_equal $1c, UnknownScript_0xbc87b
if_equal $1d, UnknownScript_0xbc882
if_equal $1e, UnknownScript_0xbc889
if_equal $20, UnknownScript_0xbc890
if_equal $21, UnknownScript_0xbc897
if_equal $22, UnknownScript_0xbc89e
if_equal $23, UnknownScript_0xbc8a5
3writetext $6c, $4afd
closetext
loadmovesprites
end
; 0xbc827
UnknownScript_0xbc827: ; 0xbc827
3writetext $6c, $4ea2
closetext
loadmovesprites
end
; 0xbc82e
UnknownScript_0xbc82e: ; 0xbc82e
3writetext $6c, $517b
closetext
loadmovesprites
end
; 0xbc835
UnknownScript_0xbc835: ; 0xbc835
3writetext $6c, $5584
closetext
loadmovesprites
end
; 0xbc83c
UnknownScript_0xbc83c: ; 0xbc83c
3writetext $6c, $5908
closetext
loadmovesprites
end
; 0xbc843
UnknownScript_0xbc843: ; 0xbc843
3writetext $6c, $5bd2
closetext
loadmovesprites
end
; 0xbc84a
UnknownScript_0xbc84a: ; 0xbc84a
3writetext $6c, $5df4
closetext
loadmovesprites
end
; 0xbc851
UnknownScript_0xbc851: ; 0xbc851
3writetext $29, $4126
closetext
loadmovesprites
end
; 0xbc858
UnknownScript_0xbc858: ; 0xbc858
3writetext $29, $42f2
closetext
loadmovesprites
end
; 0xbc85f
UnknownScript_0xbc85f: ; 0xbc85f
3writetext $29, $4794
closetext
loadmovesprites
end
; 0xbc866
UnknownScript_0xbc866: ; 0xbc866
3writetext $29, $498a
closetext
loadmovesprites
end
; 0xbc86d
UnknownScript_0xbc86d: ; 0xbc86d
3writetext $29, $4b87
closetext
loadmovesprites
end
; 0xbc874
UnknownScript_0xbc874: ; 0xbc874
3writetext $29, $505f
closetext
loadmovesprites
end
; 0xbc87b
UnknownScript_0xbc87b: ; 0xbc87b
3writetext $29, $51ee
closetext
loadmovesprites
end
; 0xbc882
UnknownScript_0xbc882: ; 0xbc882
3writetext $29, $5412
closetext
loadmovesprites
end
; 0xbc889
UnknownScript_0xbc889: ; 0xbc889
3writetext $29, $56b6
closetext
loadmovesprites
end
; 0xbc890
UnknownScript_0xbc890: ; 0xbc890
3writetext $29, $5a5a
closetext
loadmovesprites
end
; 0xbc897
UnknownScript_0xbc897: ; 0xbc897
3writetext $29, $5cc5
closetext
loadmovesprites
end
; 0xbc89e
UnknownScript_0xbc89e: ; 0xbc89e
3writetext $29, $5ed6
closetext
loadmovesprites
end
; 0xbc8a5
UnknownScript_0xbc8a5: ; 0xbc8a5
3writetext $29, $60e2
closetext
loadmovesprites
end
; 0xbc8ac
UnknownScript_0xbc8ac: ; 0xbc8ac
checkcode $17
if_equal $5, $48fe
if_equal $7, UnknownScript_0xbc905
if_equal $b, UnknownScript_0xbc90c
if_equal $d, UnknownScript_0xbc913
if_equal $f, UnknownScript_0xbc91a
if_equal $10, UnknownScript_0xbc921
if_equal $11, UnknownScript_0xbc928
if_equal $13, UnknownScript_0xbc92f
if_equal $14, UnknownScript_0xbc936
if_equal $16, UnknownScript_0xbc93d
if_equal $17, UnknownScript_0xbc944
if_equal $18, UnknownScript_0xbc94b
if_equal $1b, UnknownScript_0xbc952
if_equal $1c, UnknownScript_0xbc959
if_equal $1d, UnknownScript_0xbc960
if_equal $1e, UnknownScript_0xbc967
if_equal $20, UnknownScript_0xbc96e
if_equal $21, UnknownScript_0xbc975
if_equal $22, UnknownScript_0xbc97c
if_equal $23, UnknownScript_0xbc983
3writetext $6c, $4b42
closetext
loadmovesprites
end
; 0xbc905
UnknownScript_0xbc905: ; 0xbc905
3writetext $6c, $4ebc
closetext
loadmovesprites
end
; 0xbc90c
UnknownScript_0xbc90c: ; 0xbc90c
3writetext $6c, $51c4
closetext
loadmovesprites
end
; 0xbc913
UnknownScript_0xbc913: ; 0xbc913
3writetext $6c, $55b6
closetext
loadmovesprites
end
; 0xbc91a
UnknownScript_0xbc91a: ; 0xbc91a
3writetext $6c, $5936
closetext
loadmovesprites
end
; 0xbc921
UnknownScript_0xbc921: ; 0xbc921
3writetext $6c, $5c06
closetext
loadmovesprites
end
; 0xbc928
UnknownScript_0xbc928: ; 0xbc928
3writetext $6c, $5e50
closetext
loadmovesprites
end
; 0xbc92f
UnknownScript_0xbc92f: ; 0xbc92f
3writetext $29, $4158
closetext
loadmovesprites
end
; 0xbc936
UnknownScript_0xbc936: ; 0xbc936
3writetext $29, $434a
closetext
loadmovesprites
end
; 0xbc93d
UnknownScript_0xbc93d: ; 0xbc93d
3writetext $29, $47eb
closetext
loadmovesprites
end
; 0xbc944
UnknownScript_0xbc944: ; 0xbc944
3writetext $29, $49bd
closetext
loadmovesprites
end
; 0xbc94b
UnknownScript_0xbc94b: ; 0xbc94b
3writetext $29, $4bcd
closetext
loadmovesprites
end
; 0xbc952
UnknownScript_0xbc952: ; 0xbc952
3writetext $29, $508c
closetext
loadmovesprites
end
; 0xbc959
UnknownScript_0xbc959: ; 0xbc959
3writetext $29, $5216
closetext
loadmovesprites
end
; 0xbc960
UnknownScript_0xbc960: ; 0xbc960
3writetext $29, $5446
closetext
loadmovesprites
end
; 0xbc967
UnknownScript_0xbc967: ; 0xbc967
3writetext $29, $56e2
closetext
loadmovesprites
end
; 0xbc96e
UnknownScript_0xbc96e: ; 0xbc96e
3writetext $29, $5aa6
closetext
loadmovesprites
end
; 0xbc975
UnknownScript_0xbc975: ; 0xbc975
3writetext $29, $5cfa
closetext
loadmovesprites
end
; 0xbc97c
UnknownScript_0xbc97c: ; 0xbc97c
3writetext $29, $5f06
closetext
loadmovesprites
end
; 0xbc983
UnknownScript_0xbc983: ; 0xbc983
3writetext $29, $6144
closetext
loadmovesprites
end
; 0xbc98a
UnknownScript_0xbc98a: ; 0xbc98a
checkcode $17
if_equal $5, $49d0
if_equal $7, UnknownScript_0xbc9d7
if_equal $b, UnknownScript_0xbc9de
if_equal $d, UnknownScript_0xbc9e5
if_equal $f, UnknownScript_0xbc9ec
if_equal $10, UnknownScript_0xbc9f3
if_equal $11, UnknownScript_0xbc9fa
if_equal $13, UnknownScript_0xbca01
if_equal $14, UnknownScript_0xbca08
if_equal $17, UnknownScript_0xbca0f
if_equal $18, UnknownScript_0xbca16
if_equal $1b, UnknownScript_0xbca1d
if_equal $1d, UnknownScript_0xbca24
if_equal $1e, UnknownScript_0xbca2b
if_equal $20, UnknownScript_0xbca32
if_equal $21, UnknownScript_0xbca39
if_equal $23, UnknownScript_0xbca40
3writetext $6c, $4b75
closetext
loadmovesprites
end
; 0xbc9d7
UnknownScript_0xbc9d7: ; 0xbc9d7
3writetext $6c, $4edc
closetext
loadmovesprites
end
; 0xbc9de
UnknownScript_0xbc9de: ; 0xbc9de
3writetext $6c, $51fe
closetext
loadmovesprites
end
; 0xbc9e5
UnknownScript_0xbc9e5: ; 0xbc9e5
3writetext $6c, $55d5
closetext
loadmovesprites
end
; 0xbc9ec
UnknownScript_0xbc9ec: ; 0xbc9ec
3writetext $6c, $5954
closetext
loadmovesprites
end
; 0xbc9f3
UnknownScript_0xbc9f3: ; 0xbc9f3
3writetext $6c, $5c32
closetext
loadmovesprites
end
; 0xbc9fa
UnknownScript_0xbc9fa: ; 0xbc9fa
3writetext $6c, $5e98
closetext
loadmovesprites
end
; 0xbca01
UnknownScript_0xbca01: ; 0xbca01
3writetext $29, $418d
closetext
loadmovesprites
end
; 0xbca08
UnknownScript_0xbca08: ; 0xbca08
3writetext $29, $4382
closetext
loadmovesprites
end
; 0xbca0f
UnknownScript_0xbca0f: ; 0xbca0f
3writetext $29, $49fc
closetext
loadmovesprites
end
; 0xbca16
UnknownScript_0xbca16: ; 0xbca16
3writetext $29, $4bec
closetext
loadmovesprites
end
; 0xbca1d
UnknownScript_0xbca1d: ; 0xbca1d
3writetext $29, $50b1
closetext
loadmovesprites
end
; 0xbca24
UnknownScript_0xbca24: ; 0xbca24
3writetext $29, $548c
closetext
loadmovesprites
end
; 0xbca2b
UnknownScript_0xbca2b: ; 0xbca2b
3writetext $29, $571e
closetext
loadmovesprites
end
; 0xbca32
UnknownScript_0xbca32: ; 0xbca32
3writetext $29, $5ada
closetext
loadmovesprites
end
; 0xbca39
UnknownScript_0xbca39: ; 0xbca39
3writetext $29, $5d1d
closetext
loadmovesprites
end
; 0xbca40
UnknownScript_0xbca40: ; 0xbca40
3writetext $29, $6175
closetext
loadmovesprites
end
; 0xbca47
UnknownScript_0xbca47: ; 0xbca47
checkcode $17
if_equal $d, $4a65
if_equal $10, UnknownScript_0xbca6b
if_equal $18, UnknownScript_0xbca71
if_equal $1c, UnknownScript_0xbca77
if_equal $1d, UnknownScript_0xbca7d
if_equal $21, UnknownScript_0xbca83
if_equal $22, UnknownScript_0xbca89
3writetext $6c, $5607
keeptextopen
end
; 0xbca6b
UnknownScript_0xbca6b: ; 0xbca6b
3writetext $6c, $5c57
keeptextopen
end
; 0xbca71
UnknownScript_0xbca71: ; 0xbca71
3writetext $29, $4c24
keeptextopen
end
; 0xbca77
UnknownScript_0xbca77: ; 0xbca77
3writetext $29, $523a
keeptextopen
end
; 0xbca7d
UnknownScript_0xbca7d: ; 0xbca7d
3writetext $29, $54e3
keeptextopen
end
; 0xbca83
UnknownScript_0xbca83: ; 0xbca83
3writetext $29, $5d4d
keeptextopen
end
; 0xbca89
UnknownScript_0xbca89: ; 0xbca89
3writetext $29, $5f37
keeptextopen
end
; 0xbca8f
UnknownScript_0xbca8f: ; 0xbca8f
checkcode $17
if_equal $7, $4abd
if_equal $d, UnknownScript_0xbcac4
if_equal $f, UnknownScript_0xbcacb
if_equal $10, UnknownScript_0xbcad2
if_equal $18, UnknownScript_0xbcad9
if_equal $1c, UnknownScript_0xbcae0
if_equal $1d, UnknownScript_0xbcae7
if_equal $20, UnknownScript_0xbcaee
if_equal $21, UnknownScript_0xbcaf5
if_equal $22, UnknownScript_0xbcafc
if_equal $23, UnknownScript_0xbcb03
3writetext $6c, $4eff
closetext
loadmovesprites
end
; 0xbcac4
UnknownScript_0xbcac4: ; 0xbcac4
3writetext $6c, $564d
closetext
loadmovesprites
end
; 0xbcacb
UnknownScript_0xbcacb: ; 0xbcacb
3writetext $6c, $5978
closetext
loadmovesprites
end
; 0xbcad2
UnknownScript_0xbcad2: ; 0xbcad2
3writetext $6c, $5c91
closetext
loadmovesprites
end
; 0xbcad9
UnknownScript_0xbcad9: ; 0xbcad9
3writetext $29, $4c47
closetext
loadmovesprites
end
; 0xbcae0
UnknownScript_0xbcae0: ; 0xbcae0
3writetext $29, $52a0
closetext
loadmovesprites
end
; 0xbcae7
UnknownScript_0xbcae7: ; 0xbcae7
3writetext $29, $5513
closetext
loadmovesprites
end
; 0xbcaee
UnknownScript_0xbcaee: ; 0xbcaee
3writetext $29, $5aff
closetext
loadmovesprites
end
; 0xbcaf5
UnknownScript_0xbcaf5: ; 0xbcaf5
3writetext $29, $5d9a
closetext
loadmovesprites
end
; 0xbcafc
UnknownScript_0xbcafc: ; 0xbcafc
3writetext $29, $5faa
closetext
loadmovesprites
end
; 0xbcb03
UnknownScript_0xbcb03: ; 0xbcb03
3writetext $29, $61c9
closetext
loadmovesprites
end
; 0xbcb0a
UnknownScript_0xbcb0a: ; 0xbcb0a
loadfont
checkcode $17
if_equal $7, $4b1d
if_equal $f, UnknownScript_0xbcb23
if_equal $20, UnknownScript_0xbcb29
if_equal $23, UnknownScript_0xbcb2f
3writetext $6c, $4f2f
keeptextopen
end
; 0xbcb23
UnknownScript_0xbcb23: ; 0xbcb23
3writetext $6c, $59be
keeptextopen
end
; 0xbcb29
UnknownScript_0xbcb29: ; 0xbcb29
3writetext $29, $5b3f
keeptextopen
end
; 0xbcb2f
UnknownScript_0xbcb2f: ; 0xbcb2f
3writetext $29, $6200
keeptextopen
end
; 0xbcb35
UnknownScript_0xbcb35: ; 0xbcb35
checkcode $17
if_equal $6, $4b57
if_equal $c, UnknownScript_0xbcb5c
if_equal $e, UnknownScript_0xbcb61
if_equal $12, UnknownScript_0xbcb66
if_equal $15, UnknownScript_0xbcb6b
if_equal $1a, UnknownScript_0xbcb70
if_equal $1f, UnknownScript_0xbcb75
if_equal $24, UnknownScript_0xbcb7a
3writetext $6c, $4bb6
end
; 0xbcb5c
UnknownScript_0xbcb5c: ; 0xbcb5c
3writetext $6c, $5239
end
; 0xbcb61
UnknownScript_0xbcb61: ; 0xbcb61
3writetext $6c, $5690
end
; 0xbcb66
UnknownScript_0xbcb66: ; 0xbcb66
3writetext $6c, $5ebe
end
; 0xbcb6b
UnknownScript_0xbcb6b: ; 0xbcb6b
3writetext $29, $4405
end
; 0xbcb70
UnknownScript_0xbcb70: ; 0xbcb70
3writetext $29, $4c8c
end
; 0xbcb75
UnknownScript_0xbcb75: ; 0xbcb75
3writetext $29, $574a
end
; 0xbcb7a
UnknownScript_0xbcb7a: ; 0xbcb7a
3writetext $29, $6295
end
; 0xbcb7f
UnknownScript_0xbcb7f: ; 0xbcb7f
checkcode $17
if_equal $6, $4ba1
if_equal $c, UnknownScript_0xbcba6
if_equal $e, UnknownScript_0xbcbab
if_equal $12, UnknownScript_0xbcbb0
if_equal $15, UnknownScript_0xbcbb5
if_equal $1a, UnknownScript_0xbcbba
if_equal $1f, UnknownScript_0xbcbbf
if_equal $24, UnknownScript_0xbcbc4
3writetext $6c, $4c37
end
; 0xbcba6
UnknownScript_0xbcba6: ; 0xbcba6
3writetext $6c, $5314
end
; 0xbcbab
UnknownScript_0xbcbab: ; 0xbcbab
3writetext $6c, $5710
end
; 0xbcbb0
UnknownScript_0xbcbb0: ; 0xbcbb0
3writetext $6c, $5f4e
end
; 0xbcbb5
UnknownScript_0xbcbb5: ; 0xbcbb5
3writetext $29, $44db
end
; 0xbcbba
UnknownScript_0xbcbba: ; 0xbcbba
3writetext $29, $4d36
end
; 0xbcbbf
UnknownScript_0xbcbbf: ; 0xbcbbf
3writetext $29, $57e3
end
; 0xbcbc4
UnknownScript_0xbcbc4: ; 0xbcbc4
3writetext $29, $6316
end
; 0xbcbc9
UnknownScript_0xbcbc9: ; 0xbcbc9
3writetext $6c, $49e1
playsound $0093
waitbutton
keeptextopen
end
; 0xbcbd3
UnknownScript_0xbcbd3: ; 0xbcbd3
checkcode $17
if_equal $6, $4bf5
if_equal $c, UnknownScript_0xbcbfc
if_equal $e, UnknownScript_0xbcc03
if_equal $12, UnknownScript_0xbcc0a
if_equal $15, UnknownScript_0xbcc11
if_equal $1a, UnknownScript_0xbcc18
if_equal $1f, UnknownScript_0xbcc1f
if_equal $24, UnknownScript_0xbcc26
3writetext $6c, $4c9b
closetext
loadmovesprites
end
; 0xbcbfc
UnknownScript_0xbcbfc: ; 0xbcbfc
3writetext $6c, $5392
closetext
loadmovesprites
end
; 0xbcc03
UnknownScript_0xbcc03: ; 0xbcc03
3writetext $6c, $5755
closetext
loadmovesprites
end
; 0xbcc0a
UnknownScript_0xbcc0a: ; 0xbcc0a
3writetext $6c, $5faa
closetext
loadmovesprites
end
; 0xbcc11
UnknownScript_0xbcc11: ; 0xbcc11
3writetext $29, $451d
closetext
loadmovesprites
end
; 0xbcc18
UnknownScript_0xbcc18: ; 0xbcc18
3writetext $29, $4d72
closetext
loadmovesprites
end
; 0xbcc1f
UnknownScript_0xbcc1f: ; 0xbcc1f
3writetext $29, $5820
closetext
loadmovesprites
end
; 0xbcc26
UnknownScript_0xbcc26: ; 0xbcc26
3writetext $29, $6359
closetext
loadmovesprites
end
; 0xbcc2d
UnknownScript_0xbcc2d: ; 0xbcc2d
checkcode $17
if_equal $6, $4c4f
if_equal $c, UnknownScript_0xbcc56
if_equal $e, UnknownScript_0xbcc5d
if_equal $12, UnknownScript_0xbcc64
if_equal $15, UnknownScript_0xbcc6b
if_equal $1a, UnknownScript_0xbcc72
if_equal $1f, UnknownScript_0xbcc79
if_equal $24, UnknownScript_0xbcc80
3writetext $6c, $4ce0
closetext
loadmovesprites
end
; 0xbcc56
UnknownScript_0xbcc56: ; 0xbcc56
3writetext $6c, $53af
closetext
loadmovesprites
end
; 0xbcc5d
UnknownScript_0xbcc5d: ; 0xbcc5d
3writetext $6c, $578a
closetext
loadmovesprites
end
; 0xbcc64
UnknownScript_0xbcc64: ; 0xbcc64
3writetext $6c, $5fdd
closetext
loadmovesprites
end
; 0xbcc6b
UnknownScript_0xbcc6b: ; 0xbcc6b
3writetext $29, $4542
closetext
loadmovesprites
end
; 0xbcc72
UnknownScript_0xbcc72: ; 0xbcc72
3writetext $29, $4dcd
closetext
loadmovesprites
end
; 0xbcc79
UnknownScript_0xbcc79: ; 0xbcc79
3writetext $29, $5842
closetext
loadmovesprites
end
; 0xbcc80
UnknownScript_0xbcc80: ; 0xbcc80
3writetext $29, $638c
closetext
loadmovesprites
end
; 0xbcc87
UnknownScript_0xbcc87: ; 0xbcc87
checkcode $17
if_equal $6, $4ca9
if_equal $c, UnknownScript_0xbccb0
if_equal $e, UnknownScript_0xbccb7
if_equal $12, UnknownScript_0xbccbe
if_equal $15, UnknownScript_0xbccc5
if_equal $1a, UnknownScript_0xbcccc
if_equal $1f, UnknownScript_0xbccd3
if_equal $24, UnknownScript_0xbccda
3writetext $6c, $4d0b
closetext
loadmovesprites
end
; 0xbccb0
UnknownScript_0xbccb0: ; 0xbccb0
3writetext $6c, $53e4
closetext
loadmovesprites
end
; 0xbccb7
UnknownScript_0xbccb7: ; 0xbccb7
3writetext $6c, $57ba
closetext
loadmovesprites
end
; 0xbccbe
UnknownScript_0xbccbe: ; 0xbccbe
3writetext $6c, $5ffa
closetext
loadmovesprites
end
; 0xbccc5
UnknownScript_0xbccc5: ; 0xbccc5
3writetext $29, $4573
closetext
loadmovesprites
end
; 0xbcccc
UnknownScript_0xbcccc: ; 0xbcccc
3writetext $29, $4e01
closetext
loadmovesprites
end
; 0xbccd3
UnknownScript_0xbccd3: ; 0xbccd3
3writetext $29, $5881
closetext
loadmovesprites
end
; 0xbccda
UnknownScript_0xbccda: ; 0xbccda
3writetext $29, $63cc
closetext
loadmovesprites
end
; 0xbcce1
UnknownScript_0xbcce1: ; 0xbcce1
checkcode $17
if_equal $c, $4cff
if_equal $e, UnknownScript_0xbcd06
if_equal $12, UnknownScript_0xbcd0d
if_equal $15, UnknownScript_0xbcd14
if_equal $1a, UnknownScript_0xbcd1b
if_equal $1f, UnknownScript_0xbcd22
if_equal $24, UnknownScript_0xbcd29
3writetext $6c, $5409
closetext
loadmovesprites
end
; 0xbcd06
UnknownScript_0xbcd06: ; 0xbcd06
3writetext $6c, $57de
closetext
loadmovesprites
end
; 0xbcd0d
UnknownScript_0xbcd0d: ; 0xbcd0d
3writetext $6c, $601f
closetext
loadmovesprites
end
; 0xbcd14
UnknownScript_0xbcd14: ; 0xbcd14
3writetext $29, $4595
closetext
loadmovesprites
end
; 0xbcd1b
UnknownScript_0xbcd1b: ; 0xbcd1b
3writetext $29, $4e21
closetext
loadmovesprites
end
; 0xbcd22
UnknownScript_0xbcd22: ; 0xbcd22
3writetext $29, $58a3
closetext
loadmovesprites
end
; 0xbcd29
UnknownScript_0xbcd29: ; 0xbcd29
3writetext $29, $63f1
closetext
loadmovesprites
end
; 0xbcd30
UnknownScript_0xbcd30: ; 0xbcd30
checkcode $17
if_equal $6, $4d42
if_equal $15, UnknownScript_0xbcd48
if_equal $1a, UnknownScript_0xbcd4e
if_equal $1f, UnknownScript_0xbcd54
3writetext $6c, $4d2c
keeptextopen
end
; 0xbcd48
UnknownScript_0xbcd48: ; 0xbcd48
3writetext $29, $45c9
keeptextopen
end
; 0xbcd4e
UnknownScript_0xbcd4e: ; 0xbcd4e
3writetext $29, $4e4c
keeptextopen
end
; 0xbcd54
UnknownScript_0xbcd54: ; 0xbcd54
3writetext $29, $58d5
keeptextopen
end
; 0xbcd5a
UnknownScript_0xbcd5a: ; 0xbcd5a
checkcode $17
if_equal $6, $4d70
if_equal $15, UnknownScript_0xbcd77
if_equal $1a, UnknownScript_0xbcd7e
if_equal $1f, UnknownScript_0xbcd85
if_equal $24, UnknownScript_0xbcd8c
3writetext $6c, $4d69
closetext
loadmovesprites
end
; 0xbcd77
UnknownScript_0xbcd77: ; 0xbcd77
3writetext $29, $4603
closetext
loadmovesprites
end
; 0xbcd7e
UnknownScript_0xbcd7e: ; 0xbcd7e
3writetext $29, $4e8f
closetext
loadmovesprites
end
; 0xbcd85
UnknownScript_0xbcd85: ; 0xbcd85
3writetext $29, $5914
closetext
loadmovesprites
end
; 0xbcd8c
UnknownScript_0xbcd8c: ; 0xbcd8c
3writetext $29, $6411
closetext
loadmovesprites
end
; 0xbcd93
UnknownScript_0xbcd93: ; 0xbcd93
checkcode $17
if_equal $24, $4d99
loadfont
3writetext $29, $6454
keeptextopen
end
; 0xbcda0
UnknownScript_0xbcda0: ; 0xbcda0
mapnametotext $0
loadfont
3writetext $6c, $474e
closetext
loadmovesprites
end
; 0xbcdaa
UnknownScript_0xbcdaa: ; 0xbcdaa
mapnametotext $0
loadfont
3writetext $6c, $474e
keeptextopen
3writetext $6c, $475c
closetext
loadmovesprites
end
; 0xbcdb9
UnknownScript_0xbcdb9: ; 0xbcdb9
waitbutton
3writetext $6c, $4648
playsound $0001
waitbutton
end
; 0xbcdc3
UnknownScript_0xbcdc3: ; 0xbcdc3
waitbutton
3writetext $6c, $4648
playsound $0096
waitbutton
end
; 0xbcdcd
UnknownScript_0xbcdcd: ; 0xbcdcd
faceplayer
loadfont
3writetext $6c, $477f
keeptextopen
checkitem COIN_CASE
iftrue UnknownScript_0xbcde0
3writetext $6c, $479c
closetext
loadmovesprites
end
; 0xbcde0
UnknownScript_0xbcde0: ; 0xbcde0
3writetext $6c, $47e3
special $0050
loadmenudata MenuDataHeader_0xbce54
interpretmenu2
writebackup
if_equal $1, UnknownScript_0xbcdf7
if_equal $2, UnknownScript_0xbce1b
2jump UnknownScript_0xbce4d
; 0xbcdf7
UnknownScript_0xbcdf7: ; 0xbcdf7
checkcoins 9949
if_equal $0, UnknownScript_0xbce46
checkmoney $0, 1000
if_equal $2, UnknownScript_0xbce3f
givecoins 50
takemoney $0, 1000
waitbutton
playsound $0022
3writetext $6c, $4830
closetext
2jump $4de4
; 0xbce1b
UnknownScript_0xbce1b: ; 0xbce1b
checkcoins 9499
if_equal $0, UnknownScript_0xbce46
checkmoney $0, 10000
if_equal $2, UnknownScript_0xbce3f
givecoins 500
takemoney $0, 10000
waitbutton
playsound $0022
3writetext $6c, $484f
closetext
2jump $4de4
; 0xbce3f
UnknownScript_0xbce3f: ; 0xbce3f
3writetext $6c, $486f
closetext
loadmovesprites
end
; 0xbce46
UnknownScript_0xbce46: ; 0xbce46
3writetext $6c, $488c
closetext
loadmovesprites
end
; 0xbce4d
UnknownScript_0xbce4d: ; 0xbce4d
3writetext $6c, $48ad
closetext
loadmovesprites
end
; 0xbce54
MenuDataHeader_0xbce54: ; 0xbce54
db $40 ; flags
db 04, 00 ; start coords
db 11, 15 ; end coords
dw MenuData2_0xbce5c
db 1 ; default option
; 0xbce5c
MenuData2_0xbce5c: ; 0xbce5c
db $80 ; flags
db 3 ; items
db " 50 : ¥1000@"
db "500 : ¥10000@"
db "CANCEL@"
; 0xbce7f
UnknownScript_0xbce7f: ; 0xbce7f
faceplayer
loadfont
special $0059
if_less_than $32, UnknownScript_0xbce9a
if_less_than $96, UnknownScript_0xbce93
3writetext $6c, $492a
closetext
loadmovesprites
end
; 0xbce93
UnknownScript_0xbce93: ; 0xbce93
3writetext $6c, $4954
closetext
loadmovesprites
end
; 0xbce9a
UnknownScript_0xbce9a: ; 0xbce9a
3writetext $6c, $4989
closetext
loadmovesprites
end
; 0xbcea1
MovementData_0xbcea1: ; bcea1
step_right
step_down
turn_head_up
step_end
; bcea5
UnusedPhoneScript: ; 0xbcea5
3writetext BANK(UnusedPhoneText), UnusedPhoneText
end
MomPhoneScript: ; 0xbceaa
checkevent $0040
iftrue .bcec5
checkevent $0041 ; if dude talked to you, then you left home without talking to mom
iftrue MomPhoneLectureScript
checkevent $001f
iftrue MomPhoneNoGymQuestScript
checkevent $001a
iftrue MomPhoneNoPokedexScript
2jump MomPhoneNoPokemonScript
.bcec5 ; 0xbcec5
checkevent $0007
iftrue MomPhoneHangUpScript
3writetext BANK(MomPhoneGreetingText), MomPhoneGreetingText
keeptextopen
mapnametotext $0
checkcode $f
if_equal $1, UnknownScript_0xbcee7
if_equal $2, UnknownScript_0xbcf27
2jump UnknownScript_0xbcf2f
UnknownScript_0xbcedf: ; 0xbcedf
3writetext $6d, $4021
keeptextopen
2jump UnknownScript_0xbcf37
UnknownScript_0xbcee7: ; 0xbcee7
checkcode $c
if_equal GROUP_NEW_BARK_TOWN, .newbark
if_equal GROUP_CHERRYGROVE_CITY, .cherrygrove
if_equal GROUP_VIOLET_CITY, .violet
if_equal GROUP_AZALEA_TOWN, .azalea
if_equal GROUP_GOLDENROD_CITY, .goldenrod
3writetext BANK(MomPhoneGenericAreaText), MomPhoneGenericAreaText
keeptextopen
2jump UnknownScript_0xbcf37
.newbark ; 0xbcf05
3writetext BANK(MomPhoneNewBarkText), MomPhoneNewBarkText
keeptextopen
2jump UnknownScript_0xbcf37
.cherrygrove ; 0xbcf0d
3writetext BANK(MomPhoneCherrygroveText), MomPhoneCherrygroveText
keeptextopen
2jump UnknownScript_0xbcf37
.violet ; 0xbcf15
displaylocation $7, 1 ; sprout tower
2jump UnknownScript_0xbcedf
.azalea ; 0xbcf1b
displaylocation $d, 1 ; slowpoke well
2jump UnknownScript_0xbcedf
.goldenrod ; 0xbcf21
displaylocation $11, 1 ; radio tower
2jump UnknownScript_0xbcedf
UnknownScript_0xbcf27: ; 0xbcf27
3writetext $6d, $411c
keeptextopen
2jump UnknownScript_0xbcf37
UnknownScript_0xbcf2f: ; 0xbcf2f
3writetext $6d, $4150
keeptextopen
2jump UnknownScript_0xbcf37
UnknownScript_0xbcf37: ; 0xbcf37
checkflag $0008
iffalse UnknownScript_0xbcf49
checkmoney $1, 0
if_equal $0, UnknownScript_0xbcf55
2jump UnknownScript_0xbcf63
UnknownScript_0xbcf49: ; 0xbcf49
checkmoney $1, 0
if_equal $0, UnknownScript_0xbcf79
2jump UnknownScript_0xbcf6e
UnknownScript_0xbcf55: ; 0xbcf55
readmoney $1, $0
3writetext $6d, $41a7
yesorno
iftrue MomPhoneSaveMoneyScript
2jump MomPhoneWontSaveMoneyScript
UnknownScript_0xbcf63: ; 0xbcf63
3writetext $6d, $41ea
yesorno
iftrue MomPhoneSaveMoneyScript
2jump MomPhoneWontSaveMoneyScript
UnknownScript_0xbcf6e: ; 0xbcf6e
3writetext $6d, $420d
yesorno
iftrue MomPhoneSaveMoneyScript
2jump MomPhoneWontSaveMoneyScript
UnknownScript_0xbcf79: ; 0xbcf79
readmoney $1, $0
3writetext $6d, $4249
yesorno
iftrue MomPhoneSaveMoneyScript
2jump MomPhoneWontSaveMoneyScript
MomPhoneSaveMoneyScript: ; 0xbcf87
setflag $0008
3writetext $6d, $4289
keeptextopen
2jump MomPhoneHangUpScript
MomPhoneWontSaveMoneyScript: ; 0xbcf92
clearflag $0008
3writetext BANK(MomPhoneWontSaveMoneyText), MomPhoneWontSaveMoneyText
keeptextopen
2jump MomPhoneHangUpScript
MomPhoneHangUpScript: ; 0xbcf9d
3writetext BANK(MomPhoneHangUpText), MomPhoneHangUpText
end
MomPhoneNoPokemonScript: ; 0xbcfa2
3writetext BANK(MomPhoneNoPokemonText), MomPhoneNoPokemonText
end
MomPhoneNoPokedexScript: ; 0xbcfa7
3writetext BANK(MomPhoneNoPokedexText), MomPhoneNoPokedexText
end
MomPhoneNoGymQuestScript: ; 0xbcfac
3writetext BANK(MomPhoneNoGymQuestText), MomPhoneNoGymQuestText
end
MomPhoneLectureScript: ; 0xbcfb1
setevent $0040
setflag $0009
specialphonecall $0000
3writetext BANK(MomPhoneLectureText), MomPhoneLectureText
yesorno
iftrue MomPhoneSaveMoneyScript
2jump MomPhoneWontSaveMoneyScript
BillPhoneScript1: ; 0xbcfc5
checktime $2
iftrue .daygreet
checktime $4
iftrue .nitegreet
3writetext BANK(BillPhoneMornGreetingText), BillPhoneMornGreetingText
keeptextopen
2jump .main
.daygreet ; 0xbcfd7
3writetext BANK(BillPhoneDayGreetingText), BillPhoneDayGreetingText
keeptextopen
2jump .main
.nitegreet ; 0xbcfdf
3writetext BANK(BillPhoneNiteGreetingText), BillPhoneNiteGreetingText
keeptextopen
2jump .main
.main ; 0xbcfe7
3writetext BANK(BillPhoneGeneriText), BillPhoneGeneriText
keeptextopen
checkcode $10
RAM2MEM $0
if_equal $0, .full
if_less_than $6, .nearlyfull
3writetext BANK(BillPhoneNotFullText), BillPhoneNotFullText
end
.nearlyfull ; 0xbcffd
3writetext BANK(BillPhoneNearlyFullText), BillPhoneNearlyFullText
end
.full ; 0xbd002
3writetext BANK(BillPhoneFullText), BillPhoneFullText
end
BillPhoneScript2: ; 0xbd007
3writetext BANK(BillPhoneNewlyFullText), BillPhoneNewlyFullText
closetext
end
ElmPhoneScript1: ; 0xbd00d
checkcode $14
if_equal $1, .pokerus
checkevent $0055
iftrue .discovery
checkevent $002d
iffalse .next
checkevent $0054
iftrue .egghatched
.next
checkevent $002d
iftrue .eggunhatched
checkevent $0701
iftrue .assistant
checkevent $001f
iftrue .checkingegg
checkevent $0043
iftrue .stolen
checkevent $001e
iftrue .sawmrpokemon
3writetext BANK(ElmPhoneStartText), ElmPhoneStartText
end
.sawmrpokemon ; 0xbd048
3writetext BANK(ElmPhoneSawMrPokemonText), ElmPhoneSawMrPokemonText
end
.stolen ; 0xbd04d
3writetext BANK(ElmPhonePokemonStolenText), ElmPhonePokemonStolenText
end
.checkingegg ; 0xbd052
3writetext BANK(ElmPhoneCheckingEggText), ElmPhoneCheckingEggText
end
.assistant ; 0xbd057
3writetext BANK(ElmPhoneAssistantText), ElmPhoneAssistantText
end
.eggunhatched ; 0xbd05c
3writetext BANK(ElmPhoneEggUnhatchedText), ElmPhoneEggUnhatchedText
end
.egghatched ; 0xbd061
3writetext BANK(ElmPhoneEggHatchedText), ElmPhoneEggHatchedText
setevent $0077
end
.discovery ; 0xbd069
random $2
if_equal $0, .nextdiscovery
3writetext BANK(ElmPhoneDiscovery1Text), ElmPhoneDiscovery1Text
end
.nextdiscovery ; 0xbd074
3writetext BANK(ElmPhoneDiscovery2Text), ElmPhoneDiscovery2Text
end
.pokerus ; 0xbd079
3writetext BANK(ElmPhonePokerusText), ElmPhonePokerusText
specialphonecall $0000
end
ElmPhoneScript2: ; 0xbd081
checkcode $14
if_equal $2, .disaster
if_equal $3, .assistant
if_equal $4, .rocket
if_equal $5, .gift
if_equal $8, .gift
3writetext BANK(ElmPhonePokerusText), ElmPhonePokerusText
specialphonecall $0000
end
.disaster ; 0xbd09f
3writetext BANK(ElmPhoneDisasterText), ElmPhoneDisasterText
specialphonecall $0000
setevent $0043
end
.assistant ; 0xbd0aa
3writetext BANK(ElmPhoneEggAssistantText), ElmPhoneEggAssistantText
specialphonecall $0000
clearevent $0700
setevent $0701
end
.rocket ; 0xbd0b8
3writetext BANK(ElmPhoneRocketText), ElmPhoneRocketText
specialphonecall $0000
end
.gift ; 0xbd0c0
3writetext BANK(ElmPhoneGiftText), ElmPhoneGiftText
specialphonecall $0000
end
.unused ; 0xbd0c8
3writetext BANK(ElmPhoneUnusedText), ElmPhoneUnusedText
specialphonecall $0000
end
; bd0d0