![]() |
Routines |
Prev: 37210 | Up: Map | Next: 37261 |
Used by the routine at Initialise_SubGame.
|
||||
PaintHeaderFooter | 37219 | LD A,(39372) | A=*39372. | |
37222 | LD C,A | Stash this value temporarily in C. | ||
37223 | AND %00111000 | Keep only bits 3-5. | ||
37225 | RRCA | RRCA. | ||
37226 | RRCA | |||
37227 | RRCA | |||
37228 | OUT (254),A | Set border to the colour held by A. | ||
37230 | LD (39372),A | Write A to *39372. | ||
37233 | LD A,C | Restore the original value of A. | ||
37234 | LD HL,22528 | HL=22528 (screen buffer location). | ||
37237 | CALL Handler_PaintHeaderFooter | Call Handler_PaintHeaderFooter. | ||
37240 | LD HL,23200 | HL=23200 (attribute buffer location). | ||
37243 | CALL Handler_PaintHeaderFooter | Call Handler_PaintHeaderFooter. | ||
37246 | LD B,18 | Set a counter in B for the playarea height: 18. | ||
37248 | LD DE,31 | DE=0031. | ||
37251 | LD HL,22624 | HL=22624 (attribute buffer location). | ||
PaintRightHandSide_Loop | 37254 | LD (HL),A | Write A to *HL. | |
37255 | ADD HL,DE | HL+=DE. | ||
37256 | LD (HL),A | Write A to *HL. | ||
37257 | INC HL | Increment HL by one. | ||
37258 | DJNZ PaintRightHandSide_Loop | Decrease counter by one and loop back to PaintRightHandSide_Loop until counter is zero. | ||
37260 | RET | Return. |
Prev: 37210 | Up: Map | Next: 37261 |