NoiseColor.osl

// OSL Shader by Tomás Atria based on http://glslsandbox.com/ examples
// Modified by Saul Espinosa 7/15/2021 for Redshift 3d

shader noise_colors
[[  string help = "Swirling Color Noise",
    string label = "Noise Colors" ]]
(
	point Po = point(u,v,0)
	[[	string label = "Position" ]],
	
	float Time = 1.0
	[[	string label = "Time", float min = 0.0, float max = 1000.0]],
	
	int   aces = 0
	[[ string widget = "checkBox",
	string label = "ACES",
	int connectable = 0 ]],
	
	output color outColor = 0,
)

{
	float Pi = 10.;
	int   complexity      = 30;    // More points of color.
	float fluid_speed     = 600.0;  // Drives speed, higher number will make it slower.
	float color_intensity = 0.5;
	point p = Po;
	p *= 2;
	for(int i=1;i<complexity;i++)

{
    point newp=p + Time*0.001;
    newp[0]+=0.6/float(i)*sin(float(i)*p[1]+Time/fluid_speed+20.3*float(i)) + 0.5; // + mouse.y/mouse_factor+mouse_offset;
    newp[1]+=0.6/float(i)*sin(float(i)*p[0]+Time/fluid_speed+0.3*float(i+10)) - 0.5; // - mouse.x/mouse_factor+mouse_offset;
    p=newp;
}
	// ACES sRGB Transform
	matrix aces_tm = matrix(
		0.6131, 0.0701, 0.0206, 0,
		0.3395, 0.9164, 0.1096, 0,
		0.0474, 0.0135, 0.8698, 0,
		0, 0, 0, 1);
	
	color Out= color(color_intensity*sin(5.0*p[0])+color_intensity,color_intensity*sin(3.0*p[1])+color_intensity,color_intensity*sin(p[0]+p[1])+color_intensity);
	float r = Out[0], g = Out[1], b = Out[2];
	
// ACES Output
	if (aces == 0)
	outColor = linearstep (0, 2, Out);
	else
	{
	outColor = linearstep (0, 2, (transform(aces_tm, vector(r,g,b))));
	}

}