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
|
RocketHideoutB3F_Script:
call EnableAutoTextBoxDrawing
ld hl, RocketHideout3TrainerHeaders
ld de, RocketHideoutB3F_ScriptPointers
ld a, [wRocketHideoutB3FCurScript]
call ExecuteCurMapScriptInTable
ld [wRocketHideoutB3FCurScript], a
ret
RocketHideoutB3F_ScriptPointers:
def_script_pointers
dw_const RocketHideoutB3FDefaultScript, SCRIPT_ROCKETHIDEOUTB3F_DEFAULT
dw_const DisplayEnemyTrainerTextAndStartBattle, SCRIPT_ROCKETHIDEOUTB3F_START_BATTLE
dw_const EndTrainerBattle, SCRIPT_ROCKETHIDEOUTB3F_END_BATTLE
dw_const RocketHideoutB3FPlayerSpinningScript, SCRIPT_ROCKETHIDEOUTB3F_PLAYER_SPINNING
RocketHideoutB3FDefaultScript:
ld a, [wYCoord]
ld b, a
ld a, [wXCoord]
ld c, a
ld hl, RocketHideout3ArrowTilePlayerMovement
call DecodeArrowMovementRLE
cp $ff
jp z, CheckFightingMapTrainers
ld hl, wMovementFlags
set BIT_SPINNING, [hl]
call StartSimulatingJoypadStates
ld a, SFX_ARROW_TILES
call PlaySound
ld a, PAD_BUTTONS | PAD_CTRL_PAD
ld [wJoyIgnore], a
ld a, SCRIPT_ROCKETHIDEOUTB3F_PLAYER_SPINNING
ld [wCurMapScript], a
ret
RocketHideout3ArrowTilePlayerMovement:
map_coord_movement 10, 13, RocketHideout3ArrowMovement6
map_coord_movement 10, 19, RocketHideout3ArrowMovement1
map_coord_movement 11, 18, RocketHideout3ArrowMovement2
map_coord_movement 12, 11, RocketHideout3ArrowMovement3
map_coord_movement 12, 17, RocketHideout3ArrowMovement4
map_coord_movement 12, 20, RocketHideout3ArrowMovement5
map_coord_movement 13, 16, RocketHideout3ArrowMovement6
map_coord_movement 14, 11, RocketHideout3ArrowMovement7
map_coord_movement 14, 15, RocketHideout3ArrowMovement6
map_coord_movement 14, 17, RocketHideout3ArrowMovement8
map_coord_movement 14, 19, RocketHideout3ArrowMovement9
map_coord_movement 15, 16, RocketHideout3ArrowMovement7
map_coord_movement 15, 18, RocketHideout3ArrowMovement10
map_coord_movement 16, 13, RocketHideout3ArrowMovement11
map_coord_movement 17, 12, RocketHideout3ArrowMovement10
map_coord_movement 18, 16, RocketHideout3ArrowMovement12
db -1 ; end
;format: direction, count
;each list is read starting from the $FF and working backwards
RocketHideout3ArrowMovement1:
db PAD_RIGHT, 4
db PAD_UP, 4
db PAD_RIGHT, 4
db -1 ; end
RocketHideout3ArrowMovement2:
db PAD_DOWN, 4
db PAD_RIGHT, 4
db -1 ; end
RocketHideout3ArrowMovement3:
db PAD_LEFT, 2
db -1 ; end
RocketHideout3ArrowMovement4:
db PAD_RIGHT, 4
db PAD_UP, 2
db PAD_RIGHT, 2
db -1 ; end
RocketHideout3ArrowMovement5:
db PAD_RIGHT, 4
db PAD_UP, 2
db PAD_RIGHT, 2
db PAD_UP, 3
db -1 ; end
RocketHideout3ArrowMovement6:
db PAD_RIGHT, 4
db -1 ; end
RocketHideout3ArrowMovement7:
db PAD_RIGHT, 2
db -1 ; end
RocketHideout3ArrowMovement8:
db PAD_RIGHT, 4
db PAD_UP, 2
db -1 ; end
RocketHideout3ArrowMovement9:
db PAD_RIGHT, 4
db PAD_UP, 4
db -1 ; end
RocketHideout3ArrowMovement10:
db PAD_DOWN, 4
db -1 ; end
RocketHideout3ArrowMovement11:
db PAD_UP, 2
db -1 ; end
RocketHideout3ArrowMovement12:
db PAD_UP, 1
db -1 ; end
RocketHideoutB3FPlayerSpinningScript:
ld a, [wSimulatedJoypadStatesIndex]
and a
jp nz, LoadSpinnerArrowTiles
xor a
ld [wJoyIgnore], a
ld hl, wMovementFlags
res BIT_SPINNING, [hl]
ld a, SCRIPT_ROCKETHIDEOUTB3F_DEFAULT
ld [wCurMapScript], a
ret
RocketHideoutB3F_TextPointers:
def_text_pointers
dw_const RocketHideoutB3FRocket1Text, TEXT_ROCKETHIDEOUTB3F_ROCKET1
dw_const RocketHideoutB3FRocket2Text, TEXT_ROCKETHIDEOUTB3F_ROCKET2
dw_const PickUpItemText, TEXT_ROCKETHIDEOUTB3F_TM_DOUBLE_EDGE
dw_const PickUpItemText, TEXT_ROCKETHIDEOUTB3F_RARE_CANDY
RocketHideout3TrainerHeaders:
def_trainers
RocketHideout3TrainerHeader0:
trainer EVENT_BEAT_ROCKET_HIDEOUT_3_TRAINER_0, 2, RocketHideoutB3FRocket1BattleText, RocketHideoutB3FRocket1EndBattleText, RocketHideoutB3FRocket1AfterBattleText
RocketHideout3TrainerHeader1:
trainer EVENT_BEAT_ROCKET_HIDEOUT_3_TRAINER_1, 4, RocketHideoutB3FRocket2BattleText, RocketHideoutB3FRocket2EndBattleText, RocketHideoutB3FRocket2AfterBattleText
db -1 ; end
RocketHideoutB3FRocket1Text:
text_asm
ld hl, RocketHideout3TrainerHeader0
call TalkToTrainer
jp TextScriptEnd
RocketHideoutB3FRocket1BattleText:
text_far _RocketHideoutB3FRocket1BattleText
text_end
RocketHideoutB3FRocket1EndBattleText:
text_far _RocketHideoutB3FRocket1EndBattleText
text_end
RocketHideoutB3FRocket1AfterBattleText:
text_far _RocketHideoutB3FRocket1AfterBattleText
text_end
RocketHideoutB3FRocket2Text:
text_asm
ld hl, RocketHideout3TrainerHeader1
call TalkToTrainer
jp TextScriptEnd
RocketHideoutB3FRocket2BattleText:
text_far _RocketHideout3BattleText
text_end
RocketHideoutB3FRocket2EndBattleText:
text_far _RocketHideout3EndBattleText3
text_end
RocketHideoutB3FRocket2AfterBattleText:
text_far _RocketHide3AfterBattleText3
text_end
|
