Bollinger Bands Color

//Crée par J.Dow
//Boullinger Band color
study(shorttitle="BB color", title="Bollinger Bands color", overlay=true)

length = input(20, minval=1, title ="MA - Simpel")
len = input(2, minval=1, title="MA - Exponantial")
src = input(close, title="Source")
mult = input(2.0, minval=0.001, maxval=50)

//Bollinger Bands
basis = sma(src, length)
dev = mult * stdev(src, length)
upper = basis + dev
lower = basis - dev

price = ema(src, len)
linecolor = price >= basis ? green : red


//Affichage

plot(basis, color=red, transp=50)
p1 = plot(upper, color=linecolor, transp=90)
p2 = plot(lower, color=linecolor, transp=90)
fill(p1, p2, color=linecolor)