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 ....
TBDong MA 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 | Title = EncodeColor(colorYellow)+" THFL. Y THIEN DO LONG KIEN " + " - " + EncodeColor(colorLavender)+ Name()+ " - " + EncodeColor(colorLavender)+ Interval(2) + EncodeColor(colorLavender) + " - " + Date() +"\n" +EncodeColor(colorLavender) +" O-"+O+" "+"H-"+H+" "+"L-"+L+" "+"C-"+C+" "+ "Vol = "+ WriteVal(V,1.0);_SECTION_END();////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////_SECTION_BEGIN("PRICE");// simple trading systemSetBarFillColor( IIf( C > O, ColorRGB( 0, 83, 0 ), IIf( C <= O, ColorRGB( 83, 0, 0 ), colorLightGrey ) ) );Plot(C, "", IIf(O>=C, ColorRGB( 255, 0, 0 ), ColorRGB( 0, 255, 0 )), ParamStyle("Price Style", styleCandle,maskPrice));_SECTION_END(); //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////_SECTION_BEGIN(""); P = ParamField("Price field",-1);Pema17 = Param("Pema17", 17, 2, 300, 1, 0 );Plot( EMA( P, Pema17 ), "EMA17",colorYellow , ParamStyle("Style", styleLine|styleThick, maskDefault| styleThick) );Pema50 = Param("Pema50", 50, 2, 300, 1, 0 );Plot( EMA( P, Pema50 ), "EMA50",colorCustom11 , ParamStyle("Style", styleThick ) );Pema65 = Param("Pema65", 65, 2, 300, 1, 0 );Plot( EMA( P, Pema65 ), "EMA65",colorCustom12, ParamStyle("Style", styleThick ) );Fs=Param("EmaYellow", 17, 2, 300, 1, 0 );Sl=Param("EmaCyan", 50, 2, 300, 1, 0 );Sll=Param("EmaPurple", 65, 2, 300, 1, 0 );Ema17 = EMA(C,Fs);Ema50 = EMA(C,Sl);Ema65 = EMA(C,Sll);exitshort1=Cross(Ema17,Ema50);exitshort2=Cross(Ema17,Ema65);exitlong1=Cross(Ema50,Ema17);exitlong2=Cross(Ema65,Ema17);//Buy = exitshort1;//Buy = exitshort2;//Sell = exitlong1;//Sell = exitlong2;Buy = ExRem(exitshort1,exitlong1);Buy = ExRem(exitshort2,exitlong2);PlotShapes(shapeUpArrow*exitshort1, colorCustom11, 0, L, -10 );PlotShapes(shapeUpArrow*exitshort2, colorCustom12, 0, L, -15 );//PlotShapes(shapeDownArrow*exitlong1, colorCustom11, 0, H, -10 );//PlotShapes(shapeDownArrow*exitlong2, colorCustom12, 0, H, -15 );_SECTION_END(); //_SECTION_BEGIN(""); P = ParamField("Price field",-1);Pma20 = Param("MaYellow", 20, 2, 300, 1, 0 );Plot( MA( P, Pma20 ), "MA20",colorGold , ParamStyle("Style", styleLine|styleThick) );Pma50 = Param("MaCyan", 50, 2, 300, 1, 0 );Plot( MA( P, Pma50 ), "MA50",colorSkyblue , ParamStyle("Style", styleLine|styleThick ) );Pma65 = Param("MaPurple", 65, 2, 300, 1, 0 );Plot( MA( P, Pma65 ), "MA65",colorCustom13, ParamStyle("Style", styleLine|styleThick ) );Fs=Param("MaYellow", 20, 2, 300, 1, 0 );Sl=Param("MaCyan", 50, 2, 300, 1, 0 );Sll=Param("MaPurple", 65, 2, 300, 1, 0 );Ma20 = MA(C,Fs);Ma50 = MA(C,Sl);Ma65 = MA(C,Sll);exitshort1=Cross(Ma20,Ma50);exitshort2=Cross(Ma20,Ma65);exitlong1=Cross(Ma50,Ma20);exitlong2=Cross(Ma65,Ma20);Buy = ExRem(exitshort1,exitlong1);Buy = ExRem(exitshort2,exitlong2);PlotShapes(shapeUpArrow*exitshort1, colorSkyblue, 0, L, -20 );PlotShapes(shapeUpArrow*exitshort2, colorCustom13, 0, L, -25 );//PlotShapes(shapeDownArrow*Sellma50, colorSkyblue, 0, H, -20 );//PlotShapes(shapeDownArrow*Sellma65, colorCustom13, 0, H, -25 );_SECTION_END(); |