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 ....
Nikar 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 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 | _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" , colorDefault ), styleNoTitle | ParamStyle ( "Style" ) | GetPriceStyle () ); _SECTION_END (); _SECTION_BEGIN ( "MA1" ); P = ParamField ( "Price field" ,-1); Periods = Param ( "Periods" , 10, 2, 300, 1, 10 ); Plot ( MA ( P, Periods ), _DEFAULT_NAME (), ParamColor ( "Color" , colorBlue ), ParamStyle ( "Style" ) ); _SECTION_END (); _SECTION_BEGIN ( "Arrow Detection tm" ); Buy = Cross ( MACD (05,30), Signal (05,30,10)); Sell = Cross ( Signal (05,30,10), MACD (05,30) ); PlotShapes ( IIf ( Buy , shapeHollowUpArrow , shapeNone ) , colorWhite ,0, Low , Offset=-25) ; PlotShapes ( IIf ( Sell , shapeHollowDownArrow, shapeNone ), colorWhite ,0, High , Offset=-25) ; _SECTION_END (); _SECTION_BEGIN ( "MACD Exploration" ); r1 = Param ( "Fast avg" , 12, 2, 200, 1 ); r2 = Param ( "Slow avg" , 26, 2, 200, 1 ); r3 = Param ( "Signal avg" , 9, 2, 200, 1 ); Z= Param ( "zig" ,1,0,10,0.1); Cond1 = Cross ( MACD (r1,r2), Signal (r1,r2,r3)); Cond3 = Zig ( C ,z)> Ref ( Zig ( C ,z),-4); Buy = Cond1 AND Cond3; Cond4 = Cross ( Signal (r1,r2,r3), MACD (r1,r2)); Cond6 = Zig ( C ,z)< Ref ( Zig ( C ,z),-4); Sell = Cond4 AND Cond6; Trigger = WriteIf ( Buy , "Buy" , "" ) + WriteIf ( Sell , "Sell" , "" ); _SECTION_BEGIN ( "ZIG-ZAG" ); P = ParamField ( "Price field" ); change = Param ( "% change" ,5,0.1,25,0.1); _SECTION_END (); _SECTION_BEGIN ( "EMA" ); P = ParamField ( "Price field" ,-1); Periods = Param ( "Periods" , 15, 2, 300, 1, 10 ); _SECTION_END (); _SECTION_BEGIN ( "MACD Exploration" ); r1 = Param ( "Fast avg" , 12, 2, 200, 1 ); r2 = Param ( "Slow avg" , 26, 2, 200, 1 ); r3 = Param ( "Signal avg" , 9, 2, 200, 1 ); Z= Param ( "zig" ,1,0,10,0.1); Cond1 = Cross ( MACD (r1,r2), Signal (r1,r2,r3)); Cond3 = Zig ( C ,z)> Ref ( Zig ( C ,z),-4); Buy = Cond1 AND Cond3; Cond4 = Cross ( Signal (r1,r2,r3), MACD (r1,r2)); Cond6 = Zig ( C ,z)< Ref ( Zig ( C ,z),-4); Sell = Cond4 AND Cond6; Trigger = WriteIf ( Buy , "Buy" , "" ) + WriteIf ( Sell , "Sell" , "" ); _N (Title = StrFormat ( "{{NAME}} {{DATE}} {{INTERVAL}}: O=%1.2f, H=%1.2f, L=%1.2f, C=%1.2f, V=%1.0f\n{{VALUES}}" , O , H , L , C , V )); BG = IIf ( Buy , colorPaleGreen , IIf ( Sell , colorRose , colorDefault )); FG = IIf ( Buy , colorDarkGreen , IIf ( Sell , colorDarkRed , colorDefault )); if ( Status ( "action" ) == actionIndicator) { Plot ( C , "" , colorGrey50 , styleBar ); PlotShapes ( IIf ( Buy , shapeCircle , shapeNone ), colorGreen , 0, L , Offset=-40); PlotShapes ( IIf ( Sell , shapeCircle , shapeNone ), colorRed , 0, H , Offset=40); PlotShapes (shapeHollowDownArrow* Sell , colorYellow ,0, SellPrice ,-05); PlotShapes ( shapeHollowUpArrow * Buy , colorYellow ,0, BuyPrice ,-05); } _SECTION_BEGIN ( "Arrow Detection" ); Buy = Cross ( MACD (12,26), Signal (12,26,9)); Sell = Cross ( Signal (12, 26, 9), MACD (12,26) ); PlotShapes ( IIf ( Buy , shapeUpArrow , shapeNone ) , colorGreen ,0, Low , Offset=-10) ; PlotShapes ( IIf ( Sell , shapeDownArrow , shapeNone ), colorRed ,0, High , Offset=-10) ; _SECTION_END (); _SECTION_BEGIN ( "Live Market Price" ); FS= Param ( "Font Size" ,30,11,100,1); GfxSelectFont ( "Times New Roman" , FS, 700, True ); GfxSetBkMode ( colorWhite ); GfxSetTextColor ( ParamColor ( "Color" , colorLightBlue ) ); Hor= Param ( "Horizontal Position" ,373,1,1200,1); Ver= Param ( "Vertical Position" ,45,1,830,1); GfxTextOut ( "" + C , Hor , Ver ); YC= TimeFrameGetPrice ( "C" , inDaily ,-1); DD= Prec ( C -YC,2); xx= Prec ((DD/YC)*100,2); GfxSelectFont ( "Times New Roman" , 11, 700, True ); GfxSetBkMode ( colorWhite ); GfxSetTextColor ( ParamColor ( "Color" , colorBlack ) ); GfxTextOut ( "" +DD+ " (" +xx+ "%)" , Hor , Ver+45 ); _SECTION_END (); |