3 10 30 MA Expert
PowerPivots Plus Addon is needed to run this Expert 

Highlights 

Long 

A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2); 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1); 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B>0 

Short 

A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2); 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1); 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B<0 

Out 

A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2); 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1); 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 

Symbols 

Long Entry 

A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2); 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1); 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B>0 AND Ref(B,-1)<=0 

Short Entry 

A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2); 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1); 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B<0 AND Ref(B,-1)>=0 

Long Exit 

A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2); 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1); 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 AND Ref(B,-1)>0 

Short Exit 

A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2); 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1); 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 AND Ref(B,-1)<0

*****w Trend Direction*****

PowerPivots plus Add-On needed to run this Expert 

Highlights 

Long 

TD:=ExtFml("PowerPivots.TrendDirection",1,2);A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2) AND TD=1; 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1) AND TD=-1; 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B>0 

Short 

TD:=ExtFml("PowerPivots.TrendDirection",1,2);A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2) AND TD=1; 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1) AND TD=-1; 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B<0 

Out 

TD:=ExtFml("PowerPivots.TrendDirection",1,2);A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2) AND TD=1; 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1) AND TD=-1; 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 

Symbols 

Long Entry 

TD:=ExtFml("PowerPivots.TrendDirection",1,2);A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2) AND TD=1; 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1) AND TD=-1; 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B>0 AND Ref(B,-1)<=0 

Short Entry 

TD:=ExtFml("PowerPivots.TrendDirection",1,2);A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2) AND TD=1; 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1) AND TD=-1; 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B<0 AND Ref(B,-1)>=0 

Long Exit 

TD:=ExtFml("PowerPivots.TrendDirection",1,2);A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2) AND TD=1; 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1) AND TD=-1; 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 AND Ref(B,-1)>0 

Short Exit 

TD:=ExtFml("PowerPivots.TrendDirection",1,2);A1:=Mov(C,3,S); 
A2:=Mov(C,10,S); 
A3:=Mov(C,30,S); 
LE:=A2>A3 AND Cross(A1,A2) AND TD=1; 
LX:=Cross(A3,A2) OR Cross(A2,A1); 
SE:=A2<A3 AND Cross(A2,A1) AND TD=-1; 
SX:=Cross(A2,A3) OR Cross(A1,A2); 
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!"); 
B=0 AND Ref(B,-1)<0