mirror of https://github.com/pret/pokecrystal.git
383 lines
7.8 KiB
NASM
383 lines
7.8 KiB
NASM
object_const_def ; object_event constants
|
|
const AZALEAGYM_BUGSY
|
|
const AZALEAGYM_BUG_CATCHER1
|
|
const AZALEAGYM_BUG_CATCHER2
|
|
const AZALEAGYM_BUG_CATCHER3
|
|
const AZALEAGYM_TWIN1
|
|
const AZALEAGYM_TWIN2
|
|
const AZALEAGYM_GYM_GUIDE
|
|
|
|
AzaleaGym_MapScripts:
|
|
db 0 ; scene scripts
|
|
|
|
db 0 ; callbacks
|
|
|
|
AzaleaGymBugsyScript:
|
|
faceplayer
|
|
opentext
|
|
checkevent EVENT_BEAT_BUGSY
|
|
iftrue .FightDone
|
|
writetext BugsyText_INeverLose
|
|
waitbutton
|
|
closetext
|
|
winlosstext BugsyText_ResearchIncomplete, 0
|
|
loadtrainer BUGSY, BUGSY1
|
|
startbattle
|
|
reloadmapafterbattle
|
|
setevent EVENT_BEAT_BUGSY
|
|
opentext
|
|
writetext Text_ReceivedHiveBadge
|
|
playsound SFX_GET_BADGE
|
|
waitsfx
|
|
setflag ENGINE_HIVEBADGE
|
|
readvar VAR_BADGES
|
|
scall AzaleaGymActivateRockets
|
|
.FightDone:
|
|
checkevent EVENT_GOT_TM49_FURY_CUTTER
|
|
iftrue .GotFuryCutter
|
|
setevent EVENT_BEAT_TWINS_AMY_AND_MAY
|
|
setevent EVENT_BEAT_BUG_CATCHER_BENNY
|
|
setevent EVENT_BEAT_BUG_CATCHER_AL
|
|
setevent EVENT_BEAT_BUG_CATCHER_JOSH
|
|
writetext BugsyText_HiveBadgeSpeech
|
|
promptbutton
|
|
verbosegiveitem TM_FURY_CUTTER
|
|
iffalse .NoRoomForFuryCutter
|
|
setevent EVENT_GOT_TM49_FURY_CUTTER
|
|
writetext BugsyText_FuryCutterSpeech
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.GotFuryCutter:
|
|
writetext BugsyText_BugMonsAreDeep
|
|
waitbutton
|
|
.NoRoomForFuryCutter:
|
|
closetext
|
|
end
|
|
|
|
AzaleaGymActivateRockets:
|
|
ifequal 7, .RadioTowerRockets
|
|
ifequal 6, .GoldenrodRockets
|
|
end
|
|
|
|
.GoldenrodRockets:
|
|
jumpstd GoldenrodRocketsScript
|
|
|
|
.RadioTowerRockets:
|
|
jumpstd RadioTowerRocketsScript
|
|
|
|
TrainerTwinsAmyandmay1:
|
|
trainer TWINS, AMYANDMAY1, EVENT_BEAT_TWINS_AMY_AND_MAY, TwinsAmyandmay1SeenText, TwinsAmyandmay1BeatenText, 0, .AfterScript
|
|
|
|
.AfterScript:
|
|
endifjustbattled
|
|
opentext
|
|
writetext TwinsAmyandmay1AfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerTwinsAmyandmay2:
|
|
trainer TWINS, AMYANDMAY2, EVENT_BEAT_TWINS_AMY_AND_MAY, TwinsAmyandmay2SeenText, TwinsAmyandmay2BeatenText, 0, .AfterScript
|
|
|
|
.AfterScript:
|
|
endifjustbattled
|
|
opentext
|
|
writetext TwinsAmyandmay2AfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerBugCatcherBenny:
|
|
trainer BUG_CATCHER, BUG_CATCHER_BENNY, EVENT_BEAT_BUG_CATCHER_BENNY, BugCatcherBennySeenText, BugCatcherBennyBeatenText, 0, .AfterScript
|
|
|
|
.AfterScript:
|
|
endifjustbattled
|
|
opentext
|
|
writetext BugCatcherBennyAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerBugCatcherAl:
|
|
trainer BUG_CATCHER, AL, EVENT_BEAT_BUG_CATCHER_AL, BugCatcherAlSeenText, BugCatcherAlBeatenText, 0, .AfterScript
|
|
|
|
.AfterScript:
|
|
endifjustbattled
|
|
opentext
|
|
writetext BugCatcherAlAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
TrainerBugCatcherJosh:
|
|
trainer BUG_CATCHER, JOSH, EVENT_BEAT_BUG_CATCHER_JOSH, BugCatcherJoshSeenText, BugCatcherJoshBeatenText, 0, .AfterScript
|
|
|
|
.AfterScript:
|
|
endifjustbattled
|
|
opentext
|
|
writetext BugCatcherJoshAfterBattleText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
AzaleaGymGuideScript:
|
|
faceplayer
|
|
checkevent EVENT_BEAT_BUGSY
|
|
iftrue .AzaleaGymGuideWinScript
|
|
opentext
|
|
writetext AzaleaGymGuideText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
.AzaleaGymGuideWinScript:
|
|
opentext
|
|
writetext AzaleaGymGuideWinText
|
|
waitbutton
|
|
closetext
|
|
end
|
|
|
|
AzaleaGymStatue:
|
|
checkflag ENGINE_HIVEBADGE
|
|
iftrue .Beaten
|
|
jumpstd GymStatue1Script
|
|
.Beaten:
|
|
gettrainername STRING_BUFFER_4, BUGSY, BUGSY1
|
|
jumpstd GymStatue2Script
|
|
|
|
BugsyText_INeverLose:
|
|
text "I'm BUGSY!"
|
|
line "I never lose when"
|
|
|
|
para "it comes to bug"
|
|
line "#MON."
|
|
|
|
para "My research is"
|
|
line "going to make me"
|
|
|
|
para "the authority on"
|
|
line "bug #MON!"
|
|
|
|
para "Let me demonstrate"
|
|
line "what I've learned"
|
|
cont "from my studies."
|
|
done
|
|
|
|
BugsyText_ResearchIncomplete:
|
|
text "Whoa, amazing!"
|
|
line "You're an expert"
|
|
cont "on #MON!"
|
|
|
|
para "My research isn't"
|
|
line "complete yet."
|
|
|
|
para "OK, you win. Take"
|
|
line "this BADGE."
|
|
done
|
|
|
|
Text_ReceivedHiveBadge:
|
|
text "<PLAYER> received"
|
|
line "HIVEBADGE."
|
|
done
|
|
|
|
BugsyText_HiveBadgeSpeech:
|
|
text "Do you know the"
|
|
line "benefits of HIVE-"
|
|
cont "BADGE?"
|
|
|
|
para "If you have it,"
|
|
line "#MON up to L30"
|
|
|
|
para "will obey you,"
|
|
line "even traded ones."
|
|
|
|
para "#MON that know"
|
|
line "CUT will be able"
|
|
|
|
para "to use it outside"
|
|
line "of battle too."
|
|
|
|
para "Here, I also want"
|
|
line "you to have this."
|
|
done
|
|
|
|
BugsyText_FuryCutterSpeech:
|
|
text "TM49 contains"
|
|
line "FURY CUTTER."
|
|
|
|
para "If you don't miss,"
|
|
line "it gets stronger"
|
|
cont "every turn."
|
|
|
|
para "The longer your"
|
|
line "battle goes, the"
|
|
cont "better it gets."
|
|
|
|
para "Isn't that great?"
|
|
line "I discovered it!"
|
|
done
|
|
|
|
BugsyText_BugMonsAreDeep:
|
|
text "Bug #MON are"
|
|
line "deep. There are"
|
|
|
|
para "many mysteries to"
|
|
line "be explored."
|
|
|
|
para "Study your favor-"
|
|
line "ites thoroughly."
|
|
done
|
|
|
|
BugCatcherBennySeenText:
|
|
text "Bug #MON evolve"
|
|
line "young. So they get"
|
|
|
|
para "stronger that much"
|
|
line "faster."
|
|
done
|
|
|
|
BugCatcherBennyBeatenText:
|
|
text "Just evolving"
|
|
line "isn't enough!"
|
|
done
|
|
|
|
BugCatcherBennyAfterBattleText:
|
|
text "#MON become"
|
|
line "stronger if they"
|
|
cont "evolve. Really!"
|
|
done
|
|
|
|
BugCatcherAlSeenText:
|
|
text "Bug #MON are"
|
|
line "cool and tough!"
|
|
|
|
para "I'll prove it to"
|
|
line "you!"
|
|
done
|
|
|
|
BugCatcherAlBeatenText:
|
|
text "You proved how"
|
|
line "tough you are…"
|
|
done
|
|
|
|
BugCatcherAlAfterBattleText:
|
|
text "They're so cool,"
|
|
line "but most girls"
|
|
|
|
para "don't like bug"
|
|
line "#MON."
|
|
|
|
para "I don't know why…"
|
|
done
|
|
|
|
BugCatcherJoshSeenText:
|
|
text "You saved all the"
|
|
line "SLOWPOKE? Whew,"
|
|
cont "you're mighty!"
|
|
|
|
para "But my grown-up"
|
|
line "#MON are pretty"
|
|
cont "tough too!"
|
|
done
|
|
|
|
BugCatcherJoshBeatenText:
|
|
text "Urrgggh!"
|
|
done
|
|
|
|
BugCatcherJoshAfterBattleText:
|
|
text "I guess I should"
|
|
line "teach them better"
|
|
cont "moves…"
|
|
done
|
|
|
|
TwinsAmyandmay1SeenText:
|
|
text "AMY: Hi! Are you"
|
|
line "challenging the"
|
|
cont "LEADER? No way!"
|
|
done
|
|
|
|
TwinsAmyandmay1BeatenText:
|
|
text "AMY & MAY: Oh,"
|
|
line "double goodness!"
|
|
done
|
|
|
|
TwinsAmyandmay1AfterBattleText:
|
|
text "AMY: You're"
|
|
line "really strong!"
|
|
done
|
|
|
|
TwinsAmyandmay2SeenText:
|
|
text "MAY: You want to"
|
|
line "see the LEADER?"
|
|
cont "We come first!"
|
|
done
|
|
|
|
TwinsAmyandmay2BeatenText:
|
|
text "AMY & MAY: Oh,"
|
|
line "double goodness!"
|
|
done
|
|
|
|
TwinsAmyandmay2AfterBattleText:
|
|
text "MAY: Our bug #-"
|
|
line "MON lost! Oh, what"
|
|
cont "a shame."
|
|
done
|
|
|
|
AzaleaGymGuideText:
|
|
text "Yo, challenger!"
|
|
|
|
para "BUGSY's young, but"
|
|
line "his knowledge of"
|
|
|
|
para "bug #MON is for"
|
|
line "real."
|
|
|
|
para "It's going to be"
|
|
line "tough without my"
|
|
cont "advice."
|
|
|
|
para "Let's see… Bug"
|
|
line "#MON don't like"
|
|
cont "fire."
|
|
|
|
para "Flying-type moves"
|
|
line "are super-effec-"
|
|
cont "tive too."
|
|
done
|
|
|
|
AzaleaGymGuideWinText:
|
|
text "Well done! That"
|
|
line "was a great clash"
|
|
|
|
para "of talented young"
|
|
line "trainers."
|
|
|
|
para "With people like"
|
|
line "you, the future of"
|
|
cont "#MON is bright!"
|
|
done
|
|
|
|
AzaleaGym_MapEvents:
|
|
db 0, 0 ; filler
|
|
|
|
db 2 ; warp events
|
|
warp_event 4, 15, AZALEA_TOWN, 5
|
|
warp_event 5, 15, AZALEA_TOWN, 5
|
|
|
|
db 0 ; coord events
|
|
|
|
db 2 ; bg events
|
|
bg_event 3, 13, BGEVENT_READ, AzaleaGymStatue
|
|
bg_event 6, 13, BGEVENT_READ, AzaleaGymStatue
|
|
|
|
db 7 ; object events
|
|
object_event 5, 7, SPRITE_BUGSY, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, AzaleaGymBugsyScript, -1
|
|
object_event 5, 3, SPRITE_BUG_CATCHER, SPRITEMOVEDATA_SPINRANDOM_FAST, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 2, TrainerBugCatcherBenny, -1
|
|
object_event 8, 8, SPRITE_BUG_CATCHER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 3, TrainerBugCatcherAl, -1
|
|
object_event 0, 2, SPRITE_BUG_CATCHER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 3, TrainerBugCatcherJosh, -1
|
|
object_event 4, 10, SPRITE_TWIN, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerTwinsAmyandmay1, -1
|
|
object_event 5, 10, SPRITE_TWIN, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerTwinsAmyandmay2, -1
|
|
object_event 7, 13, SPRITE_GYM_GUIDE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, AzaleaGymGuideScript, -1
|