for x : 150 .. 650 by 15 %top part 
    for y : 0 .. 55 by 15

        drawfillbox (x, y, x + 15, y + 15, col)
        col += 1
    end for
end for

elsif mb = 1 and mx > 150 and my > 0 and mx < 960 and my < 65 then %bottom part
        col := whatdotcolour (mx, my)
        drawfillbox (700, 0, 760, 60, col)