PS 4 Day Range Switch w 65CC

[henry1224]

TD:=If(Sum(C < MA(C,65),5)>4,-1, If(Sum(C > MA(C,65),5)>4,1,0)),colorstick;
D1:=If(C>Ref(Max(Max(H,Ref(H,3)),Max(Ref(H,1),Ref(H,2))),1),Min(Min(L,Ref(L,3)),Min(Ref(L,1),Ref(L,2))),Ref(H,2));
D2:=If(C<Ref(Min(Min(L,Ref(L,3)),Min(Ref(L,1),Ref(L,2))),1),Max(Max(H,Ref(H,3)),Max(Ref(H,1),Ref(H,2))),Ref(L,2));

a:=Cross(C,d1);
b:=Cross(d2,C);

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;
FillRgn(Long==0 & Short==0,0,1),Brush#501E90FF;