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)
|
you will need the PowerPivots Plus Add-on for this expert to work
Highlights
Long
A:=(Mov(ROC(C,10,%),10,S))+(2*(Mov(ROC(C,15,%),10,S)))+(3*(Mov(ROC(C,20,%),10,S)))+(4*(Mov(ROC(C,30,%),15,S)))/10;
LE:=A>Mov(A,15,S);
SE:=A<Mov(A,15,S);
lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1);
LX:=Cross(lP,CLOSE);
SX:=Cross(CLOSE,hP);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0
Short
A:=(Mov(ROC(C,10,%),10,S))+(2*(Mov(ROC(C,15,%),10,S)))+(3*(Mov(ROC(C,20,%),10,S)))+(4*(Mov(ROC(C,30,%),15,S)))/10;
LE:=A>Mov(A,15,S);
SE:=A<Mov(A,15,S);
lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1);
LX:=Cross(lP,CLOSE);
SX:=Cross(CLOSE,hP);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0
Out
A:=(Mov(ROC(C,10,%),10,S))+(2*(Mov(ROC(C,15,%),10,S)))+(3*(Mov(ROC(C,20,%),10,S)))+(4*(Mov(ROC(C,30,%),15,S)))/10;
LE:=A>Mov(A,15,S);
SE:=A<Mov(A,15,S);
lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1);
LX:=Cross(lP,CLOSE);
SX:=Cross(CLOSE,hP);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0
Symbols
Long entry
A:=(Mov(ROC(C,10,%),10,S))+(2*(Mov(ROC(C,15,%),10,S)))+(3*(Mov(ROC(C,20,%),10,S)))+(4*(Mov(ROC(C,30,%),15,S)))/10;
LE:=A>Mov(A,15,S);
SE:=A<Mov(A,15,S);
lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1);
LX:=Cross(lP,CLOSE);
SX:=Cross(CLOSE,hP);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0 AND Ref(B,-1)<=0
Short entry
A:=(Mov(ROC(C,10,%),10,S))+(2*(Mov(ROC(C,15,%),10,S)))+(3*(Mov(ROC(C,20,%),10,S)))+(4*(Mov(ROC(C,30,%),15,S)))/10;
LE:=A>Mov(A,15,S);
SE:=A<Mov(A,15,S);
lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1);
LX:=Cross(lP,CLOSE);
SX:=Cross(CLOSE,hP);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0 AND Ref(B,-1)>=0
Long exit
A:=(Mov(ROC(C,10,%),10,S))+(2*(Mov(ROC(C,15,%),10,S)))+(3*(Mov(ROC(C,20,%),10,S)))+(4*(Mov(ROC(C,30,%),15,S)))/10;
LE:=A>Mov(A,15,S);
SE:=A<Mov(A,15,S);
lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1);
LX:=Cross(lP,CLOSE);
SX:=Cross(CLOSE,hP);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)>0
Short exit
A:=(Mov(ROC(C,10,%),10,S))+(2*(Mov(ROC(C,15,%),10,S)))+(3*(Mov(ROC(C,20,%),10,S)))+(4*(Mov(ROC(C,30,%),15,S)))/10;
LE:=A>Mov(A,15,S);
SE:=A<Mov(A,15,S);
lP:=ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
hP:=ExtFml("PowerPivots.NthPivotPrice", 1,0,1);
LX:=Cross(lP,CLOSE);
SX:=Cross(CLOSE,hP);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)<0
|
