8 MA Josh Luckman Expert
Highlight Tab 
{long} 
Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
i:=Cum(Buy>-1 AND Sell>-1)=1; 
x:=BarsSince(i OR Buy)<=BarsSince(i OR Sell)=0; 
X=0 

{Short} 
Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
i:=Cum(Buy>-1 AND Sell>-1)=1; 
x:=BarsSince(i OR Buy)>=BarsSince(i OR Sell)=0; 
X=0 

Symbol Tab 
{EL} 
Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
i:=Cum(Buy>-1 AND Sell>-1)=1; 
x:=BarsSince(i OR Buy)<=BarsSince(i OR Sell)=0; 
X=0 AND Ref(X,-1)>0 

{ES} 
Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
i:=Cum(Buy>-1 AND Sell>-1)=1; 
x:=BarsSince(i OR Buy)>=BarsSince(i OR Sell)=0; 
X=0 AND Ref(X,-1)>0
*****8 MA Josh Luckman w Trend Direction*****
You will need the PowerPivots Plus Add-on for this Expert to work 

Highlights 

Long 

Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
TD:=ExtFml("PowerPivots.TrendDirection",1,2); 
LE:=Buy and TD=1; 
SE:=Sell and TD=-1; 
LX:=Sell and TD>=0; 
SX:= Buy and TD<=0; 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B>0 

Short 

Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
TD:=ExtFml("PowerPivots.TrendDirection",1,2); 
LE:=Buy and TD=1; 
SE:=Sell and TD=-1; 
LX:=Sell and TD>=0; 
SX:= Buy and TD<=0; 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B<0 

Out 

Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
TD:=ExtFml("PowerPivots.TrendDirection",1,2); 
LE:=Buy and TD=1; 
SE:=Sell and TD=-1; 
LX:=Sell and TD>=0; 
SX:= Buy and TD<=0; 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 

Symbols 

long entry 

Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
TD:=ExtFml("PowerPivots.TrendDirection",1,2); 
LE:=Buy and TD=1; 
SE:=Sell and TD=-1; 
LX:=Sell and TD>=0; 
SX:= Buy and TD<=0; 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B>0 AND Ref(B,-1)<=0 


Short entry 

Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
TD:=ExtFml("PowerPivots.TrendDirection",1,2); 
LE:=Buy and TD=1; 
SE:=Sell and TD=-1; 
LX:=Sell and TD>=0; 
SX:= Buy and TD<=0; 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B<0 AND Ref(B,-1)>=0 

long Exit 

Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
TD:=ExtFml("PowerPivots.TrendDirection",1,2); 
LE:=Buy and TD=1; 
SE:=Sell and TD=-1; 
LX:=Sell and TD>=0; 
SX:= Buy and TD<=0; 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 AND Ref(B,-1)>0 

Short exit 

Buy:=C>Ref(C,-1) AND 
C>O AND 
C>Mov(C,8,E) AND 
C>Ref(H,-1); 
Sell:=C<Ref(C,-1) AND 
C<O AND 
C<Mov(C,8,E) AND 
C<Ref(L,-1); 
TD:=ExtFml("PowerPivots.TrendDirection",1,2); 
LE:=Buy and TD=1; 
SE:=Sell and TD=-1; 
LX:=Sell and TD>=0; 
SX:= Buy and TD<=0; 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 AND Ref(B,-1)<0