summaryrefslogtreecommitdiff
path: root/data/maps/SilphCo_Elevator/scripts.inc
blob: 4d75eec386b0e1f8bfb4eaa4ccd485624103ebd7 (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
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
SilphCo_Elevator_MapScripts:: @ 8161F6E
	.byte 0

SilphCo_Elevator_EventScript_161F6F:: @ 8161F6F
	lockall
	setvar VAR_0x8004, 1
	checkflag FLAG_TEMP_2
	call_if FALSE, EventScript_1A7AB9
	copyvar VAR_0x8005, VAR_ELEVATOR_FLOOR
	special Special_DrawElevatorCurrentFloorWindow
	message Text_1A535C
	waitmessage
	setvar VAR_0x8004, 1
	specialvar VAR_RESULT, Special_InitElevatorFloorSelectMenuPos
	special Special_ListMenu
	waitstate
	switch VAR_RESULT
	case 0, EventScript_1621BF
	case 1, EventScript_162197
	case 2, EventScript_16216F
	case 3, EventScript_162147
	case 4, EventScript_16211F
	case 5, EventScript_1620F7
	case 6, EventScript_1620CF
	case 7, EventScript_1620A7
	case 8, EventScript_16207F
	case 9, EventScript_162057
	case 10, EventScript_16202F
	case 11, EventScript_1621E7
	case 127, EventScript_1621E7
	end

EventScript_16202F:: @ 816202F
	setvar VAR_0x8006, 4
	setdynamicwarp MAP_SILPH_CO_1F, 255, 22, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 4
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 4
	goto EventScript_1621E7

EventScript_162056:: @ 8162056
	end

EventScript_162057:: @ 8162057
	setvar VAR_0x8006, 5
	setdynamicwarp MAP_SILPH_CO_2F, 255, 22, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 5
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 5
	goto EventScript_1621E7

EventScript_16207E:: @ 816207E
	end

EventScript_16207F:: @ 816207F
	setvar VAR_0x8006, 6
	setdynamicwarp MAP_SILPH_CO_3F, 255, 22, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 6
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 6
	goto EventScript_1621E7

EventScript_1620A6:: @ 81620A6
	end

EventScript_1620A7:: @ 81620A7
	setvar VAR_0x8006, 7
	setdynamicwarp MAP_SILPH_CO_4F, 255, 22, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 7
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 7
	goto EventScript_1621E7

EventScript_1620CE:: @ 81620CE
	end

EventScript_1620CF:: @ 81620CF
	setvar VAR_0x8006, 8
	setdynamicwarp MAP_SILPH_CO_5F, 255, 22, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 8
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 8
	goto EventScript_1621E7

EventScript_1620F6:: @ 81620F6
	end

EventScript_1620F7:: @ 81620F7
	setvar VAR_0x8006, 9
	setdynamicwarp MAP_SILPH_CO_6F, 255, 20, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 9
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 9
	goto EventScript_1621E7

EventScript_16211E:: @ 816211E
	end

EventScript_16211F:: @ 816211F
	setvar VAR_0x8006, 10
	setdynamicwarp MAP_SILPH_CO_7F, 255, 23, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 10
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 10
	goto EventScript_1621E7

EventScript_162146:: @ 8162146
	end

EventScript_162147:: @ 8162147
	setvar VAR_0x8006, 11
	setdynamicwarp MAP_SILPH_CO_8F, 255, 22, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 11
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 11
	goto EventScript_1621E7

EventScript_16216E:: @ 816216E
	end

EventScript_16216F:: @ 816216F
	setvar VAR_0x8006, 12
	setdynamicwarp MAP_SILPH_CO_9F, 255, 24, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 12
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 12
	goto EventScript_1621E7

EventScript_162196:: @ 8162196
	end

EventScript_162197:: @ 8162197
	setvar VAR_0x8006, 13
	setdynamicwarp MAP_SILPH_CO_10F, 255, 13, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 13
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 13
	goto EventScript_1621E7

EventScript_1621BE:: @ 81621BE
	end

EventScript_1621BF:: @ 81621BF
	setvar VAR_0x8006, 14
	setdynamicwarp MAP_SILPH_CO_11F, 255, 13, 3
	compare_var_to_value VAR_ELEVATOR_FLOOR, 14
	goto_if eq, EventScript_1621E7
	call EventScript_1621EC
	setvar VAR_ELEVATOR_FLOOR, 14
	goto EventScript_1621E7

EventScript_1621E6:: @ 81621E6
	end

EventScript_1621E7:: @ 81621E7
	special Special_CloseElevatorCurrentFloorWindow
	releaseall
	end

EventScript_1621EC:: @ 81621EC
	special Special_CloseElevatorCurrentFloorWindow
	closemessage
	waitse
	special Special_AnimateElevator
	waitstate
	setflag FLAG_TEMP_2
	return