Prev: 647D Up: Map Next: 65BA
6490: Main loop (2) - Update all objects on screen
Used by the routines at 638C and 641D.
6490 LD A,($6080)
6493 CP $1A
6495 JR NZ,$649F
6497 LD A,($6081)
649A CP $04
649C JP Z,$6A51
649F CALL $6715
64A2 CALL $6715
64A5 CALL $6715
64A8 CALL $6BC4
64AB CALL $6BC4
64AE LD A,($60B1)
64B1 CP $00
64B3 JR NZ,$64BD
64B5 LD A,($60C4)
64B8 CP $00
64BA CALL Z,$677A
64BD CALL $6C3C
64C0 CALL $6C3C
64C3 CALL $6C3C
64C6 CALL $6CA1
64C9 CALL $6CA1
64CC CALL $7222
64CF LD A,($60B1)
64D2 CP $00
64D4 JP Z,$6579
64D7 CALL $B98C
64DA LD A,($60BF)
64DD CP $00
64DF JP NZ,$6576
64E2 CALL $EA60
64E5 LD A,($EAB1)
64E8 CP $0A
64EA JR Z,$64F1
64EC CP $0B
64EE JP NZ,$6579
64F1 LD A,($6080)
64F4 CP $0B
64F6 JP Z,$6500
64F9 CP $0A
64FB JP NZ,$6579
64FE JR $6500
6500 LD A,($60BF)
6503 CP $00
6505 JR NZ,$6576
6507 LD HL,$607F
650A LD A,$04
650C LD D,(HL)
650D INC HL
650E LD E,(HL)
650F INC HL
6510 LD C,(HL)
6511 CALL $B798
6514 LD HL,$607F
6517 LD A,(HL)
6518 ADD A,$10
651A LD D,A
651B INC HL
651C LD E,(HL)
651D INC HL
651E LD A,(HL)
651F ADD A,$04
6521 LD C,A
6522 LD A,$04
6524 CALL $B798
6527 LD A,$38
6529 LD ($607F),A
652C LD IX,$607F
6530 LD A,($EAB1)
6533 LD (IX+$01),A
6536 LD A,($EAB0)
6539 LD (IX+$02),A
653C LD C,A
653D LD D,(IX+$00)
6540 LD E,(IX+$01)
6543 LD A,$04
6545 CALL $B798
6548 LD A,(IX+$00)
654B ADD A,$10
654D LD D,A
654E LD A,(IX+$02)
6551 ADD A,$01
6553 LD C,A
6554 LD E,(IX+$01)
6557 LD A,$04
6559 CALL $B798
655C LD A,$01
655E LD ($60BF),A
6561 LD A,($EAB0)
6564 LD ($6081),A
6567 LD A,$00
6569 LD ($6085),A
656C LD A,($C36C)
656F CP $E6
6571 CALL Z,$707C
6574 JR $6579
6576 CALL $6F8B
6579 LD A,($60B0)
657C CP $00
657E CALL NZ,$6B47
6581 CALL $6D5B
6584 LD A,($60A0)
6587 CP $0F
6589 CALL Z,$6EA9
658C LD A,($60A0)
658F CP $09
6591 JR Z,$6597
6593 CP $0E
6595 JR NZ,$659F
6597 LD A,($60C5)
659A CP $00
659C CALL Z,$6E16
659F LD A,($60CD)
65A2 CP $01
65A4 CALL Z,$6ED7
65A7 CALL $70A3
65AA CALL $65BA
65AD CALL $670C
65B0 LD A,$7F
65B2 IN A,($FE)
65B4 AND $10
65B6 NOP
65B7 JP $638C
Prev: 647D Up: Map Next: 65BA