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

Re: Wilder's Original RSI Explanation?



PureBytes Links

Trading Reference Links

Here is MetaStock code I found some time ago on the Guppy site. It may be of
some help.

Roy

  {ADX Plus Directional Movement}
Periods:= Input("Enter time periods",1,100,14);
PlusDM:= If(HIGH>Ref(HIGH,-1) AND
LOW>=Ref(LOW,-1), HIGH-Ref(HIGH,-1),
If(HIGH>Ref(HIGH,-1) AND LOW<Ref(LOW,-1)
AND HIGH-Ref(HIGH,-1)>Ref(LOW,-1)-LOW,
HIGH-Ref(HIGH,-1), 0));
DIPlus:= 100 * Wilders(PlusDM,Periods) /
ATR(Periods);
MinusDM:= If(LOW<Ref(LOW,-1) AND
HIGH<=Ref(HIGH,-1), Ref(LOW,-1)-LOW,
If(HIGH>Ref(HIGH,-1) AND LOW<Ref(LOW,-1)
AND HIGH-Ref(HIGH,-1)<Ref(LOW,-1)-LOW,
Ref(LOW,-1)-LOW, 0));
DIMinus:= 100 * Wilders(MinusDM,Periods)/
ATR(Periods);
DIDif:= Abs(DIPlus - DIMinus);
DISum:= DIPlus + DIMinus;
100*Wilders(DIDif/DISum, Periods);

  {ADX Minus Directional Movement}
Periods:= Input("Enter time periods",1,100,13);
PlusDM:= If(HIGH>Ref(HIGH,-1) AND
LOW>=Ref(LOW,-1), HIGH-Ref(HIGH,-1),
If(HIGH>Ref(HIGH,-1) AND LOW<Ref(LOW,-1)
AND HIGH-Ref(HIGH,-1)>Ref(LOW,-1)-LOW,
HIGH-Ref(HIGH,-1), 0));
DIPlus:= 100 * Wilders(PlusDM,Periods) /
ATR(Periods);
MinusDM:= If(LOW<Ref(LOW,-1) AND
HIGH<=Ref(HIGH,-1), Ref(LOW,-1)-LOW,
If(HIGH>Ref(HIGH,-1) AND LOW<Ref(LOW,-1)
AND HIGH-Ref(HIGH,-1)<Ref(LOW,-1)-LOW,
Ref(LOW,-1)-LOW, 0));
DIMinus:= 100 * Wilders(MinusDM,Periods)/
ATR(Periods);
DIDif:= Abs(DIPlus - DIMinus);
DISum:= DIPlus + DIMinus;
100*Wilders(DIDif/DISum, Periods);

  {ADX}
Periods:= Input("Enter time periods",1,100,14);
PlusDM:= If(HIGH>Ref(HIGH,-1) AND
LOW>=Ref(LOW,-1), HIGH-Ref(HIGH,-1),
If(HIGH>Ref(HIGH,-1) AND LOW<Ref(LOW,-1)
AND HIGH-Ref(HIGH,-1)>Ref(LOW,-1)-LOW,
HIGH-Ref(HIGH,-1), 0));
DIPlus:= 100 * Wilders(PlusDM,Periods) /
ATR(Periods);
MinusDM:= If(LOW<Ref(LOW,-1) AND
HIGH<=Ref(HIGH,-1), Ref(LOW,-1)-LOW,
If(HIGH>Ref(HIGH,-1) AND LOW<Ref(LOW,-1)
AND HIGH-Ref(HIGH,-1)<Ref(LOW,-1)-LOW,
Ref(LOW,-1)-LOW, 0));
DIMinus:= 100 * Wilders(MinusDM,Periods)/
ATR(Periods);
DIDif:= Abs(DIPlus - DIMinus);
DISum:= DIPlus + DIMinus;
100*Wilders(DIDif/DISum, Periods);


----- Original Message -----
From: "Lionel Issen" <lissen@xxxxxxxxxxxxxx>
To: <metastock@xxxxxxxxxxxxx>
Sent: Sunday, August 18, 2002 5:17 PM
Subject: RE: Wilder's Original RSI Explanation?


> Wayne:
> "Trading systems and Methods, 3rd edition" by Perry Kaufman has has what
> seems like a detailed description in less than 30 pages.  He also
discusses
> variations on the RSI. His code is written in Trade Station easy language.
>
> If your library (local or academic) doesn't have a copy they can probably
> get it for you on interlibrary loan.
>
> Hope this helps
>  Lionel
> -----Original Message-----
> From: owner-metastock@xxxxxxxxxxxxx
[mailto:owner-metastock@xxxxxxxxxxxxx]On
> Behalf Of Wayne
> Sent: Saturday, August 17, 2002 4:46 PM
> To: Metastock@xxxxxxxxxxxxx
> Subject: Wilder's Original RSI Explanation?
>
>
> Hi There:
>
> I am trying to study J. Wells Wilder's original RSI formula, past the
basic
> description and formula given in the Metastock manual.
>
> The manual only says, "The RSI is a fairly simple formula, but is
difficult
> to explain without pages of examples."
>
> Does anybody have a more detailed study, perhaps Wilder's own explanation,
> regarding this? I can't seem to find much past the basics on the internet.
>
> Many thanks,
>
> Wayne
> Victoria, BC
> Canada
>