Prev: 37210 Up: Map Next: 37261
37219: Paint Header And Footer
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