5  SCREEN 0:WIDTH 40
10 FOR I=0 TO 7:READ M:VPOKE 2048+213*8+I,M:NEXT
20 DATA &H00,&H00,&H42,&H81,&H81,&H81,&H99,&H66