Difference between revisions of "ShaderLotskirt"

From SimsWiki
Jump to: navigation, search
(EP4-Pets)
(EP5-SS)
Line 1: Line 1:
 
<pre>
 
<pre>
  
−
EP4-Pets
+
EP5-SS
 
0xCD7FE87A
 
0xCD7FE87A
 
0x1C0532FA
 
0x1C0532FA
Line 15: Line 15:
  
 
seti  lotSkirtLayer -6
 
seti  lotSkirtLayer -6
−
 
+
seti kSpring 0
 +
seti kSummer 1
 +
seti kFall  2
 +
seti kWinter 3
 +
set weatherSuffix ""
  
 
# ==============================================================================
 
# ==============================================================================
  
 
define LotSkirtMaterialDefinition()
 
define LotSkirtMaterialDefinition()
 +
  create DetermineHardwareSupport()
 +
  seti snowLevel (tsHasSnow)
 +
  if (($useHWShader2Path or $useHWShader1Path) and $snowLevel > 1)
 +
create LotSkirtMaterialDefinitionVSPS1()
 +
else 
 +
      create LotSkirtMaterialDefinitionFF()
 +
  endif     
 +
enddef
 +
 +
 +
define LotSkirtMaterialDefinitionFF()
  
 
   setb hasColor false
 
   setb hasColor false
Line 37: Line 52:
 
         if ($hasColor)
 
         if ($hasColor)
 
             validateRenderShaderContext -vertexFormat      color  0 required
 
             validateRenderShaderContext -vertexFormat      color  0 required
−
         endif
+
         endif                
−
       
+
               
−
       
+
 
         pass -fixedFunction
 
         pass -fixedFunction
 
             create LightingStates()
 
             create LightingStates()
Line 48: Line 62:
 
             create AttenuatedMatCoef(1.0)
 
             create AttenuatedMatCoef(1.0)
 
             alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
 
             alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
−
             fillmode $stdMatFillMode
+
             fillmode $stdMatFillMode                      
 +
           
 +
            seti currSeason 4
 +
           
 +
            if (tsIsDay)
 +
              seti currSeason (tsSeasonEnum)
 +
              colorScalar (0.965,0.965,1,1)
 +
            else
 +
              colorScalar (0.96,0.96,0.96,1)
 +
            endif
 +
                       
 +
 
 +
            if (not tsIsCloudy)                         
 +
              if ($currSeason = $kFall)
 +
                  colorScalar (1,0.95,0.95,1)
 +
              elseif ($currSeason = $kSpring)
 +
                  colorScalar (1,1,0.98,1)
 +
              elseif ($currSeason = $kWinter)
 +
                  colorScalar (0.965,0.965,1,1)
 +
              elseif ($currSeason = $kSummer)
 +
                  colorScalar (1,1,1,1) #summer
 +
              else
 +
                  colorScalar (0.96,0.96,0.96,1)
 +
              endif
 +
            endif
 
                
 
                
 
             stage
 
             stage
Line 54: Line 92:
 
               textureAddressing tile tile
 
               textureAddressing tile tile
 
               textureBlend multiply(texture diffuse) select(diffuse)
 
               textureBlend multiply(texture diffuse) select(diffuse)
−
             end  
+
            end       
−
         end
+
           
 +
           
 +
            stage
 +
              textureBlend multiply(colorScalar outRegister) select(outRegister)
 +
             end
 +
         end      
 +
       
 +
        seti snowLevel (tsHasSnow)
 +
        seti hailLevel (tsHasHail)
 +
       
 +
        if ($snowLevel >= 1 or $hailLevel >= 1)
 +
            pass -fixedFunction
 +
              alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
 +
             
 +
              create LightingStates()
 +
           
 +
              create AttenuatedMatCoef(1.0)
 +
              fillmode $stdMatFillMode     
 +
              ffDepthOffset 1
 +
              depthTest true -enableDepthWrite false           
 +
              depthTestFunction acceptIfLessOrEqual     
 +
             
 +
              setv2 scaleStage1 (23, 23)
 +
             
 +
              if (tsIsDay)
 +
                  colorScalar (0.5, 0.5, 0.52, 1)
 +
              else
 +
                  colorScalar (0.15, 0.15, 0.375, 1)
 +
              endif
 +
                             
 +
                               
 +
              stage
 +
                  if ($snowLevel = 1)
 +
                    texture "snow-light-pass2"
 +
                    textureAddressing tile tile
 +
                    ffTextureCoordsSource fromPosition
 +
                    ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert             
 +
                    textureBlend select(texture) select(texture)
 +
                  elseif ($hailLevel = 1)
 +
                    texture "hail-ground-surface"
 +
                    setv2 scaleStage1 (4, 4)
 +
                    textureAddressing tile tile
 +
                    ffTextureCoordsSource fromPosition
 +
                    ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert             
 +
                    textureBlend select(texture) select(texture)
 +
                  else
 +
                    texture "snow-ground-diffuse"               
 +
                    setv2 scaleStage1 (2, 2)
 +
                    textureAddressing tile tile
 +
                    ffTextureCoordsSource fromPosition
 +
                    ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert             
 +
                    textureBlend multiply(texture colorScalar) select(colorScalar)
 +
                  endif                                   
 +
              end
 +
             
 +
              if ($snowLevel = 1)             
 +
                  stage
 +
                    texture "snow-light-pass1"
 +
                    textureAddressing tile tile
 +
                    ffTextureMatrix  -cameraToGlobal -scalev (17, 17) -invert
 +
                    ffTextureCoordsSource fromPosition
 +
                    textureBlend add(texture outRegister) add(texture outRegister)
 +
                  end                               
 +
              endif               
 +
             
 +
              if ($hailLevel = 1)             
 +
                  stage
 +
                    texture "hail-ground-surface"
 +
                    textureAddressing tile tile
 +
                    ffTextureMatrix  -cameraToGlobal -scalev (3, 3) -invert
 +
                    ffTextureCoordsSource fromPosition
 +
                    textureBlend add(texture outRegister) add(texture outRegister)
 +
                  end                               
 +
              endif               
 +
             
 +
              if ($snowLevel = 1)
 +
                  if (not tsIsDay)                 
 +
                    stage
 +
                        textureBlend multiply(diffuse outRegister) select(outRegister)
 +
                    end 
 +
                  else
 +
                    stage
 +
                        textureBlend select(outRegister) multiply(outRegister diffuse)
 +
                    end                             
 +
                  endif
 +
              elseif ($snowLevel = 2)                 
 +
                  stage
 +
                    texture "snow-ground-diffuse"
 +
                    textureAddressing tile tile 
 +
                    ffTextureCoordsSource fromPosition
 +
                    ffTextureMatrix -cameraToGlobal -scalev (13, 13) -invert                           
 +
                    textureBlend multiplyAdd(texture colorScalar outRegister) select(diffuse)
 +
                  end         
 +
              else
 +
                  stage
 +
                    textureBlend multiply(diffuse outRegister) multiply(diffuse outRegister)
 +
                  end           
 +
              endif
 +
           
 +
            end 
 +
        endif   
 +
       
 
       end #end shader
 
       end #end shader
 
   end #end material
 
   end #end material
 
enddef
 
enddef
  
 +
define LotSkirtMaterialDefinitionVSPS1()
 +
  material
 +
      shader -layer ($lotSkirtLayer * 8)       
 +
        validateRenderShaderContext -vertexFormat position 0 required
 +
        validateRenderShaderContext -vertexFormat normal 0 required
 +
        validateRenderShaderContext -vertexFormat texcoord 0 required       
 +
       
 +
        create DetermineHardwareSupport()
 +
                         
 +
        pass
 +
            alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
 +
           
 +
            shaderProgram -target vertexProgram -method compile -version 1_1
 +
              bindConstants 0 -bindingID  geomToClip    -constantCount 4       
 +
              bindConstants 4 -bindingID  geomToCamera  -constantCount 3
 +
      bindConstants 7 -bindingID  cameraToGeom  -constantCount 3
 +
      bindConstants 15 -bindingID ambientLight -constantCount 1 -constantType float                        
 +
      bindConstants 18 -bindingID allStandardLightData -constantCount 4 -constantType float      
 +
     
 +
      if (tsIsDay)       
 +
                  bindConstants 10 -bindingID immediateData -data (1, 1, 1, 1)       
 +
              else
 +
                  bindConstants 10 -bindingID immediateData -data (0.46, 0.46, 0.91, 1)       
 +
              endif
 +
             
 +
              bindConstants 12 -bindingID geomToGlobal -constantCount 3
 +
                             
 +
              bindConstants 22 -bindingID cameraToClipWithDepthOffset -constantCount 4 -data(0.5, 0.5, 0.5, 0.5)
 +
     
 +
      shaderSource
 +
        float4x4 modelviewproj : register(c0);
 +
        float4x3 modelview : register(c4);
 +
      float4x3 modelviewInv : register(c7);            
 +
                  // light direction
 +
      float4 lightDir0 : register(c18);
 +
      float4x4 cameraToClipWithDOMatrix : register(c22);
 +
                  float4 ambient : register(c15);                                 
 +
                  float4x3 modelToWorld : register(c12);
 +
           
 +
      struct a2v
 +
                  {
 +
                    float4 pos : POSITION;                   
 +
                    float3 normal : NORMAL;
 +
                    float4 color  : COLOR0;
 +
                  };
  
 +
                  struct v2f
 +
                  {
 +
                    float4 hpos : POSITION;                                         
 +
                  float4 color : COLOR0;                                    
 +
                  float3 worldPos : TEXCOORD0;
 +
                  float2 bumpCoords : TEXCOORD1;                                                                        
 +
                  float3 tanLightDir : TEXCOORD2;                                                     
 +
                  float2 bumpCoords2 : TEXCOORD3;     
 +
                  };
 +
                 
 +
                  v2f VertexMain(a2v IN)
 +
                  {
 +
                  v2f OUT;
 +
 +
                  // vertex position in object space
 +
                  float4 pos = float4(IN.pos.x,IN.pos.y,IN.pos.z,1.0);  
 +
                 
 +
                  float3 tangent = float3(1, 0, 0);
 +
                                   
 +
                  // compute binormal
 +
                  float3 binormal = normalize(cross(IN.normal, tangent));
 +
                 
 +
                  // tangent space matrix
 +
                  float3x3 tbn = float3x3(tangent, binormal, IN.normal);
 +
                 
 +
                  // light direction in object space                  
 +
                  float3 lt0 = mul(lightDir0, (float3x3)modelviewInv);
 +
                 
 +
                  // light 0 direction in tangent space                                    
 +
                  OUT.tanLightDir = normalize(mul(tbn, lt0));
 +
                 
 +
                  float3 worldPos = mul(float4(IN.pos.xyz, 1.0f), modelToWorld);
 +
                  OUT.bumpCoords = float2(worldPos.x, worldPos.y);
 +
                  OUT.bumpCoords2 = float2(worldPos.x, worldPos.y)*0.4f;
 +
                 
 +
                  // compute tangent space view vector
 +
                  // object space view point
 +
                  float3 viewPoint = mul(float4(0, 0, 0, 1), modelviewInv).xyz;
 +
                  float3 viewVecObj = normalize(viewPoint - IN.pos.xyz);
 +
                 
 +
                  // object space light
 +
                  float3 lightDirObj = normalize(mul(lightDir0, (float3x3)modelviewInv));
 +
                 
 +
                  // half angle vector in object space
 +
                  float3 halfWayVector = normalize(lightDirObj + viewVecObj);                  
 +
                 
 +
                  // transform half angle vector to tangent space
 +
                  //OUT.tanHalfAngle.xyz = normalize(mul(tbn, halfWayVector));
 +
                 
 +
                  // specular shadowing term
 +
                  //OUT.tanHalfAngle.w = max(dot(halfWayVector, IN.normal), 0);                  
 +
                 
 +
                  // vertex position in clip space
 +
                  float3 hposView = mul(pos, modelview);
 +
                    OUT.hpos = mul(float4(hposView, 1), cameraToClipWithDOMatrix);                                     
 +
                   
 +
                    // vertex position in world space
 +
                    OUT.worldPos = mul(pos, modelToWorld)/64.0f;                   
 +
                   
 +
                                                                       
 +
                  OUT.color.xyz = ambient.xyz*0.3f;
 +
                  OUT.color.w = IN.color.a;                  
 +
                  return OUT;
 +
                  }
 +
                         
 +
      endShaderSource
 +
            end # end shader program
 +
           
 +
            if ($useHWShader1Path)
 +
              shaderProgram -target pixelProgram -method compile -version 1_1 # -disassemble "c:\sims2ep5\hlslPS1_1.txt"                                                         
 +
            else
 +
              shaderProgram -target pixelProgram -method compile -version ${psVersion}_0
 +
            endif
 +
           
 +
              if (tsIsDay)       
 +
                  bindConstants 0 -bindingID immediateData -data (1.1, 1.1, 1.175, 1)       
 +
              else
 +
                  bindConstants 0 -bindingID immediateData -data (0.35, 0.35, 1.0, 1)       
 +
              endif
 +
                       
 +
           
 +
              shaderSource                       
 +
                  float4 colorFactor : register(c0);
 +
                  sampler normmap;                                                     
 +
                  sampler normmap2;
 +
           
 +
                 
 +
                  struct v2f
 +
                  {
 +
                    float4 hpos : POSITION;                           
 +
                  float4 color : COLOR0;                                        
 +
                  float3 worldPos : TEXCOORD0;             
 +
                  float2 bumpCoords : TEXCOORD1;                                 
 +
                  float3 tanLightDir : TEXCOORD2; 
 +
                  float2 bumpCoords2 : TEXCOORD3;                                    
 +
                  };
 +
 +
                  float4 PixelMain(v2f pi) : COLOR
 +
                  {                                                 
 +
                    float4 normal0 = 2.0f * (tex2D(normmap, pi.bumpCoords) - 0.5f);                       
 +
                    float4 normal1 = 2.0f * (tex2D(normmap2, pi.bumpCoords2) - 0.5f);
 +
                    float4 normal = 0.5f*(normal0+normal1);                       
 +
                    float3 diffuse = saturate(dot(pi.tanLightDir, normal.xyz))*colorFactor.xyz;                                         
 +
                    return float4(float3(diffuse.xyz+ pi.color.xyz), pi.color.a);                       
 +
                  }
 +
              endShaderSource
 +
            end                                           
 +
           
 +
            sampler normmap
 +
              texture "snow-ground-bump"
 +
              textureAddressing tile tile
 +
            end   
 +
           
 +
            sampler normmap2
 +
              texture "snow-ground-bump"
 +
              textureAddressing tile tile
 +
            end                                                         
 +
                                                 
 +
        end # end pass
 +
       
 +
      end #end shader
 +
  end # end material
 +
enddef
  
 
define LotSkirtRoadMaterialDefinition()
 
define LotSkirtRoadMaterialDefinition()
Line 72: Line 379:
 
         validateRenderShaderContext -vertexFormat normal        0 required
 
         validateRenderShaderContext -vertexFormat normal        0 required
 
         validateRenderShaderContext -vertexFormat texcoord      0 required
 
         validateRenderShaderContext -vertexFormat texcoord      0 required
 +
   
  
−
     
+
         setb  hasColor (hasVertexFormat(color,0))
−
         #create DetermineHardwareSupport()
+
       
−
     
+
         if ($hasColor)
−
         #if ($useFixedFunctionPath)
+
              validateRenderShaderContext -vertexFormat  color        0 required
−
 
+
        endif
−
             setb  hasColor (hasVertexFormat(color,0))
+
       
 +
        pass -fixedFunction
 +
             create LightingStates()
 +
            #create LightingStatesNoStdLights()
 +
            create AttenuatedMatCoef(1.0)
 +
            alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
 +
            fillmode $stdMatFillMode
 +
           
 +
            seti currSeason 4
 
              
 
              
−
             if ($hasColor)
+
             if (tsIsDay)
−
                validateRenderShaderContext -vertexFormat  color        0 required
+
              seti currSeason (tsSeasonEnum)
 +
              colorScalar (0.81,0.85,1,1)
 +
            else
 +
              colorScalar (0.83,0.83,0.94,1)
 +
            endif                                   
 +
                       
 +
            if (not tsIsCloudy)
 +
              if ($currSeason = $kFall)
 +
                  colorScalar (0.975,0.82,0.9,1)
 +
              elseif ($currSeason = $kSpring)
 +
                  colorScalar (0.99,1,0.94,1)
 +
              elseif ($currSeason = $kWinter)
 +
                  colorScalar (0.81,0.85,1,1)
 +
              elseif ($currSeason = $kSummer)
 +
                  colorScalar (1,1,1,1) #summer
 +
              else
 +
                  colorScalar (0.83,0.83,0.94,1)
 +
              endif
 
             endif
 
             endif
 
              
 
              
 +
            set weatherSuffix ""
 +
            seti snowLevel (tsHasSnow)             
 +
            if (strstr("$surfaceTexture", "f04") != 0 or strstr("$surfaceTexture", "304") != 0)                             
 +
              if ($snowLevel > 1)                 
 +
                  set weatherSuffix "_HSNOW"
 +
              endif
 +
              if ($snowLevel > 0 and $snowLevel < 2)                 
 +
                  set weatherSuffix "_LSNOW"
 +
              endif
 +
            endif
 +
                       
 +
             
 +
            stage             
 +
              texture "${surfaceTexture}${weatherSuffix}"
 +
              textureAddressing clamp clamp
 +
              textureBlend multiply(texture diffuse) multiply(texture diffuse)
 +
            end
 +
           
 +
            stage
 +
              textureBlend multiply(colorScalar outRegister) select(outRegister)
 +
            end
 +
        end
 +
       
 +
        seti hailLevel (tsHasHail)
 +
        if (tsHasSnow >= 1 or $hailLevel >= 1)
 
             pass -fixedFunction
 
             pass -fixedFunction
−
              create LightingStates()
 
−
              #create LightingStatesNoStdLights()
 
−
              create AttenuatedMatCoef(1.0)
 
 
               alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
 
               alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
−
               fillmode $stdMatFillMode
+
             
 +
               fillmode $stdMatFillMode                    
 +
              depthTest true -enableDepthWrite false           
 +
              depthTestFunction acceptIfLessOrEqual     
 +
             
 +
              if (tsIsDay)
 +
                  colorScalar (1.0, 1.0, 1.0, 1.0) -applyTextureLightColor 0 0
 +
              else
 +
                  colorScalar (0.485, 0.485, 0.6, 1) -applyTextureLightColor 0 0
 +
              endif
 +
             
 +
              setv2 scaleStage1 (23, 23)
 
                    
 
                    
 
               stage
 
               stage
−
                   texture $surfaceTexture
+
                   if ($hailLevel)
−
                  textureAddressing clamp clamp
+
                    texture "hail-ground-surface"
−
                  textureBlend multiply(texture diffuse) multiply(texture diffuse)
+
                    setv2 scaleStage1 (4, 4)
−
              end
+
                  else
−
            end
+
                    texture "snow-light-pass2"
−
        #< else
+
                  endif
−
 
+
                  textureAddressing tile tile
−
            create SetupCommonHWShaderVariablesAndPredicates()
+
                  ffTextureCoordsSource fromPosition
−
 
+
                  ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert             
−
            if ($hasColor)
+
−
              vertexFormatPred color        0 true
+
−
            endif
+
−
           
+
−
 
+
−
            pass
+
−
              create NonStandardLighting()
+
−
 
+
−
              fillmode $stdMatFillMode
+
−
 
+
−
              alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
+
−
 
+
−
              shaderProgram -target vertexProgram -method link
+
−
                  create BindsForHardwareVS1Transforms(false false)
+
−
                  create BindsForLighting($kFullLighting)
+
 
                    
 
                    
−
                  # override diffuse, since DX8 path divs by 2.
+
                   if (not tsIsDay)
−
                 
+
                     textureBlend multiply(texture diffuse) multiply(texture diffuse)
−
                  shaderFragment TransformRigidForLighting1_1
+
−
 
+
−
                 
+
−
                   if ($totalLights)
+
−
                     bindConstants 14 -bindingID immediateData -data (2,2,2,1)
+
−
 
+
−
                    shaderFragment TransformRigidForLighting1_1
+
−
                    create DX8DiffusePassLightFragments(true  false 0 $totalLights $distantLightCount $pointLightCount $spotLightCount 1_1)
+
−
                    shaderFragment CopyVertexAlphaToDiffuse1_1
+
−
                    stage
+
−
                        texture $surfaceTexture
+
−
                        textureAddressing tile tile
+
−
                        textureBlend multiply(texture diffuse) multiply(texture diffuse)
+
−
                    end
+
 
                   else
 
                   else
−
                      
+
                     textureBlend select(texture) multiply(texture diffuse)
−
                    # eyeballed this value to sorta make the sidewalks match.
+
                  endif
−
                    # grass is still dark, road matches ok.
+
              end                                                                                             
−
                   
+
            end       
−
                    bindConstants 14 -bindingID immediateData -data (0.8,0.82,0.88,1)
+
        endif
 +
 
  
−
                    shaderFragment TransformPositionRigidNoLighting1_1
 
−
                    shaderFragment Copy2DTexcoords1_1
 
−
                    shaderFragment AmbientLightingVertexColorMaterial1_1
 
−
                   
 
−
                    stage
 
−
                        texture $surfaceTexture
 
−
                        textureAddressing tile tile
 
−
                        textureBlend multiply(texture diffuse) multiply(texture diffuse)
 
−
                    end
 
−
                  endif
 
−
             
 
−
              end
 
−
           
 
−
           
 
−
            end #end pass
 
−
        endif     
 
−
               
 
−
        #>
 
 
       end
 
       end
 
   end
 
   end

Revision as of 18:22, 22 April 2007


EP5-SS
0xCD7FE87A
0x1C0532FA
0x0C50FBBF
0xFF439C10
# lotskirt

#
# Shaders for lot skirt
#
#


seti  lotSkirtLayer -6
seti kSpring 0
seti kSummer 1
seti kFall   2
seti kWinter 3
set weatherSuffix ""

# ==============================================================================

define LotSkirtMaterialDefinition()
   create DetermineHardwareSupport()
   seti snowLevel (tsHasSnow)
   if (($useHWShader2Path or $useHWShader1Path) and $snowLevel > 1)
		create LotSkirtMaterialDefinitionVSPS1()		
	else   
      create LotSkirtMaterialDefinitionFF()
   endif      
enddef


define LotSkirtMaterialDefinitionFF()

   setb hasColor false
   seti totalLights 0

   material
      setc stdMatDiffCoef $terrainMatDiffCoef
      
      shader -layer ($lotSkirtLayer * 8)
         validateRenderShaderContext -vertexFormat position      0 required
         validateRenderShaderContext -vertexFormat normal        0 required
         validateRenderShaderContext -vertexFormat texcoord      0 required

      
         # not all lots seem to have this data, causing validation errors, making this a dynamic predicate solves this problem.
         setb  hasColor (hasVertexFormat(color,0))
         if ($hasColor)
            validateRenderShaderContext -vertexFormat      color   0 required
         endif                  
                
         pass -fixedFunction
            create LightingStates()
            
            depthTestFunction acceptIfLessOrEqual
            ffDepthOffset -1

            create AttenuatedMatCoef(1.0)
            alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
            fillmode $stdMatFillMode                        
            
            seti currSeason 4
            
            if (tsIsDay)
               seti currSeason (tsSeasonEnum)
               colorScalar (0.965,0.965,1,1)
            else
               colorScalar (0.96,0.96,0.96,1) 
            endif
                        

            if (not tsIsCloudy)                           
               if ($currSeason = $kFall)
                  colorScalar (1,0.95,0.95,1)
               elseif ($currSeason = $kSpring)
                  colorScalar (1,1,0.98,1)
               elseif ($currSeason = $kWinter)
                  colorScalar (0.965,0.965,1,1)
               elseif ($currSeason = $kSummer)
                  colorScalar (1,1,1,1) #summer
               else
                  colorScalar (0.96,0.96,0.96,1) 
               endif
            endif
               
            stage
               texture $surfaceTexture
               textureAddressing tile tile
               textureBlend multiply(texture diffuse) select(diffuse)
            end        
            
            
            stage
               textureBlend multiply(colorScalar outRegister) select(outRegister)
            end
         end       
        
        seti snowLevel (tsHasSnow)
        seti hailLevel (tsHasHail)
        
        if ($snowLevel >= 1 or $hailLevel >= 1)
            pass -fixedFunction
               alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
               
               create LightingStates()
            
               create AttenuatedMatCoef(1.0)
               fillmode $stdMatFillMode      
               ffDepthOffset 1
               depthTest true -enableDepthWrite false            
               depthTestFunction acceptIfLessOrEqual      
               
               setv2 scaleStage1 (23, 23)
               
               if (tsIsDay)
                  colorScalar (0.5, 0.5, 0.52, 1)
               else
                  colorScalar (0.15, 0.15, 0.375, 1)
               endif
                              
                                 
               stage
                  if ($snowLevel = 1)
                     texture "snow-light-pass2"
                     textureAddressing tile tile
                     ffTextureCoordsSource fromPosition
                     ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert               
                     textureBlend select(texture) select(texture)
                  elseif ($hailLevel = 1)
                     texture "hail-ground-surface"
                     setv2 scaleStage1 (4, 4)
                     textureAddressing tile tile
                     ffTextureCoordsSource fromPosition
                     ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert               
                     textureBlend select(texture) select(texture)
                  else
                     texture "snow-ground-diffuse"                 
                     setv2 scaleStage1 (2, 2)
                     textureAddressing tile tile
                     ffTextureCoordsSource fromPosition
                     ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert               
                     textureBlend multiply(texture colorScalar) select(colorScalar)
                  endif                                    
               end
               
               if ($snowLevel = 1)              
                  stage
                     texture "snow-light-pass1"
                     textureAddressing tile tile
                     ffTextureMatrix  -cameraToGlobal -scalev (17, 17) -invert
                     ffTextureCoordsSource fromPosition
                     textureBlend add(texture outRegister) add(texture outRegister)
                  end                                 
               endif                 
               
               if ($hailLevel = 1)              
                  stage
                     texture "hail-ground-surface"
                     textureAddressing tile tile
                     ffTextureMatrix  -cameraToGlobal -scalev (3, 3) -invert
                     ffTextureCoordsSource fromPosition
                     textureBlend add(texture outRegister) add(texture outRegister)
                  end                                 
               endif                 
               
               if ($snowLevel = 1)
                  if (not tsIsDay)                  
                     stage 
                        textureBlend multiply(diffuse outRegister) select(outRegister)
                     end  
                  else
                     stage 
                        textureBlend select(outRegister) multiply(outRegister diffuse)
                     end                               
                  endif
               elseif ($snowLevel = 2)                  
                  stage 
                     texture "snow-ground-diffuse"
                     textureAddressing tile tile  
                     ffTextureCoordsSource fromPosition
                     ffTextureMatrix -cameraToGlobal -scalev (13, 13) -invert                            
                     textureBlend multiplyAdd(texture colorScalar outRegister) select(diffuse)
                  end          
               else
                  stage 
                     textureBlend multiply(diffuse outRegister) multiply(diffuse outRegister)
                  end             
               endif
             
            end   
         endif     
         
      end #end shader
   end #end material
enddef

define LotSkirtMaterialDefinitionVSPS1()
   material
      shader -layer ($lotSkirtLayer * 8)         
         validateRenderShaderContext -vertexFormat position 0 required
         validateRenderShaderContext -vertexFormat normal 0 required
         validateRenderShaderContext -vertexFormat texcoord 0 required         
         
         create DetermineHardwareSupport()
                          
         pass 
            alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
            
            shaderProgram -target vertexProgram -method compile -version 1_1
               bindConstants 0 -bindingID  geomToClip     -constantCount 4        
               bindConstants 4 -bindingID  geomToCamera   -constantCount 3
			      bindConstants 7 -bindingID  cameraToGeom   -constantCount 3			
			      bindConstants 15 -bindingID ambientLight -constantCount 1 -constantType float	                   			      
			      bindConstants 18 -bindingID allStandardLightData -constantCount 4 -constantType float			      
			      
			      if (tsIsDay)         
                  bindConstants 10 -bindingID immediateData -data (1, 1, 1, 1)         
               else
                  bindConstants 10 -bindingID immediateData -data (0.46, 0.46, 0.91, 1)         
               endif
               
               bindConstants 12 -bindingID geomToGlobal -constantCount 3
                              
               bindConstants 22 -bindingID cameraToClipWithDepthOffset -constantCount 4 -data(0.5, 0.5, 0.5, 0.5) 
			      
			      shaderSource
			         float4x4 modelviewproj : register(c0);
			         float4x3 modelview : register(c4);
				      float4x3 modelviewInv : register(c7);				      				      
                  // light direction
				      float4 lightDir0 : register(c18);
				      float4x4 cameraToClipWithDOMatrix : register(c22);
                  float4 ambient : register(c15);                                   
                  float4x3 modelToWorld : register(c12);
				      				      
				      struct a2v 
                  {
                     float4 pos		: POSITION;                     
                     float3 normal	: NORMAL;
                     float4 color   : COLOR0;
                  };

                  struct v2f
                  {
                     float4 hpos		 : POSITION;                                          
	                  float4 color : COLOR0;	                  	                  
	                  float3 worldPos : TEXCOORD0;
	                  float2 bumpCoords : TEXCOORD1;	                  	                  	                  	                  
	                  float3 tanLightDir : TEXCOORD2;    	               	                         	            
	                  float2 bumpCoords2 : TEXCOORD3;      
                  };
                  
                  v2f VertexMain(a2v IN)
                  {
	                  v2f OUT;

	                  // vertex position in object space
	                  float4 pos = float4(IN.pos.x,IN.pos.y,IN.pos.z,1.0);	  
	                  
	                  float3 tangent = float3(1, 0, 0);
	                  	                  
	                  // compute binormal
	                  float3 binormal = normalize(cross(IN.normal, tangent));
	                  
	                  // tangent space matrix
	                  float3x3 tbn = float3x3(tangent, binormal, IN.normal);
	                  
	                  // light direction in object space	                  
	                  float3 lt0 = mul(lightDir0, (float3x3)modelviewInv);
	                  
	                  // light 0 direction in tangent space	                  	                  
	                  OUT.tanLightDir = normalize(mul(tbn, lt0));
	                  
	                  float3 worldPos = mul(float4(IN.pos.xyz, 1.0f), modelToWorld);
	                  OUT.bumpCoords = float2(worldPos.x, worldPos.y);
	                  OUT.bumpCoords2 = float2(worldPos.x, worldPos.y)*0.4f;
	                  
	                  // compute tangent space view vector
	                  // object space view point
	                  float3 viewPoint = mul(float4(0, 0, 0, 1), modelviewInv).xyz;
	                  float3 viewVecObj = normalize(viewPoint - IN.pos.xyz);
	                  
	                  // object space light
	                  float3 lightDirObj = normalize(mul(lightDir0, (float3x3)modelviewInv));
	                  
	                  // half angle vector in object space
	                  float3 halfWayVector = normalize(lightDirObj + viewVecObj);	                  
	                  
	                  // transform half angle vector to tangent space
	                  //OUT.tanHalfAngle.xyz = normalize(mul(tbn, halfWayVector));
	                  
	                  // specular shadowing term
	                  //OUT.tanHalfAngle.w = max(dot(halfWayVector, IN.normal), 0);	                  
	                  
	                  // vertex position in clip space
	                  float3 hposView = mul(pos, modelview);
                     OUT.hpos = mul(float4(hposView, 1), cameraToClipWithDOMatrix);                     	                   
                     
                     // vertex position in world space
                     OUT.worldPos = mul(pos, modelToWorld)/64.0f;                     
                     
	                  	                                    		                  
	                  OUT.color.xyz = ambient.xyz*0.3f;
	                  OUT.color.w = IN.color.a;	                  
	                  return OUT;
                  }
                  			         
			      endShaderSource
            end # end shader program
            
            if ($useHWShader1Path)
               shaderProgram -target pixelProgram -method compile -version 1_1 # -disassemble "c:\sims2ep5\hlslPS1_1.txt"                                                          
            else
               shaderProgram -target pixelProgram -method compile -version ${psVersion}_0 
            endif
            
               if (tsIsDay)         
                  bindConstants 0 -bindingID immediateData -data (1.1, 1.1, 1.175, 1)         
               else
                  bindConstants 0 -bindingID immediateData -data (0.35, 0.35, 1.0, 1)         
               endif
                        
            
               shaderSource                         
                  float4 colorFactor : register(c0);
                  sampler normmap;                                                      
                  sampler normmap2;
            
                  
                  struct v2f
                  { 
                     float4 hpos	: POSITION;                             
	                  float4 color : COLOR0;	                     	                     
	                  float3 worldPos : TEXCOORD0;              
	                  float2 bumpCoords : TEXCOORD1;               	                     
	                  float3 tanLightDir : TEXCOORD2;  
	                  float2 bumpCoords2 : TEXCOORD3; 	   	                     	              
                  };

                  float4 PixelMain(v2f pi) : COLOR
                  {                                                  
                     float4 normal0 = 2.0f * (tex2D(normmap, pi.bumpCoords) - 0.5f);                        
                     float4 normal1 = 2.0f * (tex2D(normmap2, pi.bumpCoords2) - 0.5f);
                     float4 normal = 0.5f*(normal0+normal1);                        
                     float3 diffuse = saturate(dot(pi.tanLightDir, normal.xyz))*colorFactor.xyz;                                          
                     return float4(float3(diffuse.xyz+ pi.color.xyz), pi.color.a);                        
                  }
               endShaderSource
            end                                            
            
            sampler normmap
               texture "snow-ground-bump"
               textureAddressing tile tile
            end    
            
            sampler normmap2
               texture "snow-ground-bump"
               textureAddressing tile tile
            end                                                           
                                                   
         end # end pass
         
      end #end shader
   end # end material
enddef

define LotSkirtRoadMaterialDefinition()
   
   setb hasColor false
   seti totalLights 0

   material
      shader -layer ($lotSkirtLayer * 8)
         validateRenderShaderContext -vertexFormat position      0 required
         validateRenderShaderContext -vertexFormat normal        0 required
         validateRenderShaderContext -vertexFormat texcoord      0 required
     

         setb  hasColor (hasVertexFormat(color,0))
         
         if ($hasColor)
               validateRenderShaderContext -vertexFormat  color         0 required
         endif
         
         pass -fixedFunction
            create LightingStates()
            #create LightingStatesNoStdLights()
            create AttenuatedMatCoef(1.0)
            alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
            fillmode $stdMatFillMode
            
            seti currSeason 4
            
            if (tsIsDay)
               seti currSeason (tsSeasonEnum)
               colorScalar (0.81,0.85,1,1)
            else
               colorScalar (0.83,0.83,0.94,1) 
            endif                                    
                        
            if (not tsIsCloudy)
               if ($currSeason = $kFall)
                  colorScalar (0.975,0.82,0.9,1)
               elseif ($currSeason = $kSpring)
                  colorScalar (0.99,1,0.94,1)
               elseif ($currSeason = $kWinter)
                  colorScalar (0.81,0.85,1,1)
               elseif ($currSeason = $kSummer)
                  colorScalar (1,1,1,1) #summer
               else
                  colorScalar (0.83,0.83,0.94,1) 
               endif
            endif
            
            set weatherSuffix ""
            seti snowLevel (tsHasSnow)               
            if (strstr("$surfaceTexture", "f04") != 0 or strstr("$surfaceTexture", "304") != 0)                              
               if ($snowLevel > 1)                  
                  set weatherSuffix "_HSNOW"
               endif
               if ($snowLevel > 0 and $snowLevel < 2)                  
                  set weatherSuffix "_LSNOW"
               endif
            endif
                        
               
            stage               
               texture "${surfaceTexture}${weatherSuffix}"						
               textureAddressing clamp clamp
               textureBlend multiply(texture diffuse) multiply(texture diffuse)
            end 
            
            stage
               textureBlend multiply(colorScalar outRegister) select(outRegister)
            end
         end
         
         seti hailLevel (tsHasHail)
         if (tsHasSnow >= 1 or $hailLevel >= 1)
            pass -fixedFunction
               alphaBlend srcFactor(srcAlpha) add dstFactor(invSrcAlpha)
               
               fillmode $stdMatFillMode                     
               depthTest true -enableDepthWrite false            
               depthTestFunction acceptIfLessOrEqual      
               
               if (tsIsDay)
                  colorScalar (1.0, 1.0, 1.0, 1.0) -applyTextureLightColor 0 0
               else
                  colorScalar (0.485, 0.485, 0.6, 1) -applyTextureLightColor 0 0
               endif
               
               setv2 scaleStage1 (23, 23)
                  
               stage
                  if ($hailLevel)
                     texture "hail-ground-surface"
                     setv2 scaleStage1 (4, 4)
                  else
                     texture "snow-light-pass2"
                  endif
                  textureAddressing tile tile
                  ffTextureCoordsSource fromPosition
                  ffTextureMatrix -cameraToGlobal -scalev $scaleStage1 -invert               
                  
                  if (not tsIsDay)
                     textureBlend multiply(texture diffuse) multiply(texture diffuse)
                  else
                     textureBlend select(texture) multiply(texture diffuse)
                  endif
               end                                                                                               
            end        
         endif


      end
   end
enddef

define LotSkirtRoadMaterialInstance(materialName textureName)
   materialDefinition &materialName
      setDefinition LotSkirtRoadMaterialDefinition
      addParam surfaceTexture &textureName
   end
enddef

define LotSkirtBoundaryClipMaterial()
   material
      shader -layer (($lotSkirtLayer - 1) * 8)
         pass -fixedFunction -clipAlways
            colorScalar (1, 1, 1, 1)
            depthTest true -enableDepthWrite true
            alphaBlend srcFactor(destColor) add dstFactor(zero)            
            depthTestFunction acceptIfLess
				cullmode cullCounterClockwise
            stage
               textureBlend select(colorScalar) select(colorScalar)				
            end
         end
      end
   end
enddef

materialDefinition lotSkirtBoundaryClip
   setDefinition LotSkirtBoundaryClipMaterial
end

# ==============================================================================
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Desert_00005700 lotskirtroad_desert_00005704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Desert_00020700 lotskirtroad_desert_00020704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Desert_00000f00 lotskirtroad_desert_00000f04)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Desert_00000300 lotskirtroad_desert_00000304)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Desert_00004b00 lotskirtroad_desert_00004b04)

create LotSkirtRoadMaterialInstance(lotSkirtRoad_Temperate_00005700 lotskirtroad_temperate_00005704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Temperate_00020700 lotskirtroad_temperate_00020704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Temperate_00000f00 lotskirtroad_temperate_00000f04)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Temperate_00000300 lotskirtroad_temperate_00000304)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Temperate_00004b00 lotskirtroad_temperate_00004b04)

create LotSkirtRoadMaterialInstance(lotSkirtRoad_European_00005700 lotskirtroad_european_00005704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_European_00020700 lotskirtroad_european_00020704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_European_00000f00 lotskirtroad_european_00000f04)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_European_00000300 lotskirtroad_european_00000304)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_European_00004b00 lotskirtroad_european_00004b04)

create LotSkirtRoadMaterialInstance(lotSkirtRoad_Dirt_00005700 lotskirtroad_dirt_00005704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Dirt_00020700 lotskirtroad_dirt_00020704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Dirt_00000f00 lotskirtroad_dirt_00000f04)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Dirt_00000300 lotskirtroad_dirt_00000304)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Dirt_00004b00 lotskirtroad_dirt_00004b04)

create LotSkirtRoadMaterialInstance(lotSkirtRoad_Concrete_00005700 lotskirtroad_concrete_00005704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Concrete_00020700 lotskirtroad_concrete_00020704)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Concrete_00000f00 lotskirtroad_concrete_00000f04)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Concrete_00000300 lotskirtroad_concrete_00000304)
create LotSkirtRoadMaterialInstance(lotSkirtRoad_Concrete_00004b00 lotskirtroad_concrete_00004b04)
Retrieved from "http://simswiki.info/index.php?title=ShaderLotskirt&oldid=17154"
Personal tools
Namespaces

Variants
Actions
Navigation
game select
Toolbox