source: GTP/branches/IllumWPdeliver2008dec/IlluminationWP/demos/Standalone/Hierarchical Systems Demo [OpenGL]/src/Psystem_Single_Phase.cg @ 3255

struct VertexOut
{
        float4 VertexPosition           :POSITION;
        float2 TexCoord                         :TEXCOORD;
        float4 Position                         :TEXCOORD1;
        float4 EyePosition                      :TEXCOORD2;
        float2 BbSizeAngleCos           :TEXCOORD3;
        float4 LightSpacePos            :TEXCOORD4;     
        float4 Color                            :COLOR0;
};


//
//  Vertex program for displaying particle system with rectangle rendertexture 
//
VertexOut VertexProgram( float4 Position :POSITION,
                                                float4 Texcoord: TEXCOORD,
                                                float4 Color:COLOR0,
                                                uniform float4x4 LightModelViewProj,
                                                uniform float3 LightPosition,
                                                uniform float3 EyePosition,
                                                uniform float4x4 ModelViewProj  :state.matrix.mvp,
                                                uniform float4x4 ModelViewMatrix:state.matrix.modelview
                                                )                                                                       
{
        VertexOut Out;  
                        
        Out.Color=Color;
        
        Out.VertexPosition=mul(ModelViewProj, Position);
        Out.TexCoord=Texcoord.xy;
                        
        float3 LightToPoint=normalize(Position.xyz-LightPosition);
        float3 PointToEye=normalize(EyePosition-Position.xyz); 
        Out.BbSizeAngleCos.y=(dot(LightToPoint,PointToEye)+1)/2;
                
        return Out;     
}

//
//  Fragment program for displaying particle system with rectangle rendertexture
//
void FragmentProgram(   VertexOut       In,
                                                uniform samplerRECT FrontTexture,
                                                uniform samplerRECT PhaseTexture,
                                                uniform float Albedo,
                                                uniform float Transparency,
                                                uniform float Symmetry,
                                                uniform float3 LightColor,
                                                float4 out Color:COLOR                                          
                                        )
{                                       
        float density=texRECT(FrontTexture,In.TexCoord*256).a;
        
        float phase=texRECT(PhaseTexture,float2(Symmetry,In.BbSizeAngleCos.y)*256);
        float realdens=density*Transparency;
        float outcol=realdens*phase*Albedo;
                        
        Color=float4(LightColor*outcol*In.Color.rgb,1-realdens);
                        
}