Prev: 8ED2 Up: Map Next: 8F3B
8EEC: LOOK THROUGH, carried by doors and the like
Used by the routine at WINDOW_OTHERS.
Not through something shut ("the ... is closed."). The place beyond is shown as if the actor were there for a moment -- "you see" and its description -- if it is lit, and "it is dark." if not. LOOK_ACROSS, the rivers' LOOK ACROSS, is the same without the shut test. Nothing at all happens for an actor shut inside something (SHUT_IN_ACTOR).
LOOK_THROUGH 8EEC LD A,(TARGET) Shut: "the ... is closed."
8EEF CALL GET_OBJECT
8EF2 CALL IS_SHUT
8EF5 JP Z,SAY_STATE
LOOK_ACROSS 8EF8 LD A,(ACTING) The actor shut in something: nothing
8EFB CALL SHUT_IN_ACTOR
8EFE RET NZ
8EFF CALL EXIT_VIA The way through it, and where it leads
8F02 CP $FF
8F04 JP Z,REFUSE
8F07 LD A,(IX+$02)
8F0A CP $00
8F0C JP Z,REFUSE
8F0F CALL FOR_REAL The test ends here
8F12 PUSH IX Dark there: "it is dark."
8F14 CALL GET_ROOM
8F17 BIT 7,(IX+$00)
8F1B POP IX
8F1D JR Z,LOOK_THROUGH_0
8F1F LD IY,(ACTOR) Show it, from there
8F23 LD A,(IY+$10)
8F26 PUSH AF
8F27 LD A,(IX+$02)
8F2A LD (IY+$10),A
8F2D CALL DESCRIBE_SEEN
8F30 POP AF
8F31 LD (IY+$10),A
8F34 RET
LOOK_THROUGH_0 8F35 LD HL,MSG_IT_IS_DARK "it is dark."
8F38 JP RUN_MESSAGE_HL
Prev: 8ED2 Up: Map Next: 8F3B