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
|
CaveOfOrigin_B4F_MapScripts:: @ 815DDAC
map_script 5, CaveOfOrigin_B4F_MapScript1_15DDB7
map_script 3, CaveOfOrigin_B4F_MapScript1_15DDC5
.byte 0
CaveOfOrigin_B4F_MapScript1_15DDB7:: @ 815DDB7
checkflag FLAG_SYS_CTRL_OBJ_DELETE
call_if 1, CaveOfOrigin_B4F_EventScript_15DDC1
end
CaveOfOrigin_B4F_EventScript_15DDC1:: @ 815DDC1
removeobject 1
return
CaveOfOrigin_B4F_MapScript1_15DDC5:: @ 815DDC5
.ifdef SAPPHIRE
setmaplayoutindex 163
.else
setmaplayoutindex 313
.endif
call CaveOfOrigin_B4F_EventScript_1A01B5
checkflag FLAG_LEGENDARY_BATTLE_COMPLETED
call_if 1, CaveOfOrigin_B4F_EventScript_1A04E3
end
CaveOfOrigin_B4F_EventScript_15DDD7:: @ 815DDD7
lockall
applymovement 255, CaveOfOrigin_B4F_Movement_1A0841
waitmovement 0
.ifdef SAPPHIRE
msgbox UnknownString_81B4F03, 4
.else
msgbox CaveOfOrigin_B4F_Text_1B4FE4, 4
.endif
closemessage
setweather 0
doweather
special WaitWeather
waitstate
playse 209
setfieldeffectargument 0, 9
setfieldeffectargument 1, 13
setfieldeffectargument 2, 0
dofieldeffect 54
waitfieldeffect 54
.ifdef SAPPHIRE
setvar RESULT, 3
.else
setvar RESULT, 2
.endif
playse 107
special sub_80818A4
waitstate
special sub_80818FC
waitstate
applymovement 1, CaveOfOrigin_B4F_Movement_15DE7D
waitmovement 0
delay 60
setwildbattle SPECIES_GROUDON_OR_KYOGRE, 45, ITEM_NONE
waitse
playmoncry SPECIES_GROUDON_OR_KYOGRE, 2
delay 40
waitmoncry
setflag FLAG_SYS_CTRL_OBJ_DELETE
special ScrSpecial_StartGroudonKyogreBattle
waitstate
clearflag FLAG_SYS_CTRL_OBJ_DELETE
specialvar RESULT, GetBattleOutcome
compare RESULT, 1
call_if 1, CaveOfOrigin_B4F_EventScript_15DE73
setflag FLAG_HIDE_WALLACE_SOOTOPOLIS
setflag FLAG_HIDE_CAVE_OF_ORIGIN_ENTRANCE_WOMAN_1
setflag FLAG_HIDE_CAVE_OF_ORIGIN_ENTRANCE_WOMAN_2
clearflag FLAG_HIDE_WALLACE_SOOTOPOLIS_GYM
setvar VAR_CAVE_OF_ORIGIN_B4F_STATE, 1
setflag FLAG_LEGENDARY_BATTLE_COMPLETED
clearflag FLAG_HIDE_SOOTOPOLIS_RESIDENTS
clearflag FLAG_SYS_WEATHER_CTRL
setvar VAR_MT_PYRE_STATE, 2
clearflag FLAG_HIDE_LEADER_MT_PYRE_SUMMIT
releaseall
end
CaveOfOrigin_B4F_EventScript_15DE73:: @ 815DE73
.ifdef SAPPHIRE
msgbox UnknownString_81B4F29, 4
.else
msgbox CaveOfOrigin_B4F_Text_1B5009, 4
.endif
closemessage
return
CaveOfOrigin_B4F_Movement_15DE7D:: @ 815DE7D
step_5e
step_60
step_14
step_14
step_61
step_end
|
