Prev: B3DC Up: Map Next: B460
B3E8: Routine at B3E8
B3E8 LD A,($5E42) A=5E42.
B3EB CPL Flip the bits.
B3EC AND %00000001 Keep only bit 0.
B3EE JR Z,$B3F5
B3F0 DEC (IX+$08) Decrease IX+08 by one.
B3F3 JR Z,$B441
B3F5 LD A,(IX+$08)
B3F8 LD C,A
B3F9 ADD A,A
B3FA ADD A,C
B3FB LD L,A
B3FC LD H,$00
B3FE LD BC,$B451
B401 ADD HL,BC
B402 EX DE,HL
B403 LD A,(DE)
B404 INC DE
B405 ADD A,$E0
B407 LD (IX+$00),A
B40A LD L,(IX+$02)
B40D LD H,(IX+$03)
B410 PUSH HL
B411 LD A,(DE)
B412 INC DE
B413 LD C,A
B414 LD B,$00
B416 AND A
B417 JP P,$B41B
B41A DEC B
B41B CALL $A002 Call A002.
B41E LD (IX+$02),L
B421 LD (IX+$03),H
B424 LD A,(IX+$04)
B427 PUSH AF
B428 LD A,(DE)
B429 ADD A,(IX+$04)
B42C LD (IX+$04),A
B42F CALL $8787 Call 8787.
B432 CALL $8733 Call 8733.
B435 POP AF
B436 LD (IX+$04),A
B439 POP HL
B43A LD (IX+$02),L
B43D LD (IX+$03),H
B440 RET Return.
B441 CALL $864F Call 864F.
B444 XOR A Write 00 to ActivePlayer_Lives.
B445 LD ($5EA1),A
B448 LD (IX+$00),$85 Write 85 to IX+00.
B44C LD (IX+$05),$40 Write 40 to IX+05.
B450 RET Return.
B451 DEFB $00,$00,$00,$00,$18,$FC,$01,$10
B459 DEFB $FA,$02,$08,$FE,$03,$00,$00
Prev: B3DC Up: Map Next: B460