precision highp float; uniform vec2 resolution; uniform sampler2D backbuffer; uniform float time; uniform vec2 mouse; #define sep 48. // density of arrows #define repul 2. // repulsive force of blue field #define tau (2.*3.1415926535897932384626) float H12(vec2 p){ return fract(sin(dot(p, vec2(11.4324, 53.4356)))*54315.9523); } float N12(vec2 p){ vec2 i = floor(p); vec2 f = fract(p); f *= f * (3. - 2.*f); return mix( mix(H12(i ),H12(i+vec2(1.,0.)),f.x), mix(H12(i+vec2(0.,1.)),H12(i+vec2(1.,1.)),f.x), f.y ); } vec3 sampleBounds(vec2 p){ p += .00001; return (p.x<0. || 1. .9 ? H12(i+.3456+floor(time)) : amm; //amm = mouse.y > .9 ? 0. : amm; float a2 = 1.; float rct = time; float reccir = clamp(2.*sin(.262*rct+.2*p.x),0.,1.); float cmin=scale(reccir,.5, 1.),cmax=1.; color = dcol(conDisk(lp-vec2(-2., 2.),lp-vec2(-2., 2.)-xylu*a2,scale(field(i+vec2(-1., 1.)),cmin,cmax),reccir),color,vec3(alu,avlu*.5+.5,bc(i+vec2(-1., 1.)))); color = dcol(conDisk(lp-vec2( 0., 2.),lp-vec2( 0., 2.)-xymu*a2,scale(field(i+vec2( 0., 1.)),cmin,cmax),reccir),color,vec3(amu,avmu*.5+.5,bc(i+vec2( 0., 1.)))); color = dcol(conDisk(lp-vec2( 2., 2.),lp-vec2( 2., 2.)-xyru*a2,scale(field(i+vec2( 1., 1.)),cmin,cmax),reccir),color,vec3(aru,avru*.5+.5,bc(i+vec2( 1., 1.)))); color = dcol(conDisk(lp-vec2(-2., 0.),lp-vec2(-2., 0.)-xylm*a2,scale(field(i+vec2(-1., 0.)),cmin,cmax),reccir),color,vec3(alm,avlm*.5+.5,bc(i+vec2(-1., 0.)))); color = dcol(conDisk(lp+vec2( 0., 0.),lp+vec2( 0., 0.)-xymm*a2,scale(field(i+vec2( 0., 0.)),cmin,cmax),reccir),color,vec3(amm,avmm*.5+.5,bc(i+vec2( 0., 0.)))); color = dcol(conDisk(lp-vec2( 2., 0.),lp-vec2( 2., 0.)-xyrm*a2,scale(field(i+vec2( 1., 0.)),cmin,cmax),reccir),color,vec3(arm,avrm*.5+.5,bc(i+vec2( 1., 0.)))); color = dcol(conDisk(lp-vec2(-2.,-2.),lp-vec2(-2.,-2.)-xyll*a2,scale(field(i+vec2(-1.,-1.)),cmin,cmax),reccir),color,vec3(all,avll*.5+.5,bc(i+vec2(-1.,-1.)))); color = dcol(conDisk(lp-vec2( 0.,-2.),lp-vec2( 0.,-2.)-xyml*a2,scale(field(i+vec2( 0.,-1.)),cmin,cmax),reccir),color,vec3(aml,avml*.5+.5,bc(i+vec2( 0.,-1.)))); color = dcol(conDisk(lp-vec2( 2.,-2.),lp-vec2( 2.,-2.)-xyrl*a2,scale(field(i+vec2( 1.,-1.)),cmin,cmax),reccir),color,vec3(arl,avrl*.5+.5,bc(i+vec2( 1.,-1.)))); //if(distance(uv,iuv)<.01)color = vec3(1.); //if(length(p)<1.) color.b = 1.; gl_FragColor = vec4(color, 1.); }

Ripple