Prev: 56587 Up: Map Next: 57179
56629: Routine at DD35
Used by the routine at CheckCharacterID.
56629 AND A
56630 RET Z
56631 PUSH IX
56633 CALL FetchObjectDataPointer
56636 LD A,(IX+5)
56639 AND 40
56641 LD A,(IX+2)
56644 POP IX
56646 JR Z,56655
56648 CP (IY+2)
56651 JR C,56655
56653 XOR A
56654 RET
56655 OR 1
56657 RET
56658 AND H
56659 NOP
56660 RLA
56661 LD H,C
56662 DEFB 221
56663 DEFB 253
56664 RST 56
56665 LD H,B
56666 DEFB 221
56667 LD DE,24829
56670 DEFB 221
56671 DEC BC
56672 LD A,(BC)
56673 LD H,H
56674 NOP
56675 LD L,(HL)
56676 DEFB 221
56677 LD A,(IX+0)
56680 LD (40919),A
56683 OR 1
56685 RET
56686 LD A,(41012)
56689 CALL ProcessObjectDisplayType
56692 CP 255
56694 JP Z,ReturnZero
56697 LD A,(IX+0)
56700 CP 11
56702 JP NC,ReturnZero
56705 OR 1
56707 RET
56708 LD L,L
56709 NOP
56710 SUB C
56711 DEFB 221
56712 LD A,(IX+1)
56715 LD (40918),A
56718 OR 1
56720 RET
56721 LD IX,(40979)
56725 LD A,(IX+1)
56728 AND A
56729 INC A
56730 JP Z,ReturnZero
56733 RET
56734 DEC C
56735 DJNZ 56795
56737 INC (HL)
56738 AND B
56739 CALL FindCharacter
56742 CP 255
56744 LD A,0
56746 JR Z,56750
56748 LD A,1
56750 CALL ProcessTextTokenStream_12
56753 OR 1
56755 RET
56756 LD B,B
56757 LD D,B
56758 CP B
56759 DEFB 221
56760 CALL CheckFlagAndJumpToNewline
56763 OR 1
56765 RET
56766 LD B,B
56767 NOP
56768 CP B
56769 DEFB 221
56770 LD A,(41012)
56773 LD (40991),A
56776 OR 1
56778 RET
56779 NOP
56780 NOP
56781 NOP
56782 NOP
56783 NOP
56784 LD B,L
56785 NOP
56786 CP B
56787 LD IX,(41007)
56791 RES 7,H
56793 PUSH HL
56794 LD A,H
56795 AND 63
56797 LD H,A
56798 LD A,L
56799 AND 63
56801 LD L,A
56802 CALL 56904
56805 LD (56781),HL
56808 LD HL,(40927)
56811 CALL 56904
56814 LD (56779),HL
56817 POP HL
56818 LD A,97
56820 LD (56783),A
56823 BIT 6,H
56825 JR NZ,56857
56827 LD A,112
56829 LD (56783),A
56832 BIT 6,L
56834 JR NZ,56857
56836 CALL 56928
56839 LD A,(40930)
56842 JR C,56846
56844 JR NZ,56854
56846 CP 97
56848 LD A,112
56850 JR Z,56854
56852 LD A,97
56854 LD (56783),A
56857 LD HL,(56781)
56860 LD DE,(56779)
56864 AND A
56865 SBC HL,DE
56867 LD DE,720
56870 LD A,(40930)
56873 LD C,A
56874 LD A,(56783)
56877 LD B,A
56878 CALL 56928
56881 JR C,56892
56883 JR Z,56892
56885 LD A,B
56886 CP C
56887 JR Z,56898
56889 ADD HL,DE
56890 JR 56898
56892 ADD HL,DE
56893 LD A,B
56894 CP C
56895 JR NZ,56898
56897 ADD HL,DE
56898 LD (40991),HL
56901 OR 1
56903 RET
56904 PUSH DE
56905 PUSH BC
56906 LD C,L
56907 LD B,H
56908 LD HL,0
56911 LD DE,60
56914 LD A,B
56915 CP 12
56917 JR Z,56922
56919 ADD HL,DE
56920 DJNZ 56919
56922 LD B,0
56924 ADD HL,BC
56925 POP BC
56926 POP DE
56927 RET
56928 PUSH HL
56929 PUSH DE
56930 LD HL,(56781)
56933 LD DE,(56779)
56937 AND A
56938 SBC HL,DE
56940 POP DE
56941 POP HL
56942 RET
56943 JR NZ,56961
56945 CALL PrintNewline
56948 LD HL,26797
56951 CALL PrintTextAndHandleControlCharacters
56954 LD A,(41014)
56957 CALL CountObjectsInLocation
56960 AND A
56961 LD HL,26880
56964 JR NZ,56972
56966 CALL PrintTextAndHandleControlCharacters
56969 OR 1
56971 RET
56972 LD C,A
56973 LD A,(40970)
56976 LD B,A
56977 LD A,(41014)
56980 CALL PrintObjectListWithFormatting
56983 CALL PrintNewline
56986 OR 1
56988 RET
56989 JR C,57007
56991 ADD A,B
56992 LD HL,0
56995 NOP
56996 LD IX,(40979)
57000 SET 5,(IX+5)
57004 OR 1
57006 RET
57007 JR C,57025
57009 NOP
57010 JR NZ,57012
57012 NOP
57013 NOP
57014 LD IX,(40979)
57018 RES 5,(IX+5)
57022 OR 1
57024 RET
57025 LD A,D
57026 JR 56989
57028 SBC A,9
57030 NOP
57031 NOP
57032 LD B,B
57033 JR Z,57032
57035 LD A,(HL)
57036 RRCA
57037 LD (IX+15),A
57040 LD A,(41013)
57043 LD (IX+1),A
57046 OR 1
57048 RET
57049 LD IX,(40979)
57053 LD IY,(40981)
57057 LD A,(41013)
This entry point is used by the routine at 57723.
57060 LD B,A
57061 LD A,(IY+4)
57064 AND 7
57066 JP Z,ReturnZero
57069 LD A,(IY+2)
57072 SUB (IX+2)
57075 JR C,57088
57077 PUSH AF
57078 LD A,B
57079 CALL GetCharacterAttributeWithSign_6
57082 LD B,A
57083 POP AF
57084 SUB B
57085 JR C,57088
57087 RET NZ
57088 XOR A
57089 RET
57090 LD L,D
57091 DEC E
57092 INC H
57093 RST 24
57094 LD IY,(40981)
57098 LD IX,(40979)
57102 LD A,(41013)
57105 LD (IX+1),A
57108 LD A,(IY+15)
57111 LD (IX+15),A
57114 LD B,A
57115 LD A,(41012)
57118 CALL ProcessObjectLocationRecursively
57121 OR 1
57123 RET
57124 LD A,(41012)
57127 LD B,A
57128 LD A,(41013)
57131 JP ProcessObjectAttribute_C8C6
57134 LD A,(41012)
57137 CALL GetObjectMotherID
57140 JR Z,57149
57142 LD HL,41014
57145 CP (HL)
57146 JP NZ,ReturnZero
57149 OR 1
57151 RET
57152 LD A,B
57153 DJNZ 57201
57155 RST 24
57156 ADD A,B
57157 LD B,B
57158 NOP
57159 NOP
57160 NOP
57161 LD A,1
57163 LD (51886),A
57166 CALL CheckCharacterID
57169 RET NZ
57170 CALL PrintObjectDescriptionText
57173 CALL PrintNewline
57176 OR 1
57178 RET
Prev: 56587 Up: Map Next: 57179