[RS]Week Highlighter V0

study(title="[RS]Week Highlighter V0", shorttitle="[RS]WH.V0", overlay=true)
isnewweek = isintraday and dayofweek == 1 and hour == 1 and minute == 0 ? true :
        dayofweek == 1 ? true : false

isendweek = isintraday and dayofweek == 6 and hour == 22 and minute == 59 ? true :
        dayofweek == 6 ? true : false

scolor1 = isnewweek ? silver : na
bgcolor(scolor1, transp=50)
scolor2 = isendweek ? gray : na
bgcolor(scolor2, transp=50)