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
78
79
80
81
82
83
84
85
86
87
88
89
90
91
|
IslandCave_MapScripts:: @ 815EEB6
map_script 5, IslandCave_MapScript1_15EEC6
map_script 1, IslandCave_MapScript1_15EED4
map_script 3, IslandCave_MapScript1_15EF15
.byte 0
IslandCave_MapScript1_15EEC6:: @ 815EEC6
checkflag FLAG_SYS_CTRL_OBJ_DELETE
call_if 1, IslandCave_EventScript_15EED0
end
IslandCave_EventScript_15EED0:: @ 815EED0
removeobject LAST_TALKED
return
IslandCave_MapScript1_15EED4:: @ 815EED4
checkflag FLAG_SYS_BRAILLE_WAIT
call_if 0, IslandCave_EventScript_15EEDE
end
IslandCave_EventScript_15EEDE:: @ 815EEDE
setmetatile 7, 19, 553, 1
setmetatile 8, 19, 553, 1
setmetatile 9, 19, 553, 1
setmetatile 7, 20, 565, 1
setmetatile 8, 20, 565, 1
setmetatile 9, 20, 565, 1
return
IslandCave_MapScript1_15EF15:: @ 815EF15
setflag FLAG_LANDMARK_ISLAND_CAVE
end
S_OpenRegiceChamber:: @ 815EF19
setmetatile 7, 19, 554, 1
setmetatile 8, 19, 555, 1
setmetatile 9, 19, 556, 1
setmetatile 7, 20, 562, 1
setmetatile 8, 20, 563, 0
setmetatile 9, 20, 564, 1
special DrawWholeMapView
playse SE_BAN
setflag FLAG_SYS_BRAILLE_WAIT
end
IslandCave_EventScript_15EF59:: @ 815EF59
lockall
checkflag FLAG_SYS_BRAILLE_WAIT
goto_if_eq IslandCave_EventScript_15EF72
braillemessage IslandCave_Braille_1C54FC
special DoBrailleWait
waitstate
goto IslandCave_EventScript_15EF95
end
IslandCave_EventScript_15EF72:: @ 815EF72
msgbox IslandCave_Text_1A13BE, 4
releaseall
end
IslandCave_EventScript_15EF7C:: @ 815EF7C
lockall
braillemessage IslandCave_Braille_1C54FC
checkflag FLAG_SYS_BRAILLE_WAIT
goto_if_eq IslandCave_EventScript_15EF95
special DoBrailleWait
waitstate
goto IslandCave_EventScript_15EF95
end
IslandCave_EventScript_15EF95:: @ 815EF95
waitbuttonpress
erasebox 0, 0, 29, 19
releaseall
end
IslandCave_EventScript_15EF9D:: @ 815EF9D
lock
faceplayer
waitse
playmoncry SPECIES_REGICE, 2
delay 40
waitmoncry
setwildbattle SPECIES_REGICE, 40, ITEM_NONE
setflag FLAG_HIDE_REGICE
setflag FLAG_SYS_CTRL_OBJ_DELETE
special ScrSpecial_StartRegiBattle
waitstate
clearflag FLAG_SYS_CTRL_OBJ_DELETE
release
end
|
