DeMark Indicator, and REI Indicator.

["A.J. Maas" <anthmaas@xxxxxx>]

DeMark Indicator, and REI Indicator.


--------------------------------------------------------------------------------


SOFTWARE: Metastock
SW VERSION: 5.0
FORMULA NAME: DeMark Indicator, and REI Indicator.


INVENTOR: Maury Hill (EquisInt@xxxxxxx - Equis Support) Reprinted here with kind permission.
SUBMITTED BY: Ian Rawnsley (sdavidr@xxxxxxxxxxx) MetaStock User Group AUCKLAND NEW ZEALAND
SUBMITTED ON: Jun 10 1995.
PUBLISHED: Page 98 and 100 of Tom Demark's new book, "The New Science of Technical Analysis" 1994.
COMMENTS: Note that the DeMark indicator on page 100 follows first and is contained in one formula only.

The REI(Range Expansion Index follows that and is contained over 5 formulas. They could probably be compacted to one
formula, but I felt that this is more readable as Tom DeMark presents them in a similar manner.


FORMULA:


Formula Name: DeMark Indicator
Sum(If(H,> ,Ref(H,-1),H-Ref(H,-1),0),13)/(Sum(If(H,> ,Ref(H,-1),H-Ref(H,-1),0) ,13)+ Sum(If(L,>
=,Ref(L,-1),0,Ref(L,-1)-L),13))


Formula Name: REI Indicator
VAR1:
If(Ref(H,-2),< ,Ref(C,-7),If(Ref(H,-2),< ,Ref(C,-8),If(H,< ,Ref(L,-5),If(H,< ,Re f(L,- 6),0,1),1),1),1)
VAR2:
If(Ref(L,-2),> ,Ref(C,-7),If(Ref(L,-2),> ,Ref(C,-8),If(L,> ,Ref(H,-5),If(L,> ,Re f(H,- 6),0,1),1),1),1)
SubValues:
( Fml("Var1") * Fml("Var2") * (H-Ref(H,-2)) ) + (Fml("Var1") * Fml("Var2") * (L-Ref(L,-2)) )
AbsDailyVal:
( Abs(H-Ref(H,-2)) + Abs(L-Ref(L,-2)) )
REI2:
Sum(Fml("SubValues"),8) / Sum(Fml("AbsDailyVal"),8)


To the best of my knowledge, these are correct. Please inform me if you experience any problems.
Thank You - Maury Hill [EQUIS Support]