/*
<?xml version='1.0' standalone='yes' ?>
<!--  xml header for scripts & plugin manager --> 
<script>
	<name>Grunge</name>
	<author>Julian MacDonald</author>
	<version>1.9</version>
    <beta>1</beta>
	<date>11/30/2004</date>
	<description>
This script preferentially targets textures to particular parts of a triangle mesh.  There are
3 types of targeting: (1) on concave parts of the mesh, i.e. vertices on an edge which joins 2 faces
that are below a certain tolerance angle (useful for e.g. Dirt textures), (2) on convex parts of the mesh,
i.e. vertices on an edge joining 2 faces with angles above a certain specified tolerance (useful for e.g.
scratches/dents, and (3) vertices of the mesh which face upwards (in World coordinates), useful for
Dust/Snow textures.  In each case, textures are applied by creating a layered texture for the object (or
adding a new layer(s) if the mesh already has a layered texture applied).  The texture layers are applied
per-vertex as an overlay (maintaining bumps).  The script initially prompts for the user to select which
of the 3 targeting types to apply (more than one can be selected) - it then goes through each in turn,
allowing the user to select the texture to apply, the tolerance angle (if appropriate) and the Probability
(that a particular vertex meeting the tolerance angle requirement is assigned that texture).
Note that the script can be applied any number of times, each time a new layer is added to create, for
example, several layers of dirt etc.
    </description>
    <comments>
    </comments>
</script>
*/
//
scene=window.getScene();
sel=scene.getSelection();
if (sel.length==0)
{
	new MessageDialog(window, "Please select one Triangle Mesh");
	return;
}
selObj=scene.getObject(sel[0]);
if (selObj.object instanceof TriangleMesh ==false)
{
	new MessageDialog(window, "Object must be a Triangle Mesh");
	return;
}
//
wantDirt=false;
wantScratches=false;
wantDust=false;
//
// create dialogue to get user to select the type of effect(s)
//
dirtChoice=new BCheckBox();
scratchChoice=new BCheckBox();
dustChoice=new BCheckBox();
widgets=new Widget[]{dirtChoice,scratchChoice,dustChoice};
names=new String[]{"Dirt","Scratches","Dust"};
dial=new ComponentsDialog(window,"Select Effects Required:",widgets,names);
//
if (!dial.clickedOk()) return;
if (dirtChoice.getState()) wantDirt=true;
if (scratchChoice.getState()) wantScratches=true;
if (dustChoice.getState()) wantDust=true;
//
//
//*****DIRT in creases******
if (wantDirt)
{
//  get textures in scene for dialogue
numT=scene.getNumTextures();
texList=new BComboBox();
tolField=new ValueField(120,ValueField.POSITIVE);
probField=new ValueField(100,ValueField.POSITIVE+ValueField.INTEGER);
for (i=0;i<numT;i++)
{
	texture=scene.getTexture(i);
	texList.add(texture.getName());
}
// display the dialogue and get the settings
widgets=new Widget[]{texList,tolField,probField};
names=new String[]{"Dirt Texture to Apply","Apply if Angle Between Faces <","Probability (%)"};
dial=new ComponentsDialog(window,"Select Parameters for Dirt",widgets,names);
//
if (!dial.clickedOk()) return;
tolerance=tolField.getValue();
prob=probField.getValue();
selTexIndx=texList.getSelectedIndex();
selTex=scene.getTexture(selTexIndx);
//
object=selObj.object;
// get the object's current texture and create a layered texture
// retaining existing mapping
//
objTex=object.getTexture();  
texMap=object.getTextureMapping();
layer=false;
if (texMap instanceof LayeredMapping) layer=true;
//
if (layer)
{
	texMap.addLayer(selTex);
	texMap.setLayerMapping(0,selTex.getDefaultMapping());
	texMap.setLayerMode(0,2); // set top layer to Overlay with Bumps
}
if (!layer)
{ 
	layTex=new LayeredTexture();
	layTexMap=layTex.getDefaultMapping();
	layTexMap.addLayer(objTex);
	layTexMap.setLayerMapping(0,texMap);
	layTexMap.addLayer(selTex);
	layTexMap.setLayerMapping(0,selTex.getDefaultMapping());
	layTexMap.setLayerMode(0,2); // set top layer to Overlay with Bumps
}
//
vert=object.getVertices();
numVert=vert.length;
tpVal=new double[numVert];
//
// determine texture parameters for mapping dirt texture
paramVal=new VertexParameterValue(tpVal);
normals=object.getNormals();
edges=object.getEdges();  //get the edges
faces=object.getFaces(); //get the faces
numEdge=edges.length;
//
for (i=0;i<numEdge;i++)
{
   // get the face numbers attached to each edge
   face1=edges[i].f1;
   face2=edges[i].f2;
   if (face2!=-1)    // if not a boundary edge
   {
      // get the vertex numbers of the vertices making up each face
      // face1
      vt11=vert[faces[face1].v1].r;
      vt12=vert[faces[face1].v2].r;
      vt13=vert[faces[face1].v3].r;
      // face 2
      vt21=vert[faces[face2].v1].r;
      vt22=vert[faces[face2].v2].r;
      vt23=vert[faces[face2].v3].r;
      //
      //
      // calculate the vector perpendicular to each face and normalise
      normVec1=(vt11.minus(vt12)).cross(vt11.minus(vt13));
      normVec2=(vt21.minus(vt22)).cross(vt21.minus(vt23));
      normVec1.normalize();
      normVec2.normalize();
      //
      mid1=vt11.plus(vt12).plus(vt13).times(1.0/3);
      mid2=vt21.plus(vt22).plus(vt23).times(1.0/3);
      midDiff = mid1.minus(mid2);
      faceAngle=180-Math.acos(normVec1.dot(normVec2))*180/Math.PI;
      //
   }
   // if below our tolerance (i.e. above a certain angle), add dirt texture to vertices
   // the second test excludes convex faces (thanks to Peter Eastman)
   // the third test uses the Probability to decide whether to set the parameter
   rand=new Random();
   if ((faceAngle<tolerance) && (midDiff.dot(normVec1)<0)&&(rand.nextDouble()<prob/100.0))
   {
      tpVal[edges[i].v1]=1.0;
      tpVal[edges[i].v2]=1.0;
   }
}
// 
// set the new texture
if (!layer)
{
	params=layTexMap.getLayerParameters(0);
	object.setTexture(layTex,layTexMap);
}
else
{
	params=texMap.getLayerParameters(0);
	object.setTexture(objTex,texMap);
}
object.setParameterValue(params[0],paramVal);  // apply it
//
}
//
//
//
// ***SCRATCHES on outer geometry*****
if (wantScratches)
{
//  get textures in scene for dialogue
numT=scene.getNumTextures();
texList=new BComboBox();
tolField=new ValueField(220,ValueField.POSITIVE);
probField=new ValueField(100,ValueField.POSITIVE+ValueField.INTEGER);
for (i=0;i<numT;i++)
{
	texture=scene.getTexture(i);
	texList.add(texture.getName());
}
// display the dialogue and get the settings
widgets=new Widget[]{texList,tolField,probField};
names=new String[]{"Scratch Texture to Apply","Apply if Angle Between Faces >","Probability(%)"};
dial=new ComponentsDialog(window,"Select Parameters for Scratches",widgets,names);
tolerance=360-tolField.getValue();
prob=probField.getValue();
//
if (!dial.clickedOk()) return;
selTexIndx=texList.getSelectedIndex();
selTex=scene.getTexture(selTexIndx);
//
object=selObj.object;
// get the object's current texture and create a layered texture
// retaining existing mapping
//
objTex=object.getTexture();  
texMap=object.getTextureMapping();
layer=false;
if (texMap instanceof LayeredMapping) layer=true;
//
if (layer)
{
	texMap.addLayer(selTex);
	texMap.setLayerMapping(0,selTex.getDefaultMapping());
	texMap.setLayerMode(0,2); // set top layer to Overlay with Bumps
}
if (!layer)
{ 
	layTex=new LayeredTexture();
	layTexMap=layTex.getDefaultMapping();
	layTexMap.addLayer(objTex);
	layTexMap.setLayerMapping(0,texMap);
	layTexMap.addLayer(selTex);
	layTexMap.setLayerMapping(0,selTex.getDefaultMapping());
	layTexMap.setLayerMode(0,2); // set top layer to Overlay with Bumps
}
//
vert=object.getVertices();
numVert=vert.length;
tpVal=new double[numVert];
//
// determine texture parameters for mapping dirt texture
paramVal=new VertexParameterValue(tpVal);
normals=object.getNormals();
edges=object.getEdges();  //get the edges
faces=object.getFaces(); //get the faces
numEdge=edges.length;
//
for (i=0;i<numEdge;i++)
{
   // get the face numbers attached to each edge
   face1=edges[i].f1;
   face2=edges[i].f2;
   if (face2!=-1)    // if not a boundary edge
   {
      // get the vertex numbers of the vertices making up each face
      // face1
      vt11=vert[faces[face1].v1].r;
      vt12=vert[faces[face1].v2].r;
      vt13=vert[faces[face1].v3].r;
      // face 2
      vt21=vert[faces[face2].v1].r;
      vt22=vert[faces[face2].v2].r;
      vt23=vert[faces[face2].v3].r;
      //
      //
      // calculate the vector perpendicular to each face and normalise
      normVec1=(vt11.minus(vt12)).cross(vt11.minus(vt13));
      normVec2=(vt21.minus(vt22)).cross(vt21.minus(vt23));
      normVec1.normalize();
      normVec2.normalize();
      //
      mid1=vt11.plus(vt12).plus(vt13).times(1.0/3);
      mid2=vt21.plus(vt22).plus(vt23).times(1.0/3);
      midDiff = mid1.minus(mid2);
      faceAngle=180-Math.acos(normVec1.dot(normVec2))*180/Math.PI;
      //
   }
   // if above our tolerance (i.e. above a certain angle), add scratch texture to vertices
   // the second test excludes concave faces (thanks to Peter Eastman)
   // the third test uses the Probability to decide whether to set the parameter
   rand=new Random();
   if ((faceAngle<tolerance)&&(midDiff.dot(normVec1)>0)&&(rand.nextDouble()<prob/100.0))
   {
      tpVal[edges[i].v1]=1.0;
      tpVal[edges[i].v2]=1.0;
   }
}
// 
// set the new texture
if (!layer)
{
	params=layTexMap.getLayerParameters(0);
	object.setTexture(layTex,layTexMap);
}
else
{
	params=texMap.getLayerParameters(0);
	object.setTexture(objTex,texMap);
}
object.setParameterValue(params[0],paramVal);  // apply it
}
//
//
//  ***DUST*** on upward facing geometry
//
if (wantDust)
{
	//  get textures in scene for dialogue
numT=scene.getNumTextures();
texList=new BComboBox();
tolField=new ValueField(10,ValueField.POSITIVE);
probField=new ValueField(100,ValueField.POSITIVE+ValueField.INTEGER);
for (i=0;i<numT;i++)
{
	texture=scene.getTexture(i);
	texList.add(texture.getName());
}
// display the dialogue and get the settings
widgets=new Widget[]{texList,tolField,probField};
names=new String[]{"Dust Texture to Apply","Apply if Angle From Horizontal <","Probability(%)"};
dial=new ComponentsDialog(window,"Select Parameters for Dust",widgets,names);
tolerance=tolField.getValue();
//
if (!dial.clickedOk()) return;
selTexIndx=texList.getSelectedIndex();
selTex=scene.getTexture(selTexIndx);
//
object=selObj.object;
// get the object's current texture and create a layered texture
// retaining existing mapping
//
objTex=object.getTexture();  
texMap=object.getTextureMapping();
layer=false;
if (texMap instanceof LayeredMapping) layer=true;
//
if (layer)
{
	texMap.addLayer(selTex);
	texMap.setLayerMapping(0,selTex.getDefaultMapping());
	texMap.setLayerMode(0,2); // set top layer to Overlay with Bumps
}
if (!layer)
{ 
	layTex=new LayeredTexture();
	layTexMap=layTex.getDefaultMapping();
	layTexMap.addLayer(objTex);
	layTexMap.setLayerMapping(0,texMap);
	layTexMap.addLayer(selTex);
	layTexMap.setLayerMapping(0,selTex.getDefaultMapping());
	layTexMap.setLayerMode(0,2); // set top layer to Overlay with Bumps
}
//
vert=object.getVertices();
numVert=vert.length;
tpVal=new double[numVert];
//
// determine texture parameters for mapping dirt texture
paramVal=new VertexParameterValue(tpVal);
normals=object.getNormals();
edges=object.getEdges();  //get the edges
faces=object.getFaces(); //get the faces
numFace=faces.length;
numEdge=edges.length;
//
for (i=0;i<numFace;i++)
{
   // get the vertex numbers attached to each face
   vt1=vert[faces[i].v1].r;
   vt2=vert[faces[i].v2].r;
   vt3=vert[faces[i].v3].r;
   //
   //
   // calculate the vector perpendicular to each face and normalise
   normVec=(vt1.minus(vt2)).cross(vt1.minus(vt3));
   normVec.normalize();
   corMat=selObj.coords.fromLocal();
   normVecC=corMat.timesDirection(normVec);
   //
   // calculate angle from horizontal
   faceAngle=Math.acos(normVecC.dot(new Vec3(0,1,0)))*180/Math.PI;
   // if below our tolerance angle, add scratch texture to vertices
   // the second test uses the Probability to decide whether to set the parameter
   rand=new Random();
   if ((faceAngle<tolerance)&&(rand.nextDouble()<prob/100.0))
   {
      tpVal[faces[i].v1]=1.0;
      tpVal[faces[i].v2]=1.0;
      tpVal[faces[i].v3]=1.0;
   }
}
// 
// set the new texture
if (!layer)
{
	params=layTexMap.getLayerParameters(0);
	object.setTexture(layTex,layTexMap);
}
else
{
	params=texMap.getLayerParameters(0);
	object.setTexture(objTex,texMap);
}
object.setParameterValue(params[0],paramVal);  // apply it
}