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
|
object_const_def ; object_event constants
const MOUNTMORTARB1F_POKE_BALL1
const MOUNTMORTARB1F_POKE_BALL2
const MOUNTMORTARB1F_BOULDER
const MOUNTMORTARB1F_KIYO
MountMortarB1F_MapScripts:
db 0 ; scene scripts
db 0 ; callbacks
MountMortarB1FKiyoScript:
faceplayer
opentext
checkevent EVENT_GOT_TYROGUE_FROM_KIYO
iftrue .GotTyrogue
checkevent EVENT_BEAT_BLACKBELT_KIYO
iftrue .BeatKiyo
writetext MountMortarB1FKiyoIntroText
waitbutton
closetext
winlosstext MountMortarB1FKiyoWinText, 0
loadtrainer BLACKBELT_T, KIYO
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_BLACKBELT_KIYO
opentext
.BeatKiyo:
writetext MountMortarB1FTyrogueRewardText
promptbutton
waitsfx
readvar VAR_PARTYCOUNT
ifequal PARTY_LENGTH, .NoRoom
writetext MountMortarB1FReceiveMonText
playsound SFX_CAUGHT_MON
waitsfx
givepoke TYROGUE, 10
setevent EVENT_GOT_TYROGUE_FROM_KIYO
.GotTyrogue:
writetext MountMortarB1FKiyoGotTyrogueText
waitbutton
closetext
end
.NoRoom:
writetext MountMortarB1FKiyoFullPartyText
waitbutton
closetext
end
MountMortarB1FBoulder:
jumpstd StrengthBoulderScript
MountMortarB1FHyperPotion:
itemball HYPER_POTION
MountMortarB1FFullHeal:
itemball FULL_HEAL
MountMortarB1FHiddenMaxRevive:
hiddenitem MAX_REVIVE, EVENT_MOUNT_MORTAR_B1F_HIDDEN_MAX_REVIVE
MountMortarB1FKiyoIntroText:
text "Hey!"
para "I am the KARATE"
line "KING!"
para "I train alone here"
line "in the dark!"
para "You!"
line "Battle with me!"
para "Hwaaarggh!"
done
MountMortarB1FKiyoWinText:
text "Waaaarggh!"
line "I'm beaten!"
done
MountMortarB1FTyrogueRewardText:
text "I… I'm crushed…"
para "My training is"
line "still not enough…"
para "But a loss is a"
line "loss. I admit it."
para "As proof that you"
line "defeated me, I'll"
para "give you a rare"
line "fighting #MON."
done
MountMortarB1FReceiveMonText:
text "<PLAYER> received"
line "TYROGUE."
done
MountMortarB1FKiyoGotTyrogueText:
text "TYROGUE is a"
line "fighting-type."
para "It evolves into a"
line "tougher #MON."
para "Keep up the hard"
line "work. I'll keep"
cont "training too."
para "Farewell!"
done
MountMortarB1FKiyoFullPartyText:
text "You have no room"
line "in your party!"
done
MountMortarB1F_MapEvents:
db 0, 0 ; filler
db 2 ; warp events
warp_event 3, 3, MOUNT_MORTAR_1F_INSIDE, 5
warp_event 19, 29, MOUNT_MORTAR_1F_OUTSIDE, 7
db 0 ; coord events
db 1 ; bg events
bg_event 4, 6, BGEVENT_ITEM, MountMortarB1FHiddenMaxRevive
db 4 ; object events
object_event 31, 17, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, MountMortarB1FHyperPotion, EVENT_MOUNT_MORTAR_B1F_HYPER_POTION
object_event 4, 16, SPRITE_POKE_BALL, SPRITEMOVEDATA_STILL, 0, 0, -1, -1, 0, OBJECTTYPE_ITEMBALL, 0, MountMortarB1FFullHeal, EVENT_MOUNT_MORTAR_B1F_FULL_HEAL
object_event 9, 10, SPRITE_BOULDER, SPRITEMOVEDATA_STRENGTH_BOULDER, 0, 0, -1, -1, 0, OBJECTTYPE_SCRIPT, 0, MountMortarB1FBoulder, -1
object_event 13, 4, SPRITE_BLACK_BELT, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, MountMortarB1FKiyoScript, -1
|
