Prev: B3E8 Up: Map Next: B594
B460: Routine at B460
B460 DEC (IX+$10)
B463 JR NZ,$B475
B465 LD A,(IX+$11)
B468 LD (IX+$10),A
B46B INC (IX+$06)
B46E LD A,(IX+$06)
B471 CP $01
B473 JR Z,$B48B
B475 LD A,(IX+$00)
B478 INC A
B479 CP $E7
B47B JR NC,$B47F
B47D LD A,$E4
B47F LD (IX+$00),A
B482 CALL $B6AE
B485 LD (IX+$04),A
B488 JP $ABB4
B48B LD C,(IX+$04)
B48E LD D,$04
B490 CALL SquareWave_Loop
B493 LD (IX+$00),$E7
B497 JP $ABB4
B49A INC (IX+$00)
B49D JP $ABB4
B4A0 LD A,($5E42)
B4A3 AND $07
B4A5 JR NZ,$B4AF
B4A7 LD A,(IX+$00)
B4AA XOR $01
B4AC LD (IX+$00),A
B4AF INC (IX+$04)
B4B2 LD A,(IX+$04)
B4B5 CP $AF
B4B7 JP C,$ABB4
B4BA CALL $8640
B4BD LD (IX+$00),$00
B4C1 RET
This entry point is used by the routine at A880.
B4C2 LD HL,$60A8
B4C5 LD BC,$0711
B4C8 EXX
B4C9 LD A,($5E40)
B4CC LD L,A
B4CD LD H,$00
B4CF EXX
B4D0 PUSH BC
B4D1 LD (HL),$E4
B4D3 INC HL
B4D4 INC HL
B4D5 LD A,(DE)
B4D6 LD (HL),A
B4D7 INC DE
B4D8 INC HL
B4D9 LD A,(DE)
B4DA LD (HL),A
B4DB INC HL
B4DC INC DE
B4DD LD A,(DE)
B4DE LD (HL),A
B4DF DEC DE
B4E0 DEC DE
B4E1 INC HL
B4E2 EXX
B4E3 LD A,(HL)
B4E4 INC HL
B4E5 AND A
B4E6 JP P,$B529
B4E9 OR $FC
B4EB EXX
B4EC LD (HL),A
B4ED INC HL
B4EE EXX
B4EF LD A,(HL)
B4F0 INC HL
B4F1 AND $03
B4F3 OR $FC
B4F5 SUB $01
B4F7 EXX
B4F8 LD (HL),A
B4F9 INC HL
B4FA EXX
B4FB LD A,(HL)
B4FC INC HL
B4FD AND $07
B4FF CP $02
B501 JR NC,$B505
B503 LD A,$07
B505 OR $40
B507 EXX
B508 LD (HL),A
B509 INC HL
B50A INC HL
B50B LD (HL),$00
B50D INC HL
B50E DJNZ $B50B
B510 EXX
B511 LD A,(HL)
B512 INC HL
B513 AND $07
B515 INC A
B516 EXX
B517 LD (HL),A
B518 INC HL
B519 LD (HL),A
B51A LD A,L
B51B ADD A,$07
B51D LD L,A
B51E LD A,H
B51F ADC A,$00
B521 LD H,A
B522 POP BC
B523 DEC C
B524 JR NZ,$B4D0
B526 JP $B986
B529 AND $03
B52B INC A
B52C JR $B4EB
This entry point is used by the routine at A880.
B52E DI
B52F LD DE,$BA2A
B532 CALL $B9BC
B535 RST $38
B536 LD A,($611E)
B539 CALL $B699
B53C LD HL,$B660
B53F LD C,A
B540 RRCA
B541 RRCA
B542 RRCA
B543 RRCA
B544 AND $0F
B546 JR NZ,$B54A
B548 LD A,$F0
B54A ADD A,$30
B54C LD (HL),A
B54D INC HL
B54E LD A,C
B54F AND $0F
B551 ADD A,$30
B553 LD (HL),A
B554 CALL $8BA5
B557 LD B,$0C
B559 PUSH BC
B55A CALL $8298
B55D CALL Message_MissileLaunch
B560 LD C,$80
B562 LD D,$80
B564 CALL PlaySquareWave
B567 DEC D
B568 JR NZ,$B564
B56A LD A,$42
B56C LD ($B5DC),A
B56F CALL Message_MissileLaunch
B572 LD A,$56
B574 LD ($B5DC),A
B577 LD HL,$8000
B57A DEC HL
B57B LD A,L
B57C OR H
B57D JR NZ,$B57A
B57F POP BC
B580 DJNZ $B559
B582 LD DE,$B9DA
B585 CALL $B9BC
B588 CALL $8BA5
B58B CALL $A317
B58E CALL $B385
B591 JP $A2F5
Prev: B3E8 Up: Map Next: B594