DEMA 17 w Trend Direction Expert This expert needs the power Pivots plus Add-on Highlights long TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(C,Dema(C,17)) AND TD=1; SE:=Cross(Dema(C,17),C) AND TD=-1; LX:=Cross(Dema(C,17),C); SX:=Cross(C,Dema(C,17)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B>0 Short TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(C,Dema(C,17)) AND TD=1; SE:=Cross(Dema(C,17),C) AND TD=-1; LX:=Cross(Dema(C,17),C); SX:=Cross(C,Dema(C,17)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B<0 Out TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(C,Dema(C,17)) AND TD=1; SE:=Cross(Dema(C,17),C) AND TD=-1; LX:=Cross(Dema(C,17),C); SX:=Cross(C,Dema(C,17)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 Symbols long entry TD:=ExtFml("PowerPivots.TrendDirection",1,2); LE:=Cross(C,Dema(C,17)) AND TD=1; SE:=Cross(Dema(C,17),C) AND TD=-1; LX:=Cross(Dema(C,17),C); SX:=Cross(C,Dema(C,17)); 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(C,Dema(C,17)) AND TD=1; SE:=Cross(Dema(C,17),C) AND TD=-1; LX:=Cross(Dema(C,17),C); SX:=Cross(C,Dema(C,17)); 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(C,Dema(C,17)) AND TD=1; SE:=Cross(Dema(C,17),C) AND TD=-1; LX:=Cross(Dema(C,17),C); SX:=Cross(C,Dema(C,17)); 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(C,Dema(C,17)) AND TD=1; SE:=Cross(Dema(C,17),C) AND TD=-1; LX:=Cross(Dema(C,17),C); SX:=Cross(C,Dema(C,17)); B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); B=0 AND Ref(B,-1)<0