Partial pewter museum fix attempt (still broken. Can't tell why)

This commit is contained in:
Zeta_Null 2023-10-30 12:04:41 -04:00
parent 56bf3ef2b0
commit 1a919e157a
3 changed files with 7 additions and 381 deletions

View file

@ -700,8 +700,8 @@ ENDM
map_attributes MrPokemonsHouse, MR_POKEMONS_HOUSE, $00, 0
map_attributes Route31VioletGate, ROUTE_31_VIOLET_GATE, $00, 0
map_attributes BellchimeTrail, BELLCHIME_TRAIL, $00, 0
map_attributes PewterMuseumOfScience1F, PEWTER_MUSEUM_OF_SCIENCE_1F, $00, 0
map_attributes PewterMuseumOfScience2F, PEWTER_MUSEUM_OF_SCIENCE_2F, $00, 0
map_attributes PewterMuseumOfScience1F, PEWTER_MUSEUM_OF_SCIENCE_1F, $0A, 0
map_attributes PewterMuseumOfScience2F, PEWTER_MUSEUM_OF_SCIENCE_2F, $0A, 0
map_attributes ViridianForest, VIRIDIAN_FOREST, $00, 0
map_attributes ViridianForestViridianGate, VIRIDIAN_FOREST_VIRIDIAN_GATE, $00, 0
map_attributes ViridianForestPewterGate, VIRIDIAN_FOREST_PEWTER_GATE, $00, 0

View file

@ -345,8 +345,8 @@ MapGroup_Pewter:
map PewterPokecenter1F, TILESET_POKECENTER, INDOOR, LANDMARK_PEWTER_CITY, MUSIC_POKEMON_CENTER, FALSE, PALETTE_DAY, FISHGROUP_SHORE
map PewterPokecenter2FBeta, TILESET_POKECENTER, INDOOR, LANDMARK_PEWTER_CITY, MUSIC_VIRIDIAN_CITY, FALSE, PALETTE_DAY, FISHGROUP_SHORE
map PewterSnoozeSpeechHouse, TILESET_HOUSE, INDOOR, LANDMARK_PEWTER_CITY, MUSIC_VIRIDIAN_CITY, FALSE, PALETTE_DAY, FISHGROUP_SHORE
map PewterMuseumOfScience1F, TILESET_HOUSE, INDOOR, LANDMARK_PEWTER_CITY, MUSIC_VIRIDIAN_CITY, FALSE, PALETTE_AUTO, FISHGROUP_SHORE; should have own tileset later
map PewterMuseumOfScience2F, TILESET_HOUSE, INDOOR, LANDMARK_PEWTER_CITY, MUSIC_VIRIDIAN_CITY, FALSE, PALETTE_AUTO, FISHGROUP_SHORE; should have own tileset later
map PewterMuseumOfScience1F, TILESET_MUSEUM, INDOOR, LANDMARK_PEWTER_CITY, MUSIC_VIRIDIAN_CITY, FALSE, PALETTE_DAY, FISHGROUP_SHORE; should have own tileset later
map PewterMuseumOfScience2F, TILESET_MUSEUM, INDOOR, LANDMARK_PEWTER_CITY, MUSIC_VIRIDIAN_CITY, FALSE, PALETTE_DAY, FISHGROUP_SHORE; should have own tileset later
assert_table_length NUM_PEWTER_MAPS
MapGroup_FastShip:

View file

@ -6,369 +6,9 @@ PewterMuseumOfScience1F_MapScripts:
def_callbacks
Museum1FScientistScript:
jumptextfaceplayer Museum1FScientistText
Museum1FGrampsScript:
jumptextfaceplayer Museum1FGrampsText
Museum1FYoungsterScript:
jumptextfaceplayer Museum1FYoungsterText
Museum1FFossilScientistScript:
faceplayer
opentext
writetext Museum1FFossilScientistText
waitbutton
checkitem HELIX_FOSSIL
iftrue .own_helix
checkitem DOME_FOSSIL
iftrue .own_dome
checkitem WING_FOSSIL
iftrue .ask_wing_fossil
jumptext NoFossilsText
.own_helix
checkitem DOME_FOSSIL
iftrue .own_helix_and_dome
checkitem WING_FOSSIL
iftrue .ask_helix_wing
writetext AskHelixFossilText
yesorno
iftrue ResurrectHelixFossil
sjump .maybe_later
.own_dome
checkitem WING_FOSSIL
iftrue .ask_dome_wing
writetext AskDomeFossilText
yesorno
iftrue ResurrectDomeFossil
sjump .maybe_later
.own_helix_and_dome
checkitem WING_FOSSIL
iftrue .ask_helix_dome_wing
loadmenu HelixDomeMenuDataHeader
verticalmenu
closewindow
ifequal $1, ResurrectHelixFossil
ifequal $2, ResurrectDomeFossil
sjump .maybe_later
.ask_wing_fossil
writetext AskWingFossilText
yesorno
iftrue ResurrectWingFossil
sjump .maybe_later
.ask_helix_wing
loadmenu HelixWingMenuDataHeader
verticalmenu
closewindow
ifequal $1, ResurrectHelixFossil
ifequal $2, ResurrectWingFossil
sjump .maybe_later
.ask_dome_wing
loadmenu DomeWingMenuDataHeader
verticalmenu
closewindow
ifequal $1, ResurrectDomeFossil
ifequal $2, ResurrectWingFossil
sjump .maybe_later
.ask_helix_dome_wing
loadmenu HelixDomeWingMenuDataHeader
verticalmenu
closewindow
ifequal $1, ResurrectHelixFossil
ifequal $2, ResurrectDomeFossil
ifequal $3, ResurrectWingFossil
.maybe_later:
jumptext MaybeLaterText
HelixDomeMenuDataHeader:
db $40 ; flags
db 04, 00 ; start coords
db 11, 15 ; end coords
dw .MenuData2
db 1 ; default option
.MenuData2:
db $80 ; flags
db 3 ; items
db "Helix Fossil@"
db "Dome Fossil@"
db "Cancel@"
HelixWingMenuDataHeader:
db $40 ; flags
db 04, 00 ; start coords
db 11, 15 ; end coords
dw .MenuData2
db 1 ; default option
.MenuData2:
db $80 ; flags
db 3 ; items
db "Helix Fossil@"
db "Wing Fossil@"
db "Cancel@"
DomeWingMenuDataHeader:
db $40 ; flags
db 04, 00 ; start coords
db 11, 14 ; end coords
dw .MenuData2
db 1 ; default option
.MenuData2:
db $80 ; flags
db 3 ; items
db "Dome Fossil@"
db "Wing Fossil@"
db "Cancel@"
HelixDomeWingMenuDataHeader:
db $40 ; flags
db 02, 00 ; start coords
db 11, 15 ; end coords
dw .MenuData2
db 1 ; default option
.MenuData2:
db $80 ; flags
db 4 ; items
db "Helix Fossil@"
db "Dome Fossil@"
db "Wing Fossil@"
db "Cancel@"
ResurrectHelixFossil:
takeitem HELIX_FOSSIL
scall ResurrectAFossilScript
givepoke OMANYTE, 20
sjump FinishResurrect
ResurrectDomeFossil:
takeitem DOME_FOSSIL
scall ResurrectAFossilScript
givepoke KABUTO, 20
sjump FinishResurrect
ResurrectWingFossil:
takeitem WING_FOSSIL
scall ResurrectAFossilScript
givepoke AERODACTYL, 20
FinishResurrect:
iffalse .PartyFull
jumptext TakeGoodCareOfItText
.PartyFull:
writetext NoRoomForFossilPokemonText
waitbutton
closetext
end
ResurrectAFossilScript:
writetext ResurrectingPokemonText
waitbutton
closetext
turnobject PEWTERMUSEUMOFSCIENCE1F_SCIENTIST2, RIGHT
pause 15
playsound SFX_BOOT_PC
waitsfx
pause 30
playsound SFX_4_NOTE_DITTY
waitsfx
pause 5
waitsfx
pause 30
playsound SFX_SHUT_DOWN_PC
waitsfx
pause 15
faceplayer
opentext
end
Museum1FReceptionistScript:
readvar VAR_FACING
ifequal DOWN, SneakScript
ifequal LEFT, SneakScript
jumptextfaceplayer WelcomeText
WelcomeText:
text "Welcome!"
para "Thanks to a gene-"
line "rous donation"
cont "by Silph Co.,"
para "admission is free"
line "of charge!"
para "Please go ahead."
done
SneakScript:
jumptextfaceplayer SneakText
SneakText:
text "You can't sneak"
line "in the back way!"
done
KabutopsFossilSignpostScript:
refreshscreen
pokepic KABUTOPS ;placeholder, will become KABUTOPS_FOSSIL later
waitbutton
closepokepic
jumptext KabutopsFossilText
KabutopsFossilText:
text "Kabutops Fossil"
line "(Dome)"
para "A primitive and"
line "rare #mon."
done
OmastarFossilSignpostScript:
refreshscreen
pokepic OMASTAR ;placeholder, will become OMASTAR_FOSSIL later
waitbutton
closepokepic
jumptext OmastarFossilText
OmastarFossilText:
text "Omastar Fossil"
line "(Helix)"
para "A primitive and"
line "rare #mon."
done
AerodactylFossilSignpostScript:
refreshscreen
pokepic AERODACTYL ;placeholder, will become AERODACTYL_FOSSIL later
waitbutton
closepokepic
jumptext AerodactylFossilText
AerodactylFossilText:
text "Aerodactyl Fossil"
line "(Wing)"
para "A primitive and"
line "rare #mon."
done
Museum1FScientistText:
text "We are proud of"
line "three fossils of"
para "rare, prehistoric"
line "#mon."
para "I helped assemble"
line "them!"
done
Museum1FFossilScientistText:
text "Did you know that"
line "you can extract"
para "#mon from"
line "fossils?"
para "If you ever need"
line "to, let me take"
cont "care of it!"
done
Museum1FGrampsText:
text "That is one"
line "magnificent"
cont "fossil!"
done
Museum1FYoungsterText:
text "There are two"
line "places that I"
cont "love!"
para "One is the Ruins"
line "of Alph in Johto."
para "The other is the"
line "Pewter Museum!"
para "I get a sense of"
line "history from both"
cont "of them."
done
Museum1FBookshelfSignpostText:
text "Thick and well-"
line "read books!"
para "Archaeology Man-"
line "ual, Lost #mon,"
cont "#mon Ancestors,"
para "Caring at the"
line "Loamy Layer of"
cont "Kanto…"
done
AskHelixFossilText:
text "Do you want to"
line "resurrect the"
cont "Helix Fossil?"
done
AskDomeFossilText:
text "Do you want to"
line "resurrect the"
cont "Dome Fossil?"
done
AskWingFossilText:
text "Do you want to"
line "resurrect the"
cont "Wing Fossil?"
done
NoFossilsText:
text "Hey! You don't"
line "have any fossils."
done
MaybeLaterText:
text "Just talk to me"
line "if you change"
cont "your mind."
done
ResurrectingPokemonText:
text "OK! I'll resurrect"
line "the #mon!"
done
NoRoomForFossilPokemonText:
text "Hey! You can't"
line "carry another"
cont "#mon, and your"
cont "box is full, too!"
done
TakeGoodCareOfItText:
text "Take good care"
line "of it!"
done
PewterMuseumOfScience1F_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 10, 7, PEWTER_CITY, 6
warp_event 11, 7, PEWTER_CITY, 6
@ -379,19 +19,5 @@ PewterMuseumOfScience1F_MapEvents:
def_coord_events
def_bg_events
bg_event 2, 3, BGEVENT_READ, KabutopsFossilSignpostScript
bg_event 6, 3, BGEVENT_READ, OmastarFossilSignpostScript
bg_event 3, 6, BGEVENT_READ, AerodactylFossilSignpostScript
bg_event 12, 1, BGEVENT_READ, Museum1FBookshelfSignpostText
bg_event 13, 1, BGEVENT_READ, Museum1FBookshelfSignpostText
bg_event 14, 1, BGEVENT_READ, Museum1FBookshelfSignpostText
bg_event 15, 1, BGEVENT_READ, Museum1FBookshelfSignpostText
bg_event 17, 1, BGEVENT_READ, Museum1FBookshelfSignpostText
bg_event 18, 1, BGEVENT_READ, Museum1FBookshelfSignpostText
def_object_events
object_event 18, 3, SPRITE_SCIENTIST, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, Museum1FFossilScientistScript, -1
object_event 12, 4, SPRITE_RECEPTIONIST, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, Museum1FReceptionistScript, -1
object_event 16, 2, SPRITE_SCIENTIST, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, Museum1FScientistScript, -1
object_event 1, 7, SPRITE_GRAMPS, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Museum1FGrampsScript, -1
object_event 4, 3, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Museum1FYoungsterScript, -1
def_object_events