Prev: 9B16 Up: Map Next: 9B6C
9B44: Turn: Accept The Named Object
Accepts the named object as the current one. A zero object counts as one; otherwise the noun flags must agree.
Turn_AcceptTheNamedObject 9B44 LD A,($B6E8) Read *CurrentObject.
9B47 INC A Jump to Turn_AcceptTheNamedObject_TestTheNounFlag if the current object is not FF.
9B48 JR NZ,Turn_AcceptTheNamedObject_TestTheNounFlag
9B4A INC A Make A 01 (no object counts as one).
9B4B RET Return.
Test the noun-print flag.
Turn_AcceptTheNamedObject_TestTheNounFlag 9B4C LD A,($B6FE) Jump to Turn_AcceptTheNamedObject_TestTheSecondNoun if *B6FE is not zero.
9B4F AND A
9B50 JR NZ,Turn_AcceptTheNamedObject_TestTheSecondNoun
9B52 LD HL,$B6E8 Point HL at the current object.
9B55 LD A,($B6EA) Read *CurrentCharacter.
9B58 CP (HL) Return if the character whose turn it is is the current object.
9B59 RET Z
9B5A LD A,($B6E9) Read *B6E9.
9B5D CP (HL) Return if the second object is the current object.
9B5E RET Z
Turn_AcceptTheNamedObject_TestTheSecondNoun 9B5F LD A,($B6FF) Read *B6FF.
9B62 AND A Return if the second-noun flag is not zero.
9B63 RET NZ
9B64 LD A,($B6E9) Read *B6E9.
9B67 LD HL,$B6EA Point HL at the character whose turn it is.
9B6A CP (HL) Compare the second object with the character whose turn it is.
9B6B RET Return.
Prev: 9B16 Up: Map Next: 9B6C