|
PureBytes Links
Trading Reference Links
|
Guess I should have looked at the code before I passed it on. Have this bad habit of copying almost anything I see for later use. (And yes,I write my own also. Probably bad too.) But at least I got a bunch of your attention and got more code to add to my list :-)
Randy
In a message dated Wed, 31 Jul 2002 1:34:29 AM Eastern Standard Time, prosys@xxxxxxxxxxxxxxxx writes:
>
> I just might frame this code.....
> it potentially could be the most horrifically, inefficiently coded piece of
> Easy Language in the history of ...
> Tradestation.
>
> (See what I meant Alex...about few really good coders out
> there ?)
>
>
> > -----Original Message-----
> > From: rghstocks@xxxxxxx [mailto:rghstocks@xxxxxxx]
> > Sent: Tuesday, July 30, 2002 2:43 PM
> > To: omega-list@xxxxxxxxxx
> > Subject: Re: RSI of Stochastics
> >
> >
> > Here is one that works for TS6. Should work for yours.
> >
> > Randy
> >
> >
> > Input: Price(close),RSILen(5),Length(3);
> > Var:StochRSI1(0), Value2(0), Value3(0);
> > {StochRSI1 =
> > (Summation(RSI(Price, RSILen) -
> > Lowest(RSI(Price, RSILen), Length),3)) /
> > (Summation(Highest(RSI(Price, RSILen), Length) -
> > Lowest(RSI(Price, RSILen), Length),3));}
> > Value2=(Summation(RSI(Price, RSILen) -
> > Lowest(RSI(Price, RSILen), Length),3));
> > Value3=(Summation(Highest(RSI(Price, RSILen), Length) -
> > Lowest(RSI(Price, RSILen), Length),3));
> > StochRSI1 = Iff(Value2=0,0,Value2/Value3);
> >
> > Plot1(StochRSI1 *100,"StochRSI");
> > Plot2(80);
> > Plot3(20);
> >
> >
|