/*Anu Grewal
**cs184-dn
**lab7*/

surface
lab7(float Ka = 1, Kd = 0.6, Ks = 0.7, roughness = 0.2, dsize = .2,
	sizes = 1; color specularcolor = 1, bcolor = color (0,0,0),
	lab7color = color (1,1,1))
{
	varying float dot,size,fac;
	varying float td = 0.7;
	varying color paint;
	varying point Nf, V;

	Nf = faceforward(normalize(N),I);
	V = -normalize(I);

	fac = 1.2/dsize;
	paint = bcolor;

	dot = noise(transform("shader",P)*fac);
	
	if (dot > td) {
	paint = lab7color;
	}
	

	Oi = Os;
	Ci = Os * (paint * (Ka * ambient() + Kd * diffuse(Nf)) +
		specularcolor * Ks * specular(Nf,V,roughness));
}