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 ....
Scale 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 | //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^\\Scale//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^// DayO = TimeFrameGetPrice ( "O" , inDaily ); DayO= LastValue (DayO); UpDown= Param ( "Scale Slider" ,-0,-3000,3000,1); for (i = 0; i < BarCount ; i++) Offset = 30; WW= Param ( "Scale Width" ,1,2,60); Extention=WW; GapDay = ( Day ()!= Ref ( Day (), -1)) OR BarIndex () == 0; y0 = StrToNum ( NumToStr ( ValueWhen (GapDay , Ref ( O ,-0)))); O420 = LineArray (0, y0, ( BarCount -1), y0); GapDay = ( Day ()!= Ref ( Day (), 1)) OR BarIndex () == 0; y0 = StrToNum ( NumToStr ( ValueWhen (GapDay , Ref ( C ,-0)))); C420 = LineArray (0, y0, ( BarCount -1), y0); for ( i = BarCount -( LastValue (GapDay)+1); i < BarCount ; i++) trendcolor = IIf (DayO >C420 , colorBrightGreen , colorRed ); PlotText ( "0" , BarCount , LastValue (DayO), colorWhite ); style = ParamStyle ( " Scale style" , styleLine , maskAll ); Plot ( LineArray (i-Offset, DayO+UpDown, BarCount , DayO+UpDown,1), "" , trendcolor,style , Null , Null , Offset,0,Extention); GfxSetBkColor ( colorCustom16 ); GfxSetTextColor ( colorBlack ); GfxSelectFont ( "Arial" ,12,700 ); GfxTextOut ( "Gap= " +(O420-C420),2,550); TimeFrameRestore (); //^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^\\Scale//^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^// See marketlogy.com for unique AFL |