f=0,w=200,draw=o=>{for(f||createCanvas(W=400,W),background(0),S=stroke,x=0;x<W;x =.5)for(y=0;y<W;y =.5)d=dist(x,2*y,w,w),d<90&&(n=5*noise(x/w f,y/w-f),S(C=(y/16)**n,77),point(x,Y=y w),point(x,h=Y-33*n),S(C,3),d>83&&(line(x,Y,x,h),S(C/2),point(x,y)));f =.01};//
#つぶやきProcessing