Routines
Prev: 28399 Up: Map Next: 28460
28426: Change Matching Colour Bits
Used by the routine at ChangeInkAndPaperColour.
Walks the attribute buffer. Wherever the bits selected by B equal C, those bits are replaced with L and the bits in H are kept.
ChangeMatchingColourBits 28426 PUSH IX
28428 LD IX,27770
28432 LD DE,384
ChangeMatchingColourBits_0 28435 LD A,(IX+0)
28438 AND B
28439 CP C
28440 JR NZ,ChangeMatchingColourBits_1
28442 LD A,(IX+0)
28445 AND H
28446 OR L
28447 LD (IX+0),A
ChangeMatchingColourBits_1 28450 INC IX
28452 DEC DE
28453 LD A,D
28454 OR E
28455 JR NZ,ChangeMatchingColourBits_0
28457 POP IX
28459 RET
Prev: 28399 Up: Map Next: 28460