Prev: 54554 Up: Map Next: 54672
54566: Routine at D526
Used by the routine at 54554.
54566 PUSH IX Stash IX on the stack.
54568 CALL AdjustObjectTableForSum Call AdjustObjectTableForSum.
54571 PUSH AF Stash AF on the stack.
54572 CALL 54653 Call 54653.
54575 JR C,54618 Jump to 54618 if A is less than A.
54577 SET 7,(IY+6) Set bit 7 of *IY+6.
54581 SUB A A-=A.
54582 LD (41000),A Write A to *41000.
54585 CALL 54233 Call 54233.
54588 DEC C Decrease C by one.
54589 LD A,C A=C.
54590 AND A Set flags.
54591 JR NZ,54598 Jump to 54598 if C is not equal to A.
54593 CALL 42004 Call 42004.
54596 JR 54615 Jump to 54615.
54598 CP 1 Compare A with 1.
54600 JR Z,54609 Jump to 54609 if A is equal to 1.
54602 LD A,44 A=44.
54604 CALL 43447 Call 43447.
54607 JR 54615 Jump to 54615.
54609 LD DE,93 DE=0093.
54612 CALL 43143 Call 43143.
54615 POP AF Restore AF from the stack.
54616 JR 54571 Jump to 54571.
54618 POP AF Restore AF from the stack.
54619 CALL AdjustObjectTableForSum Call AdjustObjectTableForSum.
54622 PUSH AF Stash AF on the stack.
54623 CALL 54653 Call 54653.
54626 JR C,54648 Jump to 54648 if A is less than 44.
54628 PUSH AF Stash AF on the stack.
54629 CALL 54476 Call 54476.
54632 JR Z,54644 Jump to 54644 if A is equal to 44.
54634 LD C,A C=A.
54635 POP AF Restore AF from the stack.
54636 CALL 54672 Call 54672.
54639 CALL 54566 Call 54566.
54642 JR 54645 Jump to 54645.
54644 POP AF Restore AF and AF from the stack.
54645 POP AF
54646 JR 54622 Jump to 54622.
54648 POP AF Restore AF from the stack.
54649 POP IX Restore IX from the stack.
54651 RET Return.
54652 POP AF Restore AF from the stack.
54653 CALL 53788 Call 53788.
54656 JR NZ,54660 Jump to 54660 if A is not equal to 44.
54658 SCF Set the carry flag.
54659 RET Return.
54660 PUSH AF Stash AF on the stack.
54661 CALL 54511 Call 54511.
54664 JR NC,54652 Jump to 54652 if A is greater than or equal to 44.
54666 POP AF Restore AF from the stack.
54667 LD A,(IX+0) A=*IX+0.
54670 AND A Set flags.
54671 RET Return.
Prev: 54554 Up: Map Next: 54672