cls() for x=0,128,16 do lx=x for y=0,128,2 do p=14*sin(t()/4+x/16+y/64)*cos(t()/9+x/256) line(x+p,y,lx,y,7) lx=x end end flip() goto _