summaryrefslogtreecommitdiff
path: root/data/maps/SevenIsland_SevaultCanyon_TanobyKey/scripts.inc
blob: 442e1394290f10dda913e5b739a5abb316dad36a (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
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
130
131
132
133
134
135
136
137
138
139
140
141
142
143
SevenIsland_SevaultCanyon_TanobyKey_MapScripts:: @ 8164DCC
	map_script 3, SevenIsland_SevaultCanyon_TanobyKey_MapScript1_164DD2
	.byte 0

SevenIsland_SevaultCanyon_TanobyKey_MapScript1_164DD2:: @ 8164DD2
	setworldmapflag FLAG_WORLD_MAP_SEVEN_ISLAND_SEVAULT_CANYON_TANOBY_KEY
	checkflag FLAG_SYS_UNLOCKED_TANOBY_RUINS
	call_if TRUE, EventScript_164E07
	setvar VAR_0x4001, 0
	setvar VAR_0x4002, 0
	setvar VAR_0x4003, 0
	setvar VAR_0x4004, 0
	setvar VAR_0x4005, 0
	setvar VAR_0x4006, 0
	setvar VAR_0x4007, 0
	setvar VAR_0x4008, 0
	end

EventScript_164E07:: @ 8164E07
	setobjectxyperm 1, 7, 2
	setobjectxyperm 2, 4, 4
	setobjectxyperm 3, 10, 4
	setobjectxyperm 4, 5, 6
	setobjectxyperm 5, 9, 6
	setobjectxyperm 6, 5, 8
	setobjectxyperm 7, 9, 8
	return

SevenIsland_SevaultCanyon_TanobyKey_EventScript_164E39:: @ 8164E39
	lockall
	compare_var_to_value VAR_0x4001, 100
	goto_if eq, EventScript_164F8A
	call EventScript_164F2E
	setvar VAR_0x4001, 100
	compare_var_to_value VAR_0x4008, 7
	goto_if eq, EventScript_164F8C
	releaseall
	end

SevenIsland_SevaultCanyon_TanobyKey_EventScript_164E5C:: @ 8164E5C
	lockall
	compare_var_to_value VAR_0x4002, 100
	goto_if eq, EventScript_164F8A
	call EventScript_164F2E
	setvar VAR_0x4002, 100
	compare_var_to_value VAR_0x4008, 7
	goto_if eq, EventScript_164F8C
	releaseall
	end

SevenIsland_SevaultCanyon_TanobyKey_EventScript_164E7F:: @ 8164E7F
	lockall
	compare_var_to_value VAR_0x4003, 100
	goto_if eq, EventScript_164F8A
	call EventScript_164F2E
	setvar VAR_0x4003, 100
	compare_var_to_value VAR_0x4008, 7
	goto_if eq, EventScript_164F8C
	releaseall
	end

SevenIsland_SevaultCanyon_TanobyKey_EventScript_164EA2:: @ 8164EA2
	lockall
	compare_var_to_value VAR_0x4004, 100
	goto_if eq, EventScript_164F8A
	call EventScript_164F2E
	setvar VAR_0x4004, 100
	compare_var_to_value VAR_0x4008, 7
	goto_if eq, EventScript_164F8C
	releaseall
	end

SevenIsland_SevaultCanyon_TanobyKey_EventScript_164EC5:: @ 8164EC5
	lockall
	compare_var_to_value VAR_0x4005, 100
	goto_if eq, EventScript_164F8A
	call EventScript_164F2E
	setvar VAR_0x4005, 100
	compare_var_to_value VAR_0x4008, 7
	goto_if eq, EventScript_164F8C
	releaseall
	end

SevenIsland_SevaultCanyon_TanobyKey_EventScript_164EE8:: @ 8164EE8
	lockall
	compare_var_to_value VAR_0x4006, 100
	goto_if eq, EventScript_164F8A
	call EventScript_164F2E
	setvar VAR_0x4006, 100
	compare_var_to_value VAR_0x4008, 7
	goto_if eq, EventScript_164F8C
	releaseall
	end

SevenIsland_SevaultCanyon_TanobyKey_EventScript_164F0B:: @ 8164F0B
	lockall
	compare_var_to_value VAR_0x4007, 100
	goto_if eq, EventScript_164F8A
	call EventScript_164F2E
	setvar VAR_0x4007, 100
	compare_var_to_value VAR_0x4008, 7
	goto_if eq, EventScript_164F8C
	releaseall
	end

EventScript_164F2E:: @ 8164F2E
	addvar VAR_0x4008, 1
	playse SE_TRACK_MOVE
	setvar VAR_0x8004, 1
	setvar VAR_0x8005, 1
	setvar VAR_0x8006, 8
	setvar VAR_0x8007, 3
	special Special_ShakeScreen
	delay 60
	return

EventScript_164F51:: @ 8164F51
	setvar VAR_0x8004, 2
	setvar VAR_0x8005, 2
	setvar VAR_0x8006, 10
	setvar VAR_0x8007, 3
	special Special_ShakeScreen
	delay 60
	setvar VAR_0x8004, 3
	setvar VAR_0x8005, 3
	setvar VAR_0x8006, 12
	setvar VAR_0x8007, 2
	special Special_ShakeScreen
	delay 60
	playse SE_FU_ZUZUZU
	waitse
	return

EventScript_164F8A:: @ 8164F8A
	releaseall
	end

EventScript_164F8C:: @ 8164F8C
	call EventScript_164F51
	msgbox gUnknown_817D31B
	setflag FLAG_SYS_UNLOCKED_TANOBY_RUINS
	releaseall
	end