This commit is contained in:
Zeta_Null 2024-10-28 14:20:49 -04:00
commit 3a43c2009f
24 changed files with 533 additions and 46 deletions

View file

@ -1,9 +1,166 @@
; The High-Tech name is a misnomer; the name comes from Kochi 高知, or "high knowledge", a city on the island of Shikoku. This is why it's off the mainland.
; In other words, the name of the city is completely irrelevant.
; Kochi is famous for its traditional landscape, markets, original castle, and a beautiful river.
; "High-Tech" seems to be based on the Urado Bay area, which is known for having major port industry.
; The aquarium may come from Kochi being named Japan's first Marine Park in 1970.
; From all this, we decided on the name "Coral", also being a shade of pink.
; Info from the spriteset:
; Male and female swimmers
; Rival encounter planned
object_const_def
CoralCity_MapScripts:
def_scene_scripts
def_callbacks
callback MAPCALLBACK_NEWMAP, CoralCityFlypointCallback
CoralCityFlypointCallback:
setflag ENGINE_FLYPOINT_CORAL
endcallback
CoralCitySignScript:
jumptext CoralCitySignText
CoralCitySignText:
text "CORAL CITY"
line "True knowledge" ; A hare-brained attempt at referencing the original
cont "flows like water." ; Vaguely alluding to 水に流す
done
CoralCityPokecenterSign:
jumpstd PokecenterSignScript
CoralCityMartSign:
jumpstd MartSignScript
CoralHarborSignScript1:
jumptext CoralHarborSignText1
CoralHarborSignText1:
text "CORAL HARBOR" ; Matching spelling from RGBY - yes, despite largely being written in British English, it's...not spelled with a u.
line "SAVOY berth" ; I believe this is the correct term, but it could also be "sea route" or "shipping lane".
done
CoralHarborSignScript2:
jumptext CoralHarborSignText2
CoralHarborSignText2:
text "CORAL HARBOR"
line "OCHRE berth"
done
CoralCityFishingGuruSignScript:
jumptext CoralCityFishingGuruSignText
CoralCityFishingGuruSignText:
text "FISHING MASTER's" ; He's gonna be the best Fishing Guru ever. Just you wait!
line "House" ; We want him to have a fishing rod with guaranteed encounters and repeatability, I'd say.
done
; This house is new in the May98 maps, so we can kind of go crazy with it.
CoralCityUnknownHouseSignScript:
jumptext CoralCityUnknownHouseSignText
CoralCityUnknownHouseSignText:
text "Comment to be"
line "written"
done
; Alexa play Sonic.exe Hill
; You don't actually fight Oak yet. He'll be in a house in High Tech with a woman.
; Who is this woman? No clue. Oak has no family outside of Daisy and Blue.
; Thus, this woman must actually be a member of the impostor's family.
; Let's say it's played off as a scandalous love affair that he tells you to keep secret.
; I think it'd be good to battle this guy after a certain point; otherwise, pacing is off, you've just finished Savoy...
CoralCityGymSignScript:
jumptext CoralCityGymSignText
CoralCityGymSignText:
text "CORAL CITY"
line "#MON GYM"
para "LEADER: OAK"
para "The trailblazing"
line "academic!"
done
; Seems to be a new version of the Pewter Museum of Science.
; There's a woman right in front, two floors, and random NPCs, with little purpose.
CoralCityAquariumSignScript:
jumptext CoralCityAquariumSignText
CoralCityAquariumSignText:
text "CORAL CITY"
line "AQUARIUM"
done
CoralCitySailorScript1:
jumptextfaceplayer CoralCitySailorText1
CoralCitySailorText1:
text "Ever since the"
line "HARBOUR for"
cont "SAVOY opened,"
cont "work has been"
cont "so busy!"
done
CoralCitySailorScript2:
jumptextfaceplayer CoralCitySailorText2
CoralCitySailorText2:
text "OAK has returned"
line "to us! The GYM"
cont "CHALLENGE is"
cont "saved!"
done
CoralCityTwinScript:
jumptextfaceplayer CoralCityTwinText
CoralCityTwinText:
text "Dad, I want to go"
line "to the aquarium!"
done
CoralCityManScript:
jumptextfaceplayer CoralCityManText
CoralCityManText:
text "Soon, sweetie!"
line "I promise!"
done
CoralCityFisherScript:
jumptextfaceplayer CoralCityFisherText
CoralCityFisherText:
text "I just keep"
line "reeling in big"
cont "ones!"
para "The PERFECT"
line "ROD is like no-"
cont "thing else!"
done
CoralCityCroconawScript:
faceplayer
opentext
writetext CoralCityCroconawText
cry CROCONAW
waitbutton
closetext
end
CoralCityCroconawText:
text "CROCONAW: Grah!"
line "Roar!"
done
CoralCity_MapEvents:
db 0, 0 ; filler
@ -15,6 +172,21 @@ CoralCity_MapEvents:
def_coord_events
def_bg_events
bg_event 30, 21, BGEVENT_READ, CoralCitySignScript
bg_event 24, 24, BGEVENT_READ, CoralHarborSignScript1
bg_event 32, 14, BGEVENT_READ, CoralCityMartSign
bg_event 12, 12, BGEVENT_READ, CoralCityGymSignScript
bg_event 32, 10, BGEVENT_READ, CoralCityPokecenterSign
bg_event 10, 15, BGEVENT_READ, CoralCityFishingGuruSignScript
bg_event 20, 12, BGEVENT_READ, CoralCityUnknownHouseSignScript
bg_event 24, 9, BGEVENT_READ, CoralHarborSignScript2
bg_event 10, 25, BGEVENT_READ, CoralCityAquariumSignScript
def_object_events
object_event 15, 23, SPRITE_TWIN, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CoralCityTwinScript, -1
object_event 27, 11, SPRITE_SAILOR, SPRITEMOVEDATA_WALK_UP_DOWN, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CoralCitySailorScript1, -1
object_event 24, 20, SPRITE_SAILOR, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CoralCitySailorScript2, -1
object_event 15, 22, SPRITE_POKEFAN_M, SPRITEMOVEDATA_STANDING_DOWN, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CoralCityManScript, -1
object_event 23, 2, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_UP, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, CoralCityFisherScript, -1
object_event 22, 2, SPRITE_MONSTER, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 2, 2, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, CoralCityCroconawScript, -1

View file

@ -1,10 +1,47 @@
object_const_def
const ROUTE50_SAVOYCITYGATE_OFFICER
const ROUTE50_SAVOYCITYGATE_SPACEWORLD_GIRL
const ROUTE50_SAVOYCITYGATE_SUPER_NERD
Route50SavoyCityGate_MapScripts:
def_scene_scripts
def_callbacks
Route50SavoyCityGateOfficerScript:
jumptextfaceplayer Route50SavoyCityGateOfficerText
Route50SavoyCityGateOfficerText:
text "You're heading to"
line "SAVOY CITY?"
para "It's a great place!"
line "The people, on the"
cont "other hand…" ; Story of anyone visiting Paris (allegedly)
done
Route50SavoyCityGateSpaceworldGirlScript:
jumptextfaceplayer Route50SavoyCityGateSpaceworldGirlText
Route50SavoyCityGateSpaceworldGirlText:
text "Huh? You're bother-"
line "ing me! Step off!"
done
Route50SavoyCityGateSuperNerdScript:
jumptextfaceplayer Route50SavoyCityGateSuperNerdText
Route50SavoyCityGateSuperNerdText:
text "Oh, this issue of"
line "#MON HANDBOOK"
cont "is great!"
para "So MAWTLE is a"
line "Dark #MON…"
para "Hey! Quit peeking!"
done
Route50SavoyCityGate_MapEvents:
db 0, 0 ; filler
@ -19,3 +56,6 @@ Route50SavoyCityGate_MapEvents:
def_bg_events
def_object_events
object_event 5, 2, SPRITE_OFFICER, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, Route50SavoyCityGateOfficerScript, -1
object_event 7, 4, SPRITE_SPACEWORLD_GIRL, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route50SavoyCityGateSpaceworldGirlScript, -1
object_event 1, 2, SPRITE_SUPER_NERD, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route50SavoyCityGateSuperNerdScript, -1

View file

@ -1,9 +1,186 @@
; Theme: A city filled with slang-slinging younglings of the 90s.
; A few older residents and migrants do not like the younglings.
; Player finds out Kuye is actually a Gym Leader, if they have noticed her at all.
; Hoping to have Impostor Oak taken to Braz-- I mean, Coral City, during this arc.
; In one of the houses or Pokemon Centers, have someone talk about Jacky.
; I want him to be native to Savoy City!
object_const_def
const SAVOYCITY_LASS
const SAVOYCITY_COOLTRAINER_F
const SAVOYCITY_ROCKETM
const SAVOYCITY_SAILOR
const SAVOYCITY_GENTLEMAN
const SAVOYCITY_ROCKER
const SAVOYCITY_FISHER
const SAVOYCITY_PIXYTOP
SavoyCity_MapScripts:
def_scene_scripts
def_callbacks
callback MAPCALLBACK_NEWMAP, SavoyCityFlypointCallback
SavoyCityFlypointCallback:
setflag ENGINE_FLYPOINT_SAVOY
endcallback
SavoyCitySignScript:
jumptext SavoyCitySignText
SavoyCitySignText:
text "SAVOY CITY"
line "Hip 'n' savvy!"
done
SavoyCityTrainSignScript:
jumptext SavoyCityTrainSignText
SavoyCityTrainSignText:
text "SAVOY RAIL"
para "Bringing the"
line "future to you!"
done
SavoyDockSignScript:
jumptext SavoyDockSignText
SavoyDockSignText:
text "SAVOY DOCK"
line "idk figure it"
cont "out bozo"
done
SavoyCityDeptStoreSignScript:
jumptext SavoyCityDeptStoreSignText
SavoyCityDeptStoreSignText:
text "SAVOY CITY"
line "DEPT STORE"
para "Gotta buy 'em"
line "all!"
done
SavoyCityJOPMSignScript:
jumptext SavoyCityJOPMSignText
SavoyCityJOPMSignText:
text "JOPM RADIO"
para "The Voice of"
line "NIHON!"
done
SavoyCityGymSignScript:
jumptext SavoyCityGymSignText
SavoyCityGymSignText:
text "SAVOY GYM"
line "#MON GYM"
para "LEADER: KUYE"
para "She's one mean" ; this feels 90s enough to work right
line "girl!"
done
SavoyCityLassScript:
jumptextfaceplayer SavoyCityLassText
SavoyCityLassText:
text "Wassup? This is"
line "SAVOY CITY!"
para "Life's ace here!"
line "Livin' large!"
done
SavoyCityCoolTrainerFScript:
jumptextfaceplayer SavoyCityCoolTrainerFText
SavoyCityCoolTrainerFText:
text "JOPM puts on"
line "some wicked trax!"
para "Huh? You daft?"
line "Like, cool! C'mon!"
done
SavoyCityRockerScript:
jumptextfaceplayer SavoyCityRockerText
SavoyCityRockerText:
text "You seen KUYE's"
line "latest expose?"
para "It's killer! Dot"
line "com."
done
SavoyCitySailorScript:
jumptextfaceplayer SavoyCitySailorText
SavoyCitySailorText:
text "These townies"
line "are so annoying!"
para "Me? I'm from CORAL!"
line "Can't handle these"
cont "jobbers!" ; He's a hypocrite.
done
SavoyCityGentlemanScript:
jumptextfaceplayer SavoyCityGentlemanText
SavoyCityGentlemanText:
text "I can't keep up"
line "with the kids in"
cont "this city."
para "It's all babel!" ; Tower of Babel reference GO!
done
; This jobber is gonna block the port to send imposter oak over or something
SavoyCityRocketMScript:
jumptextfaceplayer SavoyCityRocketMText
SavoyCityRocketMText:
text "Comment to be"
line "written."
done
SavoyCityFisherScript:
jumptextfaceplayer SavoyCityFisherText
SavoyCityFisherText:
text "PIXYTOP? Oh, it's"
line "a Fairy #MON."
para "Super hip right"
line "now!"
done
SavoyCityPixytopScript:
faceplayer
opentext
writetext SavoyCityPixytopText
cry CLEFAIRY ; TODO: Implement Pixytop and add the cry here
waitbutton
closetext
end
SavoyCityPixytopText:
text "PIXYTOP: Spin!"
line "Bam!"
done
; Some guy is gonna say this is so profound like in spite of language change it's still got normality in it
; Actually I can't be bothered to write another sign
SavoyCityPokecenterSign:
jumpstd PokecenterSignScript
SavoyCity_MapEvents:
db 0, 0 ; filler
@ -18,6 +195,21 @@ SavoyCity_MapEvents:
def_coord_events
def_bg_events
bg_event 30, 16, BGEVENT_READ, SavoyCitySignScript
bg_event 12, 10, BGEVENT_READ, SavoyDockSignScript
bg_event 16, 7, BGEVENT_READ, SavoyCityDeptStoreSignScript
bg_event 29, 21, BGEVENT_READ, SavoyCityTrainSignScript
bg_event 28, 9, BGEVENT_READ, SavoyCityJOPMSignScript
bg_event 18, 24, BGEVENT_READ, SavoyCityGymSignScript
bg_event 26, 14, BGEVENT_READ, SavoyCityPokecenterSign
def_object_events
object_event 19, 27, SPRITE_LASS, SPRITEMOVEDATA_WANDER, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SavoyCityLassScript, -1
object_event 31, 13, SPRITE_COOLTRAINER_F, SPRITEMOVEDATA_WALK_UP_DOWN, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SavoyCityCoolTrainerFScript, -1
object_event 6, 8, SPRITE_ROCKET, SPRITEMOVEDATA_STANDING_RIGHT, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SavoyCityRocketMScript, -1
object_event 13, 9, SPRITE_SAILOR, SPRITEMOVEDATA_WALK_LEFT_RIGHT, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SavoyCitySailorScript, -1
object_event 29, 22, SPRITE_GENTLEMAN, SPRITEMOVEDATA_WANDER, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SavoyCityGentlemanScript, -1
object_event 22, 15, SPRITE_ROCKER, SPRITEMOVEDATA_WALK_UP_DOWN, 2, 2, -1, -1, PAL_NPC_RED, OBJECTTYPE_SCRIPT, 0, SavoyCityRockerScript, -1
object_event 17, 8, SPRITE_FISHER, SPRITEMOVEDATA_STANDING_DOWN, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SavoyCityFisherScript, -1
object_event 18, 8, SPRITE_FAIRY, SPRITEMOVEDATA_STANDING_DOWN, 2, 2, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SavoyCityPixytopScript, -1