pokecrystal-board/maps/RuinsOfAlphOmanyteChamber.asm
Remy Oukaour 5c28d05bb4 Merge branch 'master' of https://github.com/xCrystal/pokecrystal (resolve PR #459)
# Conflicts:
#	data/items/descriptions.asm
#	data/sprite_anims/framesets.asm
#	engine/crystal_colors.asm
#	engine/events/kurt.asm
#	engine/events/special.asm
#	engine/events/std_scripts.asm
#	engine/events_3.asm
#	engine/item_effects.asm
#	engine/namingscreen.asm
#	engine/scripting.asm
#	engine/stats_screen.asm
#	engine/trade_animation.asm
#	home/audio.asm
#	main.asm
#	maps/BattleTower1F.asm
#	maps/BattleTowerBattleRoom.asm
#	maps/BurnedTowerB1F.asm
#	maps/ElmsLab.asm
#	maps/GoldenrodDeptStore5F.asm
#	maps/GoldenrodUnderground.asm
#	maps/HallOfFame.asm
#	maps/MahoganyTown.asm
#	maps/ManiasHouse.asm
#	maps/MobileBattleRoom.asm
#	maps/MobileTradeRoomMobile.asm
#	maps/RadioTower2F.asm
#	maps/Route35NationalParkGate.asm
#	maps/Route36NationalParkGate.asm
#	maps/Route39Farmhouse.asm
#	tilesets/palette_maps.asm
2018-01-14 22:56:36 -05:00

173 lines
3.3 KiB
NASM

RuinsOfAlphOmanyteChamber_MapScriptHeader:
.SceneScripts:
db 2
scene_script .CheckWall
scene_script .DummyScene
.MapCallbacks:
db 1
callback MAPCALLBACK_TILES, .HiddenDoors
.CheckWall:
special Special_OmanyteChamber
checkevent EVENT_WALL_OPENED_IN_OMANYTE_CHAMBER
iftrue .OpenWall
end
.OpenWall:
priorityjump .WallOpenScript
end
.DummyScene:
end
.HiddenDoors:
checkevent EVENT_WALL_OPENED_IN_OMANYTE_CHAMBER
iftrue .WallOpen
changeblock 4, 0, $2e
.WallOpen:
checkevent EVENT_SOLVED_OMANYTE_PUZZLE
iffalse .FloorClosed
return
.FloorClosed:
changeblock 2, 2, $01
changeblock 4, 2, $02
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
closetext
end
MapRuinsOfAlphOmanyteChamberSignpost2Script:
refreshscreen
writebyte UNOWNPUZZLE_OMANYTE
special Special_UnownPuzzle
closetext
iftrue UnknownScript_0x58c36
end
UnknownScript_0x58c36:
setevent EVENT_RUINS_OF_ALPH_INNER_CHAMBER_TOURISTS
setevent EVENT_SOLVED_OMANYTE_PUZZLE
setflag ENGINE_UNLOCKED_UNOWNS_2
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_0x58c8c
playsound SFX_KINESIS
waitsfx
pause 20
warpcheck
end
MapRuinsOfAlphOmanyteChamberSignpost1Script:
jumptext UnknownText_0x58d01
MapRuinsOfAlphOmanyteChamberSignpost3Script:
jumptext UnknownText_0x58d26
MapRuinsOfAlphOmanyteChamberSignpost4Script:
opentext
writetext UnknownText_0x58c8e
writebyte UNOWNWORDS_WATER
special Special_DisplayUnownWords
closetext
end
MapRuinsOfAlphOmanyteChamberSignpost5Script:
checkevent EVENT_WALL_OPENED_IN_OMANYTE_CHAMBER
iftrue UnknownScript_0x58c85
opentext
writetext UnknownText_0x58cc0
writebyte UNOWNWORDS_WATER
special Special_DisplayUnownWords
closetext
end
UnknownScript_0x58c85:
opentext
writetext UnknownText_0x58ce1
waitbutton
closetext
end
MovementData_0x58c8c:
skyfall_top
step_end
UnknownText_0x58c8e:
text "Patterns appeared"
line "on the walls…"
done
; unused
UnusedText_0x58caf:
text "It's UNOWN text!"
done
UnknownText_0x58cc0:
text "Patterns appeared"
line "on the walls…"
done
UnknownText_0x58ce1:
text "There's a big hole"
line "in the wall!"
done
UnknownText_0x58d01:
text "It's a replica of"
line "an ancient #-"
cont "MON."
done
UnknownText_0x58d26:
text "This #MON"
line "drifted in the"
para "sea by twisting"
line "its ten tentacles."
done
RuinsOfAlphOmanyteChamber_MapEventHeader:
; filler
db 0, 0
.Warps:
db 5
warp_def 3, 9, 3, RUINS_OF_ALPH_OUTSIDE
warp_def 4, 9, 3, RUINS_OF_ALPH_OUTSIDE
warp_def 3, 3, 6, RUINS_OF_ALPH_INNER_CHAMBER
warp_def 4, 3, 7, RUINS_OF_ALPH_INNER_CHAMBER
warp_def 4, 0, 1, RUINS_OF_ALPH_OMANYTE_ITEM_ROOM
.CoordEvents:
db 0
.BGEvents:
db 6
bg_event 2, 3, BGEVENT_READ, MapRuinsOfAlphOmanyteChamberSignpost1Script
bg_event 5, 3, BGEVENT_READ, MapRuinsOfAlphOmanyteChamberSignpost1Script
bg_event 3, 2, BGEVENT_UP, MapRuinsOfAlphOmanyteChamberSignpost2Script
bg_event 4, 2, BGEVENT_UP, MapRuinsOfAlphOmanyteChamberSignpost3Script
bg_event 3, 0, BGEVENT_UP, MapRuinsOfAlphOmanyteChamberSignpost4Script
bg_event 4, 0, BGEVENT_UP, MapRuinsOfAlphOmanyteChamberSignpost5Script
.ObjectEvents:
db 0