-
Notifications
You must be signed in to change notification settings - Fork 7
/
Copy pathMountMoon.asm
179 lines (142 loc) · 3.47 KB
/
MountMoon.asm
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
const_def 2 ; object constants
const MOUNTMOON_SILVER
MountMoon_MapScripts:
db 2 ; scene scripts
scene_script .RivalEncounter ; SCENE_DEFAULT
scene_script .DummyScene ; SCENE_FINISHED
db 0 ; callbacks
.RivalEncounter:
priorityjump .RivalBattle
end
.DummyScene:
end
.RivalBattle:
turnobject PLAYER, RIGHT
showemote EMOTE_SHOCK, PLAYER, 15
special FadeOutMusic
pause 15
applymovement MOUNTMOON_SILVER, MountMoonSilverMovementBefore
playmusic MUSIC_RIVAL_ENCOUNTER
opentext
writetext MountMoonSilverTextBefore
waitbutton
closetext
checkevent EVENT_GOT_TOTODILE_FROM_ELM
iftrue .Totodile
checkevent EVENT_GOT_CHIKORITA_FROM_ELM
iftrue .Chikorita
winlosstext MountMoonSilverTextWin, MountMoonSilverTextLoss
setlasttalked MOUNTMOON_SILVER
loadtrainer RIVAL2, RIVAL2_1_TOTODILE
startbattle
dontrestartmapmusic
reloadmapafterbattle
jump .FinishBattle
.Totodile:
winlosstext MountMoonSilverTextWin, MountMoonSilverTextLoss
setlasttalked MOUNTMOON_SILVER
loadtrainer RIVAL2, RIVAL2_1_CHIKORITA
startbattle
dontrestartmapmusic
reloadmapafterbattle
jump .FinishBattle
.Chikorita:
winlosstext MountMoonSilverTextWin, MountMoonSilverTextLoss
setlasttalked MOUNTMOON_SILVER
loadtrainer RIVAL2, RIVAL2_1_CYNDAQUIL
startbattle
dontrestartmapmusic
reloadmapafterbattle
jump .FinishBattle
.FinishBattle:
playmusic MUSIC_RIVAL_AFTER
opentext
writetext MountMoonSilverTextAfter
waitbutton
closetext
applymovement MOUNTMOON_SILVER, MountMoonSilverMovementAfter
disappear MOUNTMOON_SILVER
setscene SCENE_FINISHED
setevent EVENT_BEAT_RIVAL_IN_MT_MOON
playmapmusic
end
MountMoonSilverMovementBefore:
step LEFT
step LEFT
step LEFT
step_end
MountMoonSilverMovementAfter:
step RIGHT
step RIGHT
step DOWN
step DOWN
step DOWN
step DOWN
step DOWN
step_end
MountMoonSilverTextBefore:
text "<……> <……> <……>"
para "It's been a while,"
line "<PLAYER>."
para "…Since I lost to"
line "you, I thought"
para "about what I was"
line "lacking with my"
cont "#MON…"
para "And we came up"
line "with an answer."
para "<PLAYER>, now we'll"
line "show you!"
done
MountMoonSilverTextWin:
text "<……> <……> <……>"
para "I thought I raised"
line "my #MON to be"
para "the best they"
line "could be…"
para "…But it still "
line "wasn't enough…"
done
MountMoonSilverTextAfter:
text "<……> <……> <……>"
para "…You won, fair"
line "and square."
para "I admit it. But"
line "this isn't the"
cont "end."
para "I'm going to be"
line "the greatest #-"
cont "MON trainer ever."
para "Because these guys"
line "are behind me."
para "…Listen, <PLAYER>."
para "One of these days"
line "I'm going to prove"
para "how good I am by"
line "beating you."
done
MountMoonSilverTextLoss:
text "<……> <……> <……>"
para "I've repaid my"
line "debt to you."
para "With my #MON,"
line "I'm going to beat"
para "the CHAMPION and"
line "become the world's"
cont "greatest trainer."
done
MountMoon_MapEvents:
db 0, 0 ; filler
db 8 ; warp events
warp_event 3, 3, ROUTE_3, 1
warp_event 15, 15, ROUTE_4, 1
warp_event 13, 3, MOUNT_MOON, 7
warp_event 15, 11, MOUNT_MOON, 8
warp_event 25, 5, MOUNT_MOON_SQUARE, 1
warp_event 25, 15, MOUNT_MOON_SQUARE, 2
warp_event 25, 3, MOUNT_MOON, 3
warp_event 25, 13, MOUNT_MOON, 4
db 0 ; coord events
db 0 ; bg events
db 1 ; object events
object_event 7, 3, SPRITE_SILVER, SPRITEMOVEDATA_STANDING_LEFT, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, ObjectEvent, EVENT_MT_MOON_RIVAL