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
|
object_const_def
const ROUTE37_WEIRD_TREE1
const ROUTE37_WEIRD_TREE2
const ROUTE37_YOUNGSTER
const ROUTE37_FRUIT_TREE1
const ROUTE37_SUNNY
const ROUTE37_FRUIT_TREE2
const ROUTE37_FRUIT_TREE3
Route37_MapScripts:
def_scene_scripts
def_callbacks
callback MAPCALLBACK_OBJECTS, .Sunny
.Sunny:
readvar VAR_WEEKDAY
ifequal SUNDAY, .SunnyAppears
disappear ROUTE37_SUNNY
endcallback
.SunnyAppears:
appear ROUTE37_SUNNY
endcallback
TrainerTwinsAnnandanne1:
trainer TWINS, ANNANDANNE1, EVENT_BEAT_TWINS_ANN_AND_ANNE, TwinsAnnandanne1SeenText, TwinsAnnandanne1BeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext TwinsAnnandanne1AfterBattleText
waitbutton
closetext
end
TrainerTwinsAnnandanne2:
trainer TWINS, ANNANDANNE2, EVENT_BEAT_TWINS_ANN_AND_ANNE, TwinsAnnandanne2SeenText, TwinsAnnandanne2BeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext TwinsAnnandanne2AfterBattleText
waitbutton
closetext
end
TrainerPsychicGreg:
trainer PSYCHIC_T, GREG, EVENT_BEAT_PSYCHIC_GREG, PsychicGregSeenText, PsychicGregBeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext PsychicGregAfterBattleText
waitbutton
closetext
end
SunnyScript:
faceplayer
opentext
checkevent EVENT_GOT_MAGNET_FROM_SUNNY
iftrue SunnySundayScript
readvar VAR_WEEKDAY
ifnotequal SUNDAY, SunnyNotSundayScript
checkevent EVENT_MET_SUNNY_OF_SUNDAY
iftrue .MetSunny
writetext MeetSunnyText
promptbutton
setevent EVENT_MET_SUNNY_OF_SUNDAY
.MetSunny:
writetext SunnyGivesGiftText1
promptbutton
verbosegiveitem MAGNET
iffalse SunnyDoneScript
setevent EVENT_GOT_MAGNET_FROM_SUNNY
writetext SunnyGaveGiftText
waitbutton
closetext
end
SunnySundayScript:
writetext SunnySundayText
waitbutton
SunnyDoneScript:
closetext
end
SunnyNotSundayScript:
writetext SunnyNotSundayText
waitbutton
closetext
end
Route37Sign:
jumptext Route37SignText
Route37FruitTree1:
fruittree FRUITTREE_ROUTE_37_1
Route37FruitTree2:
fruittree FRUITTREE_ROUTE_37_2
Route37FruitTree3:
fruittree FRUITTREE_ROUTE_37_3
Route37HiddenEther:
hiddenitem ETHER, EVENT_ROUTE_37_HIDDEN_ETHER
TwinsAnnandanne1SeenText:
text "ANN: ANNE and I"
line "are in this to-"
cont "gether!"
done
TwinsAnnandanne1BeatenText:
text "ANN & ANNE: You're"
line "mean!"
done
TwinsAnnandanne1AfterBattleText:
text "ANN: I can tell"
line "what my sister and"
para "my #MON are"
line "thinking."
done
TwinsAnnandanne2SeenText:
text "ANNE: ANN and I"
line "are in this to-"
cont "gether!"
done
TwinsAnnandanne2BeatenText:
text "ANN & ANNE: You're"
line "mean!"
done
TwinsAnnandanne2AfterBattleText:
text "ANNE: We share the"
line "same feelings as"
cont "our #MON."
done
PsychicGregSeenText:
text "#MON can't do a"
line "thing if they are"
cont "asleep."
para "I'll show you how"
line "scary that is!"
done
PsychicGregBeatenText:
text "I lost. That's"
line "pretty sad…"
done
PsychicGregAfterBattleText:
text "Putting #MON to"
line "sleep or paralyz-"
cont "ing them are good"
cont "battle techniques."
done
MeetSunnyText:
text "SUNNY: Hi!"
para "I'm SUNNY of Sun-"
line "day, meaning it's"
cont "Sunday today!"
done
SunnyGivesGiftText1:
text "I was told to give"
line "you this if I saw"
cont "you!"
done
SunnyGaveGiftText:
text "SUNNY: That thing…"
para "Um…"
para "… What was it now…"
para "…"
para "Oh! I remember"
line "now!"
para "A #MON that"
line "knows electric"
para "moves should hold"
line "it."
para "My sis MONICA said"
line "it powers up"
cont "electric moves!"
done
SunnySundayText:
text "SUNNY: My sisters"
line "and brothers are"
cont "MONICA, TUSCANY,"
cont "WESLEY, ARTHUR,"
cont "FRIEDA and SANTOS."
para "They're all older"
line "than me!"
done
SunnyNotSundayText:
text "SUNNY: Isn't today"
line "Sunday?"
cont "Um… I forgot!"
done
Route37SignText:
text "ROUTE 37"
done
Route37_MapEvents:
db 0, 0 ; filler
def_warp_events
def_coord_events
def_bg_events
bg_event 5, 3, BGEVENT_READ, Route37Sign
bg_event 4, 2, BGEVENT_ITEM, Route37HiddenEther
def_object_events
object_event 6, 12, SPRITE_WEIRD_TREE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerTwinsAnnandanne1, -1
object_event 7, 12, SPRITE_WEIRD_TREE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_RED, OBJECTTYPE_TRAINER, 1, TrainerTwinsAnnandanne2, -1
object_event 9, 6, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_TRAINER, 3, TrainerPsychicGreg, -1
object_event 13, 5, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route37FruitTree1, -1
object_event 16, 8, SPRITE_BUG_CATCHER, SPRITEMOVEDATA_WANDER, 1, 1, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, SunnyScript, EVENT_ROUTE_37_SUNNY_OF_SUNDAY
object_event 16, 5, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route37FruitTree2, -1
object_event 15, 7, SPRITE_FRUIT_TREE, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, Route37FruitTree3, -1
|
