Routines
Prev: CF9E Up: Map Next: CFD2
CFB2: Is one of his bolts touching this object?
Used by the routine at WELL.
Tests the two bolt records against IX with the intersection test in BOLT_HIT, which counts boxes within two units of each other as touching.
The two slots are not tested alike: the first goes in past BOLT_HIT's test for a puff (graphics 64 to 71, what a bolt becomes when it hits something), so a puff there still counts; the second goes in before it, and a puff there does not. Watched: as shipped, the bucket came after 7 shots; with both slots treated alike, after 32.
Input
IX the object record
Output
F Z set if a bolt is touching it (and D is 0)
BOLT_TOUCHING CFB2 LD D,$01 the first bolt; touching: done
CFB4 LD IY,BOLTS
CFB8 LD A,(IY+$00)
CFBB AND $F8
CFBD CALL HIT_TEST_Z
CFC0 LD A,D
CFC1 AND A
CFC2 RET Z
CFC3 LD IY,BOLT_SECOND the second
CFC7 LD A,(IY+$00)
CFCA AND $F8
CFCC CALL HIT_TEST
CFCF LD A,D
CFD0 AND A
CFD1 RET
Prev: CF9E Up: Map Next: CFD2