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 ....
bose for Amibroker (AFL)
Copy & Paste Friendly
Back
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 | SetBarsRequired(sbrAll,sbrAll);TenkanSen = (HHV(H,9) + LLV(L,9))/2;KijunSen = (HHV(H,26)+ LLV(L,26))/2; Color_bars = IIf(Close > KijunSen AND TenkanSen > KijunSen, colorBlue, IIf(Close > KijunSen AND TenkanSen < KijunSen,colorCustom11, // Light blue IIf(Close < KijunSen AND TenkanSen < KijunSen, colorRed, IIf(Close < KijunSen AND TenkanSen > KijunSen, colorCustom12, colorYellow)))); // Darkred & yellow means TenkanSen = KijunSenPlot( C, "Close", Color_bars, styleBar|styleNoTitle); // TK bars// calculate the trading volume// calculate the trading volumeBV = IIf( (H==L), 0, (V*(C-L)/(H-L)) );SV = IIf( (H==L), 0, (V*(H-C)/(H-L)));// starting of the dayBars_so_far_today = 1 + BarsSince( Day() != Ref(Day(), -1));StartBar = ValueWhen(TimeNum() == 091500, BarIndex());//total volume tradedTodayVolume = Sum(V,Bars_so_far_today);TBUYVOL=Sum(BV,Bars_so_far_today);TSELVOL=Sum (SV,Bars_so_far_today);SVbull= TBUYVOL>= TSELVOL;SVbear=TSELVOL>=TBUYVOL;SVbull = ExRem( SVbull, SVbear );SVbear = ExRem( SVbear, SVbull );PlotShapes(IIf(SVbull,shapeUpArrow, shapeNone),colorGreen, 0, L, Offset=-35);PlotShapes(IIf(SVbear,shapeDownArrow, shapeNone),colorRed, 0, L, Offset=-55);Title= " Today Volume :“WriteVal(TodayVolume/1000,2.2)” TBUYV :“WriteVal(TBUYVOL/1000,2.2)” TSellV :"+WriteVal(TSELVOL/1000,2.2); |