pokecrystal-board/maps/RuinsOfAlphKabutoChamber.asm

286 lines
5.7 KiB
NASM
Raw Normal View History

2015-11-26 21:22:14 -08:00
const_value set 2
const RUINSOFALPHKABUTOCHAMBER_RECEPTIONIST
const RUINSOFALPHKABUTOCHAMBER_SCIENTIST
RuinsOfAlphKabutoChamber_MapScriptHeader:
.SceneScripts:
db 2
scene_script .CheckWall
scene_script .DummyScene
.MapCallbacks:
db 1
dbw MAPCALLBACK_TILES, .HiddenDoors
.CheckWall:
2013-09-24 00:48:58 -07:00
checkevent EVENT_WALL_OPENED_IN_KABUTO_CHAMBER
iftrue .OpenWall
end
.OpenWall:
priorityjump .WallOpenScript
end
.DummyScene:
end
.HiddenDoors:
2013-09-24 00:48:58 -07:00
checkevent EVENT_WALL_OPENED_IN_KABUTO_CHAMBER
iftrue .WallOpen
changeblock $4, $0, $2e
.WallOpen:
checkevent EVENT_SOLVED_KABUTO_PUZZLE
iffalse .FloorClosed
return
.FloorClosed:
changeblock $2, $2, $1
changeblock $4, $2, $2
return
.WallOpenScript:
pause 30
earthquake 30
showemote EMOTE_SHOCK, PLAYER, 20
pause 30
playsound SFX_STRENGTH
changeblock $4, $0, $30
reloadmappart
earthquake 50
setscene $1
2015-11-25 07:16:29 -08:00
closetext
end
2017-12-17 16:48:04 -08:00
RuinsOfAlphKabutoChamberReceptionistScript:
jumptextfaceplayer RuinsOfAlphKabutoChamberReceptionistText
MapRuinsOfAlphKabutoChamberSignpost2Script:
refreshscreen $0
writebyte $0
special Special_UnownPuzzle
2015-11-25 07:16:29 -08:00
closetext
iftrue UnknownScript_0x58778
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x58778:
setevent EVENT_RUINS_OF_ALPH_INNER_CHAMBER_TOURISTS
setevent EVENT_SOLVED_KABUTO_PUZZLE
2015-07-10 05:08:03 -07:00
setflag ENGINE_UNLOCKED_UNOWNS_1
setevent EVENT_RUINS_OF_ALPH_KABUTO_CHAMBER_RECEPTIONIST
setmapscene RUINS_OF_ALPH_INNER_CHAMBER, $1
earthquake 30
showemote EMOTE_SHOCK, PLAYER, 15
changeblock $2, $2, $18
changeblock $4, $2, $19
reloadmappart
playsound SFX_STRENGTH
earthquake 80
applymovement PLAYER, MovementData_0x587fe
playsound SFX_KINESIS
2015-11-25 07:16:29 -08:00
waitsfx
pause 20
warpcheck
end
2015-07-10 01:45:35 -07:00
ScientistScript_0x587a8:
faceplayer
2015-12-09 15:25:44 -08:00
opentext
checkcode VAR_UNOWNCOUNT
if_equal 26, UnknownScript_0x587cf
2013-09-24 00:48:58 -07:00
checkevent EVENT_WALL_OPENED_IN_KABUTO_CHAMBER
iftrue UnknownScript_0x587c9
checkevent EVENT_SOLVED_KABUTO_PUZZLE
iffalse UnknownScript_0x587c0
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x589b8
2015-11-29 19:29:45 -08:00
buttonsound
2015-07-10 01:45:35 -07:00
UnknownScript_0x587c0:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x588f5
2015-11-25 07:16:29 -08:00
waitbutton
closetext
2015-11-26 21:22:14 -08:00
spriteface RUINSOFALPHKABUTOCHAMBER_SCIENTIST, UP
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x587c9:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x5897c
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x587cf:
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x594cb
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
MapRuinsOfAlphKabutoChamberSignpost1Script:
jumptext UnknownText_0x58b1a
MapRuinsOfAlphKabutoChamberSignpost3Script:
jumptext UnknownText_0x58b3f
MapRuinsOfAlphKabutoChamberSignpost4Script:
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x58aa7
writebyte $0
special Special_DisplayUnownWords
2015-11-25 07:16:29 -08:00
closetext
end
MapRuinsOfAlphKabutoChamberSignpost5Script:
2013-09-24 00:48:58 -07:00
checkevent EVENT_WALL_OPENED_IN_KABUTO_CHAMBER
iftrue UnknownScript_0x587f7
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x58ad9
writebyte $0
special Special_DisplayUnownWords
2015-11-25 07:16:29 -08:00
closetext
end
2015-07-10 01:45:35 -07:00
UnknownScript_0x587f7:
2015-12-09 15:25:44 -08:00
opentext
2015-01-20 00:01:23 -08:00
writetext UnknownText_0x58afa
2015-11-25 07:16:29 -08:00
waitbutton
closetext
end
2015-07-10 01:45:35 -07:00
MovementData_0x587fe:
db $59 ; movement
step_end
2017-12-17 16:48:04 -08:00
RuinsOfAlphKabutoChamberReceptionistText:
text "Welcome to this"
line "chamber."
para "There are sliding"
line "panels that depict"
para "a #MON drawn by"
line "the ancients."
para "Slide the panels"
line "around to form the"
cont "picture."
para "To the right is a"
line "description of the"
cont "#MON."
para "Scientists in the"
line "back are examining"
para "some newly found"
line "patterns."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x588f5:
text "Recently, strange,"
line "cryptic patterns"
cont "have appeared."
para "It's odd. They"
line "weren't here a"
cont "little while ago…"
para "You should take a"
line "look at the walls."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x5897c:
text "Ah! Here's another"
line "huge hole!"
para "It's big enough to"
line "go through!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x589b8:
text "That tremor was"
line "pretty scary!"
para "But I'm more"
line "concerned about"
cont "this wall here…"
done
; possibly unused
2015-07-10 01:45:35 -07:00
UnknownText_0x58a03:
text "The patterns on"
line "the wall appear to"
cont "be words!"
para "And those sliding"
line "stone panels seem"
para "to be signals of"
line "some kind."
para "I think they make"
line "#MON appear,"
para "but it's not clear"
line "yet…"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x58aa7:
text "Patterns appeared"
line "on the walls…"
done
; possibly unused
2015-07-10 01:45:35 -07:00
UnknownText_0x58ac8:
text "It's UNOWN text!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x58ad9:
text "Patterns appeared"
line "on the walls…"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x58afa:
text "There's a big hole"
line "in the wall!"
done
2015-07-10 01:45:35 -07:00
UnknownText_0x58b1a:
text "It's a replica of"
line "an ancient #-"
cont "MON."
done
2015-07-10 01:45:35 -07:00
UnknownText_0x58b3f:
text "A #MON that hid"
line "on the sea floor."
para "Eyes on its back"
line "scanned the area."
done
RuinsOfAlphKabutoChamber_MapEventHeader:
; filler
db 0, 0
.Warps:
db 5
warp_def $9, $3, 2, RUINS_OF_ALPH_OUTSIDE
warp_def $9, $4, 2, RUINS_OF_ALPH_OUTSIDE
warp_def $3, $3, 4, RUINS_OF_ALPH_INNER_CHAMBER
warp_def $3, $4, 5, RUINS_OF_ALPH_INNER_CHAMBER
warp_def $0, $4, 1, RUINS_OF_ALPH_KABUTO_ITEM_ROOM
.CoordEvents:
db 0
.BGEvents:
db 6
bg_event 3, 2, BGEVENT_READ, MapRuinsOfAlphKabutoChamberSignpost1Script
bg_event 3, 5, BGEVENT_READ, MapRuinsOfAlphKabutoChamberSignpost1Script
bg_event 2, 3, BGEVENT_UP, MapRuinsOfAlphKabutoChamberSignpost2Script
bg_event 2, 4, BGEVENT_UP, MapRuinsOfAlphKabutoChamberSignpost3Script
bg_event 0, 3, BGEVENT_UP, MapRuinsOfAlphKabutoChamberSignpost4Script
bg_event 0, 4, BGEVENT_UP, MapRuinsOfAlphKabutoChamberSignpost5Script
.ObjectEvents:
db 2
object_event SPRITE_RECEPTIONIST, 5, 5, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, RuinsOfAlphKabutoChamberReceptionistScript, EVENT_RUINS_OF_ALPH_KABUTO_CHAMBER_RECEPTIONIST
object_event SPRITE_SCIENTIST, 1, 3, SPRITEMOVEDATA_STANDING_UP, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, ScientistScript_0x587a8, -1