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 ....
Volume + Info for Amibroker (AFL)
Rating:
3 / 5 (Votes 2)
Tags:
amibroker
This Chart Plot any styles of realtime volume and somу Info.
Screenshots
Indicator / Formula
Copy & Paste Friendly
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 | GraphXSpace = 8;_SECTION_BEGIN("Volume");BarsColor = ParamList ("Chart Color", "Mono|Price|Volume|Bull+Bear");HistThick = Param("Histogram Thickness", -30, -60, 0, 5);BullCond = V>Ref(V,-1) AND C>Ref(C,-1) OR V<Ref(V,-1) AND C<Ref(C,-1);BearCond = V>Ref(V,-1) AND C<Ref(C,-1) OR V<Ref(V,-1) AND C>Ref(C,-1);BuBeColor = IIf(BullCond, colorseaGreen, IIf(BearCond, colorOrange, colorLightBlue));if (BarsColor == "Mono") { BarColors=colorLightBlue; Msg = "Mono"; } else if (BarsColor == "Price") { BarColors=IIf(C>O, colorseaGreen, colorOrange); Msg = "Price UpDn"; }else if (BarsColor == "Volume") { BarColors=IIf(V>Ref(V, -1), colorseaGreen, colorOrange); Msg = "Volume UpDn"; }else if (BarsColor == "Bull+Bear") { BarColors=BuBeColor; Msg = "Bull or Bear"; }SetBarFillColor(BarColors);Plot(V,"Volume", BarColors, styleHistogram, Null, Null, 0, 1, HistThick);//VL = LastValue(Volume);VLCol = LastValue(BarColors);VAvCol = colorBlue;VAv = (round(EMA(V,Param("Average Period", 4, 1, 100, 1)) )/10)*10;Plot(VAv, "Volume Average", VAvCol, styleThick, Null, Null, 0, 0, width = -15);// INFO// If last Volume bar > Volume average, then rectangle color is infCol// If last Volume bar < Volume average, then rectangle color is VAvColdiffVol = V - VAv;infCol = LastValue( IIf(diffVol >= 0, VLCol, VAvCol) );FillColor = LastValue(BarColors);GfxSetTextColor(colorBlack);GfxSelectPen(colorBlack, 1);GfxSelectSolidBrush(infCol); X0 = Status("pxwidth") - 110; Y0 = 10;GfxRoundRect(X0,Y0,X0+24,Y0+24,6,6);GfxSelectFont("Consolas", 12, 400);GfxSetTextColor(infCol);GfxTextOut(Msg, X0 - 140, Y0);_SECTION_END(); |
4 comments
Leave Comment
Please login here to leave a comment.
Back
Hi,
The AFL is giving the following errors which may kindly be corrected and posted back please.
LN: 17, Col: 72: Error 16. Too many arguments
LN 23, Col: 76: Error 16. Too many arguments
Best regards,
Vishnu Vandana
Hi! Thanks for your reply.
This is an original AFL 1.8 Help string for Plot operator:
Plot(array, name, color/barcolor, style = styleLine, minvalue = {empty}, maxvalue = {empty}, XShift = 0, Zorder = 0, width = 1 )
This is my adaptation to Volume script of line 17:
Plot(V,“Volume”, BarColors, styleHistogram, Null, Null, 0, 1, HistThick);
All is correct. You can modify script for previous AFL version as:
line 17:
Plot(V,“Volume”, BarColors, styleHistogram);
line 23:
Plot(VAv, “Volume Average”, VAvCol, styleThick);
Reply if you want.
still not working same error
You can replace codes as:
Line 17:
Plot(V,“Volume”, BarColors, styleHistogram); //, Null, Null, 0, 1, HistThick);
Line23:
Plot(VAv, “Volume Average”, VAvCol, styleThick); //, Null, Null, 0, 0, width = -15);