1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
|
RuinsOfAlphOmanyteChamber_MapScripts:
db 0 ; scene scripts
db 1 ; callbacks
callback MAPCALLBACK_TILES, .HiddenDoors
.HiddenDoors:
checkevent EVENT_SOLVED_OMANYTE_PUZZLE
iffalse .FloorClosed
endcallback
.FloorClosed:
changeblock 2, 2, $01 ; left floor
changeblock 4, 2, $02 ; right floor
endcallback
RuinsOfAlphOmanyteChamberPuzzle:
refreshscreen
setval UNOWNPUZZLE_OMANYTE
special UnownPuzzle
closetext
iftrue .PuzzleComplete
end
.PuzzleComplete:
setevent EVENT_RUINS_OF_ALPH_INNER_CHAMBER_TOURISTS
setevent EVENT_SOLVED_OMANYTE_PUZZLE
setflag ENGINE_UNLOCKED_UNOWNS_L_TO_R
setmapscene RUINS_OF_ALPH_INNER_CHAMBER, SCENE_RUINSOFALPHINNERCHAMBER_STRANGE_PRESENCE
earthquake 30
showemote EMOTE_SHOCK, PLAYER, 15
changeblock 2, 2, $18 ; left hole
changeblock 4, 2, $19 ; right hole
reloadmappart
playsound SFX_STRENGTH
earthquake 80
warpcheck
end
RuinsOfAlphOmanyteChamberAncientReplica:
jumptext RuinsOfAlphOmanyteChamberAncientReplicaText
RuinsOfAlphOmanyteChamberDescriptionSign:
jumptext RuinsOfAlphOmanyteChamberDescriptionText
RuinsOfAlphOmanyteChamberAncientReplicaText:
text "It's a replica of"
line "an ancient #-"
cont "MON."
done
RuinsOfAlphOmanyteChamberDescriptionText:
text "This #MON"
line "drifted in the"
para "sea by twisting"
line "its ten tentacles."
done
RuinsOfAlphOmanyteChamber_MapEvents:
db 0, 0 ; filler
db 4 ; warp events
warp_event 3, 9, RUINS_OF_ALPH_OUTSIDE, 3
warp_event 4, 9, RUINS_OF_ALPH_OUTSIDE, 3
warp_event 3, 3, RUINS_OF_ALPH_INNER_CHAMBER, 6
warp_event 4, 3, RUINS_OF_ALPH_INNER_CHAMBER, 7
db 0 ; coord events
db 4 ; bg events
bg_event 2, 3, BGEVENT_READ, RuinsOfAlphOmanyteChamberAncientReplica
bg_event 5, 3, BGEVENT_READ, RuinsOfAlphOmanyteChamberAncientReplica
bg_event 3, 2, BGEVENT_UP, RuinsOfAlphOmanyteChamberPuzzle
bg_event 4, 2, BGEVENT_UP, RuinsOfAlphOmanyteChamberDescriptionSign
db 0 ; object events
|
