[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: RSI of Stochastics



PureBytes Links

Trading Reference Links

Maybe this one would make you a bit happier!

Clyde

{Function:  Stochastic of RSI
 Author:    Clyde Lee}

Input: length(Numeric);
Vars:  RSIVal(0);

RSIVal=RSI(C,LENGTH);
Value1=Highest(RSIVal,Length);
Value2=Lowest (RSIVal,Length);
Value3=Value1-Value2;
If CurrentBar>Length and Value3>0
 then StochRSI_Lee = (RSIVal-Value2)/Value3*100
 else StochRSI_Lee = 50 ;

- - - - - - - - - - - - - - - - - - - - -  - - - - - - -
Clyde Lee   Chairman/CEO          (Home of SwingMachine)
SYTECH Corporation          email: clydelee@xxxxxxxxxxxx
7910 Westglen, Suite 105       Office:    (713) 783-9540
Houston,  TX  77063               Fax:    (713) 783-1092
Details at:                      www.theswingmachine.com
- - - - - - - - - - - - - - - - - - - -  - - - - - - - -

----- Original Message -----
From: "M. Simms" <prosys@xxxxxxxxxxxxxxxx>
To: <omega-list@xxxxxxxxxx>
Cc: <alex@xxxxxxxxxxxxxx>
Sent: Wednesday, July 31, 2002 1:34 AM
Subject: RE: RSI of Stochastics


> 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);
> >
> >
>