MO MA w Trend Direction Expert This expert needs the powerpivots Plus Add-on to work Highlights Long TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(Mo(13),Mov(Mo(13),8,S)) AND TD=1; SE:=Cross(Mov(Mo(13),8,S),Mo(13)) AND TD=-1; LX:=Cross(Mov(Mo(13),8,S),Mo(13)); SX:=Cross(Mo(13),Mov(Mo(13),8,S)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(Mo(13),Mov(Mo(13),8,S)) AND TD=1; SE:=Cross(Mov(Mo(13),8,S),Mo(13)) AND TD=-1; LX:=Cross(Mov(Mo(13),8,S),Mo(13)); SX:=Cross(Mo(13),Mov(Mo(13),8,S)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(Mo(13),Mov(Mo(13),8,S)) AND TD=1; SE:=Cross(Mov(Mo(13),8,S),Mo(13)) AND TD=-1; LX:=Cross(Mov(Mo(13),8,S),Mo(13)); SX:=Cross(Mo(13),Mov(Mo(13),8,S)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols Long entry TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(Mo(13),Mov(Mo(13),8,S)) AND TD=1; SE:=Cross(Mov(Mo(13),8,S),Mo(13)) AND TD=-1; LX:=Cross(Mov(Mo(13),8,S),Mo(13)); SX:=Cross(Mo(13),Mov(Mo(13),8,S)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 AND Ref(B,-1)<=0 Short entry TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(Mo(13),Mov(Mo(13),8,S)) AND TD=1; SE:=Cross(Mov(Mo(13),8,S),Mo(13)) AND TD=-1; LX:=Cross(Mov(Mo(13),8,S),Mo(13)); SX:=Cross(Mo(13),Mov(Mo(13),8,S)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 AND Ref(B,-1)>=0 Long Exit TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(Mo(13),Mov(Mo(13),8,S)) AND TD=1; SE:=Cross(Mov(Mo(13),8,S),Mo(13)) AND TD=-1; LX:=Cross(Mov(Mo(13),8,S),Mo(13)); SX:=Cross(Mo(13),Mov(Mo(13),8,S)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)>0 Short Exit TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(Mo(13),Mov(Mo(13),8,S)) AND TD=1; SE:=Cross(Mov(Mo(13),8,S),Mo(13)) AND TD=-1; LX:=Cross(Mov(Mo(13),8,S),Mo(13)); SX:=Cross(Mo(13),Mov(Mo(13),8,S)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0