FOR Y=0 TO 14 FOR X=0 TO 24 C=Y*25+X BGPUT 0,X,Y,C NEXT NEXT