color(3)
for x=0,128 do
for y=0,128 do
  if(y>(60+sin(x/50)*20)) then
    pset(x,y)
  end
end
end