1. Welcome to the international stock forum - forex forum ! Chào mừng đến với diễn đàn quốc tế chứng khoán - forex ! www.Traders.vn
    Dismiss Notice

Amibroker code (AFL)BUY SELL INTRADAY AND DAILY BEST

Thảo luận trong 'Amibroker' bắt đầu bởi traders, 3/11/17.

  1. traders

    traders Administrator Thành viên BQT

    Tham gia ngày:
    29/4/17
    Bài viết:
    110
    Đã được thích:
    1
    Điểm thành tích:
    18
    Amibroker code (AFL)BUY SELL INTRADAY AND DAILY BEST
    Here is code :
    ----------------------------------------------
    _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();

    /* /// DEVELOPING BY ::KESARIINVESTMENT.COM::

    // We DEVELOPING AMIBROKER AFL plugin DLL SOFTER LOING SYSTEM FOR SERVER

    // CONTACT US ::KESARIINVESTMENT.COM:: OR contact@kesariinvestment.com OR
    // contact.kesariinvestment@yahoo.com
    */
    _SECTION_BEGIN("Stochastic Slow");
    if( Status("action") == actionCommentary )
    { printf("(Interpretation is not available yet)");}
    uptrend= IIf( StochK(15,3) > StochD(17,3,3), 1, 0 );
    downtrend=IIf( StochK(15,3)<StochD(17,3,3), 1, 0 );
    crossBuy=Cross(StochK(15,9),StochD(15,3,3));
    crossSell=Cross(StochD(15,5,3),StochK(15,3));
    kks=StochK( 15 , 3);kkd=StochD( 15 ,3, 3 );kksup=( 50 > kks) AND ( 50 > kkd);kksdw=( 50 < kks) AND ( 50 < kkd);
    _SECTION_END();
    _SECTION_BEGIN("KESARIINVESTMENT.COM");
    SetChartBkGradientFill( ParamColor("BgTop", colorGrey40),ParamColor("BgBottom", colorGrey40));
    SetChartOptions(0,chartShowArrows|chartShowDates);
    SetChartOptions(0,0,chartGrid20 |chartGrid50 |chartGrid80);
    _N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} < open %g > < high %g > < low %g > < close %g > (%.1f%%) {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));

    Plot(C,"\nPrice",IIf(C>O,ParamColor("Wick UP Color", colorDarkGreen),IIf(C<=O,ParamColor("Wick Down Color", colorDarkRed),colorLightGrey)),64,0,0,0,0);
    Periods = Param("Periods", 11, 1, 300, 1 );
    HM=EMA( High , Periods );LM=EMA( Low ,Periods );CM=C;
    Buy = Cross(CM,HM) AND kksup ;
    Sell = Cross( LM,CM) AND kksdw ;
    Buy = ExRem( Buy, Sell );
    Sell = ExRem( Sell, Buy );

    PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorBlue, 0,L, Offset=-27);

    PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorRed, 0,H, Offset=-27);

    GraphXSpace = 15;
    dist = 1.1*ATR(54);

    for( i = 0; i < BarCount; i++ )
    {
    if( Buy ) PlotText( " Buy\n@ " + C[ i ], i, L[ i ]-dist, colorDarkGreen );
    if( Sell ) PlotText( " Sell\n@ " + C[ i ], i, H[ i ]+dist, colorRed );
    }
    Filter= Buy OR Sell;
    GfxSelectFont( "Arial", 10, 700, False );
    GfxSetTextAlign(0);
    GfxTextOut( ": : www.traders.vn : :", 550, 30);
    GfxTextOut( ": : forum.traders.vn@gmail.com : :", 550, 46);
    GfxTextOut( ": : DEVELOPING BY ::KESARIINVESTMENT.COM : :", 550, 46);
    _SECTION_END(); Amibroker code.png
     

Chia sẻ trang này

Đang tải...