WEEKLY OVERVIEW

study('WEEKLY OVERVIEW', overlay=true, max_bars_back=1000)


//WEEKLY CHANGE\\

friday_dist = barssince(dayofweek == 6)
//correct for fridays having 0 distance
dist_2 = iff(dayofweek == 6, friday_dist[1]+1, friday_dist)
//correct for missing fridays
thurs_dist = barssince(dayofweek == 4)
dist_3 = iff(dist_2 > 5, thurs_dist, dist_2)
//correct for thursday low distance
dist_4 = iff(dist_3 == 0, thurs_dist[1]+1, dist_3)
//correct for monday offset
dist_5 = iff(dist_4 == 5 and dayofweek == 1, thurs_dist, dist_4)
//correct for friday low distance
dist_6 = iff(dist_5 == 1 and dayofweek == 5, dist_5[1]+1, dist_5)

weekchg = close - close[dist_6]
weekchgp = (weekchg/close[dist_6])*100

plot(weekchg, "Weekly Change", color=yellow)
plot(weekchgp, "Weekly Change : Perc", color=red)


//MONTH TO DATE CHANGE
prem_dist = barssince(dayofmonth == 1)
monthchg = close - close[prem_dist]
monthchgp = (monthchg/close[prem_dist])*100

plot(monthchg, "MONTH TO DATE", color=fuchsia)
plot(monthchgp, "MONTH TO DATE : Perc", color=green)


//YEAR TO DATE CHANGE\\

year_dist = barssince(weekofyear == 52)
//correct for final week in year
ydist_2 = iff(weekofyear == 52 and dayofmonth != 1, barssince(weekofyear == 52)[dayofweek]+dayofweek, year_dist)

yrchg = close - close[ydist_2]
yrchgp = (yrchg/close[ydist_2])*100

plot(yrchg, "YTD Change", color=silver)
plot(yrchgp, "YTD Change : Perc", color=aqua)


//OTHER STUFF\\
plotshape(dayofweek == 6, style = shape.triangledown, title= "Friday Marker", color=white)
//plotshape(highest(close,ydist_2), style = shape.labelup, text = "Current Year High")
//plotshape(lowest(close,ydist_2), style = shape.labelup, text = "Current Year Low")