LazyBear

Apirine Slow RSI [LazyBear]

The slow relative strength index (SRSI) indicator created by Vitali Apirine is a momentum price oscillator similar to RSI in its application and interpretation. Oscillating between 0 and 100, it generates both OB/OS signals and midline (50) cross over signals and divergences.

As author suggests, bullish/bearish divergences generated by SRSI are not as effective during strong trends. To avoid fading an established trend, the system is used in conjunction with a trend confirmation tool like ADX indicator.

You can configure the OB/OS levels, default are 70/30.

More info:
The slow relative strength index, TASC 2015-07

List of my public indicators: bit.ly/1LQaPK8
List of my app-store indicators: blog.tradingview.com/?p=970


List of my free indicators: bit.ly/1LQaPK8
List of my indicators at Appstore: blog.tradingview.com/?p=970
오픈 소스 스크립트

이 스크립트의 오써는 참된 트레이딩뷰의 스피릿으로 이 스크립트를 오픈소스로 퍼블리쉬하여 트레이더들로 하여금 이해 및 검증할 수 있도록 하였습니다. 오써를 응원합니다! 스크립트를 무료로 쓸 수 있지만, 다른 퍼블리케이션에서 이 코드를 재사용하는 것은 하우스룰을 따릅니다. 님은 즐겨찾기로 이 스크립트를 차트에서 쓸 수 있습니다.

면책사항

이 정보와 게시물은 TradingView에서 제공하거나 보증하는 금융, 투자, 거래 또는 기타 유형의 조언이나 권고 사항을 의미하거나 구성하지 않습니다. 자세한 내용은 이용 약관을 참고하세요.

차트에 이 스크립트를 사용하시겠습니까?
//
// @author LazyBear 
// 
// List of my public indicators: http://bit.ly/1LQaPK8  
// List of my app-store indicators: http://blog.tradingview.com/?p=970 
//
study("Apirine Slow RSI [LazyBear]", shorttitle="ASRSI_LB", overlay=false, precision=3)
periods = input( 6, title="Smoothing", minval=1, maxval=100 ) 
smooth =  input( 14, title="RSI Length", minval=1, maxval=100 ) 
price = input(close, title="Source")
calc_wima(src, length) => 
    MA_s=(src + nz(MA_s[1] * (length-1)))/length
    MA_s
	
r1 = ema( price, periods ) 
r2 = iff( price > r1, price - r1, 0 ) 
r3 = iff( price < r1, r1 - price, 0 ) 
r4 = calc_wima( r2, smooth ) 
r5 = calc_wima( r3, smooth ) 
rr = iff( r5 == 0, 100, 100 - ( 100 / ( 1 + ( r4 / r5 ) ) ) ) 
obl=input(70, title="OB Level")
ovl=input(30, title="OS Level")
obl1=hline(obl, title="OB", color=gray), osl1=hline(ovl, title="OS", color=gray)
fill(obl1,osl1, color=gray, transp=80, title="RegionFill")
hline(50, title="MidLine", color=gray)
plot( rr, title="SlowRSI", color=red, linewidth=2 )