Код:
study(title="2 RSI", shorttitle="2 RSI", overlay=false)
rsi_period = input(title="Период RSI", type=integer, defval=14, minval=1)
Warn = input(title="ПС 1", type=integer, defval=20, minval=1)
Warn2 = input(title="ПС 2", type=integer, defval=30, minval=2)
Aktiv = input(title="Индекс", type=string, defval="SP1!")
per = period
rsi_origin = rsi(close,rsi_period)
rsi_spy = security(Aktiv , per ,rsi(close,rsi_period))
plot(sma(abs(rsi_spy-rsi_origin), 3), title='Гистограмма', color = gray, linewidth=1, style=histogram)
plot( (sma(abs(rsi_spy-rsi_origin), 3)) > Warn ?(sma(abs(rsi_spy-rsi_origin), 3)) : na , title='ПС 1', color = red, linewidth=1, style=histogram)
plot( (sma(abs(rsi_spy-rsi_origin), 3)) > Warn2 ?(sma(abs(rsi_spy-rsi_origin), 3)) : na , title='ПС 2', color = blue, linewidth=1, style=histogram)
plot(Warn, title='Линия ПС 1',color = gray, linewidth=1, style=line)
plot(Warn2, title='Линия ПС 2', color = gray, linewidth=1, style=line)