CC_Counter indicator

["J. Sallen" <pcourt@xxxxxxxxx>]

This indicator counts consecutive closes up and down. Maybe someone can
find a good use for it.  

Jack Sallen
jsallen@xxxxxxxxxxxx and
pcourt@xxxxxxxxx

{Written: J. Sallen 10/03/98}
Inputs: Len(10);
vars: k(0);
Array:CC[100](0);

For K=0 to Len-1 begin
        CC[K] = C[k]-C[k+1];
end;

value2=0;

For K=0 to Len-1 begin
        Value1=CC[k];
	IF value1>0 then value2=value2+1;
	IF value1<0 then value2=value2-1;
end;

plot1(value2,"CC_Count");