Rank: Advanced Member
Groups: Registered, Registered Users, Subscribers Joined: 10/29/2004(UTC) Posts: 1,394 Location: Glastonbury, CT
Was thanked: 2 time(s) in 2 post(s)
|
This expert needs the Power Pivots Plus Add-on to work.
It also needs the NYSE new Highs and the NYSE New Lows to be in the proper Data Files
Highlights
Long
NH:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-H",C);
NL:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-L",C);
B1:=Mov(NH,10,S)/(NH+NL);
B2:=Mov(NL,10,S)/(NH+NL);
G:=If(B1>=B2,1,0);
A:=Mov(Typ(),3,S);
LE:=A>Ref(A,-1) and G=1;
SE:=A<Ref(A,-1) and G=0;
LX:=A<Ref(A,-1) and G=1;
SX:=A>Ref(A,-1) and G=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0
Short
NH:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-H",C);
NL:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-L",C);
B1:=Mov(NH,10,S)/(NH+NL);
B2:=Mov(NL,10,S)/(NH+NL);
G:=If(B1>=B2,1,0);
A:=Mov(Typ(),3,S);
LE:=A>Ref(A,-1) and G=1;
SE:=A<Ref(A,-1) and G=0;
LX:=A<Ref(A,-1) and G=1;
SX:=A>Ref(A,-1) and G=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0
Out
NH:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-H",C);
NL:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-L",C);
B1:=Mov(NH,10,S)/(NH+NL);
B2:=Mov(NL,10,S)/(NH+NL);
G:=If(B1>=B2,1,0);
A:=Mov(Typ(),3,S);
LE:=A>Ref(A,-1) and G=1;
SE:=A<Ref(A,-1) and G=0;
LX:=A<Ref(A,-1) and G=1;
SX:=A>Ref(A,-1) and G=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0
Symbols
Long entry
NH:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-H",C);
NL:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-L",C);
B1:=Mov(NH,10,S)/(NH+NL);
B2:=Mov(NL,10,S)/(NH+NL);
G:=If(B1>=B2,1,0);
A:=Mov(Typ(),3,S);
LE:=A>Ref(A,-1) and G=1;
SE:=A<Ref(A,-1) and G=0;
LX:=A<Ref(A,-1) and G=1;
SX:=A>Ref(A,-1) and G=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0 AND Ref(B,-1)<=0
Short entry
NH:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-H",C);
NL:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-L",C);
B1:=Mov(NH,10,S)/(NH+NL);
B2:=Mov(NL,10,S)/(NH+NL);
G:=If(B1>=B2,1,0);
A:=Mov(Typ(),3,S);
LE:=A>Ref(A,-1) and G=1;
SE:=A<Ref(A,-1) and G=0;
LX:=A<Ref(A,-1) and G=1;
SX:=A>Ref(A,-1) and G=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0 AND Ref(B,-1)>=0
Long Exit
NH:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-H",C);
NL:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-L",C);
B1:=Mov(NH,10,S)/(NH+NL);
B2:=Mov(NL,10,S)/(NH+NL);
G:=If(B1>=B2,1,0);
A:=Mov(Typ(),3,S);
LE:=A>Ref(A,-1) and G=1;
SE:=A<Ref(A,-1) and G=0;
LX:=A<Ref(A,-1) and G=1;
SX:=A>Ref(A,-1) and G=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)>0
Short exit
NH:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-H",C);
NL:=Security("c:\\Metastock Data\\indices & indicators\\market indicators\\X.NYSE-L",C);
B1:=Mov(NH,10,S)/(NH+NL);
B2:=Mov(NL,10,S)/(NH+NL);
G:=If(B1>=B2,1,0);
A:=Mov(Typ(),3,S);
LE:=A>Ref(A,-1) and G=1;
SE:=A<Ref(A,-1) and G=0;
LX:=A<Ref(A,-1) and G=1;
SX:=A>Ref(A,-1) and G=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)<0
|