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 ....
AccDist + Volumen + EMA for Amibroker (AFL)
Copy & Paste Friendly
Back
_SECTION_BEGIN("3 color gradient"); priceAxesWidth=0; dateAxesHeight=0; TitleHeight=0; pxwidth = Status("pxwidth"); pxheight = Status("pxheight"); chartwidth = pxwidth-priceAxesWidth; chartheight = pxheight-dateAxesHeight; topColor=ParamColor("topColor",ColorRGB(207,254,240) ); centerColor=ParamColor("centerColor", ColorRGB(249,236,164)); botColor=ParamColor("BottomColor", ColorRGB( 253,223,196)); priceAxesColor=ParamColor("priceAxesColor", colorWhite ); dateAxesColor=ParamColor("dateAxesColor", colorWhite); relPos=Param("centerPosition%",50,0,100,1)/100; centerHeight=chartheight*Param("centerHeight%",10,0,100,1)/100; x0=0; y0=Max(TitleHeight,chartheight*relPos-centerHeight/2); x1=chartwidth; y1=Min(chartheight,chartheight*relPos+centerHeight/2); GfxSetBkMode( 1 ); GfxSetOverlayMode(1); GfxGradientRect(0,0,chartwidth,TitleHeight, colorWhite ,colorWhite); GfxGradientRect(chartwidth,0,pxwidth,pxheight, priceAxesColor ,priceAxesColor); GfxGradientRect(0,chartheight,chartwidth,pxheight, dateAxesColor ,dateAxesColor); GfxGradientRect(x0,y0,x1,y1, CenterColor ,CenterColor ); GfxGradientRect(0,TitleHeight,chartwidth, y0,topColor, CenterColor ); GfxGradientRect(0,y1,chartwidth, chartheight, CenterColor ,botColor); _SECTION_END(); _SECTION_BEGIN("EMA"); P = Volume; Periods = Param("PeriodsEMA", 50, 2, 300, 1, 10 ); Plot( EMA( P, Periods ), _DEFAULT_NAME(), colorRed, styleLine|styleThick ); _SECTION_END(); Period = Param("Period", 20, 2, 300, 1, 10 );; LowColor = colorLightGrey; ClimaxColor = colorRed; ChurnColor = colorGreen; ClimaxChurnColor=colorBlue; LowChurnColor= colorWhite; MFM = ((C-L)-(H-C))/(H-L); Value1 = V*C; Value2 = (V*C)*(H-L); Value3 = (V*C)/(H-L); BarColor = IIf( (Value1 == LLV(Value1,Period)), LowColor, IIf( (Value2 == HHV(Value2,Period)), ClimaxColor, IIf( (Value3 == HHV(Value3,Period)), ChurnColor, IIf( ((Value2 == HHV(Value2,Period) AND (Value3 == HHV(Value3,Period)))), ClimaxChurnColor, IIf( (Value3 == LLV(Value3,Period)), LowChurnColor, colorBlueGrey))))); _SECTION_BEGIN("Volume"); Plot( Volume, _DEFAULT_NAME(), BarColor, ParamStyle( "Style", styleHistogram|styleThick, maskHistogram ), 2 ); _SECTION_END(); _SECTION_BEGIN("AccDist"); Plot( AccDist(), _DEFAULT_NAME(), colorBlue, styleOwnScale|styleThick ); _SECTION_END();