69A8: Handler: Flak
| Handler_Flak |
69A8 |
LD HL,$5B45 |
|
69AB |
LD A,($5B28) |
|
69AE |
INC A |
|
69AF |
BIT 1,A |
|
69B1 |
JR Z,Handler_Flak_0 |
|
69B3 |
LD A,$04 |
|
69B5 |
LD (HL),A |
|
69B6 |
LD ($5B28),A |
|
69B9 |
LD A,($5B3A) |
|
69BC |
DEC A |
|
69BD |
DEC A |
|
69BE |
DEC A |
|
69BF |
LD ($5B29),A |
| Handler_Flak_0 |
69C2 |
LD A,(HL) |
|
69C3 |
OR A |
|
69C4 |
LD A,($5B00) |
|
69C7 |
JR NZ,Handler_Flak_2 |
| Handler_Flak_1 |
69C9 |
CP $07 |
|
69CB |
RET NZ |
|
69CC |
LD A,$0A |
|
69CE |
LD ($5B29),A |
|
69D1 |
JR Handler_Flak_3 |
| Handler_Flak_2 |
69D3 |
CP $03 |
|
69D5 |
JR NZ,Handler_Flak_1 |
|
69D7 |
DEC (HL) |
| Handler_Flak_3 |
69D8 |
LD A,($5B36) |
|
69DB |
RLCA |
|
69DC |
RLCA |
|
69DD |
RLCA |
|
69DE |
RLCA |
|
69DF |
AND $0F |
|
69E1 |
LD H,A |
|
69E2 |
LD A,($5B29) |
|
69E5 |
CP H |
|
69E6 |
RET C |
|
69E7 |
LD L,$1A |
|
69E9 |
CALL $60F6 |
|
69EC |
LD A,(DE) |
|
69ED |
CP $2D |
|
69EF |
RET NZ |
|
69F0 |
LD B,$60 |
|
69F2 |
LD A,R |
|
69F4 |
BIT 0,A |
|
69F6 |
JR Z,Handler_Flak_4 |
|
69F8 |
INC B |
| Handler_Flak_4 |
69F9 |
LD A,B |
|
69FA |
LD C,$2B |
|
69FC |
CALL $6114 |
|
69FF |
LD HL,$6A1C |
|
6A02 |
LD C,$02 |
|
6A04 |
XOR A |
| Handler_Flak_5 |
6A05 |
LD B,(HL) |
|
6A06 |
INC HL |
| Handler_Flak_6 |
6A07 |
PUSH HL |
|
6A08 |
POP HL |
|
6A09 |
DJNZ Handler_Flak_6 |
|
6A0B |
SET 4,A |
|
6A0D |
OUT ($FE),A |
|
6A0F |
LD B,(HL) |
| Handler_Flak_7 |
6A10 |
PUSH HL |
|
6A11 |
POP HL |
|
6A12 |
DJNZ Handler_Flak_7 |
|
6A14 |
RES 4,A |
|
6A16 |
OUT ($FE),A |
|
6A18 |
DEC C |
|
6A19 |
JR NZ,Handler_Flak_5 |
|
6A1B |
RET |
