[gen]flag

f = 0;

c = 1;

p = 0;

​

// setup = _ => pixelDensity(1)

​

draw = (_) => {

  f || createCanvas((W = 400), W)

  background(0)

  for (y = 0; y < W * 2; y += 25) {

    for (x = 0; x < 800; x++) {

      n = noise((x + f*1.5) / 666, (y + f) / W);

      stroke(c > 0 ? (y - map(n, 0, 0.55, 0, W) / 1.6) - (map(n, 0.3, 1, 0, W) * .5) * c : 0);

      line(x, W, x, y + n * (sin(PI/800*x)*W) - W);

      p = n;

    }

    c = -c;

  }

  f-=4

}

​

// ----------------------------------------

// Minimized 260

// ----------------------------------------

// f=0,c=1,p=0,draw=a=>{for(f||createCanvas(W=400,W),background(0),y=0;y<2*W;y+=25){for(x=0;x<800;x++)n=noise((x+1.5*f)/666,(y+f)/W),stroke(c>0?y-map(n,0,.55,0,W)/1.6-.5*map(n,.3,1,0,W)*c:0),line(x,W,x,y+n*(sin(PI/800*x)*W)-W),p=n;c=-c}f-=4};//#つぶやきProcessing