LazyBear

Premier RSI Oscillator [LazyBear]

This is a modified form of PSO (original idea by Lee Leibfarth), to use RSI as the input.

This provides a quick response to changes in market direction. This highly sensitive indicator allows for early anticipation of price turns and can be used to establish definitive trading zones that identify potential trading opportunities.

Entry/Exit rules are the same as PSO . Enabling bar colors makes it easy to identify the entry/exits too (Refer to my comment below for more points to keep in mind regarding colors)

Here's a comparison against normal RSI .

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


List of my free indicators: http://bit.ly/1LQaPK8
List of my indicators at Appstore: http://blog.tradingview.com/?p=970
Skrip sumber terbuka

Dalam semangat TradingView yang sebenar, penulis skrip ini telah menerbitkannya dengan menggunakan sumber terbuka supaya pedagang-pedagang dapat memahami dan mengesahkannya. Sorakan kepada penulis! Anda dapat menggunakannya secara percuma tetapi penggunaan semula kod ini dalam penerbitan adalah dikawalselia oleh Peraturan Dalaman. Anda boleh menyukainya untuk menggunakannya pada carta.

Penafian

Maklumat dan penerbitan adalah tidak dimaksudkan untuk menjadi, dan tidak membentuk, nasihat untuk kewangan, pelaburan, perdagangan dan jenis-jenis lain atau cadangan yang dibekalkan atau disahkan oleh TradingView. Baca dengan lebih lanjut di Terma Penggunaan.

Ingin menggunakan skrip ini pada carta?
//
// @author LazyBear 
// 
// List of my public indicators: http://bit.ly/1LQaPK8 
// List of my app-store indicators: http://blog.tradingview.com/?p=970 
//
study("Premier RSI Oscillator [LazyBear]", shorttitle="PRO_LB")
src=input(close, title="Source")
lrsi=input(14, title="RSI Length")
stochlen = input(8, title="Stoch length")
smoothlen = input(25, title="Smooth length")
r=rsi(src, lrsi)
sk=stoch(r, r, r, stochlen)
len = round(sqrt( smoothlen ))
nsk = 0.1 * ( sk - 50 )
ss = ema( ema( nsk, len ), len )
expss = exp( ss )
pro = ( expss - 1 )/( expss + 1 )
plot( pro, title="Premier RSI Stoch", color=black, linewidth=2 )
plot( pro, color=iff( pro < 0, red, green ), style=histogram , title="PROHisto")
plot(0, color=gray, title="ZeroLine")
plot( 0.2, color=gray, style=3 , title="Level2+")
plot( 0.9, color=gray, title="Level9+")
plot( -0.2, color=gray, style=3, title="Level2-")
plot( -0.9, color=gray, title="Level9-")
ebc=input(false, title="Enable bar colors")
bc=ebc?(pro<0? (pro<pro[1]?red:orange) : (pro>pro[1]?lime:green)) : na
barcolor(bc)