10 COLOR 1,4,8:SCREEN 1,1
20 SPRITE$(0)=STRING$(8,255)
30 PUT SPRITE 0,(115,80),15,0
40 IF INKEY$="" THEN 40
50 GOSUB 100:GOTO 40
100 VPOKE &H1B03,VPEEK(&H1B03) XOR 14  'BASE(1*5+3) 
W
W� &H1B00
110 RETURN