a1:=PDI(14);
a2:=MDI(14);
a3:=ADX(14);

a4:=BarsSince(Cross(a1,a2));
a5:=ExtFml("forum.REF", H, a4);
a6:=C>a5;
a7:=ExtFml("forum.SUM",a1>=a2,a4)=a4;
a8:=ExtFml("forum.SUM",a3>Ref(a3,-1),a4)=a4;
a9:=Sum(a3>Ref(a3,-1),5);
a10:=Abs(a1-a2);
a11:=Mov(a10,12,S);
a12:=a11>Ref(a11,-1);
a13:=ExtFml("forum.SUM",a10>a11,a4);
a7;

{
a4  - BarsSince cross
a5  - High the day of cross
a6  - Is close greater than high of day DI crossed
a7  - +DI has been greater than -DI since it crossed
a8  - How much has ADX been greater than yesterdays ADX since cross
a9  - How much has ADX been greater than yesterdays ADX in last 5 days
a10 - Width of +DI & -DI
a11 - 12 day MA of DI Width
a12 - Is the DI MA rising
a13 - How long width greater than DI MA
Looking for +DI greater than -DI
}