Routines |
Prev: 38945 | Up: Map | Next: 38987 |
|
||||
ControlCode_SetInkColour | 38967 | LD HL,63518 | Set a pointer to Print_AttributeVariable in HL. | |
38970 | LD A,(HL) | Fetch the current print attribute colour and store it in A. | ||
38971 | AND %11111000 | Mask off the current INK bits. | ||
38973 | LD (HL),A | Write the value back to *Print_AttributeVariable. | ||
38974 | LD A,(63500) | Fetch the new INK colour from *PrintVariable_01. | ||
38977 | CP 8 | Jump to Helper_Return if the new INK colour is invalid (8 or higher), valid ink values are between 0-7. | ||
38979 | JP NC,Helper_Return | |||
38982 | OR (HL) | Set the new INK value with the current print attribute colour held by *HL. | ||
38983 | LD (HL),A | Write the updated value back to *Print_AttributeVariable. | ||
38984 | JP ControlCode_Return_1 | Jump to ControlCode_Return_1. |
Prev: 38945 | Up: Map | Next: 38987 |