mirror of https://github.com/pret/pokecrystal.git
445 lines
9.1 KiB
NASM
445 lines
9.1 KiB
NASM
object_const_def ; object_event constants
|
|
const RADIOTOWER5F_DIRECTOR
|
|
const RADIOTOWER5F_ROCKET
|
|
const RADIOTOWER5F_ROCKET_GIRL
|
|
const RADIOTOWER5F_ROCKER
|
|
const RADIOTOWER5F_POKE_BALL
|
|
|
|
RadioTower5F_MapScripts:
|
|
db 3 ; scene scripts
|
|
scene_script .DummyScene0 ; SCENE_DEFAULT
|
|
scene_script .DummyScene1 ; SCENE_RADIOTOWER5F_ROCKET_BOSS
|
|
scene_script .DummyScene2 ; SCENE_RADIOTOWER5F_NOTHING
|
|
|
|
db 0 ; callbacks
|
|
|
|
.DummyScene0:
|
|
end
|
|
|
|
.DummyScene1:
|
|
end
|
|
|
|
.DummyScene2:
|
|
end
|
|
|
|
FakeDirectorScript:
|
|
turnobject RADIOTOWER5F_DIRECTOR, UP
|
|
showemote EMOTE_SHOCK, RADIOTOWER5F_DIRECTOR, 15
|
|
opentext
|
|
writetext FakeDirectorTextBefore1
|
|
waitbutton
|
|
closetext
|
|
applymovement RADIOTOWER5F_DIRECTOR, FakeDirectorMovement
|
|
playmusic MUSIC_ROCKET_ENCOUNTER
|
|
opentext
|
|
writetext FakeDirectorTextBefore2
|
|
waitbutton
|
|
closetext
|
|
winlosstext FakeDirectorWinText, 0
|
|
setlasttalked RADIOTOWER5F_DIRECTOR
|
|
loadtrainer EXECUTIVEM, EXECUTIVEM_3
|
|
startbattle
|
|
reloadmapafterbattle
|
|
opentext
|
|
writetext FakeDirectorTextAfter
|
|
buttonsound
|
|
verbosegiveitem BASEMENT_KEY
|
|
closetext
|
|
setscene SCENE_RADIOTOWER5F_ROCKET_BOSS
|
|
setevent EVENT_BEAT_ROCKET_EXECUTIVEM_3
|
|
end
|
|
|
|
Director:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_CLEARED_RADIO_TOWER
|
|
iftrue .TrueDirector
|
|
writetext FakeDirectorTextAfter
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.TrueDirector:
|
|
writetext RadioTower5FDirectorText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerExecutivef1:
|
|
trainer EXECUTIVEF, EXECUTIVEF_1, EVENT_BEAT_ROCKET_EXECUTIVEF_1, Executivef1SeenText, Executivef1BeatenText, 0, .Script
|
|
|
|
.Script:
|
|
endifjustbattled
|
|
opentext
|
|
writetext Executivef1AfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
RadioTower5FRocketBossScene:
|
|
applymovement PLAYER, RadioTower5FPlayerTwoStepsLeftMovement
|
|
playmusic MUSIC_ROCKET_ENCOUNTER
|
|
turnobject RADIOTOWER5F_ROCKET, RIGHT
|
|
opentext
|
|
writetext RadioTower5FRocketBossBeforeText
|
|
waitbutton
|
|
closetext
|
|
winlosstext RadioTower5FRocketBossWinText, 0
|
|
setlasttalked RADIOTOWER5F_ROCKET
|
|
loadtrainer EXECUTIVEM, EXECUTIVEM_1
|
|
startbattle
|
|
reloadmapafterbattle
|
|
opentext
|
|
writetext RadioTower5FRocketBossAfterText
|
|
waitbutton
|
|
closetext
|
|
special FadeBlackQuickly
|
|
special ReloadSpritesNoPalettes
|
|
disappear RADIOTOWER5F_ROCKET
|
|
disappear RADIOTOWER5F_ROCKET_GIRL
|
|
pause 15
|
|
special FadeInQuickly
|
|
setevent EVENT_BEAT_ROCKET_EXECUTIVEM_1
|
|
setevent EVENT_CLEARED_RADIO_TOWER
|
|
clearflag ENGINE_ROCKETS_IN_RADIO_TOWER
|
|
setevent EVENT_GOLDENROD_CITY_ROCKET_SCOUT
|
|
setevent EVENT_GOLDENROD_CITY_ROCKET_TAKEOVER
|
|
setevent EVENT_RADIO_TOWER_ROCKET_TAKEOVER
|
|
clearevent EVENT_MAHOGANY_MART_OWNERS
|
|
clearflag ENGINE_ROCKETS_IN_MAHOGANY
|
|
clearevent EVENT_GOLDENROD_CITY_CIVILIANS
|
|
clearevent EVENT_RADIO_TOWER_CIVILIANS_AFTER
|
|
setevent EVENT_BLACKTHORN_CITY_SUPER_NERD_BLOCKS_GYM
|
|
clearevent EVENT_BLACKTHORN_CITY_SUPER_NERD_DOES_NOT_BLOCK_GYM
|
|
special PlayMapMusic
|
|
disappear RADIOTOWER5F_DIRECTOR
|
|
moveobject RADIOTOWER5F_DIRECTOR, 12, 0
|
|
appear RADIOTOWER5F_DIRECTOR
|
|
applymovement RADIOTOWER5F_DIRECTOR, RadioTower5FDirectorWalksIn
|
|
turnobject PLAYER, RIGHT
|
|
opentext
|
|
writetext RadioTower5FDirectorThankYouText
|
|
buttonsound
|
|
verbosegiveitem CLEAR_BELL
|
|
writetext RadioTower5FDirectorDescribeClearBellText
|
|
waitbutton
|
|
closetext
|
|
setscene SCENE_RADIOTOWER5F_NOTHING
|
|
setmapscene ECRUTEAK_TIN_TOWER_ENTRANCE, SCENE_DEFAULT
|
|
setevent EVENT_GOT_CLEAR_BELL
|
|
setevent EVENT_TEAM_ROCKET_DISBANDED
|
|
sjump .UselessJump
|
|
|
|
.UselessJump:
|
|
applymovement RADIOTOWER5F_DIRECTOR, RadioTower5FDirectorWalksOut
|
|
playsound SFX_EXIT_BUILDING
|
|
disappear RADIOTOWER5F_DIRECTOR
|
|
end
|
|
|
|
Ben:
|
|
jumptextfaceplayer BenText
|
|
|
|
RadioTower5FUltraBall:
|
|
itemball ULTRA_BALL
|
|
|
|
RadioTower5FDirectorsOfficeSign:
|
|
jumptext RadioTower5FDirectorsOfficeSignText
|
|
|
|
RadioTower5FStudio1Sign:
|
|
jumptext RadioTower5FStudio1SignText
|
|
|
|
RadioTower5FBookshelf:
|
|
jumpstd magazinebookshelf
|
|
|
|
FakeDirectorMovement:
|
|
step LEFT
|
|
step LEFT
|
|
step LEFT
|
|
step UP
|
|
step UP
|
|
step_end
|
|
|
|
RadioTower5FDirectorWalksIn:
|
|
step DOWN
|
|
step DOWN
|
|
step RIGHT
|
|
step RIGHT
|
|
step RIGHT
|
|
step RIGHT
|
|
step DOWN
|
|
step DOWN
|
|
step DOWN
|
|
step LEFT
|
|
step_end
|
|
|
|
RadioTower5FDirectorWalksOut:
|
|
step RIGHT
|
|
step UP
|
|
step UP
|
|
step UP
|
|
step LEFT
|
|
step LEFT
|
|
step LEFT
|
|
step LEFT
|
|
step UP
|
|
step UP
|
|
step_end
|
|
|
|
RadioTower5FPlayerTwoStepsLeftMovement:
|
|
step LEFT
|
|
step LEFT
|
|
step_end
|
|
|
|
FakeDirectorTextBefore1:
|
|
text "Y-you! You came to"
|
|
line "rescue me?"
|
|
done
|
|
|
|
FakeDirectorTextBefore2:
|
|
text "Is that what you"
|
|
line "were expecting?"
|
|
|
|
para "Wrong!"
|
|
line "I'm an imposter!"
|
|
|
|
para "I pretended to be"
|
|
line "the real thing to"
|
|
|
|
para "prepare for our"
|
|
line "takeover."
|
|
|
|
para "Do you want to"
|
|
line "know where we hid"
|
|
cont "the real DIRECTOR?"
|
|
|
|
para "Sure, I'll tell"
|
|
line "you. But only if"
|
|
cont "you can beat me!"
|
|
done
|
|
|
|
FakeDirectorWinText:
|
|
text "OK, OK. I'll tell"
|
|
line "you where he is."
|
|
done
|
|
|
|
FakeDirectorTextAfter:
|
|
text "We stashed the"
|
|
line "real DIRECTOR in"
|
|
|
|
para "the UNDERGROUND"
|
|
line "WAREHOUSE."
|
|
|
|
para "It's at the far"
|
|
line "end of the UNDER-"
|
|
cont "GROUND."
|
|
|
|
para "But I doubt you'll"
|
|
line "get that far."
|
|
done
|
|
|
|
Executivef1SeenText:
|
|
text "Remember me from"
|
|
line "the HIDEOUT in"
|
|
cont "MAHOGANY TOWN?"
|
|
|
|
para "I lost then, but I"
|
|
line "won't this time."
|
|
done
|
|
|
|
Executivef1BeatenText:
|
|
text "This can't be"
|
|
line "happening!"
|
|
|
|
para "I fought hard, but"
|
|
line "I still lost…"
|
|
done
|
|
|
|
Executivef1AfterBattleText:
|
|
text "<PLAYER>, isn't it?"
|
|
|
|
para "A brat like you"
|
|
line "won't appreciate"
|
|
|
|
para "the magnificence"
|
|
line "of TEAM ROCKET."
|
|
|
|
para "That's too bad."
|
|
line "I really admire"
|
|
cont "your power."
|
|
done
|
|
|
|
RadioTower5FRocketBossBeforeText:
|
|
text "Oh? You managed to"
|
|
line "get this far?"
|
|
|
|
para "You must be quite"
|
|
line "the trainer."
|
|
|
|
para "We intend to take"
|
|
line "over this RADIO"
|
|
|
|
para "STATION and an-"
|
|
line "nounce our come-"
|
|
cont "back."
|
|
|
|
para "That should bring"
|
|
line "our boss GIOVANNI"
|
|
|
|
para "back from his solo"
|
|
line "training."
|
|
|
|
para "We are going to"
|
|
line "regain our former"
|
|
cont "glory."
|
|
|
|
para "I won't allow you"
|
|
line "to interfere with"
|
|
cont "our plans."
|
|
done
|
|
|
|
RadioTower5FRocketBossWinText:
|
|
text "No! Forgive me,"
|
|
line "GIOVANNI!"
|
|
done
|
|
|
|
RadioTower5FRocketBossAfterText:
|
|
text "How could this be?"
|
|
|
|
para "Our dreams have"
|
|
line "come to naught."
|
|
|
|
para "I wasn't up to the"
|
|
line "task after all."
|
|
|
|
para "Like GIOVANNI did"
|
|
line "before me, I will"
|
|
|
|
para "disband TEAM"
|
|
line "ROCKET here today."
|
|
|
|
para "Farewell."
|
|
done
|
|
|
|
RadioTower5FDirectorThankYouText:
|
|
text "DIRECTOR: <PLAY_G>,"
|
|
line "thank you!"
|
|
|
|
para "Your courageous"
|
|
line "actions have saved"
|
|
|
|
para "#MON nation-"
|
|
line "wide."
|
|
|
|
para "I know it's not"
|
|
line "much, but please"
|
|
cont "take this."
|
|
done
|
|
|
|
RadioTower5FDirectorDescribeClearBellText:
|
|
text "There used to be a"
|
|
line "tower right here"
|
|
cont "in GOLDENROD CITY."
|
|
|
|
para "But it was old and"
|
|
line "creaky."
|
|
|
|
para "So we replaced it"
|
|
line "with our RADIO"
|
|
cont "TOWER."
|
|
|
|
para "We dug up that"
|
|
line "bell during"
|
|
cont "construction."
|
|
|
|
para "I heard that all"
|
|
line "sorts of #MON"
|
|
|
|
para "lived in GOLDENROD"
|
|
line "in the past."
|
|
|
|
para "Perhaps…"
|
|
|
|
para "That bell has some"
|
|
line "connection to the"
|
|
|
|
para "TIN TOWER in"
|
|
line "ECRUTEAK CITY…"
|
|
|
|
para "Ah!"
|
|
|
|
para "That reminds me…"
|
|
|
|
para "I overheard TEAM"
|
|
line "ROCKET whispering."
|
|
|
|
para "Apparently, some-"
|
|
line "thing is going on"
|
|
cont "at the TIN TOWER."
|
|
|
|
para "I have no idea"
|
|
line "what is happening,"
|
|
|
|
para "but you might look"
|
|
line "into it."
|
|
|
|
para "OK, I better go to"
|
|
line "my OFFICE."
|
|
done
|
|
|
|
RadioTower5FDirectorText:
|
|
text "DIRECTOR: Hello,"
|
|
line "<PLAY_G>!"
|
|
|
|
para "You know, I love"
|
|
line "#MON."
|
|
|
|
para "I built this RADIO"
|
|
line "TOWER so I could"
|
|
|
|
para "express my love"
|
|
line "of #MON."
|
|
|
|
para "It would be nice"
|
|
line "if people enjoyed"
|
|
cont "our programs."
|
|
done
|
|
|
|
BenText:
|
|
text "BEN: Do you listen"
|
|
line "to our music?"
|
|
done
|
|
|
|
RadioTower5FDirectorsOfficeSignText:
|
|
text "5F DIRECTOR'S"
|
|
line " OFFICE"
|
|
done
|
|
|
|
RadioTower5FStudio1SignText:
|
|
text "5F STUDIO 1"
|
|
done
|
|
|
|
RadioTower5F_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 2 ; warp events
|
|
warp_event 0, 0, RADIO_TOWER_4F, 1
|
|
warp_event 12, 0, RADIO_TOWER_4F, 3
|
|
|
|
db 2 ; coord events
|
|
coord_event 0, 3, SCENE_DEFAULT, FakeDirectorScript
|
|
coord_event 16, 5, SCENE_RADIOTOWER5F_ROCKET_BOSS, RadioTower5FRocketBossScene
|
|
|
|
db 5 ; bg events
|
|
bg_event 3, 0, BGEVENT_READ, RadioTower5FDirectorsOfficeSign
|
|
bg_event 11, 0, BGEVENT_READ, RadioTower5FStudio1Sign
|
|
bg_event 15, 0, BGEVENT_READ, RadioTower5FStudio1Sign
|
|
bg_event 16, 1, BGEVENT_READ, RadioTower5FBookshelf
|
|
bg_event 17, 1, BGEVENT_READ, RadioTower5FBookshelf
|
|
|
|
db 5 ; object events
|
|
object_event 3, 6, SPRITE_GENTLEMAN, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Director, -1
|
|
object_event 13, 5, SPRITE_ROCKET, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
|
|
object_event 17, 2, SPRITE_ROCKET_GIRL, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerExecutivef1, EVENT_RADIO_TOWER_ROCKET_TAKEOVER
|
|
object_event 13, 5, SPRITE_ROCKER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Ben, EVENT_RADIO_TOWER_CIVILIANS_AFTER
|
|
object_event 8, 5, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, RadioTower5FUltraBall, EVENT_RADIO_TOWER_5F_ULTRA_BALL
|