Stock Portfolio Organizer

The ultimate porfolio management solution.

Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
Find Out More Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

Shrees KTR Oscillator for Amibroker (AFL)

Rating:
3 / 5 (Votes 5)
Tags:
oscillator, amibroker

KT STANDS FOR KIJUN TENKAN HISTOGRAM .

R STANDS FOR RSI

Indicator / Formula

Copy & Paste Friendly
_SECTION_BEGIN("KTR");
X=EMA (RSI(5),7);
Y=EMA (X,5);
//Plot (X, "SmoothRSI", colorRed,styleThick);
Plot (X, "SRSI", colorRed,styleThick|styleOwnScale);

//Plot (EMA (RSI(21),5), "Signal", colorLightBlue,styleThick);
Plot (Y, "Signal", colorLightBlue,styleThick|styleOwnScale);


//////////////////////////////////////////////////////////

/*ICHI SHORT TERM*/
SL = ( HHV( H, 13 ) + LLV( L, 13) )/2;// standard, base, or kijun-sen line
TL = ( HHV( H, 3 ) + LLV( L, 3 ) )/2;// turning, conversion, or tenkan-senline 
//DL = Ref( C, 25 );						// delayed close price, or chikou span
Span1 = Ref( ( SL + TL )/2, -25 );		//Span1 and Span2 define the clouds
Span21 = Ref( (HHV( H, 52) + LLV(L, 52))/2, -25);

/////////////////////////////////////////////////////////////////////////////////////////// 
//Plot(SL,"SL",colorLIGHTBlue,styleThick);// standard, base, or kijun-sen line 
//Plot(TL,"TL",colorRed,styleThick);// turning, conversion, or tenkan-senline 
//Plot(DL,"DL",colorViolet,styleLine);// delayed close price, or chikou span
//PlotOHLC(Span1,Span1,Span2,Span2,"Cloud",ColorHSB(Hue,sat,bri),styleCloud);

///////////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////////////////////////
 /*ICHI STD
SL = ( HHV( H, 26 ) + LLV( L, 26) )/2;// standard, base, or kijun-sen line
TL = ( HHV( H, 9 ) + LLV( L, 9 ) )/2;// turning, conversion, or tenkan-senline 
DL = Ref( C, 25 );						// delayed close price, or chikou span
Span1 = Ref( ( SL + TL )/2, -25 );		//Span1 and Span2 define the clouds
Span21 = Ref( (HHV( H, 52) + LLV(L, 52))/2, -25);
*/
//////////////////////////////////////////////////////////////////////////////////////////////
  RKT=TL-SL;
  RKTH=HHV(RKT ,5);
  RKTL=LLV(RKT ,5);
  RRKTHL=  RKTH-RKTL;
  
  STOKT=RKT*100/ RRKTHL;
  MASTOKT  =EMA(STOKT,5);
  MMASTOKT  =EMA(MASTOKT,3);
  X=MASTOKT -MMASTOKT ;
  
  
  
  dr=10;
  XM=MA(X,dr)*2;



  A=colorBRIGHTGreen;
  B=colorCustom12;

  
  COLHIST=IIf(X>Ref(X,-1) ,A,B);
  
  
  Plot( XM,"", COLHIST,styleHistogram);//
  PlotOHLC( XM,XM,0,0,"", ColorRGB(60,60,30),styleCloud|styleNoLabel);//
  
  Plot( 0,"",colorYellow,styleLine);//
  _SECTION_END();

0 comments

Leave Comment

Please login here to leave a comment.

Back