Type : Function, Name : MaxTradeHigh
{Function: MaxTradeHigh}
if marketposition = 1 then begin
if h > MaxTradeHigh[1] then
MaxTradeHigh = h;
end else
MaxTradeHigh = -999999;





Type : Function, Name : MinTradeLow
{Function: MinTradeLow}
if marketposition = -1 then begin
if l < MinTradeLow[1] then
MinTradeLow = l;
end else
MinTradeLow = 999999;






Type : Signal, Name : Phil Lane's System II
{System: Phil Lane's System II}
Inputs: ATRLen(10),Lvl(10),Fac(2.5);
Vars: Atr(0),Eb(0),LStop(0),Mp(0);

Atr=Average(TrueRange,ATRLen);
Mp=MarketPosition;
If Mp<>1 and c[1] O>L[1] and Atr>Lvl then begin
buy on close;
Eb=currentbar;
LStop=0;
end;
If MP=1 and currentbar<>eb then begin
LStop=Maxlist(LStop,MaxTradeHigh-Fac*ATR);
exitlong Lstop stop;
end;