pokecrystal-board/maps/RadioTower2F.asm
Rangi f964d04a87 * loadmenuheader -> loadmenu (ead103d)
* objectface -> turnobject (c834bda)
2018-02-25 20:05:37 -05:00

740 lines
15 KiB
NASM

const_def 2 ; object constants
const RADIOTOWER2F_SUPER_NERD
const RADIOTOWER2F_TEACHER
const RADIOTOWER2F_ROCKET1
const RADIOTOWER2F_ROCKET2
const RADIOTOWER2F_ROCKET3
const RADIOTOWER2F_ROCKET_GIRL
const RADIOTOWER2F_BLACK_BELT1
const RADIOTOWER2F_BLACK_BELT2
const RADIOTOWER2F_JIGGLYPUFF
const RADIOTOWER2F_BUENA
const RADIOTOWER2F_RECEPTIONIST
RadioTower2F_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
UnknownScript_0x5d6fd:
end
RadioTower2FSuperNerdScript:
jumptextfaceplayer RadioTower2FSuperNerdText
TeacherScript_0x5d701:
faceplayer
opentext
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue .Rockets
writetext UnknownText_0x5d956
waitbutton
closetext
end
.Rockets:
writetext UnknownText_0x5d983
waitbutton
closetext
end
RadioTowerJigglypuff:
opentext
writetext RadioTowerJigglypuffText
cry JIGGLYPUFF
waitbutton
closetext
end
RadioTower2FBlackBelt1Script:
jumptextfaceplayer RadioTower2FBlackBelt1Text
RadioTower2FBlackBelt2Script:
jumptextfaceplayer RadioTower2FBlackBelt2Text
TrainerGruntM4:
trainer GRUNTM, GRUNTM_4, EVENT_BEAT_ROCKET_GRUNTM_4, GruntM4SeenText, GruntM4BeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext GruntM4AfterBattleText
waitbutton
closetext
end
TrainerGruntM5:
trainer GRUNTM, GRUNTM_5, EVENT_BEAT_ROCKET_GRUNTM_5, GruntM5SeenText, GruntM5BeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext GruntM5AfterBattleText
waitbutton
closetext
end
TrainerGruntM6:
trainer GRUNTM, GRUNTM_6, EVENT_BEAT_ROCKET_GRUNTM_6, GruntM6SeenText, GruntM6BeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext GruntM6AfterBattleText
waitbutton
closetext
end
TrainerGruntF2:
trainer GRUNTF, GRUNTF_2, EVENT_BEAT_ROCKET_GRUNTF_2, GruntF2SeenText, GruntF2BeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext GruntF2AfterBattleText
waitbutton
closetext
end
Buena:
faceplayer
opentext
checkflag ENGINE_ROCKETS_IN_RADIO_TOWER
iftrue UnknownScript_0x5d865
checkevent EVENT_MET_BUENA
iffalse UnknownScript_0x5d800
checkflag ENGINE_BUENAS_PASSWORD_2
iftrue UnknownScript_0x5d82f
checkcode VAR_HOUR
ifless 18, UnknownScript_0x5d893
checkflag ENGINE_BUENAS_PASSWORD
iffalse UnknownScript_0x5d80a
checkitem BLUE_CARD
iffalse UnknownScript_0x5d86b
checkcode VAR_BLUECARDBALANCE
ifequal 30, UnknownScript_0x5d87f
playmusic MUSIC_BUENAS_PASSWORD
writetext UnknownText_0x5de35
special AskRememberPassword
iffalse UnknownScript_0x5d81e
writetext UnknownText_0x5de84
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, RIGHT
checkcode VAR_FACING
ifnotequal RIGHT, UnknownScript_0x5d7be
applymovement PLAYER, MovementData_0x5d921
UnknownScript_0x5d7be:
turnobject PLAYER, RIGHT
opentext
writetext UnknownText_0x5dedd
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, DOWN
refreshscreen
special BuenasPassword
closetext
iffalse UnknownScript_0x5d845
opentext
writetext UnknownText_0x5dfc1
waitbutton
closetext
checkcode VAR_BLUECARDBALANCE
addvar 1
writevarcode VAR_BLUECARDBALANCE
waitsfx
playsound SFX_TRANSACTION
setflag ENGINE_BUENAS_PASSWORD_2
pause 20
turnobject RADIOTOWER2F_BUENA, RIGHT
opentext
writetext UnknownText_0x5e054
waitbutton
closetext
special FadeOutMusic
pause 20
special RestartMapMusic
checkcode VAR_BLUECARDBALANCE
ifequal 30, UnknownScript_0x5d8a4
end
UnknownScript_0x5d800:
writetext UnknownText_0x5dcf4
buttonsound
setevent EVENT_MET_BUENA
verbosegiveitem BLUE_CARD
UnknownScript_0x5d80a:
writetext UnknownText_0x5de10
waitbutton
closetext
checkcellnum PHONE_BUENA
iftrue UnknownScript_0x5d81a
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d81a:
turnobject RADIOTOWER2F_BUENA, RIGHT
end
UnknownScript_0x5d81e:
writetext UnknownText_0x5df29
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, RIGHT
special FadeOutMusic
pause 20
special RestartMapMusic
end
UnknownScript_0x5d82f:
writetext UnknownText_0x5df6c
waitbutton
closetext
checkcellnum PHONE_BUENA
iftrue UnknownScript_0x5d83f
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d83f:
turnobject RADIOTOWER2F_BUENA, RIGHT
pause 10
end
UnknownScript_0x5d845:
setflag ENGINE_BUENAS_PASSWORD_2
opentext
writetext UnknownText_0x5e01c
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, RIGHT
pause 20
opentext
writetext UnknownText_0x5e054
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, RIGHT
special FadeOutMusic
pause 20
special RestartMapMusic
end
UnknownScript_0x5d865:
writetext UnknownText_0x5e0c2
waitbutton
closetext
end
UnknownScript_0x5d86b:
writetext UnknownText_0x5e192
waitbutton
closetext
checkcellnum PHONE_BUENA
iftrue UnknownScript_0x5d87b
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d87b:
turnobject RADIOTOWER2F_BUENA, RIGHT
end
UnknownScript_0x5d87f:
writetext UnknownText_0x5e0f1
waitbutton
closetext
checkcellnum PHONE_BUENA
iftrue UnknownScript_0x5d88f
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d88f:
turnobject RADIOTOWER2F_BUENA, RIGHT
end
UnknownScript_0x5d893:
writetext UnknownText_0x5e131
waitbutton
closetext
checkcellnum PHONE_BUENA
iftrue UnknownScript_0x5d8a3
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
iftrue UnknownScript_0x5d8cc
UnknownScript_0x5d8a3:
end
UnknownScript_0x5d8a4:
checkcellnum PHONE_BUENA
iftrue UnknownScript_0x5d8fe
pause 20
turnobject RADIOTOWER2F_BUENA, DOWN
pause 15
turnobject PLAYER, UP
pause 15
checkevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
iftrue UnknownScript_0x5d8cc
showemote EMOTE_SHOCK, RADIOTOWER2F_BUENA, 15
setevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER_NO_BLUE_CARD
setevent EVENT_BUENA_OFFERED_HER_PHONE_NUMBER
opentext
writetext UnknownText_0x5e1ee
jump UnknownScript_0x5d8d0
UnknownScript_0x5d8cc:
opentext
writetext UnknownText_0x5e2bf
UnknownScript_0x5d8d0:
askforphonenumber PHONE_BUENA
ifequal PHONE_CONTACTS_FULL, UnknownScript_0x5d8f6
ifequal PHONE_CONTACT_REFUSED, UnknownScript_0x5d8ed
writetext UnknownText_0x5e2f3
playsound SFX_REGISTER_PHONE_NUMBER
waitsfx
buttonsound
writetext UnknownText_0x5e310
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, RIGHT
addcellnum PHONE_BUENA
end
UnknownScript_0x5d8ed:
writetext UnknownText_0x5e33c
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, RIGHT
end
UnknownScript_0x5d8f6:
writetext UnknownText_0x5e35e
waitbutton
closetext
turnobject RADIOTOWER2F_BUENA, RIGHT
UnknownScript_0x5d8fe:
end
ReceptionistScript_0x5d8ff:
faceplayer
opentext
checkitem BLUE_CARD
iffalse UnknownScript_0x5d90f
writetext UnknownText_0x5e392
buttonsound
special BuenaPrize
closetext
end
UnknownScript_0x5d90f:
writetext UnknownText_0x5e3d8
buttonsound
closetext
end
MapRadioTower2FSignpost0Script:
jumptext UnknownText_0x5e426
MapRadioTower2FSignpost1Script:
jumptext UnknownText_0x5e430
MapRadioTower2FSignpost5Script:
jumptext UnknownText_0x5e463
RadioTower2FBookshelf:
jumpstd magazinebookshelf
MovementData_0x5d921:
slow_step DOWN
slow_step RIGHT
step_end
RadioTower2FSuperNerdText:
text "You can listen to"
line "the radio any-"
cont "where. Tune in!"
done
UnknownText_0x5d956:
text "Lullabies on the"
line "radio may make"
cont "#MON sleep."
done
UnknownText_0x5d983:
text "Why would they"
line "want to take over"
cont "the RADIO TOWER?"
done
RadioTowerJigglypuffText:
text "JIGGLYPUFF:"
line "Jiggly…"
done
RadioTower2FBlackBelt1Text:
text "Sorry. Authorized"
line "personnel only"
cont "beyond this point."
para "It wasn't that way"
line "before."
para "There's something"
line "wrong with the"
cont "DIRECTOR…"
done
RadioTower2FBlackBelt2Text:
text "Feel free to look"
line "around anywhere."
para "The DIRECTOR is"
line "nice again, just"
cont "as he was before."
done
GruntM4SeenText:
text "Three years ago,"
line "TEAM ROCKET was"
cont "forced to disband."
para "But we're making a"
line "comeback here!"
done
GruntM4BeatenText:
text "Gwah! Don't get"
line "cute!"
done
GruntM4AfterBattleText:
text "We won't let you"
line "ruin our plans"
cont "for our comeback!"
done
GruntM5SeenText:
text "We're TEAM ROCKET,"
line "the exploiters of"
cont "#MON!"
para "We love being"
line "evil! Scared?"
done
GruntM5BeatenText:
text "You think you're a"
line "hero?"
done
GruntM5AfterBattleText:
text "We're not always"
line "evil. We just do"
cont "whatever we like."
done
GruntM6SeenText:
text "Hey, hey! Keep out"
line "of our way!"
done
GruntM6BeatenText:
text "Arggh. I give up."
done
GruntM6AfterBattleText:
text "Our EXECUTIVES are"
line "trying to take"
cont "this place over."
para "They have some big"
line "plan. I wonder"
cont "what that is?"
done
GruntF2SeenText:
text "Hahaha!"
para "How boring."
line "It was far too"
para "easy to take over"
line "this place!"
para "Come on, keep me"
line "amused!"
done
GruntF2BeatenText:
text "Wh-who are you?"
done
GruntF2AfterBattleText:
text "You beat me, and"
line "I won't forget it!"
done
UnknownText_0x5dcf4:
text "BUENA: Hi! I'm"
line "BUENA!"
para "Do you know about"
line "a radio program"
cont "called PASSWORD?"
para "If you can tell me"
line "the password from"
para "the program, you"
line "will earn points."
para "Save up those"
line "points and trade"
para "them to that sweet"
line "young lady over"
para "there for some"
line "choice prizes!"
para "Here you go!"
para "It's your very own"
line "point card!"
done
UnknownText_0x5de10:
text "BUENA: Tune in to"
line "my PASSWORD SHOW!"
done
UnknownText_0x5de35:
text "BUENA: Hi!"
line "Did you tune in to"
cont "my radio show?"
para "Do you remember"
line "today's password?"
done
UnknownText_0x5de84:
text "BUENA: Oh, wow!"
line "Thank you!"
para "What was your name"
line "again?"
para "…<PLAY_G>, OK!"
para "Come on, <PLAY_G>."
line "Join the show."
done
UnknownText_0x5dedd:
text "BUENA: Everyone"
line "ready?"
para "I want to hear you"
line "shout out today's"
para "password for"
line "<PLAY_G>!"
done
UnknownText_0x5df29:
text "BUENA: Come back"
line "after you listen"
para "to my show, OK?"
line "Catch ya later!"
done
UnknownText_0x5df6c:
text "BUENA: Sorry…"
para "You get just one"
line "chance each day."
para "Come back tomorrow"
line "for another try!"
done
UnknownText_0x5dfc1:
text "BUENA: YIPPEE!"
line "That's right!"
para "You did tune in!"
line "I'm so happy!"
para "You earned one"
line "point! Congrats!"
done
UnknownText_0x5e01c:
text "BUENA: Aww…"
line "That's not it…"
para "Did you forget the"
line "password?"
done
UnknownText_0x5e054:
text "BUENA: Yup! Our"
line "contestant was"
para "<PLAY_G>."
line "Thanks for coming!"
para "I hope all you"
line "listeners will"
para "come too!"
line "I'll be waiting!"
done
UnknownText_0x5e0c2:
text "BUENA: Huh?"
line "Today's password?"
para "HELP, of course!"
done
UnknownText_0x5e0f1:
text "BUENA: Your BLUE"
line "CARD's full."
para "Trade it in for a"
line "fabulous prize!"
done
UnknownText_0x5e131:
text "BUENA: Tune in to"
line "PASSWORD every"
para "night from six to"
line "midnight!"
para "Tune in, then drop"
line "in for a visit!"
done
UnknownText_0x5e192:
text "BUENA: Oh? You"
line "forgot to bring"
cont "your BLUE CARD?"
para "I can't give you"
line "points if you"
cont "don't have it."
done
UnknownText_0x5e1ee:
text "BUENA: Oh! Your"
line "BLUE CARD reached"
para "30 points today!"
line "That's so wild!"
para "Hmm… There isn't a"
line "prize for hitting"
cont "30 points, but…"
para "You came by so"
line "often, <PLAY_G>."
para "I'll make you a"
line "special deal!"
para "How would you like"
line "my phone number?"
done
UnknownText_0x5e2bf:
text "BUENA: <PLAY_G>,"
line "do you want to"
para "register my phone"
line "number?"
done
UnknownText_0x5e2f3:
text "<PLAYER> registered"
line "BUENA's number."
done
UnknownText_0x5e310:
text "BUENA: I look"
line "forward to hearing"
cont "from you!"
done
UnknownText_0x5e33c:
text "BUENA: Aww… It's a"
line "special prize…"
done
UnknownText_0x5e35e:
text "BUENA: <PLAY_G>,"
line "your phone list"
para "has no room left"
line "for me…"
done
UnknownText_0x5e392:
text "You can cash in"
line "your saved points"
para "for a lovely prize"
line "of your choice!"
done
UnknownText_0x5e3d8:
text "You can't trade in"
line "points without"
cont "your BLUE CARD."
para "Don't forget your"
line "BLUE CARD!"
done
UnknownText_0x5e426:
text "2F SALES"
done
UnknownText_0x5e430:
text "PROF.OAK'S #MON"
line "TALK"
para "The Hottest Show"
line "on the Air!"
done
UnknownText_0x5e463:
text "Anywhere, Anytime"
line "#MON Radio"
done
RadioTower2F_MapEvents:
db 0, 0 ; filler
db 2 ; warp events
warp_event 0, 0, RADIO_TOWER_3F, 1
warp_event 15, 0, RADIO_TOWER_1F, 3
db 0 ; coord events
db 6 ; bg events
bg_event 3, 0, BGEVENT_READ, MapRadioTower2FSignpost0Script
bg_event 5, 0, BGEVENT_READ, MapRadioTower2FSignpost1Script
bg_event 9, 1, BGEVENT_READ, RadioTower2FBookshelf
bg_event 10, 1, BGEVENT_READ, RadioTower2FBookshelf
bg_event 11, 1, BGEVENT_READ, RadioTower2FBookshelf
bg_event 13, 0, BGEVENT_READ, MapRadioTower2FSignpost5Script
db 11 ; object events
object_event 6, 6, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, RadioTower2FSuperNerdScript, EVENT_GOLDENROD_CITY_CIVILIANS
object_event 17, 2, SPRITE_TEACHER, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 1, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, TeacherScript_0x5d701, -1
object_event 1, 4, SPRITE_ROCKET, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_TRAINER, 3, TrainerGruntM4, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
object_event 8, 4, SPRITE_ROCKET, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_TRAINER, 3, TrainerGruntM5, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
object_event 4, 1, SPRITE_ROCKET, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_TRAINER, 2, TrainerGruntM6, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
object_event 10, 5, SPRITE_ROCKET_GIRL, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 3, TrainerGruntF2, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
object_event 0, 1, SPRITE_BLACK_BELT, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, RadioTower2FBlackBelt1Script, EVENT_RADIO_TOWER_BLACKBELT_BLOCKS_STAIRS
object_event 1, 1, SPRITE_BLACK_BELT, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, RadioTower2FBlackBelt2Script, EVENT_RADIO_TOWER_CIVILIANS_AFTER
object_event 12, 1, SPRITE_JIGGLYPUFF, SPRITEMOVEDATA_POKEMON, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, RadioTowerJigglypuff, -1
object_event 14, 5, SPRITE_BUENA, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Buena, -1
object_event 12, 7, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, ReceptionistScript_0x5d8ff, EVENT_GOLDENROD_CITY_CIVILIANS