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
|
const_value set 2
const CINNABARISLAND_BLUE
CinnabarIsland_MapScriptHeader:
.MapTriggers:
db 0
.MapCallbacks:
db 1
; callbacks
dbw MAPCALLBACK_NEWMAP, .FlyPoint
.FlyPoint:
setflag ENGINE_FLYPOINT_CINNABAR
return
CinnabarIslandBlue:
faceplayer
opentext
writetext CinnabarIslandBlueText
waitbutton
closetext
playsound SFX_WARP_TO
applymovement CINNABARISLAND_BLUE, CinnabarIslandBlueTeleport
disappear CINNABARISLAND_BLUE
clearevent EVENT_VIRIDIAN_GYM_BLUE
end
CinnabarIslandGymSign:
jumptext CinnabarIslandGymSignText
CinnabarIslandSign:
jumptext CinnabarIslandSignText
CinnabarIslandPokeCenterSign:
jumpstd pokecentersign
CinnabarIslandHiddenRareCandy:
dwb EVENT_CINNABAR_ISLAND_HIDDEN_RARE_CANDY, RARE_CANDY
CinnabarIslandBlueTeleport:
teleport_from
step_end
CinnabarIslandBlueText:
text "Who are you?"
para "Well, it's plain"
line "to see that you're"
cont "a trainer…"
para "My name's BLUE."
para "I was once the"
line "CHAMPION, although"
para "it was for only a"
line "short time…"
para "That meddling RED"
line "did me in…"
para "Anyway, what do"
line "you want? You want"
para "to challenge me or"
line "something?"
para "…I hate to say"
line "it, but I'm not in"
para "the mood for a"
line "battle now."
para "Take a good look"
line "around you…"
para "A volcano erupts,"
line "and just like"
para "that, a whole town"
line "disappears."
para "We can go on win-"
line "ning and losing in"
para "#MON. But if"
line "nature so much as"
para "twitches, we can"
line "lose in a second."
para "…"
para "That's the way it"
line "is…"
para "But, anyway, I'm"
line "still a trainer."
para "If I see a strong"
line "opponent, it makes"
cont "me want to battle."
para "If you want to"
line "battle me, come to"
cont "the VIRIDIAN GYM."
para "I'll take you on"
line "then."
done
CinnabarIslandGymSignText:
text "There's a notice"
line "here…"
para "CINNABAR GYM has"
line "relocated to SEA-"
cont "FOAM ISLANDS."
para "BLAINE"
done
CinnabarIslandSignText:
text "CINNABAR ISLAND"
para "The Fiery Town of"
line "Burning Desire"
done
CinnabarIsland_MapEventHeader:
; filler
db 0, 0
.Warps:
db 1
warp_def $b, $b, 1, CINNABAR_POKECENTER_1F
.XYTriggers:
db 0
.Signposts:
db 4
signpost 11, 12, SIGNPOST_READ, CinnabarIslandPokeCenterSign
signpost 11, 9, SIGNPOST_READ, CinnabarIslandGymSign
signpost 7, 7, SIGNPOST_READ, CinnabarIslandSign
signpost 1, 9, SIGNPOST_ITEM, CinnabarIslandHiddenRareCandy
.PersonEvents:
db 1
person_event SPRITE_BLUE, 6, 9, SPRITEMOVEDATA_SPINRANDOM_SLOW, 0, 0, -1, -1, 0, PERSONTYPE_SCRIPT, 0, CinnabarIslandBlue, EVENT_BLUE_IN_CINNABAR
|
