10 *= 21011
12 .S
14 .P
16 .D ML.BLANK...
100 L100 CMP #0:BEQ BLANK
102 CMP #1:BEQ UNBLANK
104 JSR $FFBD:LDA #8:TAX:LDY #1:JSR $FFBA:LDA #0:JSR $FFD5
106 JMP DONE
110 BLANK LDA #0:STA $C074:STA $C075:STA $C076:STA $C077:STA $C078
112 JMP DONE
120 UNBLANK LDA #$1B:STA $C078:STA $C077:STA $C076
122 LDA #$0B:STA $C075:LDA #7:STA $C074
130 DONE RTS
999 .END TX.BLANK...