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 ....
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Swing 90% for Amibroker (AFL)
Rating:
2 / 5 (Votes 7)
Tags:
oscillator, amibroker
Chúc May Mắn :) !
Similar Indicators / Formulas
Febo RSI ..real indicator
Submitted
by abhinavsingh about 13 years ago
Trading Volume Statistic
Submitted
by tuanstock1 over 10 years ago
Ergodic Oscillator
Submitted
by dljtrader about 14 years ago
3 Days Track
Submitted
by janet0211 over 14 years ago
Chande Momentum Oscillator
Submitted
by klimpek about 14 years ago
Inverse Fisher Transform Stochastic Oscillator
Submitted
by northstar about 13 years ago
Indicator / Formula
Copy & Paste Friendly
_SECTION_BEGIN("Price"); SetChartOptions(0,chartShowArrows|chartShowDates); SetBarsRequired(sbrAll,sbrAll); SetChartBkColor(ParamColor("Outer panel",colorDarkOliveGreen)); GraphXSpace=Param("GraphXSpace",20,-10,25,1); _SECTION_END(); _SECTION_BEGIN( "Flower" ); Title = StrFormat( "\\c02 {{DATE}} | Volume = " + WriteVal( V, 1.0 ) + " {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ); _SECTION_END(); _SECTION_BEGIN( "Sup/Res Detail" ); SupResPeriod = Param( "LookBack Period", 50, 0, 200, 1 ); SupResPercentage = Param( "Percentage", 100, 0, 200, 1 ); PricePeriod = Param( "Price Period", 16, 0, 200, 1 ); SupportLinecolor = ParamColor( "Support Color", colorGreen ); SupportLinestyle = ParamStyle( "Support Style", styleThick | 8 | styleNoLabel ); ResistanceLinecolor = ParamColor( "Resistance Color", colorRed ); Resistancestyle = ParamStyle( "Resistance Style", styleThick | 8 | styleNoLabel ); _SECTION_END(); _SECTION_BEGIN( "Line Detail" ); OverBought = Param( "OverBought Above", 200, 0, 400, 1 ); OverSold = Param( "OverSold Bellow", -200, -400, 0, 1 ); _SECTION_END(); _SECTION_BEGIN( "Trend Bought/Sold Detail" ); Smoother = Param( "Trend Smoother", 5, 5, 20 ); upcolor = ParamColor( "UpTrend Color", colorGreen ); Downcolor = ParamColor( "DownTrend Color", colorRed ); _SECTION_END(); _SECTION_BEGIN( "Circle Detail" ); Warningcolor = ParamColor( "Warning/Watch Signal", colorBlue ); WatchColor = ParamColor( "Accumulation Zone", colorWhite ); EntryColor = ParamColor( "Entry Signal", colorAqua ); ProfitTakeColor = ParamColor( "Distribution Zone", colorYellow ); ExitColor = ParamColor( "Exit Signal", colorRed ); _SECTION_END(); _SECTION_BEGIN( "Swing Sup/Res" ); Lookback = SupResPeriod; PerCent = SupResPercentage; Pds = PricePeriod; Var = MACD(); Up = IIf( Var > Ref( Var, -1 ), abs( Var - Ref( Var, -1 ) ), 0 ); Dn = IIf( Var < Ref( Var, -1 ), abs( Var - Ref( Var, -1 ) ), 0 ); Ut = Wilders( Up, Pds ); Dt = Wilders( Dn, Pds ); RSIt = 100 * ( Ut / ( Ut + Dt ) ); A1 = RSIt; B2 = RSI( pds ); C3 = CCI( pds ); D4 = StochK( pds ); E5 = StochD( pds ); F6 = MFI( pds ); G7 = Ultimate( pds ); H8 = ROC( C, pds ); Osc = C3; Value1 = Osc; Value2 = HHV( Value1, Lookback ); Value3 = LLV( Value1, Lookback ); Value4 = Value2 - Value3; Value5 = Value4 * ( PerCent / 100 ); ResistanceLine = Value3 + Value5; SupportLine = Value2 - Value5; baseline = IIf( Osc < 100 AND Osc > 10 , 50 , IIf( Osc < 0 , 0, 0 ) ); Plot( ResistanceLine, "", SupportLinecolor, SupportLinestyle ); Plot( SupportLine, "", ResistanceLinecolor, Resistancestyle ); _SECTION_END(); _SECTION_BEGIN( "Entry/Exit Detail" ); n = Smoother; ys1 = ( High + Low + Close * 2 ) / 4; rk3 = EMA( ys1, n ); rk4 = StDev( ys1, n ); rk5 = ( ys1 - rk3 ) * 200 / rk4; rk6 = EMA( rk5, n ); UP = EMA( rk6, n ); DOWN = EMA( up, n ); Oo = IIf( up < down, up, down ); Hh = Oo; Ll = IIf( up < down, down, up ); Cc = Ll; barcolor2 = IIf( Ref( oo, -1 ) < Oo AND Cc < Ref( Cc, -1 ), upcolor, IIf( up > down, upcolor, downcolor ) ); PlotOHLC( Oo, hh, ll, Cc, "Accumulation/Distribution", barcolor2, styleCandle ); // When value is -ve it is accumulation, when +ve it is distribution ( 200 lines are limtits to watch ) Buy = Cross( up, OverSold ); Sell = Cross( OverBought, up ); PlotShapes ( IIf( Buy, shapeSmallCircle, shapeNone ) , EntryColor, layer = 0, yposition = -220, offset = 1 ); PlotShapes ( IIf( Sell, shapeSmallCircle, shapeNone ) , ExitColor, layer = 0, yposition = 220, offset = 1 ); _SECTION_END(); _SECTION_BEGIN( "Overbought/Oversold/Warning Detail" ); n = Smoother; ys1 = ( High + Low + Close * 2 ) / 4; rk3 = EMA( ys1, n ); rk4 = StDev( ys1, n ); rk5 = ( ys1 - rk3 ) * 210 / rk4; rk6 = EMA( rk5, n ); UP = EMA( rk6, n ); DOWN = EMA( up, n ); Oo = IIf( up < down, up, down ); Hh = Oo; Ll = IIf( up < down, down, up ); Cc = Ll; barcolor2 = IIf( Ref( oo, -1 ) < Oo AND Cc < Ref( Cc, -1 ), colorGreen, IIf( up > down, colorGreen, colorRed ) ); PlotOHLC( Oo, hh, ll, Cc, "", barcolor2, styleCandle | stylehidden ); UP = EMA( rk6, n ); UPshape = IIf( UP >= OverBought OR UP <= OverSold, shapeHollowSmallCircle, shapeNone ); UPColor = IIf( UP >= 210, ProfitTakeColor, IIf( UP <= -210, WatchColor, Warningcolor ) ); Plot( UP, "", colorGrey50, styleThick | stylehidden ); PlotShapes( UPShape, UPColor, 0, UP, 0 ); _SECTION_END(); _SECTION_BEGIN( "Plot Lines" ); Plot( OverBought, "", colorDarkGrey, styleLine | styleNoLabel ); Plot( 0, "", colorDarkGrey, styleDashed | styleNoLabel ); Plot( OverSold, "", colorDarkGrey, styleLine | styleNoLabel ); _SECTION_END();
2 comments
Leave Comment
Please login here to leave a comment.
Back
this afl is showing only support and resitance
lines pls slove the issue
signal are little confusing, it is not clear, put some text