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 and the Adaptive trading solutions Add-on for this expert to work
Highlights
Long
d:=If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),PREV));
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
LE:=Cross(C,d) and Win > Loss;
SE:=Cross(d,C) and Loss > Win;
LX:= Cross(d,C);
SX:= Cross(C,d);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0
Short
d:=If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),PREV));
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
LE:=Cross(C,d) and Win > Loss;
SE:=Cross(d,C) and Loss > Win;
LX:= Cross(d,C);
SX:= Cross(C,d);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0
Out
d:=If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),PREV));
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
LE:=Cross(C,d) and Win > Loss;
SE:=Cross(d,C) and Loss > Win;
LX:= Cross(d,C);
SX:= Cross(C,d);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0
Symbols
Long entry
d:=If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),PREV));
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
LE:=Cross(C,d) and Win > Loss;
SE:=Cross(d,C) and Loss > Win;
LX:= Cross(d,C);
SX:= Cross(C,d);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0 AND Ref(B,-1)<=0
Short entry
d:=If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),PREV));
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
LE:=Cross(C,d) and Win > Loss;
SE:=Cross(d,C) and Loss > Win;
LX:= Cross(d,C);
SX:= Cross(C,d);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0 AND Ref(B,-1)>=0
Long exit
d:=If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),PREV));
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
LE:=Cross(C,d) and Win > Loss;
SE:=Cross(d,C) and Loss > Win;
LX:= Cross(d,C);
SX:= Cross(C,d);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)>0
Short exit
d:=If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),PREV));
Loss:= ExtFml("tsaequis1.eodlso");
Win:= ExtFml("tsaequis1.eodwso");
LE:=Cross(C,d) and Win > Loss;
SE:=Cross(d,C) and Loss > Win;
LX:= Cross(d,C);
SX:= Cross(C,d);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)<0
|
