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 and this dll from
http://forum.equis.com/viewtopic.php?t=1529
Highlights
Long
Periods:=ExtFml( "ASI.CyclePeriod",C, .18, .1, 1.1);
BT:= ExtFml( "ASI.BBandTop",C, Periods, 2);
BB:= ExtFml( "ASI.BBandBot",C, Periods, 2);
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=Cross(C,BB) AND TD=1;
LX:=C<ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
SE:=Cross(BT,C) AND TD=-1;
SX:=C >ExtFml("PowerPivots.NthPivotPrice",1,0,1);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0
Short
Periods:=ExtFml( "ASI.CyclePeriod",C, .18, .1, 1.1);
BT:= ExtFml( "ASI.BBandTop",C, Periods, 2);
BB:= ExtFml( "ASI.BBandBot",C, Periods, 2);
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=Cross(C,BB) AND TD=1;
LX:=C<ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
SE:=Cross(BT,C) AND TD=-1;
SX:=C >ExtFml("PowerPivots.NthPivotPrice",1,0,1);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0
Out
Periods:=ExtFml( "ASI.CyclePeriod",C, .18, .1, 1.1);
BT:= ExtFml( "ASI.BBandTop",C, Periods, 2);
BB:= ExtFml( "ASI.BBandBot",C, Periods, 2);
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=Cross(C,BB) AND TD=1;
LX:=C<ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
SE:=Cross(BT,C) AND TD=-1;
SX:=C >ExtFml("PowerPivots.NthPivotPrice",1,0,1);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0
Symbols
Long entry
Periods:=ExtFml( "ASI.CyclePeriod",C, .18, .1, 1.1);
BT:= ExtFml( "ASI.BBandTop",C, Periods, 2);
BB:= ExtFml( "ASI.BBandBot",C, Periods, 2);
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=Cross(C,BB) AND TD=1;
LX:=C<ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
SE:=Cross(BT,C) AND TD=-1;
SX:=C >ExtFml("PowerPivots.NthPivotPrice",1,0,1);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0 AND Ref(B,-1)<=0
Short entry
Periods:=ExtFml( "ASI.CyclePeriod",C, .18, .1, 1.1);
BT:= ExtFml( "ASI.BBandTop",C, Periods, 2);
BB:= ExtFml( "ASI.BBandBot",C, Periods, 2);
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=Cross(C,BB) AND TD=1;
LX:=C<ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
SE:=Cross(BT,C) AND TD=-1;
SX:=C >ExtFml("PowerPivots.NthPivotPrice",1,0,1);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0 AND Ref(B,-1)>=0
Long exit
Periods:=ExtFml( "ASI.CyclePeriod",C, .18, .1, 1.1);
BT:= ExtFml( "ASI.BBandTop",C, Periods, 2);
BB:= ExtFml( "ASI.BBandBot",C, Periods, 2);
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=Cross(C,BB) AND TD=1;
LX:=C<ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
SE:=Cross(BT,C) AND TD=-1;
SX:=C >ExtFml("PowerPivots.NthPivotPrice",1,0,1);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)>0
Short exit
Periods:=ExtFml( "ASI.CyclePeriod",C, .18, .1, 1.1);
BT:= ExtFml( "ASI.BBandTop",C, Periods, 2);
BB:= ExtFml( "ASI.BBandBot",C, Periods, 2);
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=Cross(C,BB) AND TD=1;
LX:=C<ExtFml("PowerPivots.NthPivotPrice",-1,0,1);
SE:=Cross(BT,C) AND TD=-1;
SX:=C >ExtFml("PowerPivots.NthPivotPrice",1,0,1);
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)<0
|
