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
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
IslandCave_MapScripts:: @ 8238E2A
map_script 5, IslandCave_MapScript1_238E3A
map_script 1, IslandCave_MapScript1_238E58
map_script 3, IslandCave_MapScript1_238E99
.byte 0
IslandCave_MapScript1_238E3A: @ 8238E3A
checkflag FLAG_SYS_CTRL_OBJ_DELETE
call_if 1, IslandCave_EventScript_238E44
end
IslandCave_EventScript_238E44:: @ 8238E44
specialvar VAR_RESULT, sub_8138B80
compare_var_to_value VAR_RESULT, 7
goto_if 5, IslandCave_EventScript_27374E
removeobject VAR_LAST_TALKED
return
IslandCave_MapScript1_238E58: @ 8238E58
checkflag FLAG_SYS_BRAILLE_WAIT
call_if 0, IslandCave_EventScript_238E62
end
IslandCave_EventScript_238E62:: @ 8238E62
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_238E99: @ 8238E99
setflag FLAG_0x8B5
call IslandCave_EventScript_238F45
checkflag FLAG_0x1BC
call_if 0, IslandCave_EventScript_238EAB
end
IslandCave_EventScript_238EAB:: @ 8238EAB
clearflag FLAG_0x3A8
return
IslandCave_EventScript_238EAF:: @ 8238EAF
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_238EEF:: @ 8238EEF
lockall
checkflag FLAG_0x003
call_if 1, IslandCave_EventScript_238F45
checkflag FLAG_SYS_BRAILLE_WAIT
goto_eq IslandCave_EventScript_238F13
braillemessage IslandCave_Braille_2A6CD4
setflag FLAG_0x002
special ShouldDoBrailleRegicePuzzle
goto IslandCave_EventScript_238F41
end
IslandCave_EventScript_238F13:: @ 8238F13
msgbox gUnknown_0827304E, 4
releaseall
end
IslandCave_EventScript_238F1D:: @ 8238F1D
lockall
checkflag FLAG_0x003
call_if 1, IslandCave_EventScript_238F45
braillemessage IslandCave_Braille_2A6CD4
checkflag FLAG_SYS_BRAILLE_WAIT
goto_eq IslandCave_EventScript_238F41
setflag FLAG_0x002
special ShouldDoBrailleRegicePuzzle
goto IslandCave_EventScript_238F41
end
IslandCave_EventScript_238F41:: @ 8238F41
waitbuttonpress
hidebox2
releaseall
end
IslandCave_EventScript_238F45:: @ 8238F45
setvar VAR_0x403B, 0
setvar VAR_0x403C, 0
setvar VAR_0x403D, 0
clearflag FLAG_0x003
return
IslandCave_EventScript_238F58:: @ 8238F58
lock
faceplayer
waitse
playmoncry SPECIES_REGICE, 2
delay 40
waitmoncry
setwildbattle SPECIES_REGICE, 40, ITEM_NONE
setflag FLAG_SYS_CTRL_OBJ_DELETE
special sub_80B0A74
waitstate
clearflag FLAG_SYS_CTRL_OBJ_DELETE
specialvar VAR_RESULT, sub_8138B80
compare_var_to_value VAR_RESULT, 1
goto_eq IslandCave_EventScript_238F9F
compare_var_to_value VAR_RESULT, 4
goto_eq IslandCave_EventScript_238FA8
compare_var_to_value VAR_RESULT, 5
goto_eq IslandCave_EventScript_238FA8
setflag FLAG_0x1BC
release
end
IslandCave_EventScript_238F9F:: @ 8238F9F
setflag FLAG_0x1BC
goto IslandCave_EventScript_27376D
end
IslandCave_EventScript_238FA8:: @ 8238FA8
setvar VAR_0x8004, 402
goto IslandCave_EventScript_273776
end
|
