jep-hack/maps/EcruteakGym.asm
Llinos Evans 66c71c1a97 PvK has the goods
This adds a ton of overworld sprites, some from KEP, others from SW97/99, for you all to mess around with. It also adds the prototype trainer sprites from SW99 to use with the old trainer classes, though some don't have modern GSC shading.

Unfortunately, the SW99 trainer sprites need palfixing and my PC can't be fucked running it for some reason.

Lots of potential here, particularly with making Mediums now use their distinct sprites, and having Channelers to fit into the mix. I'll be using these when fleshing out the Haunted House and Lavender Crypt.

South Guy still doesn't have a name, so internally, they are called such.

Green from KEP/TPP Anniversary Red has been imported too, because she's awesome like that.

Yes this commit has the cat sprite. All rise for the best thing ever.
2024-07-24 20:40:44 +01:00

439 lines
9.2 KiB
NASM

object_const_def
const ECRUTEAKGYM_MORTY
const ECRUTEAKGYM_SAGE1
const ECRUTEAKGYM_SAGE2
const ECRUTEAKGYM_GRANNY1
const ECRUTEAKGYM_GRANNY2
const ECRUTEAKGYM_GYM_GUIDE
const ECRUTEAKGYM_GRAMPS
EcruteakGym_MapScripts:
def_scene_scripts
scene_script EcruteakGymForcedToLeaveScene, SCENE_ECRUTEAKGYM_FORCED_TO_LEAVE
scene_script EcruteakGymNoopScene, SCENE_ECRUTEAKGYM_NOOP
def_callbacks
EcruteakGymForcedToLeaveScene:
sdefer EcruteakGymClosed
end
EcruteakGymNoopScene:
end
EcruteakGymMortyScript:
faceplayer
opentext
checkevent EVENT_BEAT_MORTY
iftrue .FightDone
writetext MortyIntroText
waitbutton
closetext
winlosstext MortyWinLossText, 0
loadtrainer MORTY, MORTY1
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_MORTY
opentext
writetext Text_ReceivedFogBadge
playsound SFX_GET_BADGE
waitsfx
setflag ENGINE_FOGBADGE
readvar VAR_BADGES
scall EcruteakGymActivateRockets
setmapscene ECRUTEAK_TIN_TOWER_ENTRANCE, SCENE_ECRUTEAKTINTOWERENTRANCE_NOOP
setevent EVENT_RANG_CLEAR_BELL_1
setevent EVENT_RANG_CLEAR_BELL_2
.FightDone:
checkevent EVENT_GOT_TM30_SHADOW_BALL
iftrue .GotShadowBall
setevent EVENT_BEAT_SAGE_JEFFREY
setevent EVENT_BEAT_SAGE_PING
setevent EVENT_BEAT_MEDIUM_MARTHA
setevent EVENT_BEAT_MEDIUM_GRACE
writetext MortyText_FogBadgeSpeech
promptbutton
verbosegiveitem TM_SHADOW_BALL
iffalse .NoRoomForShadowBall
setevent EVENT_GOT_TM30_SHADOW_BALL
writetext MortyText_ShadowBallSpeech
waitbutton
closetext
end
.GotShadowBall:
writetext MortyFightDoneText
waitbutton
.NoRoomForShadowBall:
closetext
end
EcruteakGymActivateRockets:
ifequal 7, .RadioTowerRockets
ifequal 6, .GoldenrodRockets
end
.GoldenrodRockets:
jumpstd GoldenrodRocketsScript
.RadioTowerRockets:
jumpstd RadioTowerRocketsScript
EcruteakGymClosed:
applymovement PLAYER, EcruteakGymPlayerStepUpMovement
applymovement ECRUTEAKGYM_GRAMPS, EcruteakGymGrampsSlowStepDownMovement
opentext
writetext EcruteakGymClosedText
waitbutton
closetext
follow PLAYER, ECRUTEAKGYM_GRAMPS
applymovement PLAYER, EcruteakGymPlayerSlowStepDownMovement
stopfollow
special FadeOutPalettes
playsound SFX_ENTER_DOOR
waitsfx
warp ECRUTEAK_CITY, 6, 27
end
TrainerSageJeffrey:
trainer SAGE, JEFFREY, EVENT_BEAT_SAGE_JEFFREY, SageJeffreySeenText, SageJeffreyBeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext SageJeffreyAfterBattleText
waitbutton
closetext
end
TrainerSagePing:
trainer SAGE, PING, EVENT_BEAT_SAGE_PING, SagePingSeenText, SagePingBeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext SagePingAfterBattleText
waitbutton
closetext
end
TrainerMediumMartha:
trainer MEDIUM, MARTHA, EVENT_BEAT_MEDIUM_MARTHA, MediumMarthaSeenText, MediumMarthaBeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext MediumMarthaAfterBattleText
waitbutton
closetext
end
TrainerMediumGrace:
trainer MEDIUM, GRACE, EVENT_BEAT_MEDIUM_GRACE, MediumGraceSeenText, MediumGraceBeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext MediumGraceAfterBattleText
waitbutton
closetext
end
EcruteakGymGuideScript:
faceplayer
opentext
checkevent EVENT_BEAT_MORTY
iftrue .EcruteakGymGuideWinScript
writetext EcruteakGymGuideText
waitbutton
closetext
end
.EcruteakGymGuideWinScript:
writetext EcruteakGymGuideWinText
waitbutton
closetext
end
EcruteakGymStatue:
checkflag ENGINE_FOGBADGE
iftrue .Beaten
jumpstd GymStatue1Script
.Beaten:
gettrainername STRING_BUFFER_4, MORTY, MORTY1
jumpstd GymStatue2Script
EcruteakGymPlayerStepUpMovement:
step UP
step_end
EcruteakGymPlayerSlowStepDownMovement:
fix_facing
slow_step DOWN
remove_fixed_facing
step_end
EcruteakGymGrampsSlowStepDownMovement:
slow_step DOWN
step_end
MortyIntroText:
text "Good of you to"
line "have come."
para "Here in ECRUTEAK,"
line "#MON have been"
cont "revered."
para "It's said that a"
line "rainbow-colored"
para "#MON will come"
line "down to appear"
para "before a truly"
line "powerful trainer."
para "I believed that"
line "tale, so I have"
para "secretly trained"
line "here all my life."
para "As a result, I can"
line "now see what"
cont "others cannot."
para "Just a bit more…"
para "With a little"
line "more, I could see"
para "a future in which"
line "I meet the #MON"
cont "of rainbow colors."
para "You're going to"
line "help me reach that"
cont "level!"
done
MortyWinLossText:
text "I'm not good"
line "enough yet…"
para "All right. This"
line "BADGE is yours."
done
Text_ReceivedFogBadge:
text "<PLAYER> received"
line "FOGBADGE."
done
MortyText_FogBadgeSpeech:
text "By having FOG-"
line "BADGE, #MON up"
para "to L50 will obey"
line "you."
para "Also, #MON that"
line "know SURF will be"
para "able to use that"
line "move anytime."
para "I want you to have"
line "this too."
done
MortyText_ShadowBallSpeech:
text "It's SHADOW BALL."
line "It causes damage"
para "and may reduce"
line "SPCL.DEF."
para "Use it if it"
line "appeals to you."
done
MortyFightDoneText:
text "I see…"
para "Your journey has"
line "taken you to far-"
cont "away places."
para "And you have wit-"
line "nessed much more"
cont "than I."
para "I envy you for"
line "that…"
done
SageJeffreySeenText:
text "I spent the spring"
line "with my #MON."
para "Then summer, fall"
line "and winter…"
para "Then spring came"
line "again. We have"
para "lived together"
line "for a long time."
done
SageJeffreyBeatenText:
text "Wins and losses, I"
line "experienced both."
done
SageJeffreyAfterBattleText:
text "Where did #MON"
line "come from?"
done
SagePingSeenText:
text "Can you inflict"
line "any damage on our"
cont "#MON?"
done
SagePingBeatenText:
text "Ah! Well done!"
done
SagePingAfterBattleText:
text "We use only ghost-"
line "type #MON."
para "No normal-type"
line "attack can harm"
cont "them!"
done
MediumMarthaSeenText:
text "I shall win!"
done
MediumMarthaBeatenText:
text "I, I, I lost!"
done
MediumMarthaAfterBattleText:
text "The one who wants"
line "to win most--will!"
done
MediumGraceSeenText:
text "Stumped by our in-"
line "visible floor?"
para "Defeat me if you"
line "want a hint!"
done
MediumGraceBeatenText:
text "Wha-what?"
done
MediumGraceAfterBattleText:
text "Fine. I shall tell"
line "you the secret of"
para "the invisible"
line "floor."
para "The path is right"
line "before our eyes!"
done
EcruteakGymGuideText:
text "The trainers here"
line "have secret mo-"
cont "tives."
para "If you win, they"
line "may tell you some"
para "deep secrets about"
line "ECRUTEAK."
done
EcruteakGymGuideWinText:
text "Whew, <PLAYER>."
line "You did great!"
para "I was cowering in"
line "the corner out of"
cont "pure terror!"
done
EcruteakGymClosedText:
text "MORTY, the GYM"
line "LEADER, is absent."
para "Sorry, but you'll"
line "have to leave."
para "Hohohoho."
done
EcruteakGym_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 4, 17, ECRUTEAK_CITY, 10
warp_event 5, 17, ECRUTEAK_CITY, 10
warp_event 4, 14, ECRUTEAK_GYM, 4
warp_event 2, 4, ECRUTEAK_GYM, 3
warp_event 3, 4, ECRUTEAK_GYM, 3
warp_event 4, 4, ECRUTEAK_GYM, 3
warp_event 4, 5, ECRUTEAK_GYM, 3
warp_event 6, 7, ECRUTEAK_GYM, 3
warp_event 7, 4, ECRUTEAK_GYM, 3
warp_event 2, 6, ECRUTEAK_GYM, 3
warp_event 3, 6, ECRUTEAK_GYM, 3
warp_event 4, 6, ECRUTEAK_GYM, 3
warp_event 5, 6, ECRUTEAK_GYM, 3
warp_event 7, 6, ECRUTEAK_GYM, 3
warp_event 7, 7, ECRUTEAK_GYM, 3
warp_event 4, 8, ECRUTEAK_GYM, 3
warp_event 5, 8, ECRUTEAK_GYM, 3
warp_event 6, 8, ECRUTEAK_GYM, 3
warp_event 7, 8, ECRUTEAK_GYM, 3
warp_event 2, 8, ECRUTEAK_GYM, 3
warp_event 2, 9, ECRUTEAK_GYM, 3
warp_event 2, 10, ECRUTEAK_GYM, 3
warp_event 2, 11, ECRUTEAK_GYM, 3
warp_event 4, 10, ECRUTEAK_GYM, 3
warp_event 5, 10, ECRUTEAK_GYM, 3
warp_event 2, 12, ECRUTEAK_GYM, 3
warp_event 3, 12, ECRUTEAK_GYM, 3
warp_event 4, 12, ECRUTEAK_GYM, 3
warp_event 5, 12, ECRUTEAK_GYM, 3
warp_event 7, 10, ECRUTEAK_GYM, 3
warp_event 7, 11, ECRUTEAK_GYM, 3
warp_event 7, 12, ECRUTEAK_GYM, 3
warp_event 7, 13, ECRUTEAK_GYM, 3
def_coord_events
def_bg_events
bg_event 3, 15, BGEVENT_READ, EcruteakGymStatue
bg_event 6, 15, BGEVENT_READ, EcruteakGymStatue
def_object_events
object_event 5, 1, SPRITE_MORTY, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, EcruteakGymMortyScript, -1
object_event 2, 7, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 1, TrainerSageJeffrey, -1
object_event 3, 13, SPRITE_SAGE, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerSagePing, -1
object_event 7, 5, SPRITE_MEDIUM, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 1, TrainerMediumMartha, -1
object_event 7, 9, SPRITE_MEDIUM, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_TRAINER, 1, TrainerMediumGrace, -1
object_event 7, 15, SPRITE_GYM_GUIDE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, EcruteakGymGuideScript, -1
object_event 4, 14, SPRITE_GRAMPS, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_ECRUTEAK_GYM_GRAMPS