Prev: 45567 Up: Map Next: 45803
45772: Test Records Against Entity
Used by the routine at PrepareEntityItem.
Tests the entity in IX against each of the 20-byte records in the table at Records that has not already been marked, using TestRecordOverlap.
Input
IX The entity
TestRecordsAgainstEntity 45772 LD A,(48118) Read how many records there are.
45775 AND A Return when there are none.
45776 RET Z
45777 PUSH IY Remember the record that was in use.
45779 LD IY,48119 Start at the first record.
TestRecordsAgainstEntity_Loop 45783 PUSH AF Remember how many records remain.
45784 BIT 7,(IY+10) Test the overlap when bit 7 of byte 10 is clear.
45788 CALL Z,TestRecordOverlap
45791 LD DE,20 Step on to the next record.
45794 ADD IY,DE
45796 POP AF Repeat for the remaining records.
45797 DEC A
45798 JR NZ,TestRecordsAgainstEntity_Loop
45800 POP IY Restore the record that was in use.
45802 RET Return.
Prev: 45567 Up: Map Next: 45803