summaryrefslogtreecommitdiff
path: root/data/scripts/maps/CaveOfOrigin_B4F.inc
blob: e9f23ff5ae5dd61bd71704dd837c314231244e26 (plain)
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 2145
	callif 1, CaveOfOrigin_B4F_EventScript_15DDC1
	end

CaveOfOrigin_B4F_EventScript_15DDC1:: @ 815DDC1
	disappear 1
	return

CaveOfOrigin_B4F_MapScript1_15DDC5:: @ 815DDC5
	.ifdef SAPPHIRE
	setmapfooter 163
	.else
	setmapfooter 313
	.endif
	call CaveOfOrigin_B4F_EventScript_1A01B5
	checkflag 113
	callif 1, CaveOfOrigin_B4F_EventScript_1A04E3
	end

CaveOfOrigin_B4F_EventScript_15DDD7:: @ 815DDD7
	lockall
	move 255, CaveOfOrigin_B4F_Movement_1A0841
	waitmove 0
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4F03, 4
	.else
	msgbox CaveOfOrigin_B4F_Text_1B4FE4, 4
	.endif
	closebutton
	setweather 0
	doweather
	special 284
	waitstate
	playsfx 209
	setanimation 0, 9
	setanimation 1, 13
	setanimation 2, 0
	doanimation 54
	checkanimation 54
	.ifdef SAPPHIRE
	setvar RESULT, 3
	.else
	setvar RESULT, 2
	.endif
	playsfx 107
	special 281
	waitstate
	special 282
	waitstate
	move 1, CaveOfOrigin_B4F_Movement_15DE7D
	waitmove 0
	pause 60
	setwildbattle SPECIES_GROUDON_OR_KYOGRE, 45, ITEM_NONE
	checksound
	pokecry SPECIES_GROUDON_OR_KYOGRE, 2
	pause 40
	waitpokecry
	setflag 2145
	special 311
	waitstate
	clearflag 2145
	specialval RESULT, 180
	compare RESULT, 1
	callif 1, CaveOfOrigin_B4F_EventScript_15DE73
	setflag 816
	setflag 855
	setflag 856
	clearflag 815
	setvar 0x409b, 1
	setflag 113
	clearflag 854
	clearflag 2090
	setvar 0x40b9, 2
	clearflag 916
	releaseall
	end

CaveOfOrigin_B4F_EventScript_15DE73:: @ 815DE73
	.ifdef SAPPHIRE
	msgbox UnknownString_81B4F29, 4
	.else
	msgbox CaveOfOrigin_B4F_Text_1B5009, 4
	.endif
	closebutton
	return

CaveOfOrigin_B4F_Movement_15DE7D:: @ 815DE7D
	step_5e
	step_60
	step_14
	step_14
	step_61
	step_end