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
|
object_const_def
const PEWTERGYM_BROCK
const PEWTERGYM_YOUNGSTER
const PEWTERGYM_GYM_GUIDE
PewterGym_MapScripts:
def_scene_scripts
def_callbacks
PewterGymBrockScript:
faceplayer
opentext
checkflag ENGINE_BOULDERBADGE
iftrue .FightDone
writetext BrockIntroText
waitbutton
closetext
winlosstext BrockWinLossText, 0
loadtrainer BROCK, BROCK1
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_BROCK
setevent EVENT_BEAT_CAMPER_JERRY
opentext
writetext ReceivedBoulderBadgeText
playsound SFX_GET_BADGE
waitsfx
setflag ENGINE_BOULDERBADGE
writetext BrockBoulderBadgeText
waitbutton
closetext
end
.FightDone:
writetext BrockFightDoneText
waitbutton
closetext
end
TrainerCamperJerry:
trainer CAMPER, JERRY, EVENT_BEAT_CAMPER_JERRY, CamperJerrySeenText, CamperJerryBeatenText, 0, .Script
.Script:
endifjustbattled
opentext
writetext CamperJerryAfterBattleText
waitbutton
closetext
end
PewterGymGuideScript:
faceplayer
opentext
checkevent EVENT_BEAT_BROCK
iftrue .PewterGymGuideWinScript
writetext PewterGymGuideText
waitbutton
closetext
end
.PewterGymGuideWinScript:
writetext PewterGymGuideWinText
waitbutton
closetext
end
PewterGymStatue:
checkflag ENGINE_BOULDERBADGE
iftrue .Beaten
jumpstd GymStatue1Script
.Beaten:
gettrainername STRING_BUFFER_4, BROCK, BROCK1
jumpstd GymStatue2Script
BrockIntroText:
text "BROCK: Wow, it's"
line "not often that we"
para "get a challenger"
line "from JOHTO."
para "I'm BROCK, the"
line "PEWTER GYM LEADER."
para "I'm an expert on"
line "rock-type #MON."
para "My #MON are im-"
line "pervious to most"
para "physical attacks."
line "You'll have a hard"
para "time inflicting"
line "any damage."
para "Come on!"
done
BrockWinLossText:
text "BROCK: Your #-"
line "MON's powerful at-"
cont "tacks overcame my"
cont "rock-hard defense…"
para "You're stronger"
line "than I expected…"
para "Go ahead--take"
line "this BADGE."
done
ReceivedBoulderBadgeText:
text "<PLAYER> received"
line "BOULDERBADGE."
done
BrockBoulderBadgeText:
text "BROCK: <PLAYER>,"
line "thanks. I enjoyed"
para "battling you, even"
line "though I am a bit"
cont "upset."
para "That BOULDERBADGE"
line "will make your"
para "#MON even more"
line "powerful."
done
BrockFightDoneText:
text "BROCK: The world"
line "is huge. There are"
para "still many strong"
line "trainers like you."
para "Just wait and see."
line "I'm going to be-"
cont "come a lot strong-"
cont "er too."
done
CamperJerrySeenText:
text "The trainers of"
line "this GYM use rock-"
cont "type #MON."
para "The rock-type has"
line "high DEFENSE."
para "Battles could end"
line "up going a long"
para "time. Are you"
line "ready for this?"
done
CamperJerryBeatenText:
text "I have to win"
line "these battles…"
done
CamperJerryAfterBattleText:
text "Hey, you! Trainer"
line "from JOHTO! BROCK"
para "is tough. He'll"
line "punish you if you"
para "don't take him"
line "seriously."
done
PewterGymGuideText:
text "Yo! CHAMP in"
line "making! You're"
para "really rocking."
line "Are you battling"
para "the GYM LEADERS of"
line "KANTO?"
para "They're strong and"
line "dedicated people,"
para "just like JOHTO's"
line "GYM LEADERS."
done
PewterGymGuideWinText:
text "Yo! CHAMP in"
line "making! That GYM"
para "didn't give you"
line "much trouble."
para "The way you took"
line "charge was really"
para "inspiring. I mean"
line "that seriously."
done
PewterGym_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 4, 13, PEWTER_CITY, 2
warp_event 5, 13, PEWTER_CITY, 2
def_coord_events
def_bg_events
bg_event 2, 11, BGEVENT_READ, PewterGymStatue
bg_event 7, 11, BGEVENT_READ, PewterGymStatue
def_object_events
object_event 5, 1, SPRITE_BROCK, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, PewterGymBrockScript, -1
object_event 2, 5, SPRITE_YOUNGSTER, SPRITEMOVEDATA_STANDING_RIGHT, 0, 0, -1, -1, PAL_NPC_GREEN, OBJECTTYPE_TRAINER, 3, TrainerCamperJerry, -1
object_event 6, 11, SPRITE_GYM_GUIDE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 1, PewterGymGuideScript, -1
|
