vdubong updated

Most the credit for this update has to go to RicardoSantos and his awesome RSIChannel + some fixes to my own which I embedded to my my own script.. I've also embedded the additional Bollinger band 50/2. What can I say it's becoming a thing of beauty :).
RicardoSantos's RSIChannel indicator is also included separately (hidden) should you chose to 'Make it mine'

Made a couple of changes to the script http://pastebin.com/F5e24Vfu
Remove from Favorite Scripts Add to Favorite Scripts
//Script editor vdubus
//vdubong 20 (set variables as required Upper & Lower)
study(title="vdubong", shorttitle="vdubong", overlay=true)

length1 = input(20, minval=1, title="Upper Channel")
length2 = input(20, minval=1, title="Lower Channel")

upper = highest(length1)
lower = lowest(length2)
basis = avg(upper, lower)

l = plot(lower, style=line, linewidth=2, color=fuchsia, title="lower")
u = plot(upper, style=line, linewidth=2, color=fuchsia, title="upper")

//-----------------Built in MA50-----------------------------------------
m1_src = close
m1_p = input(50, title="MA1 Period:")

plot(sma(m1_src, m1_p), color=red, linewidth=2, title="MA1")

//-----------------Built in BB20-------------------------------------------
bb1_src = close
bb1_l = input(20, minval=1), bb1_mult = input(1.5, minval=0.001, maxval=400)
bb1_dev = bb1_mult * stdev(bb1_src, bb1_l)
bb1_upper = basis + bb1_dev
bb1_lower = basis - bb1_dev
bb1_p1 = plot(bb1_upper, color=blue)
bb1_p2 = plot(bb1_lower, color=blue)
fill(bb1_p1, bb1_p2, transp=80)
//-----------------Built in BB50 -----------------------------------------
bb2_src = close
bb2_l = input(50, minval=1), bb2_mult = input(1.5, minval=0.001, maxval=400)
bb2_dev = bb2_mult * stdev(bb2_src, bb2_l)
bb2_upper = basis + bb2_dev
bb2_lower = basis - bb2_dev
bb2_p1 = plot(bb2_upper, color=blue)
bb2_p2 = plot(bb2_lower, color=blue)
fill(bb2_p1, bb2_p2, transp=90)

// PivotsHL ???--------------------------------------------------------------

// @author RicardoSantos
// RSI inspired oscilator bands channels.
// Can be interpreted as a RSI oscilator but at price level.
lenght = input(3)
margin = input(4)

tf = margin
mp = (0.0001 * close) * margin

ph = avg(high, high[tf])
ph2 = wma((ph+mp)+(high-hl2), lenght*3)
pl = avg(low, low[tf])
pl2 = wma((pl-mp)-(low-hl2), lenght*3)

ma1 = alma((
    close >= ph[1] ? high + high - ph + mp :
    close <= pl[1] ? low - low + pl - mp :
    hlc3), lenght, 0.55, 6)

pu = plot(ph2, style=cross, color=silver, linewidth=0)
pd = plot(pl2,style=cross, color=silver, linewidth=0)
pc = plot(ma1, style=line, color=silver, linewidth=1)

fill(pu,pc, color=red, transp=80)
fill(pd,pc, color=green, transp=80)
Made a couple of changes to the script, http://pastebin.com/F5e24Vfu
vdubus vdubus
Sorry wrong .img this one
+2 Reply
Home Stock Screener Forex Screener Crypto Screener Economic Calendar Shows How It Works Chart Features Pricing House Rules Moderators Website & Broker Solutions Widgets Charting Solutions Lightweight Charting Library Help Center Refer a friend Feature Request Blog & News FAQ Wiki Twitter
Profile Profile Settings Account and Billing Refer a friend My Support Tickets Help Center Ideas Published Followers Following Private Messages Chat Sign Out