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 ....
m.salman 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 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 | _SECTION_BEGIN ( "Price" ); _N (Title = StrFormat ( "{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " + WriteVal ( V , 1.0 ) + " {{VALUES}}" , O , H , L , C , SelectedValue ( ROC ( C , 1 )) )); Cd1=( C - O )/( H - L )*100; Cd= Prec ((Cd1),2); BarColor = IIf ((Cd>65) OR (Cd<-65), colorYellow , colorCustom12 ); Plot ( C , _DEFAULT_NAME (),BarColor, styleNoTitle | ParamStyle ( "Style" ) | GetPriceStyle () ); Plot ( Open , "Open" , 0, styleHidden ); Plot ( Close , "Close" , 0, styleHidden ); Plot ( High , "High" , 0, styleHidden ); Plot ( Low , "Low" , 0, styleHidden ); _SECTION_END (); WH= TimeFrameGetPrice ( "H" , 5* inDaily ,-1); WL= TimeFrameGetPrice ( "L" , 5* inDaily ,-1); MH= TimeFrameGetPrice ( "H" , inMonthly ,-1); ML= TimeFrameGetPrice ( "L" , inMonthly ,-1); MW=(WH+WL)/2; MM=(MH+ML)/2; Mid=(MW+MM)/2; Plot (Mid, "" ,7,4); Buy = Cross ( C ,Mid); Sell = Cross (Mid, C ); PlotShapes ( IIf ( Buy , shapeSmallUpTriangle , shapeNone ), colorWhite ,0, L ,-12); PlotShapes ( IIf ( Sell , shapeSmallDownTriangle , shapeNone ), colorWhite ,0, H ,-12); _SECTION_BEGIN ( "Exploration" ); Filter = Close ; AddColumn (Mid, "Mid" ,1.4, colorBlue ); Var = WriteIf ( Buy , "BUY" , WriteIf ( Sell , "SELL" , "" )); AddTextColumn (Var , "Buy/Sell" , 1.2 , colorWhite , IIf ( Buy , colorBlue , IIf ( Sell , colorRed , colorWhite ) )); _SECTION_END (); _SECTION_BEGIN ( "AuthorName" ); k = ( GetPerformanceCounter ()/100)%100; printf ( "GetPerformance Counter %g" ,k); GfxSelectFont ( "jokerman" , 16,800); GfxSetBkMode (1); GfxSetTextColor ( colorWhite ); GfxTextOut ( "M.SaLMaN" ,-10+k,40); RequestTimedRefresh (10); _SECTION_END (); _SECTION_BEGIN ( "MACD Angle" ); { GfxSelectFont ( "Bernard MT Condensed" ,15, 800 ); GfxSetBkMode (1); GfxSetTextColor ( colorCustom12 ); GfxTextOut ( "Mid=" + Prec (Mid,2)+ " " ,1440,25); } _SECTION_END (); |