Adaptive Ergodic Candlestick Oscillator [LazyBear] ‒ Indikator av LazyBear

lazybear custom indicators oscillator ergodic adaptive stochastic

This updates Blau's excellent Candlestick oscillator to be adaptive by using the length of a scaled stochastic indicator and an exponent (for calculating the smoothing coefficient) to obtain the moving average.

Check out the options page for configurable variables.

More info on Ergodic Oscillator:
Book: "Momentum, Direction and Divergence" by William Blau

List of my public indicators:
List of my app-store indicators:

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

Skript med en öppen källkod

I sann TradingView-anda har författaren publicerat detta skript med öppen källkod så att andra handlare kan förstå och verifiera det. Hatten av för författaren! Du kan använda det gratis men återanvändning av den här koden i en publikation regleras av våra ordningsregler. Du kan ange den som favorit för att använda den i ett diagram.

Frånsägelse av ansvar

Informationen och publikationerna är inte avsedda att vara, och utgör inte heller finansiella, investerings-, handels- eller andra typer av råd eller rekommendationer som tillhandahålls eller stöds av TradingView. Läs mer i Användarvillkoren.

Vill du använda det här skriptet i ett diagram?

//
// @author LazyBear 
// 
// List of my public indicators: http://bit.ly/1LQaPK8 
// List of my app-store indicators: http://blog.tradingview.com/?p=970 
//
study("Adaptive Ergodic Candlestick Oscillator [LazyBear]", shorttitle="AECO_LB")
length=input(defval=14, title="Stoch Scaling Length"), sl=input(defval=9, title="Signal Length")
ep=input(defval=5, title="Smooth Length")
vrb= abs( stoch(close, high, low, length)-50)/50
mep=2/(ep+1), ce=cum(1)<=((length+ep)*2)
came1=iff(ce,close-open,nz(came1[1])+mep*vrb*((close-open)-nz(came1[1])))
came2=iff(ce,high-low,nz(came2[1])+mep*vrb*((high-low)-nz(came2[1])))
came11=iff(ce,came1,nz(came11[1])+mep*vrb*(came1-nz(came11[1])))
came22=iff(ce,came2,nz(came22[1])+mep*vrb*(came2-nz(came22[1])))
eco=came11/came22*100.0
se=ema(eco, sl)
ebc=input(false, title="Enable Bar colors")
bc_=eco>0 ? (eco>eco[1]?green:orange) : (eco<eco[1]?red:orange)
bc_t=eco>0 ? (eco>se?lime:orange) : (eco<se?red:orange)
bc=ebc? bc_t : na
barcolor(bc)
plot(0, title="MidLine")
plot(eco, style=histogram, color=bc_,linewidth=2, title="ECOHisto_1")
plot(eco, color=black, linewidth=2, title="AECO")