HOMETRADESTATIONMETASTOCKEMAILLINKS

 

metastock indicators

A

B

C

D

E

F

G

H

I

J

K

L

M

N

O

P

R

S

T

U

V

W

Y

Z

#
 

 
 
 

 

UP

HOME

  

 

Dahl Volume Trend

Mov(C,55,VOL)-Ref(Mov(C,55,VOL),-15)
Dahl PVT Trend

Mov((PVT()-Ref( PVT(),-15)),55,E)
Dahl Smoothed OBV Vol 88

Mov((OBV()-Mov(OBV(),88,VOL)),55,E)
Dahl OBV Trend

Mov((OBV()-Ref(OBV(),-15)),55,E)

 

UP

HOME

  

 

Damping Index

Ref(Mov((H-L),5,S),-1)/Ref(Mov((H-L),5,S),-6)

 

UP

HOME

  

 

Darvas Box

LowL:=If(Low=LLV(Low,5),Low,If(Ref(Low,-1)=LLV(Low,5),Ref(Low,-1), If(Ref(Low,-2)=LLV(Low,5),Ref(Low,-2),If(Ref(Low,-3)=LLV(Low,5),Ref(Low,-3), If(Ref(Low,-4)=LLV(Low,5),Ref(Low,-4),0)))));
NewH:=ValueWhen(1,High>Ref(HHV(High,5),-1),High);
box1:=HHV(High,3)<HHV(High,4);
box2:=ValueWhen(1,BarsSince(High>Ref(HHV(High,5),-1))=3 AND box1=true,NewH);
box3:=ValueWhen(1,BarsSince(High>Ref(HHV(High,5),-1))=3 AND box1=true,LowL);
TopBox:=box2;
BottomBox:=box3;
TopBox;
BottomBox;
Darvas Box II

Ht:=If(Cross(HHV(H,4)=Ref(H,-3),.9)=1,Ref(H,-3),PREV);
Top:=If(Ht>Ref(Ht,-1),Ht,PREV);
Lt:=If(Cross(HHV(H,4)=Ref(H,-3),.9)=1,L,PREV);
Bot:=If(Lt<Ref(Lt,-1),Lt,PREV);
Top;
Bot

 

UP

HOME

  

 

Darvis Box

Periods:=Input("periods",1,260,260);

Topbox:=If(Ref(H,-3)>=Ref(HHV(H,Periods),-4) AND Ref(H,-2)<Ref(H,-3) AND Ref(H,-1)<Ref(H,-3) AND H< Ref(H,-3),Ref(H,-3),PREVIOUS);

Botbox:=If(Ref(H,-3)>=Ref(HHV(H,Periods),-4) AND Ref(H,-2)<Ref(H,-3) AND Ref(H,-1)<Ref(H,-3) AND H< Ref(H,-3),LLV(L,4),PREVIOUS);

Topbox;
Botbox;

 

UP

HOME

  

 

DeMark's 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))
DeMark's REI Indicator

x1:=If(Ref(H,-2),< ,Ref(C,-7),
If(Ref(H,-2),<,Ref(C,-8),
If(H,<,Ref(L,-5),
If(H,<,Ref(L,- 6),0,1),1),1),1);
x2:=If(Ref(L,-2),> ,Ref(C,-7),
If(Ref(L,-2),>,Ref(C,-8),
If(L,>,Ref(H,-5),
If(L,>,Ref(H,- 6),0,1),1),1),1);
SubValues:=(x1) * (x2) * (H-Ref(H,-2) ) +((x1) * (x2) * (L-Ref(L,-2)) );
AbsDailyVal:=(Abs(H-Ref(H,-2)) + Abs(L-Ref(L,-2)));
Sum((SubValues),8) / Sum((AbsDailyVal),8)
DeMark's Projected Range

TPH1:=(H+C+2*L)/2-L;
TPH2:=(2*H+L+C)/2-L;
TPH3:=(H+L+2*C)/2-L;
TPL1:=(H+C+2*L)/2-H;
TPL2:=(2*H+L+C)/2-H;
TPL3:=(H+L+2*C)/2-H;
PH:=If((C<O),TPH1,If((C>O),TPH2,If((C=O),TPH3,0)));
PL:=If((C<O),TPL1,If((C>O),TPL2,If((C=O),TPL3,0)));
PH;
PL;
DeMark's Range Expansion Index

TD1:= H-Ref(H,-2);
TD2:= L-Ref(L,-2);
TD3:= If((H>=Ref(L,-5) OR H>=Ref(L,-6)) AND(L<=Ref(H,-5) OR L<=Ref(H,-6)),1,0);
TD4:= If((Ref(H,-2)>=Ref(C,-7) OR Ref(H,-2)>=Ref(C,-8)) AND (Ref(L,-2)<=Ref(C,-7) OR Ref(L,-2)<=Ref(C,-8)),1,0);
TD6:= (TD1) + (TD2);
TD5:= If((TD3) + (TD4)>=1, (TD6), 0);
TD7:= Abs(TD1) + Abs(TD2);
TDREI:=((TD5) + Ref(TD5,-1) + Ref(TD5,-2)+ Ref(TD5,-3) + Ref(TD5,-4)) /(TD7) + Ref(TD7,-1) + Ref(TD7,-2) + Ref(TD7,-3) + Ref(TD7,-4)*100;
TDREI;
DeMark's Range Expansion Index II

Sum((Ref(HIGH,-2)>=Ref(LLV(CLOSE,2),-7)OR
HIGH>=Ref(LLV(LOW,2),-5))*
(Ref(LOW,-2)<=Ref(HHV(CLOSE,2),-7)OR
LOW<=Ref(HHV(HIGH,2),-5))*
(ROC(HIGH,2,$)+ROC(LOW,2,$)),8)/
Sum(Abs(ROC(HIGH,2,$))+Abs(ROC(LOW,2,$)),8)

 

UP

HOME

  

 

DiNapoli Trends

{UP}
C>=Ref(Mov(C,3,S),-3) AND
(Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E))>=
(PREV+(0.199*((Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E))-PREV))) AND
(Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E))>=
Ref((Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E)),-1)

{DOWN};
C<=Ref(Mov(C,3,S),-3) AND
(Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E))<=
(PREV+(0.199*((Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E))-PREV))) AND
(Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E))<=
Ref((Mov( CLOSE, 8.3896, E) - Mov( CLOSE, 17.5185, E)),-1){jimt};

 

UP

HOME

  

 

Directional Trend Index

HMU:=If((HIGH-Ref(HIGH,-1))>0 ,(HIGH-Ref(HIGH,-1)),0 );
LMU:=If((LOW-Ref(LOW,-1))<0 ,-(LOW-Ref(LOW,-1)),0 );
Result:=HMU-LMU;
rr:= Input("first smoothing r" ,1 ,100 ,25 );
ss:= Input("second smoothing s" ,1 ,100 ,13 );
uu:= Input("third smoothing u" ,1,100,1);

Numerator:= 100*Mov(Mov(Mov(Result,rr,E),ss,E),uu,E);
Denominator:= Mov(Mov(Mov((Abs(Result)),rr,E),ss,E),uu,E);
If(Denominator<>0 ,Numerator/Denominator ,0 );

 

UP

HOME

  

 
Disparity Index

( ( C - Mov( C ,13,E ) ) / Mov( C ,13 ,E )) * 100

 

UP

HOME

  

 
Divergence Between the Close and MACD

Correl(((Sum(Cum(1)*(Mov(C,12,E)-Mov(C,26,E)),100))
-(Sum(Cum(1),100)* Sum((Mov(C,12,E)-Mov(C,26,E)),100)/100))
/((Sum(Power(Cum(1),2),100))-
(Power(Sum(Cum(1),100),2)/100)),((Sum(Cum(1)*C,100))
-(Sum(Cum(1),100)* Sum(C,100)/100))/((Sum(Power(Cum(1),2),100))
-(Power(Sum(Cum(1),100),2)/100)),12,0)
Divergence Between the Close and RSI

Correl(((Sum(Cum(1)*(RSI(14)),100))-(Sum(Cum(1),100)*
Sum((RSI(14)),100)/100))/((Sum(Power(Cum(1),2),100))
-(Power(Sum(Cum(1),100),2)/100)),
((Sum(Cum(1)*C,100))-(Sum(Cum(1),100)*Sum(C,100)/100)) / ((Sum(Power(Cum(1),2),100))-(Power(Sum(Cum(1),100),2)/100)),12,0)
Divergence Signal (RSI)

If(C,=,LLV(C,20),1,0)*If(RSI(14) > LLV(RSI(14),20),50,0)+
If(C,=,HHV(C,20),1,0)*If(RSI(14) < HHV(RSI(14),20),-50,0)+50;
RSI(14)

 

UP

HOME

  

 
Donchain Channels

Periods:= Input("Enter number of periods", 20, 60, 20);
UpperChannelLine:= Ref(HHV(HIGH, Periods), -1);
LowerChannelLine:= Ref(LLV(LOW, Periods), -1);
UpperChannelLine;
LowerChannelLine;
(UpperChannelLine + LowerChannelLine)/2;

 

UP

HOME

  

 
Double Stochastic - 10

Period P1:=Mov(((C-LLV(L,10))/(HHV(H,10)-LLV(L,10)))*100,3,E);
Mov(((P1-LLV(P1,10))/(HHV(P1,10)-LLV(P1,10)))*100,3,E)
Double Stochastic - 10 Period II

{demominators defined to eliminate divide by zero errors}

denom1:= If(HHV(H,10)-LLV(L,10)>0, HHV(H,10)-LLV(L,10), 1);
P1:= Mov(((C-LLV(L,10))/ denom1)*100,3,E);
denom2 := If(HHV(P1,10)-LLV(P1,10)>0, HHV(P1,10)-LLV(P1,10), 1);
Mov(((P1-LLV(P1,10))/denom2)*100,3,E)

 

UP

HOME

  

 
Dual CCI

Mov((C-Mov(C,20,S))/(.015*Stdev(C,20)),5,S)

 

UP

HOME

  

 
Dual High Low Tide

LRV:=LinearReg(MP(),10);
A1:=If(Ref(HHV(H,10),-1)>LRV
AND Ref(LLV(L,10),-1)<LRV
AND LRV>Ref(LRV,-1)
AND Ref(LRV,-1)>Ref(LRV,-2),-1, If(Ref(HHV(H,10),-1)>LRV
AND Ref(LLV(L,10),-1)<LRV
AND LRV<Ref(LRV,-1)
AND Ref(LRV,-1)<Ref(LRV,-2), 1,0));
LRV2:=LinearReg(MP(),50);
A2:=If(Ref(HHV(H,50),-1)>LRV2
AND Ref(LLV(L,50),-1)<LRV2
AND LRV2>Ref(LRV2,-1)
AND Ref(LRV2,-1)>Ref(LRV2,-2),-1.5, If(Ref(HHV(H,50),-1)>LRV2
AND Ref(LLV(L,50),-1)<LRV2
AND LRV2<Ref(LRV2,-1)
AND Ref(LRV2,-1)<Ref(LRV2,-2), 1.5,0));
A1;
A2;

 

UP

HOME

  

 

 
Dynamic Balance Point

Ref( HHV(H,5)+LLV(L,5)+C, -1)/3
Dynamic BP Steps

WBPS:= Ref( (HHV(H,5)+LLV(L,5)+C)/3,-1);
( WBPS + Ref(WBPS,-5) + Ref(WBPS,-10) + Ref(WBPS,-15) + Ref(WBPS,-20) ) / 5
Fixed Balance Point

day:=DayOfWeek();
FBC:= If(day=1,
If(BarsSince(day=1)>5,
Ref( HighestSince(1,day=2,H) + LowestSince(1,day=2,L)+C,-1)/3,
Ref( HighestSince(1,day=1,H) + LowestSince(1,day=1,L)+C,-1)/3),
If(day=2 AND Ref(day,-1)>1,
If(BarsSince(day=1)>5,
Ref( HighestSince(1,day=2,H) + LowestSince(1,day=2,L)+C,-1)/3,
Ref( HighestSince(1,day=1,H) + LowestSince(1,day=1,L)+C,-1)/3),0));
ValueWhen(1,FBC>0,FBC)
Support & Resistance

day:=DayOfWeek();
WR:= If(day=1,
If(BarsSince(day=1)>5,
Ref( HighestSince(1,day=2,H) - LowestSince(1,day=2,L),-1),
Ref( HighestSince(1,day=1,H) - LowestSince(1,day=1,L),-1)),
If(day=2 AND Ref(day,-1)>1,
If(BarsSince(day=1)>5,
Ref( HighestSince(1,day=2,H) - LowestSince(1,day=2,L),-1),
Ref( HighestSince(1,day=1,H) - LowestSince(1,day=1,L),-1)),0));
WRV:= ValueWhen(1,WR>0,WR);
T1:=Fml("Fixed Balance Point") + (WRV*.5);
T2:=Fml("Fixed Balance Point") + (WRV*.618);
B1:=Fml("Fixed Balance Point") - (WRV*.5);
B2:=Fml("Fixed Balance Point") - (WRV*.618);
T1;
T2;
B1;
B2
Weekly BP Steps

(Peak(1,FmlVar("Fixed Balance Point","FBC"),1) + Peak(2,FmlVar("Fixed Balance Point","FBC"),1) +
Peak(3,FmlVar("Fixed Balance Point","FBC"),1)+
Peak(4,FmlVar("Fixed Balance Point","FBC"),1)+
Peak(5,FmlVar("Fixed Balance Point","FBC"),1)) / 5
Tendency

If(DayOfWeek()=4 OR DayOfWeek()=5, If((HighestSince(1,Cross(3,DayOfWeek()),H)+
LowestSince(1,Cross(3,DayOfWeek()),L)+C)/3<C,1,-1),0)
Dynamic Multiple Time Frames II

Dw:=If(DayOfWeek()<=Ref(DayOfWeek(),-1),1,0);
Wt:=If(Dw=1,Ref(HighestSince(1,Dw=1,H),-1) +
Ref(LowestSince(1,Dw=1,L),-1)+Ref(C,-1)/3,0);
Wh:=If(Dw=1,Ref(HighestSince(1,Dw=1,H),-1),0);
Wl:=If(Dw=1,Ref(LowestSince(1,Dw=1,L),-1),0);
Wr:=ValueWhen(1,Wh>0,Wh)-ValueWhen(1,Wl>0,Wl);
DwP:=ValueWhen(1,Wt>0,Wt);
Rs1:=DwP+(Wr*0.5);
Rs2:=DwP+(Wr*0.618);
Sp1:=Dwp-(Wr*0.5);
Sp2:=DwP-(Wr*0.618);
Rs2;
Rs1;
Sp1;
Sp2;

 

UP

HOME

  

 
Dynamic Zone Williams %R Indicator

PR:=Input("Enter Periods for W%R",1,100,14);
PB:=Input("Enter Periods for BUY",1,100,20);
PS:=Input("Enter Periods for SELL",1,100,20);
{CONVERT W%R TO +/-50 OSC}
DWR:=(Mov(WillR(PR),2,S))+50;
UpZone:=Mov(DWR,PS,S)+(1.3185 * Stdev(DWR,PS));
LwZone:=Mov(DWR,PB,S)-(1.3185 * Stdev(DWR,PB));
MidZone:=(UpZone + LwZone)/2;
MidZone;
UpZone;
LwZone;
DWR

 

UP

HOME

  

 
Dynamic Zones

PR:=Input("Enter Periods for RSI",1,100,9);
PB:=Input("Enter Periods for BUY",1,100,70);
PS:=Input("Enter Periods for SELL",1,100,70);
UpZone:=Mov(RSI(PR),PS,S)+(1.3185 *Stdev(RSI(PR),PS));
LwZone:=Mov(RSI(PR),PB,S)-(1.3185 *Stdev(RSI(PR),PB));
UpZone;
LwZone;


 

UP

HOME

  



 

 

 

  

site map        disclaimer        mission        privacy policy