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
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
|
MahoganyMart1F_MapScriptHeader:
.MapTriggers:
db 2
; triggers
dw UnknownScript_0x6c356, $0000
dw UnknownScript_0x6c357, $0000
.MapCallbacks:
db 1
; callbacks
dbw 1, UnknownScript_0x6c35b
UnknownScript_0x6c356:
end
UnknownScript_0x6c357:
priorityjump UnknownScript_0x6c38f
end
UnknownScript_0x6c35b:
checkevent EVENT_UNCOVERED_STAIRCASE_IN_MAHOGANY_MART
iftrue UnknownScript_0x6c362
return
UnknownScript_0x6c362:
changeblock $6, $2, $1e
return
PharmacistScript_0x6c367:
faceplayer
loadfont
checkevent EVENT_DECIDED_TO_HELP_LANCE
iftrue UnknownScript_0x6c375
pokemart $0, $000f
loadmovesprites
end
UnknownScript_0x6c375:
writetext UnknownText_0x6c46b
closetext
loadmovesprites
end
BlackBeltScript_0x6c37b:
faceplayer
loadfont
checkevent EVENT_DECIDED_TO_HELP_LANCE
iftrue UnknownScript_0x6c389
writetext UnknownText_0x6c494
closetext
loadmovesprites
end
UnknownScript_0x6c389:
writetext UnknownText_0x6c501
closetext
loadmovesprites
end
UnknownScript_0x6c38f:
pause 15
loadfont
writetext UnknownText_0x6c52a
pause 15
loadmovesprites
playsound SFX_TACKLE
applymovement $5, MovementData_0x6c3f6
applymovement $3, MovementData_0x6c3fb
pause 15
disappear $5
pause 15
applymovement $4, MovementData_0x6c407
loadfont
writetext UnknownText_0x6c549
closetext
loadmovesprites
follow $4, PLAYER
applymovement $4, MovementData_0x6c40a
applymovement $2, MovementData_0x6c403
applymovement $4, MovementData_0x6c40e
stopfollow
loadfont
writetext UnknownText_0x6c59e
closetext
showemote EMOTE_SHOCK, $2, 10
playsound SFX_FAINT
changeblock $6, $2, $1e
reloadmappart
loadmovesprites
setevent EVENT_UNCOVERED_STAIRCASE_IN_MAHOGANY_MART
spriteface $4, LEFT
loadfont
writetext UnknownText_0x6c5ba
closetext
loadmovesprites
applymovement $4, MovementData_0x6c412
playsound SFX_EXIT_BUILDING
disappear $4
dotrigger $0
waitbutton
end
GrannyScript_0x6c3ee:
faceplayer
loadfont
pokemart $0, $0010
loadmovesprites
end
MovementData_0x6c3f6:
fix_facing
big_step_left
big_step_right
remove_fixed_facing
step_end
MovementData_0x6c3fb:
fix_facing
big_step_left
remove_fixed_facing
turn_head_down
turn_head_left
turn_head_up
turn_head_right
step_end
MovementData_0x6c403:
fix_facing
big_step_left
remove_fixed_facing
step_end
MovementData_0x6c407:
slow_step_left
turn_head_down
step_end
MovementData_0x6c40a:
slow_step_right
slow_step_up
slow_step_up
step_end
MovementData_0x6c40e:
slow_step_up
slow_step_right
slow_step_right
step_end
MovementData_0x6c412:
slow_step_right
step_end
UnknownText_0x6c414:
text "Hello, kiddo!"
para "How would you like"
line "some RAGECANDYBAR?"
para "It's the thing to"
line "eat in MAHOGANY!"
done
UnknownText_0x6c46b:
text "Arrgh… You found"
line "the secret stair-"
cont "way…"
done
UnknownText_0x6c494:
text "Heheh! The experi-"
line "ment worked like a"
cont "charm."
para "MAGIKARP are just"
line "worthless, but"
para "GYARADOS are big"
line "moneymakers."
done
UnknownText_0x6c501:
text "Urrgh…"
para "That guy's dragon"
line "#MON are tough…"
done
UnknownText_0x6c52a:
text "LANCE: DRAGONITE,"
line "HYPER BEAM."
done
UnknownText_0x6c549:
text "What took you,"
line "<PLAY_G>?"
para "Just as I thought,"
line "that strange radio"
para "signal is coming"
line "from here."
done
UnknownText_0x6c59e:
text "The stairs are"
line "right here."
done
UnknownText_0x6c5ba:
text "LANCE: <PLAY_G>, we"
line "should split up to"
para "check this place."
line "I'll go first."
done
MahoganyMart1F_MapEventHeader:
; filler
db 0, 0
.Warps:
db 3
warp_def $7, $3, 1, MAHOGANY_TOWN
warp_def $7, $4, 1, MAHOGANY_TOWN
warp_def $3, $7, 1, TEAM_ROCKET_BASE_B1F
.XYTriggers:
db 0
.Signposts:
db 0
.PersonEvents:
db 5
person_event SPRITE_PHARMACIST, 3, 4, $6, 0, 0, -1, -1, 0, 0, 0, PharmacistScript_0x6c367, EVENT_TEAM_ROCKET_BASE_POPULATION
person_event SPRITE_BLACK_BELT, 6, 1, $3, 0, 0, -1, -1, 0, 0, 0, BlackBeltScript_0x6c37b, EVENT_TEAM_ROCKET_BASE_POPULATION
person_event SPRITE_LANCE, 6, 4, $8, 0, 0, -1, -1, 0, 0, 0, ObjectEvent, EVENT_MAHOGANY_MART_LANCE_AND_DRAGONITE
person_event SPRITE_DRAGON, 6, 3, $8, 0, 0, -1, -1, 0, 0, 0, ObjectEvent, EVENT_MAHOGANY_MART_LANCE_AND_DRAGONITE
person_event SPRITE_GRANNY, 3, 1, $9, 0, 0, -1, -1, 0, 0, 0, GrannyScript_0x6c3ee, EVENT_MAHOGANY_MART_OWNERS
|
