Technician Ted | Routines |
Prev: 5E09 | Up: Map | Next: 5E49 |
Used by the routine at 5F15.
|
||||
5E32 | LD C,$0C | Number of 2-line strips to colour in | ||
5E34 | LD DE,#R$5E49 | Holds the colours to put on screen | ||
5E37 | LD HL,$5800 | Holds destination address in attribute buffer | ||
5E3A | LD A,(DE) | Get the next colour byte | ||
5E3B | LD B,$40 | Fill it for the next 40 bytes | ||
5E3D | LD (HL),A | Set the value | ||
5E3E | INC HL | Next byte | ||
5E3F | DJNZ $5E3D | Repeat until done | ||
5E41 | INC DE | Next set of colours | ||
5E42 | DEC C | |||
5E43 | JR NZ,$5E3A | Loop back round if we haven't finished | ||
5E45 | XOR A | Make the border black | ||
5E46 | OUT ($FE),A | |||
5E48 | RET |
Prev: 5E09 | Up: Map | Next: 5E49 |