pokecrystal-board/maps/GoldenrodGym.asm

408 lines
7.8 KiB
NASM

const_value set 2
const GOLDENRODGYM_WHITNEY
const GOLDENRODGYM_LASS1
const GOLDENRODGYM_LASS2
const GOLDENRODGYM_BUENA1
const GOLDENRODGYM_BUENA2
const GOLDENRODGYM_GYM_GUY
GoldenrodGym_MapScriptHeader:
.MapTriggers:
db 2
maptrigger .DummyTrigger0
maptrigger .DummyTrigger1
.MapCallbacks:
db 0
.DummyTrigger0:
end
.DummyTrigger1:
end
WhitneyScript_0x5400c:
faceplayer
checkevent EVENT_BEAT_WHITNEY
iftrue .FightDone
opentext
writetext UnknownText_0x54122
waitbutton
closetext
winlosstext UnknownText_0x541a5, 0
loadtrainer WHITNEY, 1
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_WHITNEY
setevent EVENT_MADE_WHITNEY_CRY
dotrigger $1
setevent EVENT_BEAT_BEAUTY_VICTORIA
setevent EVENT_BEAT_BEAUTY_SAMANTHA
setevent EVENT_BEAT_LASS_CARRIE
setevent EVENT_BEAT_LASS_BRIDGET
.FightDone:
opentext
checkevent EVENT_MADE_WHITNEY_CRY
iffalse .StoppedCrying
writetext UnknownText_0x541f4
waitbutton
closetext
end
.StoppedCrying:
checkevent EVENT_GOT_TM45_ATTRACT
iftrue UnknownScript_0x54077
checkflag ENGINE_PLAINBADGE
iftrue UnknownScript_0x54064
writetext UnknownText_0x54222
buttonsound
waitsfx
writetext UnknownText_0x54273
playsound SFX_GET_BADGE
waitsfx
setflag ENGINE_PLAINBADGE
checkcode VAR_BADGES
scall GoldenrodGymTriggerRockets
UnknownScript_0x54064:
writetext UnknownText_0x5428b
buttonsound
verbosegiveitem TM_ATTRACT
iffalse UnknownScript_0x5407b
setevent EVENT_GOT_TM45_ATTRACT
writetext UnknownText_0x54302
waitbutton
closetext
end
UnknownScript_0x54077:
writetext UnknownText_0x54360
waitbutton
UnknownScript_0x5407b:
closetext
end
GoldenrodGymTriggerRockets:
if_equal 7, .RadioTowerRockets
if_equal 6, .GoldenrodRockets
end
.GoldenrodRockets:
jumpstd goldenrodrockets
.RadioTowerRockets:
jumpstd radiotowerrockets
TrainerLassCarrie:
trainer EVENT_BEAT_LASS_CARRIE, LASS, CARRIE, LassCarrieSeenText, LassCarrieBeatenText, 0, LassCarrieScript
LassCarrieScript:
end_if_just_battled
opentext
writetext LassCarrieAfterBattleText
waitbutton
closetext
end
WhitneyCriesScript:
showemote EMOTE_SHOCK, GOLDENRODGYM_LASS2, 15
applymovement GOLDENRODGYM_LASS2, BridgetWalksUpMovement
spriteface PLAYER, DOWN
opentext
writetext BridgetWhitneyCriesText
waitbutton
closetext
applymovement GOLDENRODGYM_LASS2, BridgetWalksAwayMovement
dotrigger $0
clearevent EVENT_MADE_WHITNEY_CRY
end
TrainerLassBridget:
trainer EVENT_BEAT_LASS_BRIDGET, LASS, BRIDGET, LassBridgetSeenText, LassBridgetBeatenText, 0, LassBridgetScript
LassBridgetScript:
end_if_just_battled
opentext
writetext LassBridgetAfterBattleText
waitbutton
closetext
end
TrainerBeautyVictoria:
trainer EVENT_BEAT_BEAUTY_VICTORIA, BEAUTY, VICTORIA, BeautyVictoriaSeenText, BeautyVictoriaBeatenText, 0, BeautyVictoriaScript
BeautyVictoriaScript:
end_if_just_battled
opentext
writetext BeautyVictoriaAfterBattleText
waitbutton
closetext
end
TrainerBeautySamantha:
trainer EVENT_BEAT_BEAUTY_SAMANTHA, BEAUTY, SAMANTHA, BeautySamanthaSeenText, BeautySamanthaBeatenText, 0, BeautySamanthaScript
BeautySamanthaScript:
end_if_just_battled
opentext
writetext BeautySamanthaAfterBattleText
waitbutton
closetext
end
GoldenrodGymGuyScript:
faceplayer
checkevent EVENT_BEAT_WHITNEY
iftrue .GoldenrodGymGuyWinScript
opentext
writetext GoldenrodGymGuyText
waitbutton
closetext
end
.GoldenrodGymGuyWinScript:
opentext
writetext GoldenrodGymGuyWinText
waitbutton
closetext
end
GoldenrodGymStatue:
checkflag ENGINE_PLAINBADGE
iftrue .Beaten
jumpstd gymstatue1
.Beaten:
trainertotext WHITNEY, 1, $1
jumpstd gymstatue2
BridgetWalksUpMovement:
step LEFT
turn_head UP
step_end
BridgetWalksAwayMovement:
step RIGHT
turn_head LEFT
step_end
UnknownText_0x54122:
text "Hi! I'm WHITNEY!"
para "Everyone was into"
line "#MON, so I got"
cont "into it too!"
para "#MON are"
line "super-cute!"
para "You want to bat-"
line "tle? I'm warning"
cont "you--I'm good!"
done
UnknownText_0x541a5:
text "Sob…"
para "…Waaaaaaah!"
line "You're mean!"
para "You shouldn't be"
line "so serious! You…"
cont "you child, you!"
done
UnknownText_0x541f4:
text "Waaaaah!"
para "Waaaaah!"
para "…Snivel, hic…"
line "…You meanie!"
done
UnknownText_0x54222:
text "…Sniff…"
para "What? What do you"
line "want? A BADGE?"
para "Oh, right."
line "I forgot. Here's"
cont "PLAINBADGE."
done
UnknownText_0x54273:
text "<PLAYER> received"
line "PLAINBADGE."
done
UnknownText_0x5428b:
text "PLAINBADGE lets"
line "your #MON use"
para "STRENGTH outside"
line "of battle."
para "It also boosts"
line "your #MON's"
cont "SPEED."
para "Oh, you can have"
line "this too!"
done
UnknownText_0x54302:
text "It's ATTRACT!"
line "It makes full use"
para "of a #MON's"
line "charm."
para "Isn't it just per-"
line "fect for a cutie"
cont "like me?"
done
UnknownText_0x54360:
text "Ah, that was a"
line "good cry!"
para "Come for a visit"
line "again! Bye-bye!"
done
LassCarrieSeenText:
text "Don't let my"
line "#MON's cute"
para "looks fool you."
line "They can whip you!"
done
LassCarrieBeatenText:
text "Darn… I thought"
line "you were weak…"
done
LassCarrieAfterBattleText:
text "Do my #MON"
line "think I'm cute?"
done
LassBridgetSeenText:
text "I like cute #-"
line "MON better than"
cont "strong #MON."
para "But I have strong"
line "and cute #MON!"
done
LassBridgetBeatenText:
text "Oh, no, no, no!"
done
LassBridgetAfterBattleText:
text "I'm trying to beat"
line "WHITNEY, but…"
cont "It's depressing."
para "I'm okay! If I"
line "lose, I'll just"
para "try harder next"
line "time!"
done
BridgetWhitneyCriesText:
text "Oh, no. You made"
line "WHITNEY cry."
para "It's OK. She'll"
line "stop soon. She"
para "always cries when"
line "she loses."
done
BeautyVictoriaSeenText:
text "Oh, you are a cute"
line "little trainer! "
para "I like you, but I"
line "won't hold back!"
done
BeautyVictoriaBeatenText:
text "Let's see… Oops,"
line "it's over?"
done
BeautyVictoriaAfterBattleText:
text "Wow, you must be"
line "good to beat me!"
cont "Keep it up!"
done
BeautySamanthaSeenText:
text "Give it your best"
line "shot, or I'll take"
cont "you down!"
done
BeautySamanthaBeatenText:
text "No! Oh, MEOWTH,"
line "I'm so sorry!"
done
BeautySamanthaAfterBattleText:
text "I taught MEOWTH"
line "moves for taking"
cont "on any type…"
done
GoldenrodGymGuyText:
text "Yo! CHAMP in"
line "making!"
para "This GYM is home"
line "to normal-type"
cont "#MON trainers."
para "I recommend you"
line "use fighting-type"
cont "#MON."
done
GoldenrodGymGuyWinText:
text "You won? Great! I"
line "was busy admiring"
cont "the ladies here."
done
GoldenrodGym_MapEventHeader:
; filler
db 0, 0
.Warps:
db 2
warp_def $11, $2, 1, GOLDENROD_CITY
warp_def $11, $3, 1, GOLDENROD_CITY
.XYTriggers:
db 1
xy_trigger 1, $5, $8, WhitneyCriesScript
.Signposts:
db 2
signpost 15, 1, SIGNPOST_READ, GoldenrodGymStatue
signpost 15, 4, SIGNPOST_READ, GoldenrodGymStatue
.PersonEvents:
db 6
person_event SPRITE_WHITNEY, 3, 8, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, PERSONTYPE_SCRIPT, 0, WhitneyScript_0x5400c, -1
person_event SPRITE_LASS, 13, 9, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, PERSONTYPE_TRAINER, 4, TrainerLassCarrie, -1
person_event SPRITE_LASS, 6, 9, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, PERSONTYPE_TRAINER, 1, TrainerLassBridget, -1
person_event SPRITE_BUENA, 2, 0, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, PERSONTYPE_TRAINER, 3, TrainerBeautyVictoria, -1
person_event SPRITE_BUENA, 5, 19, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, PERSONTYPE_TRAINER, 3, TrainerBeautySamantha, -1
person_event SPRITE_GYM_GUY, 15, 5, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, PERSONTYPE_SCRIPT, 0, GoldenrodGymGuyScript, -1