//image synth examples for sc3d5 
//jrh 2001

//_________temple festival
(
var x, z;
z = ImageSynth(Pic.new(Rect.newBy(0,0,256,256), 32), 
	Synth.new({ 
		var x, y, t, scale, rot, d, x1, y1, z, r, b;
		scale = SinOsc.ar(0.00002, 0, 80, 81);
		rot = SinOsc.ar(0.000026, 0, 2pi);
		scale = MouseX.kr([0,80]);
		rot = MouseY.kr([0,4pi]);

		#x, y, t = XY.ar(scale, scale, rot: rot);
		
		b = x + y.sin - x.tan / 2;
		[b/3, b/5,  b]
	})
);

z.start;
z.next;

x = GUIScreen.new("temple festival", Rect.newBy(80,80,256,256), z.pic);
x.sched(0, inf, { z.next; x.refresh; 0.02 });
)





//__________bubblewrap1
(
var x, z;
z = ImageSynth(Pic.new(Rect.newBy(0,0,256,256), 32), 
	Synth.new({ 
		var mousey;
		mousey = MouseY.kr([0.0001, 0.011]);
		mousey = mousey.round(0.5/256) * BrownNoise.kr( 0.03, 2);
		
		SinOsc.ar([5, 5, 5], SinOsc.ar([5, 5, 5], [0, 1, 0.5]*pi/6*MouseX.kr([0, rrand(5, 20)]).sin, SinOsc.ar(mousey, 0, 1,1)*MouseX.kr([0.0001, 2], 0, 'exponential')), 0.5, 0.5);
	})
);

z.start;

z.next;

//z.end;

x = GUIScreen.new("pic synth", Rect.newBy(80,80,256,256), View(nil, 
	[
		z.pic,
		View.new(
			Pen.new.foreColor_(Color.red).offset_(40@60).textFont_(\Helvetica).textSize_(24).bold_(true), 
			[ "" ])
	]));
x.sched(0, inf, { 
	z.next;
	x.refresh; 0.05 });

)


//_______latest sine fashion
(
var x, z;
z = ImageSynth(Pic.new(Rect.newBy(0,0,128*2,128*2), 32), 
	Synth.new({ 
		 SinOsc.ar([5, 1, 1], MouseX.kr([0, pi])) + Dust.ar(LFNoise0.kr([1, 1, 1], 0.7, -0.5).max(0)*[1,1,1]*140)
	})
);

z.start;

z.next;

//z.end;

x = GUIScreen.new("=", Rect.newBy(80,80,128*2,128*2), z.pic);
x.sched(0, inf, { z.next; x.refresh; 0.02 });
)



//________1972
(
var x, z;
z = ImageSynth(Pic.new(Rect.newBy(0,0,256,256), 32), 
	Synth.new({ 
		var mx, my;
		mx = MouseX.kr([1, 0]);
		my = MouseY.kr([1, 0]);
		Mix.ar([
		SinOsc.ar(280*SinOsc.ar(10, 0, 6), [2pi.rand*mx, 2pi.rand*my, 0]),
		SinOsc.ar(280*SinOsc.ar(10, 0, 6), [2pi.rand*my, 2pi.rand*mx, 0])
		
		])  LFNoise1.ar(8, 0.5, 0.5);
	})
);

z.start;

z.next;

//z.end;

x = GUIScreen.new("pic synth", Rect.newBy(80,80,256,256), View(nil, 
	[
		z.pic,
		View.new(
			Pen.new.foreColor_(Color.new(245, 150.rand, 20)).offset_(70@160).textFont_(\Helvetica).textSize_(45).bold_(true), 
			[ "1972" ])
	]));
x.sched(0, inf, { 
	z.next;
	x.refresh; 0.02 });

)