|
Routines |
| Prev: 9896 | Up: Map | Next: 98C9 |
|
Used by the routine at 9470.
|
||||
| 98B0 | LD HL,$5840 | Set HL the base address into attribute file to score points in HUD | ||
| 98B3 | LD B,$1E | Set the number of color attributes to modify | ||
| 98B5 | LD A,(HL) | Set A the color attribute | ||
| 98B6 | DEC A | Decrement color attribute | ||
| 98B7 | CP $FF | If color attribute is black then jump forward | ||
| 98B9 | JP Z,$98BD | |||
| 98BC | LD (HL),A | Set the new color attribute | ||
| 98BD | INC HL | Increment address into attribute file | ||
| 98BE | DJNZ $98B5 | Jump back and update color attribute for next byte | ||
| 98C0 | LD HL,($A1D2) | Set HL to the address into attribute file for the current score points | ||
| 98C3 | LD (HL),$07 | Set color attribute to white for this | ||
| 98C5 | INC HL | |||
| 98C6 | LD (HL),$07 | |||
| 98C8 | RET | |||
| Prev: 9896 | Up: Map | Next: 98C9 |