study("5 Period Cycle Seasonality")
Period = input(title="Period Cycle", type=integer , defval=252)
LastYear = close[Period]
TwoYearsAgo = close [2 * Period]
ThreeYearsAgo = close [3 * Period]
FourYearsAgo = close [4 *Period]
FiveYearsAgo = close [5 * Period]
Offset = Period
LastYearE = close[Period - Offset]
TwoYearsAgoE = close [2 * Period - Offset]
ThreeYearsAgoE = close [3 * Period - Offset]
FourYearsAgoE = close [4 *Period - Offset]
FiveYearsAgoE = close [5 * Period - Offset]
plot((LastYearE + TwoYearsAgoE + ThreeYearsAgoE + FourYearsAgoE + FiveYearsAgoE) / 5, color = #00ff00, linewidth = 5, offset = Offset)
plot((LastYear + TwoYearsAgo + ThreeYearsAgo + FourYearsAgo + FiveYearsAgo) / 5, color = #ff0000, linewidth = 5)