EdgeTalk

Under the parameters tab

N Double 55 2 100


here is the code

TD:=If(Sum(C < MA(C,105),5)>4,-1, If(Sum(C > MA(C,105),5)>4,1,0)),colorstick;
Var1:= EMA(CLOSE,N);
Var2:=EMA(var1,N);
Var3:= (var1-var2)+var1;
Var1:= EMA(var3,N);
Var2:= EMA(var1,N);
Var4:= (var1-var2)+var1;
Var5:=var3/var4;

a:=Var3>var4 & var5>1.05;
b:=Var3<var4 & var5<.95;
Long:BarsSince(A)<BarsSince(B) & TD>0,ColorGreen;
Short:BarsSince(A)>BarsSince(B) & TD<0,ColorRed;
FillRgn(Long>0,0,Long),Brush#50008000;
FillRgn(Short>0,0,Short),Brush#50800000;