3 Day Reversal for Amibroker (AFL)

// 3 Day Reversal 

// Knowing the Current Trend

P1 = Param("Period",10,0,100,1);

MyPDI= PDI(P1);//Positive Directional Indicator
MyMDI= MDI(P1);//Negative Directional Indicator (Minus)

// Trend Conditions
Cond1 = MyPDI > MyMDI;
Cond2 = MyPDI < MyMDI;

//Sell Conditions

Cond3 = Ref(C,-1) > Ref(C,-2) AND Ref(C,-2) > Ref(C, -3) AND Ref(C, -3) > Ref(C, -4);
Cond4 = C < Ref(C,-1) AND C < Ref(O, -1);
A = H - C;
B = ( ( 100 * A ) / C );
D = (100 * 0.50 ) / H;
E = (100 * 0.50 ) / L;

Cond5 = O > (H - D); // AND B < 0.50; 
Cond6 = C <= (L + E);

Sell = Cond1 AND Cond3 AND Cond4 AND Cond5 AND Cond6;

// Buy Conditions

Cond7 = C > Ref(C,-1) AND C > 0;
Cond8 = O <= (L + E);
Cond9 = C >= (H - D);

Buy = Cond2 AND Cond7 AND Cond8 AND Cond9;

Short=Cover=0;

Buy = ExRem(Buy, BarsSince(Buy) > 5);
Sell = ExRem(Sell, BarsSince(Sell) > 5);