PIVOT point

//@version=2
study("PIVOT",overlay=true)
tf=input(title=" Timeframe", type=resolution, defval="D")
pr=security(tickerid,tf,hlc3[1])
ph=security(tickerid,tf,high[1])
pl=security(tickerid,tf,low[1])
//Pivot calculation
b=2*pr-ph
s=2*pr-pl
r2 =pr+(ph-pl) 
s2 = pr-(ph-pl)
r3 =  s + (ph - pl)
s3 = b -(ph-pl)
hb=2*pr-2*pl+ph
lb=2*pr-2*ph+pl
//plot
plot(pr,transp=50,color=fuchsia,style=cross,title="PIVOT")
bb=plot(b,color=lime,title="s1")
ss=plot(s,color=red,title="r1")
fill(bb,ss,transp=90,color=red)
plot(r2,color=silver,transp=60,title="r2")
plot(s2,color=silver,transp=60,title="s2")
plot(hb,color=blue,transp=60,title="hight break out")
plot(lb,color=blue,transp=60,title="low break out")