open window 511,511 for x=10 to 495 step 5:for y=10 to 495 step 5 colour x/2,y/2,0 fill rectangle x,y,x+5,y+5 next y:next x