vars PriceH1 = series(price());
vars TriggerLine = series(LowPass(PriceH1,optimize(7,5,9)));
BBands(PriceH1,20,2,2,MAType_SMA);
Stop = optimize(4,2,8) * ATR(60);
TakeProfit = optimize(4,2,8)*ATR(60);
if(crossOver(TriggerLine,rRealLowerBand))
enterLong();
else if (crossUnder(TriggerLine,rRealUpperBand))
enterShort();