B8EC: Sound effect: bomb detonation (one step)
| sfx_bomb_detonate |
B8EC |
LD A,(sfx_bomb) |
|
B8EF |
OR A |
|
B8F0 |
RET Z |
|
B8F1 |
CP $05 |
|
B8F3 |
JR NZ,sfx_bomb_detonate_step |
|
B8F5 |
XOR A |
|
B8F6 |
LD (sfx_bomb),A |
|
B8F9 |
RET |
| sfx_bomb_detonate_step |
B8FA |
PUSH BC |
|
B8FB |
PUSH DE |
|
B8FC |
INC A |
|
B8FD |
LD (sfx_bomb),A |
|
B900 |
ADD A,A |
|
B901 |
ADD A,A |
|
B902 |
ADD A,A |
|
B903 |
LD D,A |
|
B904 |
LD A,$C8 |
|
B906 |
SUB D |
|
B907 |
LD D,A |
|
B908 |
LD C,$0A |
| sfx_bomb_detonate_cycle |
B90A |
CALL sound_blip |
|
B90D |
RLC D |
|
B90F |
DEC C |
|
B910 |
JR NZ,sfx_bomb_detonate_cycle |
|
B912 |
POP DE |
|
B913 |
POP BC |
|
B914 |
RET |
Fork me on GitHub