{Test Strategy}

Input:
QuietBars(5),
MinBars(3),
MMStop(750);

Vars:
TotTr(0),
OK_To_Trade(True),
BarsToday(0);


If Time = SessionFirstBarTime(0,1) then begin
BarsToday = 1;
OK_To_Trade = True;
end
Else
BarsToday = BarsToday + 1;

If marketposition=0 and OK_To_Trade then buy("LE1") next bar at market;

If MarketPosition > 0 then Begin
If BarsSinceEntry >= MinBars and Close > Close[2] and Close > EntryPrice then Sell("LX1") next bar at market; {This is a Take Profit Condition as an example}
End;

TotTr = Totaltrades;
If TotTr > TotTr[1] then begin
If PositionProfit(1) < 0 then OK_To_Trade = False;
end;

If BarsToday >= 2 and BarsSinceExit(1) >= QuietBars then OK_To_Trade = True;

If Time = CalcTime(SessionEndTime(0,1),-BarInterval) then Sell next bar at market;

TotTr = Totaltrades;
If TotTr > TotTr[1] then begin
If PositionProfit(1) < 0 then OK_To_Trade = False;
end;

If PositionProfit(0) < 0 then OK_To_Trade = False;

//If Date = 1231016 and time = 0845 then print("MP = ",marketposition:0:0," BarsSinceExit = ",BarsSinceExit(1):0:0," TotTr = ",TotTr:0:0," TotTr[1] = ",TotTr[1]:0:0);


SetStopContract;
SetStoploss(MMStop);