Routines
Prev: A7A3 Up: Map Next: A7CA
A7AE: Colour the light-years box
Used by the routine at COLOUR_PANEL.
Three rows of six attribute cells at the right of the panel, from CLOCK_BOX_COLOURS: a bright red frame round the four digits in bright white.
COLOUR_CLOCK_BOX A7AE LD HL,$5A99 row 20, column 25; three rows of six
A7B1 LD DE,CLOCK_BOX_COLOURS
A7B4 LD BC,$0603
COLOUR_CLOCK_BOX_0 A7B7 PUSH BC a row
A7B8 PUSH HL
COLOUR_CLOCK_BOX_1 A7B9 LD A,(DE)
A7BA INC DE
A7BB LD (HL),A
A7BC INC HL
A7BD DJNZ COLOUR_CLOCK_BOX_1
A7BF POP HL the next row down
A7C0 LD A,$20
A7C2 CALL ADD_HL_A
A7C5 POP BC three rows
A7C6 DEC C
A7C7 JR NZ,COLOUR_CLOCK_BOX_0
A7C9 RET
Prev: A7A3 Up: Map Next: A7CA