Prev: 54729 Up: Map Next: 54767
54739: Print Object Attribute Description
Input
IX Object pointer
PrintObjectAttributeDescription 54739 LD HL,54729 HL=Table_ObjectAttributeDescriptionTokens (load the address of the object attribute description text token table).
Extract the attribute type from the object data.
54742 LD A,(IX+4) A=*IX+4 (load the object attribute byte).
54745 AND %00000111 Keep only bits 0-2 (extract the attribute type value, 0-7).
54747 CP 5 Compare the attribute type with 5.
54749 PUSH AF Stash the comparison result on the stack.
54750 DEC A Decrease A by one (convert to 0-based index for the table).
54751 LD E,A Set DE to the index value (E=A, D=0).
54752 LD D,0
54754 ADD HL,DE Add the index to the table base address twice (multiply by 2 for 2-byte word entries).
54755 ADD HL,DE
54756 CALL ExtractTokenFromText Call ExtractTokenFromText to print the text token from the table.
54759 POP AF Restore the comparison result from the stack.
54760 RET NZ Return if the attribute type was not 5 (original value was not 6).
Print an additional text token for attribute type 6.
54761 LD DE,2267 DE="TO".
54764 JP PrintTextToken Jump to PrintTextToken to print the text token.
Prev: 54729 Up: Map Next: 54767