Stock Portfolio Organizer
The ultimate porfolio management solution.
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
Ultimate StochK for Amibroker (AFL)
Computes the weighted average of stochastic %K of three time frames similar to the Ultimate Oscillator by Larry Williams.
Buy/sell signals are generated similar to most oversold/overbought indicators. An exploration is also included for easy scanning of securities based on consensus rating.
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 | _SECTION_BEGIN ( "Ultimate StochK" ); //--- Chart/Indicator Mode --------------------------------------------------------------- p1 = Param ( "Slow Period" , 32); p2 = Param ( "Medium Period" , int (p1/2)); p3 = Param ( "Fast Period" , int (p2/2)); stk1 = StochK (p1,3); stk2 = StochK (p2,3); stk3 = StochK (p3,3); UltStk = (stk3 * (4/7)) + (stk2 * (2/7)) + (stk1 * (1/7)); //Plot(UltStk, _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style")); Plot (UltStk, Date ()+ " " + _SECTION_NAME (), ParamColor ( "Color" , colorCycle ), ParamStyle ( "Style" )); //Plot(80, "", colorRed, styleLine | styleNoLabel); //Plot(20, "", colorBlue, styleLine | styleNoLabel); PlotGrid (80, colorRed ); PlotGrid (20, colorBlue ); GraphXSpace = 5; //--------------------------------------------------------------------------------------- //--- Exploration Mode ------------------------------------------------------------------ // consensus rating ExtremeOversold = UltStk < 10; Oversold = UltStk > 10 AND UltStk < 20; Neutral = UltStk > 20 AND UltStk < 80; Overbought = UltStk > 80 AND UltStk < 90; ExtremeOverbought = UltStk > 90; ConsensusRating = WriteIf (ExtremeOversold, "Extreme Oversold" , WriteIf (Oversold, "Oversold" , WriteIf (Overbought, "Overbought" , WriteIf (ExtremeOverbought, "Extreme Overbought" , "Neutral" )))); Filter = 1; AddColumn (UltStk, "UltStk" ); AddTextColumn (ConsensusRating, "Rating" ); AddTextColumn ( WriteIf (UltStk > Ref (UltStk,-1), "Up" , "Down" ), "Direction" ); //--------------------------------------------------------------------------------------- _SECTION_END (); |
1 comments
Leave Comment
Please login here to leave a comment.
Back
Good indicator, Thanks!