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
|
Preload_Map_Hop:
LD A, $mem_loading_step
LD C, A
; Getting the +1/-1 value of the direction to B
LD A, $mem_bunny_direction
AND $07
DEC A
AND $01
SLA A
DEC A
LD B, A
LD A, $mem_bunny_direction
AND $07
DEC A
BIT 1, A
JR NZ, =Preload_Map_Hop.Map_Load.vertical
Preload_Map_Hop.Map_Load.horizontal:
CALL =Load_Next_Block_Column
JR =Preload_Map_Hop.Map_Load.End
Preload_Map_Hop.Map_Load.vertical:
CALL =Load_Next_Block_Row
Preload_Map_Hop.Map_Load.End:
RET
Hop_Attack_Loading_VBlank:
LD A, $mem_current_mode
CP $enum_loading_mode
RET NZ
LD A, $mem_loading_step
CP $00
JP Z, =Hop_Attack_Loading_VBlank.Skip_Display_Block
LD A, $mem_map_loading_flags
BIT 2, A
RET Z
CALL =Display_Prepared_Block
LD A, $mem_prepared_loading_block_tile
LD $mem_prepared_block_tile, A
LD A, $mem_prepared_loading_block_position_1
LD $mem_prepared_block_position_1, A
LD A, $mem_prepared_loading_block_position_2
LD $mem_prepared_block_position_2, A
LD A, $mem_map_loading_flags
SET 2, A
LD $mem_map_loading_flags, A
CALL =Display_Prepared_Block
LD A, $mem_bunny_direction
AND $07
LD D, A
LD A, $mem_viewport_x
LD B, A
LD A, $mem_viewport_y
LD C, A
LD A, $02
.ADD_A_TO_DIRECTION_BC
LD A, B
LD $mem_viewport_x, A
LD A, C
LD $mem_viewport_y, A
CALL =Display_Object
LD A, $mem_bunny_direction
AND $07
LD D, A
LD A, $mem_viewport_x
LD B, A
LD A, $mem_viewport_y
LD C, A
LD A, $FE
.ADD_A_TO_DIRECTION_BC
LD A, B
LD $mem_viewport_x, A
LD A, C
LD $mem_viewport_y, A
Hop_Attack_Loading_VBlank.Skip_Display_Block:
LD A, $mem_loading_step
INC A
AND $0f
LD $mem_loading_step, A
CP $00
RET NZ
LD A, $enum_dungeon_mode
LD $mem_current_mode, A
LD $mem_requested_mode, A
LD A, $mem_bunny_direction
AND $07
OR $38
LD $mem_bunny_direction, A
LD A, $mem_map_loading_flags
SET 3, A
LD $mem_map_loading_flags, A
LD A, $mem_bunny_flags
SET 0, A
LD $mem_bunny_flags, A
RET
Hop_Attack_Loading_Regular:
LD A, $mem_current_mode
CP $enum_loading_mode
RET NZ
CALL =Preload_Map_Hop
LD A, $mem_prepared_block_tile
LD $mem_prepared_loading_block_tile, A
LD A, $mem_prepared_block_position_1
LD $mem_prepared_loading_block_position_1, A
LD A, $mem_prepared_block_position_2
LD $mem_prepared_loading_block_position_2, A
LD A, $mem_bunny_direction
AND $07
LD D, A
LD A, $mem_viewport_x
LD B, A
LD A, $mem_viewport_y
LD C, A
LD A, $01
.ADD_A_TO_DIRECTION_BC
LD A, B
LD $mem_viewport_x, A
LD A, C
LD $mem_viewport_y, A
CALL =Preload_Map_Hop
LD A, $mem_bunny_direction
AND $07
LD D, A
LD A, $mem_viewport_x
LD B, A
LD A, $mem_viewport_y
LD C, A
LD A, $FF
.ADD_A_TO_DIRECTION_BC
LD A, B
LD $mem_viewport_x, A
LD A, C
LD $mem_viewport_y, A
RET
|