PS_Plastic Wrap.hlsl

sampler s0 : register(s0);
float4 p0 : register(c0);
float4 p1 : register(c1);

#define width (p0[0])
#define height (p0[1])
#define counter (p0[2])
#define clock (p0[3])
#define one_over_width (p1[0])
#define one_over_height (p1[1])

#define PI acos(-1)
#define angleSteps 13
#define radiusSteps 21
#define totalSteps (radiusSteps * angleSteps)

#define ampFactor 40
#define minRadius (2/width)
#define maxRadius (36/width)

#define angleDelta ((2 * PI) / angleSteps)
#define radiusDelta ((maxRadius - minRadius) / radiusSteps)

float4 main(float2 tex : TEXCOORD0) : COLOR
{

	float4 c0 = tex2D(s0, tex);
	float4 origColor = tex2D(s0, tex);
	float4 accumulatedColor = {0,0,0,0};	

	for (int radiusStep = 1; radiusStep <= radiusSteps; radiusStep++) {
		float radius = minRadius + radiusDelta;

		for (float angle=0; angle <(2*PI); angle += angleDelta) {
			float2 currentCoord;

			float xDiff = radius * cos(angle);
			float yDiff = radius * sin(angle);
			
			currentCoord = tex + float2(xDiff, yDiff);
			float4 currentColor = tex2D(s0, currentCoord);
			float4 colorDiff = c0 - currentColor;

			accumulatedColor += ((radiusSteps+1 - radiusStep) /radiusSteps) * colorDiff / totalSteps;
			
		}
	}
	accumulatedColor *= ampFactor;

	//=-- Edge play
	float luminance = (accumulatedColor.r + accumulatedColor.g + accumulatedColor.b) / 3;
	if (luminance >= 0) {
		c0 = c0  +luminance;
	} else {
		c0 = c0 -  luminance;
	}

	return c0;
}