Files
bluflame/evoke-64k/ev15-4k/mark.fs_0
2026-04-18 22:31:51 +02:00

569 lines
12 KiB
Plaintext

const int CurScene = 0x6;
// Parameters from our host
// x: Scene+Zeit
// y: Hoehe
// z: Aspec
uniform vec3 Y;
// All data of our world
float cFac, CurTime, CurTime2, CurStep, pi2= 6.28319;//, CurScene;
int m;
vec2 CurNormal;
vec3 cRes, rayDir, CurColor = vec3(0.), RayStep = vec3(0.);
vec3 LightColor= vec3( 5., 4.5, 4.0);
vec3 BackColor= vec3( 0.7, 0.9, 1.2);
vec4 HitMaterial;
vec2 rotate(vec2 v,float y)
{
return cos(y)*v+sin(y)*vec2(-v.y,v.x);
}
//repeat around y axis w times
//void rp(inout vec3 p, float trans, float w)
float repeatr(inout vec2 v,float x, float y)
{
float a= atan(v.y,v.x);
float z=mod(a,y)-y*.5;
v=(length(v))*vec2(cos(z),sin(z));
v.x-=x;
return a-z;
}
void repeat( inout float w, float y )
{
w= mod( w - y*.5, y ) - y*.5;
}
void repeate( inout float w, float y, float z )
{
w= max( abs(w)-z, mod( w - y*.5, y ) - y*.5);
}
/*float row( float w, float y)
{
return floor( ( w - y*.5 )/ y );
}*/
//radius of the torus/ radius of the ring
/*float torus(vec3 p,float f)
{
return length(vec2(length(p.xz) - f,p.y));
}*/
/*float signedDistToBox( vec3 p, vec3 b )
{
vec3 di = abs(p) - b;
float mc = maxcomp(di);
return mc<0.0 ? mc : length(max(di,0.0));
}*/
float CBox( in vec3 p, in vec3 box, float rad )
{
return length( max( abs(p) - box + vec3(rad), 0.0 ) ) - rad;
}
float CBox2D( in vec2 p, in vec2 box, float rad )
{
return length( max( abs(p) - box + vec2(rad), 0.0 ) ) - rad;
}
/*float EndlessBar( vec2 p, float y, float z )
{
return length( max( abs(p) - vec2(y) + vec2(z), 0.0 ) ) - z;
}*/
/*float noise3D( vec3 p )
{
return fract( sin( p.x * 151.0 + p.y * 33.0 + p.z ) * 11.0 );
}
float smoothnoise(vec3 p)
{
vec2 e = vec2(1.0, 0.0);
vec3 o= smoothstep(0.0,1.0,fract( p ));
p= floor( p );
vec4 n= mix(
vec4(
noise3D( p+e.yyy),//n000,
noise3D( p+e.xyy),//n100,
noise3D( p+e.yxy),//n010,
noise3D( p+e.xxy)),//n110),
vec4(
noise3D( p+e.yyx),//n001,
noise3D( p+e.xyx),//n101,
noise3D( p+e.yxx),//n011,
noise3D( p+e.xxx)),//n111),
o.z);
e = mix(n.xy, n.zw, o.y);
return mix(e.x, e.y, o.x);
}*/
float plasm(float x, float a, float b,float c)
{
return sin(x+a+c*sin(x+b));
}
float smin( float a, float b, float k )
{
float h = clamp( 0.5+0.5*(b-a)/k, 0.0, 1.0 );
return mix( b, a, h ) - k*h*(1.0-h);
}
float hash( vec2 p )
{
float h = dot(p,vec2(23.2,15.7));
return fract(sin(h)*232.45);
}
float noise(vec2 p)
{
vec2 e = vec2(1.0, 0.0);
vec2 i = floor( p );
vec2 f = fract( p );
f *= f*(3.0-2.0*f);
return -0.5 + mix( mix( hash( i + e.yy ),
hash( i + e.xy ), f.x),
mix( hash( i + e.yx ),
hash( i + e.xx ), f.x), f.y);
}
float wHeight()
{
if (CurScene > 9)
{
return -22.0;
}
else if (CurScene == 9)
{
return 11.0 - CurTime * 33.0;
}
else
{
return min( 11.0, -33.0 + 22.0 * Y.x - CurScene * 11.0);
}
return 11.0 - CurTime * 33.0;
}
float wdings(vec3 p, float t)
{
p.y -= wHeight();
p.xy= rotate( p.xy, 2.3 * t );
p.yz= rotate( p.yz, 1.9 * t );
repeate(p.x, 10.0, 10.0);
repeate(p.y, 10.0, 10.0);
repeate(p.z, 10.0, 10.0);
vec2 e = vec2(6.0, 0.5);
float b = min(min(CBox(p, e.xyy, 0.2), CBox(p, e.yxy, 0.2)), CBox(p, e.yyx, 0.2));
return smin(length(p) - 3.0, b, 1.0);
}
float f0(vec3 p)
{
float w = wdings(p, CurTime - 0.02);
float d = rayDir.y < 0. ? (p.y + 0.3)/rayDir.y : 999.0;
d= smin (max(p.y, d), p.y + w - 2.0, 2.0);
if (CurScene > 9)
{
float Walk = (Y.x - 10.1) * 444.0;
Walk = smoothstep( Walk - 166., Walk - 66.0, length(p.xz));
d = p.y - Walk * 33.0 + 33. + 3.0 * (1.0 - Walk) * sin(length(p.xz) * 0.1 - CurTime * 66.0);
}
if (d > 0.5)
{
return d;
}
p *= 0.4;
p.x += CurTime;
return d + abs (0.2 * noise(p.xz));
}
float f0N(vec3 p)
{
float d = f0(p);
if (d > 0.5)
{
return d;
}
p /= 0.1;
p.x += CurTime;
d += abs (0.005 * noise(p.xz));
p.x += CurTime;
d += abs (0.01 * noise(p.xz));
p /= 2.8;
p.x += CurTime;
d += abs (0.02 * noise(p.xz));
p /= 2.8;
p.x += CurTime;
d += abs (0.04 * noise(p.xz));
return d;
}
float f1(vec3 p)
{
return wdings(p, CurTime);
}
float f2(vec3 p)
{
vec3 o = p;
float b = length(o.xz) * 0.2;
o.y -= 5.0 * b - 0.2 * b * b - 30.0;
//repeate(o.y, 8.0, 16.0);
repeatr(o.zx, 172.0 * Y.x - 1899.0, pi2 / 48.0);
//o.z += 5.0 * hash(d);
repeate(o.z, 44.0, 88.0);
repeate(o.z, 4.0, 4.0);
o.z = length(o.z) - 0.7;
b = (o.z < 0.0 ? length( o.xy ): length( o )) - 1.0;
o = p;
o.y -= wHeight();
o.xy= rotate( o.xy, 2.3 * CurTime );
o.yz= rotate( o.yz, 1.9 * CurTime );
float a = max(
max(
CBox(o, vec3(11.0,11.0,11.0), 1.0),
1.0 - wdings(p, CurTime)),
length(o) - 6.0 * (Y.x - 6.2))
- plasm(0.3 * p.x, 8.0 * CurTime, 0.3 * p.y, sin(0.3 *p.z));
a *= 0.5;
if(CurScene > 9)
return smin(a, b, 16.0);
else if(CurScene > 8)
return a;
else
{
//float r = min(1.0, 1.0 + p.z + min( 0.0, Y.x * 44.0 - 377.0));
float r = -min(-5.0, Y.x * 88.0 - 555.0) - p.z;
r = 1. - (r < 0. ? 0. : 0.04 * r * r);
p.x -= plasm(p.z * 0.3, 0.5, CurTime, 0.4);
p.y -= 5.0 + plasm(p.z * 0.2, CurTime, 0.0, 1.2 + sin(CurTime));
return smin( a, CBox2D(p.xy, vec2(r * 0.4, r), r * 0.4), 8.0);
}
}
float f3(vec3 p)
{
repeatr(p.zx, 88.0, pi2 / 6.0);
repeatr(p.zx, 33.0, pi2 / 12.0);
float d = length(p.x);
return max(p.z - d + pow(d, 1.1), p.y - 44.0);
}
float f(vec3 p)
{
return min( min( min( f0(p), f1(p) ), f2(p) ), f3(p) );
}
float fN(vec3 p)
{
return min( min( min(f0N(p), f1(p) ), f2(p) ), f3(p) );
}
void mat(vec3 p)
{
float z= 0.1;
if( z > f1(p) )
{
z= f1(p);
HitMaterial = vec4(-2.0, 3.0, 0.7, 1.1);
CurColor = vec3(1.0,1.5,1.8 );
CurStep= .1;
}
if( z > f2(p) )
{
z= f2(p);
HitMaterial = vec4(-2.0, 0.8, 0.5, 1.2);
CurColor = vec3(1.8,1.0,0.2);
CurStep= 0.1;
}
if( z > f3(p) )
{
z= f3(p);
HitMaterial = vec4(-1.0, 3., 0.8, 1.2);
CurColor = vec3(.3,.2,.5);
CurStep= .8;
}
if( z > f0(p) )
{
HitMaterial = vec4(-1.0, 9.0, 0.95, 1.0);
CurColor = vec3(.0,.0,.0 );
CurStep= 0.6;
}
}
/*void ToRes(vec3 Color, float Factor)
{
cRes+= Color * cFac;
cFac*= Factor;
}*/
vec3 lightSphere(vec3 normal, vec3 color, vec2 desc)
{
return smoothstep(desc.x, desc.y, dot(vec3( 0.86, 0.5, 0.0),normal)) * color;
}
void main()
{
//Z = (gl_FragCoord.xy / Y.zw) * vec2(Y.z/Y.w, 1);
CurTime= fract(Y.x);
//CurScene= Y.x - fract(Y.x);
CurTime2= CurTime * CurTime;
// Get the look direction for the current pixel (always look forwards)
rayDir = vec3((gl_FragCoord.xy / Y.y - 0.5), 0.8);
rayDir.x -= Y.z;
//Kamera sitzt an dieser Position
vec3 p = vec3( 0.0, 11.0, -CurTime * 33.0);
if( CurScene < 1)
{
rayDir.yz= rotate( rayDir.yz, 1.5 - 2.0 * CurTime );
rayDir.xz= rotate( rayDir.xz, 4.0 + CurTime);
}
else if( CurScene < 2)
{
p = vec3( -33.0, 6.0, -3.0);
rayDir.yz= rotate( rayDir.yz, 0.2 );
rayDir.xz= rotate( rayDir.xz, 4.4 );
}
else if( CurScene < 3 )
{
p = vec3( 0.0, 6.0, -22.0);
rayDir.yz= rotate( rayDir.yz, 0.4 - 0.6 *CurTime );
//rayDir.xz= rotate( rayDir.xz, 0.0 );
}
else if( CurScene < 4 )
{
p = vec3( -44.0, 8.0, -40.0);
rayDir.yz= rotate( rayDir.yz, 0.0 );
rayDir.xz= rotate( rayDir.xz, 4.5 + CurTime );
}
else if( CurScene < 5 )
{
////////////// Shader 1
p= vec3( 11.0, 66.* (1.0 - CurTime * 0.7), 190.);
rayDir.yz= rotate( rayDir.yz, 1.0 * (1.0 - CurTime * 0.5) );
rayDir.xz= rotate( rayDir.xz, 3.0 );
//CurTime2 = CurTime;
}
/*else if( CurScene < 6 )
{
p= vec3( -22.0, 11., 150.* (1.0 - CurTime * 0.1));
rayDir.yz= rotate( rayDir.yz, 0.2 );
rayDir.xz= rotate( rayDir.xz, 4.0 );
//CurTime2 = CurTime;
}*/
else if( CurScene < 6 )
{
p= vec3( 11.0, 9.0, 111.* (1.0 - CurTime * 0.1));
rayDir.yz= rotate( rayDir.yz, 0.3 );
rayDir.xz= rotate( rayDir.xz, 2.0 + CurTime * 0.8 );
}
/*else if( CurScene < 8 )
{
p= vec3( -33.0, 7.0, 0.);
rayDir.yz= rotate( rayDir.yz, 0.0 );
rayDir.xz= rotate( rayDir.xz, 5.0);
}*/
else if( CurScene < 7 )
{
////////////// Shader 2
p= vec3( 11.0, 33.* (1.0 - CurTime * 0.1), 11.);
rayDir.yz= rotate( rayDir.yz, 1.0);
rayDir.xz= rotate( rayDir.xz, 2.0 );
}
else if( CurScene < 8 )
{
p = vec3( -22.0, 6.0, 22.0);
rayDir.yz= rotate( rayDir.yz, -0.2 );
rayDir.xz= rotate( rayDir.xz, 4.2 );
}
else if( CurScene < 9 )
{
p= vec3( 11.0, 66.* (1.0 - CurTime * 0.3), 22.);
rayDir.yz= rotate( rayDir.yz, 1.0);
rayDir.xz= rotate( rayDir.xz, 3.0 );
}
else if( CurScene < 10 )
{
p = vec3( -22.0, 8.0, -22.0);
rayDir.yz= rotate( rayDir.yz, CurTime * 0.4 - 0.3 );
rayDir.xz= rotate( rayDir.xz, 5.3 );
}
else if( CurScene < 11 )
{
////////////// Shader 3
p= vec3( -66., 60.0, 22.0);
rayDir.yz= rotate( rayDir.yz, 0.6 );
rayDir.xz= rotate( rayDir.xz, 4.4 );
//CurTime = CurTime * 8.0 + 0.6;
//CurTime2 = mod( CurTime, 1.0);
}
else //if( CurScene < 12 )
{
p= vec3( -33., 22.0 * (1.0-CurTime), 11.0);
rayDir.yz= rotate( rayDir.yz, 0.5 );
rayDir.xz= rotate( rayDir.xz, 5.0 );
}
/*else if( CurScene < 15 )
{
p= vec3( -99.0 * (1.0 - CurTime * 3.3), 88.0, -44.0);
rayDir.yz= rotate( rayDir.yz, 0.6 + CurTime );
rayDir.xz= rotate( rayDir.xz, 2.5 );
CurTime = CurTime * 8.0 + 0.6;
CurTime2 = mod( CurTime, 1.0);
}
else if( CurScene < 16 )
{
p= vec3( -99.0 * (1.0 - CurTime * 0.8 ), 12.0, 99.0);
//rayDir.yz= rotate( rayDir.yz, 0.6 + CurTime );
rayDir.xz= rotate( rayDir.xz, 4.5 );
CurTime = CurTime * 8.0 + 0.6;
CurTime2 = mod( CurTime, 1.0);
}*/
//CurScene= Y.x - fract(Y.x);
rayDir = normalize(rayDir);
cRes= vec3( .0,.0,.0 );
cFac=1.0;
//float t=smoothnoise( rayDir*666.0 )*0.1,y,z;
//float t= 0.5 * plasm(999. * rayDir.x, 999. * rayDir.z, 999. * rayDir.y,999. * rayDir.z),y,z;
float t= 0.0,y,z;
m=0;
HitMaterial = vec4(-3.0, 8.0, 0.98, 1.0);
vec3 fog =
lightSphere(rayDir, LightColor, HitMaterial.zw);// +
//lightSphere(rayDir, BackColor, HitMaterial.xy);
while(m++<2)
{
//bis zu einer Oberflaeche steppen
//for (CurStep=1.0;t<999.0 && CurStep>t*.003;t+=0.01+max(0.0, CurStep),RayStep=rayDir*t )
float ii = 80.0;
for (CurStep=1.0;ii >=0.0 && t<999.0 && CurStep>t*.001;t+=CurStep,RayStep=rayDir*t,--ii )
{
CurStep = f(p+RayStep);
}
if (ii <= 1)
{
ii = 0.;
t = 999.3 ;
RayStep=rayDir*t;
break;
}
ii = smoothstep(44., 1., ii);
vec3 NextPos = p+RayStep;
//Startpunkt und Richtung fuer reflektierten Strahl;
p= NextPos;
CurNormal = vec2(0.04, 0.0);
vec3 n= vec3( fN(p + CurNormal.xyy) - fN(p - CurNormal.xyy), fN(p + CurNormal.yxy) - fN(p - CurNormal.yxy), fN(p + CurNormal.yyx) - fN(p - CurNormal.yyx) );
// float gradlen = length(n / (2 * CurNormal.x));
// float error = abs(gradlen - 1.0);
// gl_FragColor.xyz = mix(vec3(0.0, 1.0, 0.0), vec3(1.0, 0.0, 0.0), error);
// return;
//CurNormal = vec2(0.0, 0.0);
mat(p);
//n.xz += CurNormal;
n= normalize(n);
//CurStep ab hier == Reflektion !!!
if( t > 999.0)
{
if( m < 2)
{
HitMaterial = vec4(-3.0, 8.0, 0.98, 1.0);
}
break;
}
rayDir= reflect( rayDir, n );
//float ao(vec3 p, vec3 n, float d, float i) {
y= 8.0;
for (z=1.0;y>0.;y--)
{
z-=.5*(y-f(p+n*y))/exp2(y);
}
CurColor*= z;
CurColor*= lightSphere(rayDir, BackColor, HitMaterial.xy);
cRes+= cFac*mix(CurColor, fog, ii);//*(1.0-Reflect);
cFac*= CurStep;// Reflect * (1.0-t/tmax);
t= 0.5;
RayStep = rayDir * t;
}
gl_FragColor.xyz = smoothstep(11.92, 11.8, Y.x) * (cRes + cFac*
( lightSphere(rayDir, LightColor, HitMaterial.zw) +
lightSphere(rayDir, BackColor, HitMaterial.xy)));
//gl_FragColor.xyz = smoothstep(-12.0, -11.8, -Y.x) * mix((cRes + cFac*
// ( lightSphere(rayDir, LightColor, HitMaterial.zw) +
// lightSphere(rayDir, BackColor, HitMaterial.xy))), fog, fogAmount / 2.0);
}