Prev: 9D90 Up: Map Next: 9DFF
9D95: Routine at 9D95
Used by the routine at CharacterAction_InspectorLestrade.
9D95 LD HL,$9D91 HL=9D91.
9D98 LD C,$00 C=00.
9D9A CALL $9DC6 Call 9DC6.
9D9D LD HL,$9D94 HL=9D94.
9DA0 LD C,$00 C=00.
9DA2 CALL $9DD8 Call 9DD8.
9DA5 LD HL,$9D93 HL=9D93.
9DA8 LD C,$03 C=03.
9DAA CALL $9CE9 Call 9CE9.
9DAD LD IX,$99E3 IX=99E3.
9DB1 RES 0,(IX+$03) Reset bit 0 of *IX+03.
9DB5 LD IX,$99F1 IX=99F1.
9DB9 RES 0,(IX+$03) Reset bit 0 of *IX+03.
9DBD LD IX,$99A9 IX=99A9.
9DC1 RES 0,(IX+$03) Reset bit 0 of *IX+03.
9DC5 RET Return.
9DC6 INC HL Increment HL by one.
9DC7 CALL $9CF2 Call 9CF2.
9DCA DEC HL Decrease HL by one.
9DCB LD A,(HL) A=*HL.
9DCC AND A Jump to 9CEC if A is not zero.
9DCD JP NZ,$9CEC
9DD0 INC A Increment A by one.
9DD1 LD (HL),A Write A to *HL.
9DD2 LD HL,$71ED HL=71ED.
9DD5 JP $A59F Jump to A59F.
9DD8 CALL $9CF2 Call 9CF2.
9DDB LD (HL),$01 Write 01 to *HL.
9DDD CALL $BC46 Call BC46.
9DE0 CALL $BC9C Call BC9C.
9DE3 LD A,B Jump to 9DF5 if B is not zero.
9DE4 AND A
9DE5 JR NZ,$9DF5
9DE7 CALL $BC74 Call BC74.
9DEA AND A Set flags.
9DEB RET Z Return if A is equal to A.
9DEC PUSH IX Stash IX on the stack.
Print "[CTRL:0B] [CMD:52:F5] [CMD:01:7C] ytes: [CMD:56:DF] K\ [CTRL:05] [CMD:09:EB] ,[CMD:74:17] ?"[CTRL:1E] [CTRL:0B] [CMD:3C:F5] "[CTRL:1E] [CTRL:0B] [CMD:36:F5] K\ [CMD:05:58] VA ,[CMD:74:17] ,[CMD:74:2D] [CMD:09:B1] [CMD:08:C1] [CMD:00:05] .".
9DEE LD HL,$722D HL=722D.
9DF1 CALL $A59F Call A59F.
9DF4 RET Return.
9DF5 BIT 4,(IX+$03) Return if bit 4 of *IX+03 is set.
9DF9 RET NZ
9DFA LD A,$01 A=01.
9DFC JP $BBE5 Jump to BBE5.
Prev: 9D90 Up: Map Next: 9DFF