Prev: 45421 Up: Map Next: 45980
45457: Routine at B191
Used by the routine at 46975.
45457 LD A,255
45459 LD (41013),A
45462 LD (41012),A
45465 LD HL,45421
45468 LD B,17
45470 CALL 41643
45473 CALL 45981
45476 JR NZ,45483
45478 LD HL,47180
45481 XOR A
45482 RET
45483 LD A,1
45485 PUSH IX
45487 POP HL
45488 LD DE,33369
45491 SBC HL,DE
45493 JR Z,45503
45495 LD DE,8
45498 INC A
45499 SBC HL,DE
45501 JR NZ,45498
45503 LD (41011),A
45506 LD (45454),IX
45510 CP 46
45512 JR NZ,45533
45514 LD HL,45421
45517 BIT 0,(HL)
45519 LD HL,40962
45522 LD DE,45426
45525 LD BC,6
45528 JR Z,45531
45530 EX DE,HL
45531 LDIR
45533 CALL 50323
45536 CALL 50354
45539 LD A,(40988)
45542 AND A
45543 JR NZ,45554
45545 LD A,(45980)
45548 LD (40988),A
45551 CALL 45903
45554 LD A,(40990)
45557 AND 16
45559 LD (45456),A
45562 JR Z,45568
45564 XOR A
45565 LD (40988),A
45568 XOR A
45569 LD (40971),A
45572 LD A,(40989)
45575 AND 12
45577 JR NZ,45587
45579 CALL 51497
45582 RET NZ
45583 LD HL,47203
45586 RET
45587 CALL 45959
45590 JR NZ,45696
45592 LD A,(40988)
45595 AND A
45596 JR NZ,45604
45598 CALL 45832
45601 AND A
45602 JR Z,45657
45604 CALL 46273
45607 JR Z,45636
45609 CALL 51497
45612 JR Z,45604
45614 LD A,(41012)
45617 LD (45444),A
45620 LD HL,45424
45623 INC (HL)
45624 LD A,(45456)
45627 AND A
45628 JR NZ,45636
45630 LD A,(40988)
45633 AND A
45634 JR Z,45604
45636 LD A,(45444)
45639 LD (41012),A
45642 LD A,(45424)
45645 AND A
45646 JR Z,45657
45648 CP 1
45650 JR Z,45579
45652 LD HL,46562
45655 XOR A
45656 RET
45657 LD A,(41011)
45660 CP 46
45662 JR NZ,45691
45664 LD A,(40988)
45667 AND A
45668 JR NZ,45691
45670 LD HL,45421
45673 BIT 0,(HL)
45675 JR NZ,45691
45677 LD HL,0
45680 LD (45426),HL
45683 LD (45428),HL
45686 LD (45430),HL
45689 JR 45587
45691 LD HL,46687
45694 XOR A
45695 RET
45696 LD A,(40988)
45699 AND A
45700 JR NZ,45714
45702 CALL 45832
45705 AND A
45706 JR Z,45657
45708 CALL 45869
45711 AND A
45712 JR Z,45827
45714 CALL 46273
45717 JR Z,45751
45719 CALL 45791
45722 LD A,(45425)
45725 CP 1
45727 JR NZ,45714
45729 LD A,(41012)
45732 LD (45444),A
45735 LD HL,45424
45738 INC (HL)
45739 LD A,(45456)
45742 AND A
45743 JR NZ,45751
45745 LD A,(40988)
45748 AND A
45749 JR Z,45714
45751 LD A,(45444)
45754 LD (41012),A
45757 LD A,(45424)
45760 AND A
45761 JR Z,45657
45763 CP 1
45765 JR NZ,45786
45767 CALL 45791
45770 LD A,(45425)
45773 AND A
45774 JR Z,45827
45776 CP 1
45778 JP Z,45579
45781 LD HL,46547
45784 XOR A
45785 RET
45786 LD HL,46562
45789 XOR A
45790 RET
45791 CALL 45931
45794 CALL 46440
45797 JR Z,45820
45799 CALL 51497
45802 JR Z,45794
45804 LD A,(41013)
45807 LD (45445),A
45810 LD HL,45425
45813 INC (HL)
45814 LD A,(45456)
45817 AND A
45818 JR Z,45794
45820 LD A,(45445)
45823 LD (41013),A
45826 RET
45827 LD HL,46766
45830 XOR A
45831 RET
45832 LD HL,(45438)
45835 PUSH HL
45836 LD A,(46242)
45839 PUSH AF
45840 CALL 45903
45843 CALL 46273
45846 JR Z,45854
45848 LD HL,45424
45851 INC (HL)
45852 JR 45843
45854 POP AF
45855 LD (46242),A
45858 LD HL,45424
45861 LD A,(HL)
45862 LD (HL),0
45864 POP HL
45865 LD (45438),HL
45868 RET
45869 LD HL,(45440)
45872 PUSH HL
45873 CALL 45931
45876 LD A,(46409)
45879 PUSH AF
45880 CALL 46440
45883 JR Z,45891
45885 LD HL,45425
45888 INC (HL)
45889 JR 45880
45891 POP AF
45892 LD (46409),A
45895 LD A,(45425)
45898 POP HL
45899 LD (45440),HL
45902 RET
45903 XOR A
45904 LD (45424),A
45907 LD A,255
45909 LD (46242),A
45912 CALL AdjustObjectTableForSum
45915 LD A,(40975)
45918 CP 7
45920 JR NC,45926
45922 LD IX,0
45926 LD (45438),IX
45930 RET
45931 XOR A
45932 LD (45425),A
45935 LD A,255
45937 LD (46409),A
45940 CALL AdjustObjectTableForSum
45943 LD A,(40976)
45946 CP 7
45948 JR NC,45954
45950 LD IX,0
45954 LD (45440),IX
45958 RET
45959 LD A,(40989)
45962 BIT 2,A
45964 RET Z
45965 LD HL,45422
45968 BIT 0,(HL)
45970 RET NZ
45971 BIT 1,A
45973 JR NZ,45978
45975 OR 1
45977 RET
45978 XOR A
45979 RET
Prev: 45421 Up: Map Next: 45980