for x=0,w do
line(x,0,x,h,hsv((x/6.4*3.59),1,255))
end