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 following Add-ons for this expert to work
PowerPivots Plus & Adaptive Trading Solutions
Highlights
Long
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
A:=Mov(C,10,E);
B:=ROC(Mov(C,10,E),1,$);
D:=If(A>Ref(A,-1) AND B>0,-1,If(A<Ref(A,-1) AND B<0,1,0));
LE:=D=-1 AND win > Loss;
SE:=D=1 AND win < Loss;
LX:=D<>-1;
SX:=D<>1;
B1:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B1>0
Short
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
A:=Mov(C,10,E);
B:=ROC(Mov(C,10,E),1,$);
D:=If(A>Ref(A,-1) AND B>0,-1,If(A<Ref(A,-1) AND B<0,1,0));
LE:=D=-1 AND win > Loss;
SE:=D=1 AND win < Loss;
LX:=D<>-1;
SX:=D<>1;
B1:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B1<0
Out
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
A:=Mov(C,10,E);
B:=ROC(Mov(C,10,E),1,$);
D:=If(A>Ref(A,-1) AND B>0,-1,If(A<Ref(A,-1) AND B<0,1,0));
LE:=D=-1 AND win > Loss;
SE:=D=1 AND win < Loss;
LX:=D<>-1;
SX:=D<>1;
B1:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B1=0
Symbols
Long entry
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
A:=Mov(C,10,E);
B:=ROC(Mov(C,10,E),1,$);
D:=If(A>Ref(A,-1) AND B>0,-1,If(A<Ref(A,-1) AND B<0,1,0));
LE:=D=-1 AND win > Loss;
SE:=D=1 AND win < Loss;
LX:=D<>-1;
SX:=D<>1;
B1:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B1>0 AND Ref(B1,-1)<=0
Short entry
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
A:=Mov(C,10,E);
B:=ROC(Mov(C,10,E),1,$);
D:=If(A>Ref(A,-1) AND B>0,-1,If(A<Ref(A,-1) AND B<0,1,0));
LE:=D=-1 AND win > Loss;
SE:=D=1 AND win < Loss;
LX:=D<>-1;
SX:=D<>1;
B1:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B1<0 AND Ref(B1,-1)>=0
Long exit
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
A:=Mov(C,10,E);
B:=ROC(Mov(C,10,E),1,$);
D:=If(A>Ref(A,-1) AND B>0,-1,If(A<Ref(A,-1) AND B<0,1,0));
LE:=D=-1 AND win > Loss;
SE:=D=1 AND win < Loss;
LX:=D<>-1;
SX:=D<>1;
B1:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B1=0 AND Ref(B1,-1)>0
Short exit
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
A:=Mov(C,10,E);
B:=ROC(Mov(C,10,E),1,$);
D:=If(A>Ref(A,-1) AND B>0,-1,If(A<Ref(A,-1) AND B<0,1,0));
LE:=D=-1 AND win > Loss;
SE:=D=1 AND win < Loss;
LX:=D<>-1;
SX:=D<>1;
B1:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B1=0 AND Ref(B1,-1)<0
|