Stock Portfolio Organizer
The ultimate porfolio management solution.
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
TSI V.2 for Amibroker (AFL)
I’ve updated my own TSI (tweaked) version.
Putted in a Momentum Histogram.
Some of you like this typical indcator.
Parameter window gives you more acces to settings, colors, etc…
Enjoy
Similar Indicators / Formulas
Indicator / Formula
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 | _SECTION_BEGIN ( "TSI" ); SetChartBkColor ( ParamColor ( "Panel Color" , colorLightGrey )); SetChartBkGradientFill ( ParamColor ( "Upper Chart" , colorLightGrey ), ParamColor ( "Lower Chart" , colorLightGrey )); r= Param ( "TSI period 'R':" ,7,1,100,1); s= Param ( "TSI period 'S':" ,27,1,100,1); u= Param ( "TSI period 'U':" ,1,1,100,1); sig= Param ( "Signal period:" ,7,1,100,1); parmTSILStyle = ParamStyle ( "TSI Line Style" , styleLine | styleThick ); parmTSILUpColor = ParamColor ( "TSI Line UpColor" , colorGreen ); parmTSILDwnColor = ParamColor ( "TSI Line DownColor" , colorRed ); parmTSISStyle = ParamStyle ( "TSI SignalLine Style" , styleLine | styleThick ); parmTSISUpColor = ParamColor ( "TSI SignalLine UpColor" , colorGreen ); parmTSISDwnColor = ParamColor ( "TSI SignalLine DownColor" , colorRed ); parmHistUpColor = ParamColor ( "TSI Histogram UpColor" , colorLime ); parmHistDwnColor = ParamColor ( "TSI Histogram DownColor" , colorOrange ); Mtm = C - Ref ( C , -1 ); AbsMtm = abs ( Mtm ); Num_T = EMA ( EMA ( EMA ( Mtm, r ), s ), u ); Den_T = EMA ( EMA ( EMA ( AbsMtm, r ), s ), u); TSI = 100 * Nz ( Num_T / Den_T ); TSIL = 100 * Nz ( Num_T / Den_T ); //Green TSIL Line=Rising; Red TSIL Line=Falling col = IIf ( TSIL > Ref ( TSIL, -1 ), parmTSILUpColor, parmTSILDwnColor); Plot ( TSIL, "TSI(" +r+ "," +s+ "," +u+ ")" , col, parmTSILStyle); Plot (0, "" , ParamColor ( "Color ZeroLine" , colorBlueGrey ), styleLine ); //Green EMA TSI,sig Line=Rising; Red EMA TSI,sig Line=Falling col = IIf ( EMA (TSI,sig) > Ref ( EMA (TSI,sig), -1 ), parmTSISUpColor, parmTSISDwnColor ); Plot ( EMA (TSI,sig), "" , col, parmTSISStyle); //Histogram Momentum Disp1= ParamToggle ( "Histogram Momentum" , "Show|Hide" ,1); HistColM= IIf ( TSI > Ref (TSI,-1),parmHistUpColor,parmHistDwnColor); if (Disp1){ Plot (TSI, "" ,HistColM, ParamStyle ( "Histogram style" , styleHistogram | styleThick , maskHistogram ));} //Histogram Standard HistColS= IIf (TSI>0,parmHistUpColor,parmHistDwnColor); Plot (TSI, "" ,HistColS, ParamStyle ( "Histogram style" , styleHistogram | styleThick , maskHistogram )); //Signals mybuy= TSIL > Ref ( TSIL, -1 ) AND EMA (TSI,sig) > Ref ( EMA (TSI,sig), -1 ) AND TSIL> EMA (TSI,sig) ; mysell= TSIL < Ref ( TSIL, -1 ) AND EMA (TSI,sig) < Ref ( EMA (TSI,sig), -1 ) AND TSIL< EMA (TSI,sig) ; Buy = ExRem (myBuy, mysell); Sell = ExRem (mysell, myBuy); Disp2= ParamToggle ( "Buy and Sell Arrows" , "Show|Hide" ,1); if (Disp2){ PlotShapes ( IIf ( Buy , shapeUpArrow , shapeNone ), colorDarkGreen ,0); PlotShapes ( IIf ( Sell , shapeDownArrow , shapeNone ), colorDarkRed ,0);} Title = FullName (); _SECTION_END (); |
1 comments
Leave Comment
Please login here to leave a comment.
Back
Looks a little bit like a “tweaked” Sini Macd. Very nice done, Ceurami. Thanks for sharing!