LazyBear

Indicators: Constance Brown Composite Index & RSI+Avgs

I am a big fan of Constance Brown. Her book "Technical Analysis for Trading Professionals" is an absolute classic (get the 2nd edition).

I have included here 2 of the indicators she uses in all her charts.

Composite Index
----------------------------------------
This is a formula Ms Brown developed (Cardwell may not agree!) to identify divergence failures with in the RSI. This also highlights the horizontal support levels with in the indicator area.

This index removes the normalization range restrictions in RSI. This means it is not bound with in 0-100 range. Also, this has embedded momentum calculation in it.

The fine nuances of this indicator are not documented well enough, if you find some good documentation, do let me know. Always use this with RSI (like the next one).

RSI+Avgs
----------------------------------------
This is plain 14 period RSI with a 9-period EMA and 45-period SMA overlaid.

List of my free indicators: bit.ly/1LQaPK8
List of my indicators at Appstore: blog.tradingview.com/?p=970
オープンソーススクリプト

TradingViewの精神に則り、このスクリプトの作者は、トレーダーが理解し検証できるようにオープンソースで公開しています。作者に敬意を表します!無料で使用することができますが、このコードを投稿で再利用するには、ハウスルールに準拠する必要があります。 お気に入りに登録してチャート上でご利用頂けます。

免責事項

これらの情報および投稿は、TradingViewが提供または保証する金融、投資、取引、またはその他の種類のアドバイスや推奨を意図したものではなく、またそのようなものでもありません。詳しくは利用規約をご覧ください。

チャートでこのスクリプトを利用したいですか?
//
// @author LazyBear
// Code from book "Breakthroughs in Technical Analysis" pg 95. 
//
// If you use this code in its orignal/modified form, do drop me a note. 
// 
study(title="Constance Brown Composite Index [LazyBear]", shorttitle="CBIDX_LB")
src = close
rsi_length=input(14, title="RSI Length")
rsi_mom_length=input(9, title="RSI Momentum Length")
rsi_ma_length=input(3, title="RSI MA Length")
ma_length=input(3, title="SMA Length")
fastLength=input(13)
slowLength=input(33)

r=rsi(src, rsi_length)
rsidelta = mom(r, rsi_mom_length)
rsisma = sma(rsi(src, rsi_ma_length), ma_length)
s=rsidelta+rsisma

plot(s, color=red, linewidth=2)
plot(sma(s, fastLength), color=green)
plot(sma(s, slowLength), color=orange)