| Routines

7294: Check whether Sam's disguise is known to the police

Used by the routines at 7222 and 7D09. Returns with the appropriate attribute byte to use for Sam's current disguise in A. Also sets bit 0 of B if Sam's disguise is known to the police.
Input
B | 0, 4 or 6 (when called from 7222)
7294 | LD A,($7FC9) | A=Sam's current disguise ID (0-7)
7297 | ADD A,$A0 | Byte 0x15 of pages 0xA0-0xA7 holds the values 0x80, 0x40, 0x20, 0x10, 0x08, 0x04, 0x02 and 0x01
7299 | LD H,A
729A | LD L,$15
729C | LD A,($7FE8) | Collect the disguise status flags from 7FE8
729F | AND (HL) | Set the zero flag if this disguise is unknown to the police
72A0 | LD HL,$5ABD | 5ABD holds the attribute byte for the top-left tile of Sam's disguise in the bottom right of the screen
72A3 | LD A,$4F | 0x4F=INK 7: PAPER 1: BRIGHT 1
72A5 | RET Z | Return if this disguise is unknown to the police
72A6 | INC B | Set bit 0 of B to indicate that Sam's disguise is known to the police
72A7 | LD A,$57 | 0x57=INK 7: PAPER 2: BRIGHT 1
72A9 | RET |