|
PureBytes Links
Trading Reference Links
|
Much better.......
but efficiency "nuts" would recognize that using HighestFC and LowestFC is
more optimal.
> -----Original Message-----
> From: Clyde Lee [mailto:clydelee@xxxxxxxxxx]
> Sent: Wednesday, July 31, 2002 10:37 AM
> To: omega-list@xxxxxxxxxx
> Cc: alex@xxxxxxxxxxxxxx
> Subject: Re: RSI of Stochastics
>
>
> 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);
> > >
> > >
> >
>
>
>
|