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
const BRUNOSROOM_BRUNO
BrunosRoom_MapScripts:
def_scene_scripts
scene_script .LockDoor ; SCENE_DEFAULT
scene_script .DummyScene ; SCENE_FINISHED
def_callbacks
callback MAPCALLBACK_TILES, .BrunosRoomDoors
.LockDoor:
sdefer .BrunosDoorLocksBehindYou
end
.DummyScene:
end
.BrunosRoomDoors:
checkevent EVENT_BRUNOS_ROOM_ENTRANCE_CLOSED
iffalse .KeepEntranceOpen
changeblock 4, 14, $2a ; wall
.KeepEntranceOpen:
checkevent EVENT_BRUNOS_ROOM_EXIT_OPEN
iffalse .KeepExitClosed
changeblock 4, 2, $16 ; open door
.KeepExitClosed:
endcallback
.BrunosDoorLocksBehindYou:
applymovement PLAYER, BrunosRoom_EnterMovement
refreshscreen $85
playsound SFX_STRENGTH
earthquake 80
changeblock 4, 14, $2a ; wall
reloadmappart
closetext
setscene SCENE_FINISHED
setevent EVENT_BRUNOS_ROOM_ENTRANCE_CLOSED
waitsfx
end
BrunoScript_Battle:
faceplayer
opentext
checkevent EVENT_BEAT_ELITE_4_BRUNO
iftrue BrunoScript_AfterBattle
writetext BrunoScript_BrunoBeforeText
waitbutton
closetext
winlosstext BrunoScript_BrunoBeatenText, 0
loadtrainer BRUNO, BRUNO1
startbattle
reloadmapafterbattle
setevent EVENT_BEAT_ELITE_4_BRUNO
opentext
writetext BrunoScript_BrunoDefeatText
waitbutton
closetext
playsound SFX_ENTER_DOOR
changeblock 4, 2, $16 ; open door
reloadmappart
closetext
setevent EVENT_BRUNOS_ROOM_EXIT_OPEN
waitsfx
end
BrunoScript_AfterBattle:
writetext BrunoScript_BrunoDefeatText
waitbutton
closetext
end
BrunosRoom_EnterMovement:
step UP
step UP
step UP
step UP
step_end
BrunoScript_BrunoBeforeText:
text "I am BRUNO of the"
line "ELITE FOUR."
para "I always train to"
line "the extreme be-"
cont "cause I believe in"
cont "our potential."
para "That is how we"
line "became strong."
para "Can you withstand"
line "our power?"
para "Hm? I see no fear"
line "in you. You look"
para "determined. Per-"
line "fect for battle!"
para "Ready, <PLAYER>?"
line "You will bow down"
para "to our overwhelm-"
line "ing power!"
para "Hoo hah!"
done
BrunoScript_BrunoBeatenText:
text "Why? How could we"
line "lose?"
done
BrunoScript_BrunoDefeatText:
text "Having lost, I"
line "have no right to"
cont "say anything…"
para "Go face your next"
line "challenge!"
done
BrunosRoom_MapEvents:
db 0, 0 ; filler
def_warp_events
warp_event 4, 17, KOGAS_ROOM, 3
warp_event 5, 17, KOGAS_ROOM, 4
warp_event 4, 2, KARENS_ROOM, 1
warp_event 5, 2, KARENS_ROOM, 2
def_coord_events
def_bg_events
def_object_events
object_event 5, 7, SPRITE_BRUNO, SPRITEMOVEDATA_STANDING_DOWN, 0, 0, -1, -1, PAL_NPC_BROWN, OBJECTTYPE_SCRIPT, 0, BrunoScript_Battle, -1
|
