5  GR
10  FOR Y = 0 TO 39
20  FOR X = 0 TO 39
30  COLOR=  INT (X / 10) +  INT (Y / 10) * 4
40  PLOT X,Y
50  NEXT
60  NEXT