A better Stochastic..help your self!

["Ian McVicar" <icm63@xxxxxxxxxxx>]

You will need the following third party functions.

JMA and RSX from : http://www.jurikres.com/

I have posted it to gather comments from better minds than mine to improve 
it and and offer alternatives.

It is equal to other commercial stochastics that I have seen, but could do 
so with some work.

Code in Ts2000i:

Inputs: FastKLen(4), Length(12), Phase(0);


Value1 = Lowest(Low, FastKLen);
Value2 = Highest(High, FastKLen) - Value1;
Value3 = close;

If Value2 > 0  Then
	Value4 = ((value3 - Value1) / Value2)* 100
Else
	Value4 = 0;

value20 = JRC.RSX.2k(JRC.JMA.2k(Value4, Length, Phase),7);
Plot1 ( value20);

Please comment

Ian