Prev: F852 Up: Map Next: F877
F85F: Recolour Room Image
Paint the whole picture with the attribute in A first (PaintRoomImage), then blank the 47 attribute cells listed at Table_AttributeAddresses.
Input
A Attribute byte
RecolourRoomImage F85F CALL PaintRoomImage Call PaintRoomImage to paint every picture attribute with A.
F862 LD IX,$F785 Point at Table_AttributeAddresses and prepare to blank its 47 attribute cells (black ink on black paper).
F866 LD B,$47
F868 XOR A
RecolourRoomImage_Loop F869 LD L,(IX+$00) Blank every attribute address in that list.
F86C LD H,(IX+$01)
F86F LD (HL),A
F870 INC IX
F872 INC IX
F874 DJNZ RecolourRoomImage_Loop
F876 RET Return.
Prev: F852 Up: Map Next: F877