// Settings
Defparam cumulateorders=false
Defparam flatbefore =080000
Defparam flatafter =180000
p=11
s=0.5
// Computes the basic moving average from the low and from the high
BollMALow = WeightedAverage[p](Low)
BollMAHigh= Weightedaverage[p](High)
// Computes the Standard Deviation (You can also take fx for colculate the "StdSTD[20](close)")
//Compute the Special Bollinger Bands.
//Instead of two times the STDDEV we calculate 0.5 times the STDDEV , and subtract it from the LowMA
//For the upper value we take 0.5 times the STDDEV and add it to the HighMA
BupH = BollMaHigh + (s * STD[p](high)) //Boll+
BdnL = BollMALow - (s * STD[p](low))//Boll-
//Compare the results with the close of each candle
//Lower than the close its -1
//Higher than the close its +1
//Between the two values equals the previous values
if close < BdnL then
ZHL=-1
elsif close> Buph then
ZHL=1
else
ZHL=ZHL[1]
endif
//First check the trend by means of the regressionslope
zbsl=sin(LinearRegressionSlope[p](bdnl)+LinearRegressionSlope[p](buph))/2
//The Boolean value of ZHL
if zbsl > 0 then
if ZHL crosses over 0 then
buy 1 contract at market
endif
elsif zbsl < 0 then
if zhl crosses under 0 then
sellshort 1 contract at market
endif
endif
if longonmarket then
if zhl crosses under 0 then
sell at market
endif
elsif shortonmarket then
if zhl > 0 then
exitshort at market
endif
endif
// Stops en targets (No Target)
set stop ploss 40
//No defined target
