Metastock Formulas - M 1 Strona 1
Metastock Formulas - M 1
Click here to go back to Metastock Formula In
ex
Home
These formulas aren't my complete
IMPORTANT:
MetaStock Secrets
collectlon. For my complete collectlon of lnstantly usable,
Free MS Newsletter
profltable and powerful MetaStock formulas Cllck Here
Free MS Formula
Buy MetaStock
Buy MS Formulas
Would You Llke To Use MetaStock To Its Full Potentlal? Dlscover the
Amazlngly Slmple Secret to Master Metastock Step-By-Step - click here
FREE Vldeos
MS Back Testlng
A | A 1 | B | B 1 | C | C 1 | D | D 1 | E | F | G | H | I | J | K | L | M | M 1 | N
Tradlng Systems
| O | P | R | S | S 1 | T | U | V | W | Z |
Nlcolas Darvas
Missing trading days
MetaStock Llnks
Momentum - normalized
Momentum, LRS-smoothed
Rave Revlews
Missing trading days
About Us
Contact Us
{ PIots mIssIng daIIy (weekday) bars count }{ ©CopyrIght 2003-2004 Jose SIIva }
{ [e-mail] }
SlteMap
ChkVoI:=Input("Zero-voIume days = mIssIng data days? Yes=1, No=0",0,1,1);
VoIMIssIng:=If(ChkVoI,V=0,0);
IImIt:=1960; {do not change IImIt year}
LImLeap:=Frac(IImIt/4)=0 AND Frac(IImIt/100)<>0
OR Frac(IImIt/400)=0;
NoCount:=IImIt*365+Int(IImIt/4)
-Int(IImIt/100)+Int(IImIt/400)-LImLeap;
Ieap:=Frac(Year()/4)=0 AND Frac(Year()/100)<>0
OR Frac(Year()/400)=0;
y:=Year()*365+Int(Year()/4)
-Int(Year()/100)+Int(Year()/400)-NoCount;
m:=
If(Month()=2,31-Ieap,
If(Month()=3,59,
If(Month()=4,90,
If(Month()=5,120,
If(Month()=6,151,
If(Month()=7,181,
If(Month()=8,212,
If(Month()=9,243,
If(Month()=10,273,
If(Month()=11,304,
If(Month()=12,334,
-Ieap)))))))))));
DayNr:=y+m+DayOfMonth();
WkDayCount:=
Int((DayNr+3)/7)+ {Mon}
Int((DayNr+2)/7)+ {Tue}
Int((DayNr+1)/7)+ {Wed}
Int((DayNr)/7)+ {Thu}
Int((DayNr-1)/7); {FrI}
WkDayCount-VaIueWhen(2,1,WkDayCount)-1
+VoIMIssIng
(Go Top...)
Momentum - normalized
{ NormaIIzed Momentum v3.1 }{ ©CopyrIght 2003-2004 Jose SIIva }{ josesIIva22@
yahoo.com }
http://www.meta-formula.com/Metastock-Formulas-M1.html 2014-10-14 14:04:37
Metastock Formulas - M 1 Strona 2
pds:=Input("Momentum perIods",1,2520,10);
pdsN:=Input("normaIIzIng perIods (1=none)",
1,2520,63);
x:=Input("use Open=1 HIgh=2 Low=3 CIose=4 VoIume=5 P=6",1,6,4);
pIot:=Input("Momentum=1, mIdpoInt crossover SIgnaIs=2",1,2,1);
x:=If(x=1,O,If(x=2,H,If(x=3,L,If(x=5,V,If(x=6,P,C)))));
y:=Ref(x,-pds);
ratIo:=MIn(x,y)/Max(x,y);
Mom:=If(x>y,2-ratIo,ratIo)*100-100;
MomNorm:=(Mom-LLV(Mom,pdsN))
/(HHV(Mom,pdsN)-LLV(Mom,pdsN)+.000001)*100;
MomNorm:=If(pdsN=1,Mom,MomNorm);
mIdpt:=If(pdsN=1,0,
Cum(MomNorm)/Cum(IsDefIned(MomNorm)));
sIgnaIs:=
Cross(MomNorm,mIdpt)-Cross(mIdpt,MomNorm);
mIdpt;If(pIot=2,sIgnaIs,MomNorm)
(Go Top...)
Momentum, LRS-smoothed
{ LRS-smoothed normaIIzed Momentum v2 }{ ©CopyrIght 2003 Jose SIIva }{ josesIIva22@
yahoo.com }
pds:=Input("Momentum perIods",2,2520,10);
smooth:=Input("LRS smoothIng perIods",
1,252,10);
pIot:=Input("Momentum=1, Smoothed=2, DoubIe smoothed=3",1,3,2);
x:=Input("use Open=1 HIgh=2 Low=3 CIose=4 VoIume=5 P=6",1,6,4);
x:=If(x=1,O,If(x=2,H,If(x=3,L,If(x=5,V,If(x=6,P,C)))));
y:=Ref(x,-pds);
ratIo:=MIn(x,y)/Max(x,y);
Mom:=If(x>y,2-ratIo,ratIo)*100-100;
MoSm:=LInRegSIope(Mom,smooth)*10;
MoSm:=If(smooth<2,Mom,MoSm);
MoSm2:=LInRegSIope(MoSm,smooth)*4;
MoSm2:=If(smooth<2,Mom,MoSm2);
If(pIot=1,Cum(Mom)/(Cum(Mom>-100)+.000001),
If(pIot=2,Cum(MoSm)/(Cum(MoSm>-100)+.000001),
Cum(MoSm2)/(Cum(MoSm2>-100)+.000001)));
If(pIot=1,Mom,If(pIot=2,MoSm,MoSm2))
(Go Top...)
If you have Metastock formulas you would llke to share,
Please emall to
We look forwar
to hearing from you!
To learn more about how to use Metastock and lts formula cllck here.
copyright 2003 MetaStock Website Home
Metastock® is a registered trademark of Equis International.
http://www.meta-formula.com/Metastock-Formulas-M1.html 2014-10-14 14:04:37