source: GTP/trunk/App/Demos/Illum/IBRBillboardCloudTrees/OGRE/IBRTreesOGRE/media/oldgeneral/tree_idtexturing_spotlight_fp.shd @ 1493

float shininess;
float nearDistance;
float farDistance;
float tex_atlas_size;
float scale_factor;
float3 lDiffuseColor;
float3 lSpecularColor;
float3 lattenuation;
float4 gambient;
float Ka;
float Kd;
float Ks;
sampler orderFrontBack: register(s0);
sampler leaf: register(s1);
sampler shadowMap: register(s6);
sampler spotLight: register(s2);
sampler normalMap: register(s3);
sampler ob_front_face: register(s4);
sampler ob_back_face: register(s5);
float shadowBias = 0.0;
float backProjectionCut = 0.01;
float exposure;
float4x4 worldmatrix;

//float4 main_fp(float2 texCoord: TEXCOORD0, float2 texCoordNormalized: TEXCOORD1) : COLOR
//{
//      // DirectX
//      return float4((tex2D(orderFrontBack, texCoord).w > 0.0) ? tex2D(leaf,((texCoordNormalized - tex2D(orderFrontBack, texCoord).xy) + float2(0.0,0.0)) * 4.0) : 0.0);
//}

float4 main_fp(float reg: VFACE, float3 normal: TEXCOORD0, float3 lightVec: TEXCOORD1, float4 halfvec: TEXCOORD2, float4 shadowCrd: TEXCOORD3,
//float4 main_fp(float3 normal: TEXCOORD0, float3 lightVec: TEXCOORD1, float4 halfvec: TEXCOORD2, float4 shadowCrd: TEXCOORD3,
float4 texCoord: TEXCOORD4, float4 texCoordNormalized: TEXCOORD5,float4 lightVecNormalMapping: TEXCOORD6, float backside: TEXCOORD7) : COLOR
{
   float4 leafColor;
   float4 ocolor;

   // The normals are not correct if we change the orientation of the impostor tree
   //----------------------------------------------------------------------------
   // Using normalmap, the vertex normal is not used...
   float2 coords = ((texCoordNormalized - tex2D(orderFrontBack, texCoord).xy) + tex2D(orderFrontBack, texCoord).zw) * 4.0;
   //normal = tex2D(normalMap,coords);
   // The values are from 0..255, so I should convert them from [0,255] to [0,1]
   // and convert from [0,1] to [-1,1]
   //normal = float3(1.0,1.0,1.0) - normal * 2.0;
   //normal = mul(worldmatrix,normal);
   //----------------------------------------------------------------------------
   
   normal = normalize(normal);
   // Front and Back faces lighted, not needed because we
   // correct the orientation in the vertex program.
   //normal = (backside == 0.0) ? -normal : normal;
   normal = (reg > 0.0) ? normal : -normal;

   //float4 obsColor = (backside == 1.0) ? float4(tex2D(ob_front_face,texCoord).xyz,1.0) : float4(tex2D(ob_back_face,texCoord).xyz,1.0);
   //float4 obsColor = (backside == 0.0) ? float4(tex2D(ob_front_face,texCoord).xyzw)
   //float4 obsColor = (backside == 0.0) ? float4(tex2D(ob_front_face,texCoord).xxxw)  :  float4(tex2D(ob_front_face,texCoord).yyyw);
   //float4 obsColor = (reg > 0.0) ? float4(tex2D(ob_front_face,texCoord).xxxw) : float4(tex2D(ob_front_face,texCoord).yyyw);

   // Radial distance
   float depth = length(lightVec.xyz);

   // Standard lighting
   // Using the standard normals in Object-space
   lightVec = normalize(lightVec);

   //float lDiffuseAttenuation = saturate(dot(lightVec,normal));
   //float lSpecularAttenuation = pow(saturate(dot(reflect(-normalize(lightVecNormalMapping),normal),lightVec)),shininess);
   float lDiffuseAttenuation = max(dot(lightVec,normal),0.0); 
   float lSpecularAttenuation = pow(max(dot(reflect(-normalize(lightVecNormalMapping),normal),lightVec),0.0),shininess);



   // Using the normal_map in Tangent-space
   //float lDiffuseAttenuation = clamp(0.0,1.0,dot(normal,lightVecNormalMapping));
   //float lSpecularAttenuation = pow(clamp(0.0,1.0,dot(normal,halfvec)),shininess);

   // The depth of the fragment closest to the light
   float4 shadowMapValue = tex2Dproj(shadowMap, shadowCrd).xyzw;

   // A spot image of the spotlight
   float spotLight = tex2Dproj(spotLight, shadowCrd);
   // If the depth is larger than the stored depth, this fragment
   // is not the closest to the light, that is we are in shadow.
   // Otherwise, we're lit. Add a bias to avoid precision issues
   float shadow;
   shadow = (depth < shadowMapValue.w + shadowBias);

   // Cut back-projection, that is, make sure we don't lit
   // anything behind the light. Theoretically, you should just
   // cut at w = 0, but in practice you'll have to cut at a
   // fairly high positive number to avoid precision issue when
   // coordinates approaches zero. 
   shadow *= (shadowCrd.w > backProjectionCut);
   // Modulate with spotlight image
   shadow *= spotLight + 0.8;
   

   // Shadow any light contribution except ambient
   // green test
   //leafColor.xyz = float3(0.0,0.5,0.2);
   
   leafColor = (tex2D(orderFrontBack,texCoord).w > 0.0) ? tex2D(leaf,coords) : 0.0;

   
   //shadow = 0.2 - clamp(0.0,0.2,shadow);
   //leafColor = float4(leafColor.xyz - float3(shadow,shadow,shadow),leafColor.w);
   //
   //leafColor = (depth < 2000 && depth > 500) ? float4(1.0,0.0,0.0,leafColor.w) : float4(0.0,1.0,0.0,leafColor.w);
   //leafColor = (shadowMapValue * 1000.0 < 2000 && shadowMapValue * 1000.0 > 500.0) ? float4(1.0,0.0,0.0,leafColor.w) : float4(0.0,1.0,0.0,leafColor.w);
   //leafColor = (shadowMapValue * 1000.0 < depth) ? float4(leafColor.xyz * 0.5,leafColor.w) : float4(leafColor.xyz,leafColor.w);

   //leafColor = float4((Ka*(obsColor.xyz * 0.005)) + (Kd*(lDiffuseAttenuation * leafColor.xyz * lDiffuseColor)) + (Ks * (lSpecularAttenuation * lSpecularColor)) ,leafColor.w);           
   //leafColor = float4((Ka*(gambient.xyz)) + (Kd*(lDiffuseAttenuation * leafColor.xyz * lDiffuseColor)) + (Ks * (lSpecularAttenuation * lSpecularColor)) ,leafColor.w);           
   //leafColor = float4((Ka*(gambient.xyz)) + (Kd*(lDiffuseAttenuation * leafColor.xyz * lDiffuseColor)) + float3(shadow,shadow,shadow)*0.2 + (Ks * (lSpecularAttenuation * lSpecularColor)) ,leafColor.w);        
   //leafColor = float4(obsColor.xyz * 0.005,leafColor.w);

   // Look the different leaves orientations used...
   //leafColor = (tex2D(orderFrontBack, texCoord).x >= 0.0) ? float4(tex2D(orderFrontBack, texCoord).zw,1.0,1.0) : 0.0;
   // Check the AATexQuads of the leaves...
   //leafColor = (tex2D(orderFrontBack, texCoord).x >= 0.0) ? float4(tex2D(orderFrontBack, texCoord).xy,1.0,1.0) : 0.0;
   
   // Shows each side the front and the back side...
   //leafColor = (reg > 0.0) ? float4(1.0,0.0,0.0,leafColor.w) : float4(0.0,1.0,0.0,leafColor.w);
   
   //leafColor = float4(leafColor.xyz*0.6 + ( leafColor.xyz ) * (shadow),leafColor.w);  
   //leafColor = float4(color.xyz, 1.0) * (float4(intensity,1.0) * float4(aux.rgb / aux.a, 1.0) + shadow * float4(diffuse,0.0));
   
   //leafColor = float4(leafColor.xyz,leafColor.w) * float4(gambient.xyz * (1.0 - exp(-exposure * obsColor.xyz)), 1.0) + shadow * float4((Kd*leafColor.xyz*(lDiffuseAttenuation * lDiffuseColor)),0.0) +  float4(Ks * (lSpecularAttenuation * lSpecularColor),0.0);
   //leafColor = float4(leafColor.xyz,leafColor.w) * float4(gambient.xyz, 1.0) + float4((shadow * Kd*leafColor.xyz*(lDiffuseAttenuation * lDiffuseColor)),0.0) +  float4(Ks * (lSpecularAttenuation * lSpecularColor),0.0);
   //leafColor = float4(leafColor.xyz,leafColor.w) * float4(Ka * gambient.xyz, 1.0) + float4((Kd*leafColor.xyz*(lDiffuseColor)),0.0) +  float4(Ks * (lSpecularAttenuation * lSpecularColor),0.0);

        
   leafColor =  float4(0.0,0.0,0.0,leafColor.w)
                +  float4(Ka * gambient.xyz * leafColor.xyz,0.0)
                ////+ float4(Kd * lDiffuseAttenuation * leafColor.xyz * lDiffuseColor,0.0); 
                + float4(Kd * lDiffuseAttenuation * leafColor.xyz,0.0) 
                //+ float4(Ks * lSpecularAttenuation * lSpecularColor,0.0);
                + float4(Ks * lSpecularAttenuation * leafColor.xyz,0.0);

   //leafColor = float4(lDiffuseAttenuation.xxx,leafColor.w);
   //leafColor.xyz = float4(float4(gambient.xyz * (1.0 - exp(-exposure * obsColor.xyz)), 0.0) + (float4((Kd*(lDiffuseAttenuation * lDiffuseColor)),0.0) +  float4(Ks * (lSpecularAttenuation * lSpecularColor),0.0)) * leafColor.xyzw).xyz;
   
   //leafColor = float4(leafColor.xyz,leafColor.w) * float4(gambient.xyz + (exp(-exposure * obsColor.xyz)), 1.0) + shadow * float4((Kd*leafColor.xyz*(lDiffuseAttenuation * lDiffuseColor)),0.0) +  float4(Ks * (lSpecularAttenuation * lSpecularColor),0.0);
   //leafColor.xyz = gambient * ( 1.0 - (exp(-exposure * (obsColor.xyz/obsColor.w))) ) + ( 1.0 - (exp(-exposure * (obsColor.xyz/obsColor.w))) ) + leafColor.xyzw * (float4((Kd*(lDiffuseAttenuation * lDiffuseColor * leafColor.xyz)),0.0) +  float4(Ks * (lSpecularAttenuation * lSpecularColor),0.0));
   //if (leafColor.w > 0)
   //{
   //   leafColor = float4(1.0 - (exp(-exposure * (obsColor.xyz/obsColor.w))),1.0);
   //}
   //else
   //{
   //   leafColor = float4(0.0,1.0,0.0,1.0);
   //}
   //leafColor = float4(1.0 - (exp(-exposure * (obsColor.xyz/obsColor.w))),1.0);
   //leafColor = float4(1.0 - (exp(-exposure * (obsColor.xyz/obsColor.w))),leafColor.w);

   //leafColor = float4(1.0 - (exp(-exposure * (obsColor.xyz/obsColor.w))),1.0);
   //leafColor = float4(1.0 - (obsColor.xyz/obsColor.w) * 2.0, leafColor.w);
   //depth = depth / 4000.0;
   //depth = -depth;
   //leafColor = float4(depth.xxx,leafColor.w); 
   //leafColor = float4(shadowMapValue.www,leafColor.w);        
   //leafColor = float4(shadow.xxx,leafColor.w);        

   // This proves that the depth is GREATER than the value of the shadow_map
   // Without normalizing between the far and near planes distance...
   //leafColor = float4(float3(1.0,1.0,1.0)-s 
   //leafColor = float4(shadow.xxx,leafColor.w);
      
   // Normalizing between far and near planes distance...
   //leafColor = ((shadowMapValue + shadowBias) > 0.5) ? float4(1.0,0.0,0.0,leafColor.w) : float4(0.0,1.0,0.0,leafColor.w);
      
   //leafColor = float4(leafColor.xyz * depth,leafColor.w);
   //leafColor = float4(leafColor.xyz * depth,leafColor.w);
   //leafColor = float4(normal,leafColor.w);
   

   //leafColor = (tex2D(orderFrontBack,texCoord).w > 0.0) ? tex2D(leaf,coords) : 0.0;
   // LIGHT DIRECTION DEBUG...
   //if (lightVec.z > 0.5)
   //{
   //   leafColor = float4(1.0,0.0,0.0,leafColor.w);
   //}
   //else
   //{
   //   leafColor = float4(0.0,0.0,1.0,leafColor.w);
   //}
   // CAMERA DIRECTION DEBUG...
   //leafColor = float4(lightVecNormalMapping.xyz,leafColor.w);
   // AMBIENT DEGUB....
   //leafColor = float4(Ka * gambient.xyz * leafColor.xyz,leafColor.w);
   ocolor = leafColor;
   return  ocolor;
}