p={} for j=0,18 do for i=0,8 do add(p,{x=i*16,h=j*8-8}) end end ::_:: cls() rectfill(0,0,127,127,7) x,y=0,0 for v in all(p) do v.y=sin(t()+v.x/10)*10+v.h q=0 if (v.x>1) line(v.x,v.y,x,y,0) x,y=v.x,v.y end flip() goto _