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 requires the PowerPivot Plus Add-on to work.
It needs to have the NYSE new highs and NYSE new lows
to be in the proper data locations
Highlghts
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);
A1:=Mov(C,3,S);
A2:=Mov(C,10,S);
A3:=Mov(C,30,S);
LE:=A2>A3 AND G=1 AND Cross(A1,A2);
LX:=Cross(A3,A2) OR Cross(A2,A1);
SE:=A2<A3 AND G=0 AND Cross(A2,A1);
SX:=Cross(A2,A3) OR Cross(A1,A2);
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);
A1:=Mov(C,3,S);
A2:=Mov(C,10,S);
A3:=Mov(C,30,S);
LE:=A2>A3 AND G=1 AND Cross(A1,A2);
LX:=Cross(A3,A2) OR Cross(A2,A1);
SE:=A2<A3 AND G=0 AND Cross(A2,A1);
SX:=Cross(A2,A3) OR Cross(A1,A2);
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);
A1:=Mov(C,3,S);
A2:=Mov(C,10,S);
A3:=Mov(C,30,S);
LE:=A2>A3 AND G=1 AND Cross(A1,A2);
LX:=Cross(A3,A2) OR Cross(A2,A1);
SE:=A2<A3 AND G=0 AND Cross(A2,A1);
SX:=Cross(A2,A3) OR Cross(A1,A2);
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);
A1:=Mov(C,3,S);
A2:=Mov(C,10,S);
A3:=Mov(C,30,S);
LE:=A2>A3 AND G=1 AND Cross(A1,A2);
LX:=Cross(A3,A2) OR Cross(A2,A1);
SE:=A2<A3 AND G=0 AND Cross(A2,A1);
SX:=Cross(A2,A3) OR Cross(A1,A2);
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);
A1:=Mov(C,3,S);
A2:=Mov(C,10,S);
A3:=Mov(C,30,S);
LE:=A2>A3 AND G=1 AND Cross(A1,A2);
LX:=Cross(A3,A2) OR Cross(A2,A1);
SE:=A2<A3 AND G=0 AND Cross(A2,A1);
SX:=Cross(A2,A3) OR Cross(A1,A2);
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);
A1:=Mov(C,3,S);
A2:=Mov(C,10,S);
A3:=Mov(C,30,S);
LE:=A2>A3 AND G=1 AND Cross(A1,A2);
LX:=Cross(A3,A2) OR Cross(A2,A1);
SE:=A2<A3 AND G=0 AND Cross(A2,A1);
SX:=Cross(A2,A3) OR Cross(A1,A2);
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);
A1:=Mov(C,3,S);
A2:=Mov(C,10,S);
A3:=Mov(C,30,S);
LE:=A2>A3 AND G=1 AND Cross(A1,A2);
LX:=Cross(A3,A2) OR Cross(A2,A1);
SE:=A2<A3 AND G=0 AND Cross(A2,A1);
SX:=Cross(A2,A3) OR Cross(A1,A2);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)<0
|