PHA 72 ; Push accumulator on stack to save TXA 138 ; Transfer X register to accumulator PHA 72 ; Push accumulator on stack to save LDX 203 166 203 ; Load X register with mode line counter LDA 1576,X 189 40 6 ; Load accumulator with color value STA WSYNC 141 10 212 ; Wait for horizontal blank STA 53274 141 26 208 ; Write color to background register INX 232 ; Increase the mode line counter STX 203 134 203 ; Store counter in zero page 203 CPX #10 224 10 ; Are we done coloring mode lines? BNE EXIT 208 4 ; If no, reset registers & exit to BASIC LDA #0 169 0 ; If yes, reset mode line counter to 0 STA 203 133 203 ; Store counter in 203 for new screen EXIT PLA 104 ; Get X register from stack TAX 170 ; Reset X register PLA 104 ; Reset accumulator from stack RTI 64 ; Return to BASIC from interrupt 1010 DATA 72,138,72,166,203,189,40,6,141,10,212,141,26,208 1020 DATA 232,134,203,224,10,208,4,169,0,133,203 1030 DATA 104,170,104,64