6490: Main loop (2) - Update all objects on screen
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 |