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
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
|
@ From mauville_old_man.h
@ TODO: Put these in a header
MAUVILLE_MAN_BARD = 0
MAUVILLE_MAN_HIPSTER = 1
MAUVILLE_MAN_TRADER = 2
MAUVILLE_MAN_STORYTELLER = 3
MAUVILLE_MAN_GIDDY = 4
MauvilleCity_PokemonCenter_1F_EventScript_1AE744:: @ 81AE744
special ScrSpecial_GetCurrentMauvilleMan
switch RESULT
case MAUVILLE_MAN_BARD, speak_to_bard
case MAUVILLE_MAN_HIPSTER, speak_to_hipster
case MAUVILLE_MAN_TRADER, speak_to_trader
case MAUVILLE_MAN_STORYTELLER, speak_to_storyteller
case MAUVILLE_MAN_GIDDY, MauvilleCity_PokemonCenter_1F_EventScript_1B09EB
end
@-------------------------------------------------------------------------------
@ Bard
@-------------------------------------------------------------------------------
speak_to_bard:
lock
faceplayer
msgbox gTextBard_HiImTheBard, MSGBOX_YESNO
compare RESULT, YES
jumpeq yes_hear_song
compare RESULT, NO
jumpeq dont_hear_song
end
yes_hear_song:
setvar 0x8004, 0
@ Give the player ear rape
special ScrSpecial_PlayBardSong
pause 60
special ScrSpecial_HasBardSongBeenChanged
compare RESULT, FALSE
@ Prompt new lyrics only if song hasn't been changed
jumpeq prompt_write_lyrics
msgbox gTextBard_OhWhatAMovingSong, 4
release
end
dont_hear_song:
msgbox gTextBard_OhYouveLeftMe, 4
release
end
prompt_write_lyrics:
msgbox gTextBard_SoHowDoYouLikeMySong, MSGBOX_YESNO
compare RESULT, YES
jumpeq write_lyrics
compare RESULT, NO
jumpeq dont_write_lyrics
end
write_lyrics:
setvar 0x8004, 6
call MauvilleCity_PokemonCenter_1F_EventScript_1A00F3
lock
faceplayer
compare RESULT, NO
jumpeq dont_write_lyrics
msgbox gTextBard_ThankYouKindly, 4
setvar 0x8004, 1
@ Give the player ear rape again
special ScrSpecial_PlayBardSong
pause 60
msgbox gTextBard_WasThatHowYouWanted, MSGBOX_YESNO
compare RESULT, NO
jumpeq write_lyrics @ Keep looping until player responds YES
special ScrSpecial_SaveBardSongLyrics
msgbox gTextBard_OkayThatsIt, 4
release
end
dont_write_lyrics:
msgbox gTextBard_OhYouveLeftMe2, 4
release
end
@-------------------------------------------------------------------------------
@ Hipster
@-------------------------------------------------------------------------------
speak_to_hipster:
lock
faceplayer
setflag 2054
msgbox gTextHipster_TheyCallMeTheHipster, 4
special ScrSpecial_GetHipsterSpokenFlag
compare RESULT, FALSE
jumpeq hipster_first_time
msgbox gTextHipster_TaughtYouAlready, 4
release
end
hipster_first_time:
special ScrSpecial_HipsterTeachWord
compare RESULT, TRUE @ TRUE if player learned a new word
jumpeq teach_new_word
msgbox gTextHipster_YouAlreadyKnowALot, 4
release
end
teach_new_word:
msgbox gTextHipster_HaveYouHeardAbout, 4
special ScrSpecial_SetHipsterSpokenFlag
release
end
@-------------------------------------------------------------------------------
@ Trader
@-------------------------------------------------------------------------------
.include "data/text/trader.inc"
speak_to_trader:
lock
faceplayer
msgbox gTextTrader_Introduction, MSGBOX_YESNO
compare RESULT, NO
jumpeq dont_want_to_trade
special ScrSpecial_GetTraderTradedFlag
compare RESULT, TRUE
jumpeq already_traded
message gTextTrader_MenuPrompt
waittext
jump do_trader_menu_get
end
dont_want_to_trade:
msgbox gTextTrader_FeelUnwanted1, 2
end
already_traded:
msgbox gTextTrader_TradedAlready, 2
end
do_trader_menu_get:
special ScrSpecial_TraderMenuGetDecoration
waitstate
compare 0x8004, 0
jumpeq cancelled_get_menu
compare 0x8004, 65535
jumpeq rare_item_cant_trade_away
msgbox gTextTrader_ItemOnceBelongedTo, MSGBOX_YESNO
compare RESULT, NO
jumpeq dont_want_item
special ScrSpecial_DoesPlayerHaveNoDecorations
compare RESULT, TRUE
jumpeq player_has_no_decorations
jump do_trader_menu_give
end
cancelled_get_menu:: @ 81AEC2D
msgbox gTextTrader_DontWantAnything, 2
end
rare_item_cant_trade_away:: @ 81AEC36
message gTextTrader_ICantTradeThatOneAway
waittext
jump do_trader_menu_get
end
dont_want_item:
message gTextTrader_MenuPrompt
waittext
jump do_trader_menu_get
end
player_has_no_decorations:: @ 81AEC4E
msgbox gTextTrader_YouDontHaveDecorations, 2
end
do_trader_menu_give:: @ 81AEC57
msgbox gTextTrader_PickDecorationYoullTrade, 4
special ScrSpecial_TraderMenuGiveDecoration
waitstate
compare 0x8006, 0
jumpeq cancelled_give_menu
compare 0x8006, 65535
jumpeq decoration_is_in_use
special ScrSpecial_IsDecorationFull
compare RESULT, 1
jumpeq decorations_full
msgbox gTextTrader_SoWellTrade, MSGBOX_YESNO
compare RESULT, NO
jumpeq do_trader_menu_give
special ScrSpecial_TraderDoDecorationTrade
msgbox gTextTrader_ThenWellTrade, 2
end
cancelled_give_menu:: @ 81AECA6
msgbox gTextTrader_FeelUnwanted2, 2
end
decoration_is_in_use:: @ 81AECAF
msgbox gTextTrader_InUseYouCantTradeIt, 4
jump do_trader_menu_give
end
decorations_full:: @ 81AECBD
msgbox gTextTrader_NoRoomForThis, 2
end
@-------------------------------------------------------------------------------
@ Storyteller
@-------------------------------------------------------------------------------
.include "data/text/storyteller.inc"
speak_to_storyteller:: @ 81B0816
setvar 0x8008, 0
setvar 0x8009, 0
setvar 0x800a, 0
setvar 0x800b, 0
lock
faceplayer
msgbox gTextStoryteller_Introduction, MSGBOX_YESNO
compare RESULT, NO
jumpeq dont_hear_tale
specialval RESULT, sub_80F889C
compare RESULT, 0
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B08D3
MauvilleCity_PokemonCenter_1F_EventScript_1B084F:: @ 81B084F
message gTextStoryteller_WhichTale
waittext
special sub_80F8874
waitstate
compare RESULT, 0
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0883
setvar 0x8008, 1
special sub_80F8888
waittext
waitbutton
specialval RESULT, sub_80F88AC
compare RESULT, 0
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0893
jump MauvilleCity_PokemonCenter_1F_EventScript_1B0909
MauvilleCity_PokemonCenter_1F_EventScript_1B0883:: @ 81B0883
compare 0x8008, 0
jumpeq dont_hear_tale
jump MauvilleCity_PokemonCenter_1F_EventScript_1B08AE
MauvilleCity_PokemonCenter_1F_EventScript_1B0893:: @ 81B0893
msgbox gTextStoryteller_CouldThereBeOtherTrainers, 4
msgbox gTextStoryteller_HearAnotherLegendaryTale, MSGBOX_YESNO
compare RESULT, 1
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B084F
MauvilleCity_PokemonCenter_1F_EventScript_1B08AE:: @ 81B08AE
specialval RESULT, sub_80F88E0
compare RESULT, 1
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B091F
specialval RESULT, sub_80F889C
compare RESULT, 4
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B091F
jump MauvilleCity_PokemonCenter_1F_EventScript_1B08DB
MauvilleCity_PokemonCenter_1F_EventScript_1B08D3:: @ 81B08D3
msgbox gTextStoryteller_ButIKnowOfNoLegendaryTrainers, 4
MauvilleCity_PokemonCenter_1F_EventScript_1B08DB:: @ 81B08DB
msgbox gTextStoryteller_HaveYouAnyTales, MSGBOX_YESNO
compare RESULT, 0
jumpeq dont_hear_tale
specialval RESULT, sub_80F88FC
compare RESULT, 1
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0909
msgbox gTextStoryteller_ImNotSatisfied, 4
closebutton
release
end
MauvilleCity_PokemonCenter_1F_EventScript_1B0909:: @ 81B0909
msgbox gTextStoryteller_BirthOfANewLegend, 4
closebutton
release
end
dont_hear_tale:: @ 81B0914
msgbox gTextStoryteller_OhIFeelStifled, 4
closebutton
release
end
MauvilleCity_PokemonCenter_1F_EventScript_1B091F:: @ 81B091F
msgbox gTextStoryteller_WishMorePeopleWould, 4
closebutton
release
end
@-------------------------------------------------------------------------------
@ Giddy
@-------------------------------------------------------------------------------
.include "data/text/giddy.inc"
MauvilleCity_PokemonCenter_1F_EventScript_1B09EB:: @ 81B09EB
lock
faceplayer
msgbox MauvilleCity_PokemonCenter_1F_Text_1B092A, MSGBOX_YESNO
compare RESULT, 1
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A0C
compare RESULT, 0
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A6F
end
MauvilleCity_PokemonCenter_1F_EventScript_1B0A0C:: @ 81B0A0C
special sub_80F7CC8
compare RESULT, 1
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A4E
compare RESULT, 0
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A79
end
MauvilleCity_PokemonCenter_1F_EventScript_1B0A26:: @ 81B0A26
special sub_80F7CC8
compare RESULT, 1
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A40
compare RESULT, 0
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A79
end
MauvilleCity_PokemonCenter_1F_EventScript_1B0A40:: @ 81B0A40
msgbox MauvilleCity_PokemonCenter_1F_Text_1B0998, 4
jump MauvilleCity_PokemonCenter_1F_EventScript_1B0A4E
end
MauvilleCity_PokemonCenter_1F_EventScript_1B0A4E:: @ 81B0A4E
special ScrSpecial_GenerateGiddyLine
special ShowFieldMessageStringVar4
waittext
yesnobox 20, 8
compare RESULT, 1
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A26
compare RESULT, 0
jumpeq MauvilleCity_PokemonCenter_1F_EventScript_1B0A26
end
MauvilleCity_PokemonCenter_1F_EventScript_1B0A6F:: @ 81B0A6F
msgbox MauvilleCity_PokemonCenter_1F_Text_1B097C, 4
release
end
MauvilleCity_PokemonCenter_1F_EventScript_1B0A79:: @ 81B0A79
msgbox MauvilleCity_PokemonCenter_1F_Text_1B09B0, 4
release
end
.include "data/text/bard.inc"
.include "data/text/hipster.inc"
|
