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
|
object_const_def
const VIRIDIANGYM_BLUE
const VIRIDIANGYM_GYM_GUIDE
ViridianGym_MapScripts:
def_scene_scripts
def_callbacks
ViridianGymBlueScript:
faceplayer
opentext
checkflag ENGINE_EARTHBADGE
iftrue .FightDone
writetext LeaderBlueBeforeText
waitbutton
closetext
winlosstext LeaderBlueWinText, 0
loadtrainer BLUE, BLUE1
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_BLUE
opentext
writetext Text_ReceivedEarthBadge
playsound SFX_GET_BADGE
waitsfx
setflag ENGINE_EARTHBADGE
writetext LeaderBlueAfterText
waitbutton
closetext
end
.FightDone:
writetext LeaderBlueEpilogueText
waitbutton
closetext
end
ViridianGymGuideScript:
faceplayer
opentext
checkevent EVENT_BEAT_BLUE
iftrue .ViridianGymGuideWinScript
writetext ViridianGymGuideText
waitbutton
closetext
end
.ViridianGymGuideWinScript:
writetext ViridianGymGuideWinText
waitbutton
closetext
end
ViridianGymStatue:
checkflag ENGINE_EARTHBADGE
iftrue .Beaten
jumpstd GymStatue1Script
.Beaten:
gettrainername STRING_BUFFER_4, BLUE, BLUE1
jumpstd GymStatue2Script
LeaderBlueBeforeText:
text "BLUE: Yo! Finally"
line "got here, huh?"
para "I wasn't in the"
line "mood at CINNABAR,"
para "but now I'm ready"
line "to battle you."
para "…"
para "You're telling me"
line "you conquered all"
cont "the GYMS in JOHTO?"
para "Heh! JOHTO's GYMS"
line "must be pretty"
cont "pathetic then."
para "Hey, don't worry"
line "about it."
para "I'll know if you"
line "are good or not by"
para "battling you right"
line "now."
para "Ready, JOHTO"
line "CHAMP?"
done
LeaderBlueWinText:
text "BLUE: What?"
para "How the heck did I"
line "lose to you?"
para "…"
para "Tch, all right…"
line "Here, take this--"
cont "it's EARTHBADGE."
done
Text_ReceivedEarthBadge:
text "<PLAYER> received"
line "EARTHBADGE."
done
LeaderBlueAfterText:
text "BLUE: …"
para "All right, I was"
line "wrong. You're the"
para "real deal. You are"
line "a good trainer."
para "But I'm going to"
line "beat you someday."
para "Don't you forget"
line "it!"
done
LeaderBlueEpilogueText:
text "BLUE: Listen, you."
para "You'd better not"
line "lose until I beat"
cont "you. Got it?"
done
ViridianGymGuideText:
text "Yo, CHAMP in"
line "making!"
para "How's it going?"
line "Looks like you're"
cont "on a roll."
para "The GYM LEADER is"
line "a guy who battled"
para "the CHAMPION three"
line "years ago."
para "He's no pushover."
para "Give it everything"
line "you've got!"
done
ViridianGymGuideWinText:
text "Man, you are truly"
line "tough…"
para "That was a heck of"
line "an inspirational"
para "battle. It brought"
line "tears to my eyes."
done
ViridianGym_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 4, 17, VIRIDIAN_CITY, 1
warp_event 5, 17, VIRIDIAN_CITY, 1
def_coord_events
def_bg_events
bg_event 3, 13, BGEVENT_READ, ViridianGymStatue
bg_event 6, 13, BGEVENT_READ, ViridianGymStatue
def_object_events
object_event 5, 3, SPRITE_BLUE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ViridianGymBlueScript, EVENT_VIRIDIAN_GYM_BLUE
object_event 7, 13, SPRITE_GYM_GUIDE, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BLUE, OBJECTTYPE_SCRIPT, 0, ViridianGymGuideScript, EVENT_VIRIDIAN_GYM_BLUE
|
