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 ....
OPEN=HIGH=LOW,VWAP,HULL-DLY,5M for Amibroker (AFL)
Copy & Paste Friendly
Back
_SECTION_BEGIN("Price");
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, "Close", ParamColor("Color", colorBlack ), styleNoTitle | ParamStyle("Style") | GetPriceStyle() );
_SECTION_END();
x = Param("period",10,1,500);
tv = Sum(V,x);
Vwap = Sum((H+L)/2 * V, x)/tv;
Plot (VWAP,"VWAP",colorRed, styleDashed);
_SECTION_BEGIN("L.T.P.");
cx = Param( "cxposn", 1000, 0, 1250, 1 );
cy = Param( "cyposn", 25, 0, 500, 1 );
GfxSelectFont( "Stencil", 28, 98, False );
GfxSetBkColor( colorWhite );
GfxSetTextColor( colorBlack );
GfxTextOut( "L.T.P. " + C + " ", cx, cy );
_SECTION_END();
_SECTION_BEGIN("StockName");
stockname=ParamColor("Stock name color",ColorRGB(44,44,37));
GfxSelectFont("Stencil", Status("pxheight")/15 );
GfxSetTextAlign(16);
GfxSetOverlayMode(1);
GfxSetTextColor(stockname);
GfxSetBkMode(0);
GfxTextOut(Name(),Status("pxwidth")/55, Status("pxheight")/10 );
_SECTION_END();
Buy = TimeFrameGetPrice("L",inDaily,0)==TimeFrameGetPrice("O",inDaily,0) ;
Sell = TimeFrameGetPrice("H",inDaily,0)==TimeFrameGetPrice("O",inDaily,0) ;
Filter=Buy OR Sell;
AddColumn(IIf(Buy,BuyPrice,Null)," open=low ", 6.2,1.2,colorGreen);
AddColumn(IIf(Sell,SellPrice,Null)," open= high ",6.2,1.2,colorOrange);
Period = Param("Period:", 20, 1, 200);
SqrtPeriod = Param("Square Root of Period:", 4, 1, 20);
HullMA = WMA(2 * WMA(C, Period / 2) - WMA(C, Period), SqrtPeriod);
Plot(HullMa, _DEFAULT_NAME(), ParamColor("Hull Moving Average Color", colorGreen));
////////////////////////////////////////////////////////////////////////////////////////////////
_SECTION_BEGIN("Ribbon");
uptrend=PDI()>MDI()AND Signal()<MACD();
downtrend=MDI()>PDI()AND Signal()>MACD();
Plot( 1, /*efines the height of the ribbon in percent of pane width */"ribbon",
IIf( uptrend, colorLime, IIf( downtrend, colorRed,IIf(Signal()<MACD(), colorBlack, colorBlack ))), /* choose color */
styleOwnScale|styleArea|styleNoLabel, -01, 50 );
_SECTION_END();