Nhờ các bác sửa giúp bộ siêu lọc Ichimoku

Thảo luận trong 'Bàn luận về Amibroker, Metastock, Metatrader 4' bắt đầu bởi Đỗ Văn DUy, 12/8/23.

Lượt xem : 1,498

  1. Đỗ Văn DUy

    Đỗ Văn DUy New Member

    Tham gia ngày:
    26/10/22
    Bài viết:
    3
    Đã được thích:
    0
    Giới tính:
    Nam
    // Downloaded From
    Plot( C, "Close", IIf(C>Ref(C,-1),colorCustom9,colorRed), ParamStyle("Style") | GetPriceStyle() );

    _SECTION_BEGIN("Bollinger Bands");
    Plot(MA( C, 20 ),"MA20",colorYellow,styleLine|styleThick);
    P = ParamField("Price field",-1);
    Periods = Param("Periods", 20, 2, 100, 1 );
    Width = Param("Width", 2, 0, 10, 0.05 );
    Color = ParamColor("Color", colorDarkGrey );
    Style = ParamStyle("Style", styleLine | styleNoLabel ) | styleNoLabel;
    Plot( bbt = BBandTop( P, Periods, Width ), "BBTop" + _PARAM_VALUES(), colorCustom1, Style );
    Plot( bbb = BBandBot( P, Periods, Width ), "BBBot" + _PARAM_VALUES(), colorCustom1, Style );
    PlotOHLC( bbt, bbt, bbb, bbb, "", ColorBlend( Color, GetChartBkColor(), 0.1 ), styleThick | styleCloud | styleNoRescale, Null, Null, Null, -1 );
    _SECTION_END();

    _SECTION_BEGIN("i");
    /* ICHIMOKU CHART */
    n1 = Param("Èøè?îêó: ïå?èîä 1",9,1,200,1);
    n2 = Param("Èøè?îêó: ïå?èîä 2",26,1,400,1);
    n3 = Param("Èøè?îêó: ïå?èîä 3",52,1,600,1);

    TenkanSen =(HHV(H,n1)+LLV(L,n1))/2; // Tenkan-sen (?åíêàí-ñåí) – ??î ñ?åäíåå çíà÷åíèå öåíû çà ïå?âûé ï?î?åæó?îê â?å?åíè (?àâíà (high+low)/2, ?äå high è low – ?àêñè?ó? è ?èíè?ó? çà ïå?èîä).
    KijunSen =(HHV(H,n2)+LLV(L,n2))/2; // Kijun-sen (Êèäæóí-ñåí) – ??î ñ?åäíåå çíà÷åíèå öåíû çà â?î?îé ï?î?åæó?îê.
    ChinkouSpan =Ref(C,-n2); // Chinkou Span (×èêîó ñïåí) - öåíà çàê?û?èÿ ?åêóùå?î áà?à, ñäâèíó?àÿ íàçàä íà âåëè÷èíó â?î?î?î â?å?åííî?î èí?å?âàëà.
    Cks = Close; // ??àôè÷åñêèé Chinkou Span, ñäâè? íàçàä çàñ÷å? î??èñîâêè.
    SenkouSpanA =Ref((KijunSen+TenkanSen)/2,-n2); // Senkou Span A (Ñåíêîó ñïåí À) / Up Kumo - ñå?åäèíà ?àññ?îÿíèÿ ?åæäó Tenkan-sen è Kijun-sen, ñäâèíó?îå âïå?åä íà âåëè÷èíó â?î?î?î â?å?åííî?î èí?å?âàëà.
    SpA =(KijunSen+TenkanSen)/2; // ??àôè÷åñêèé Senkou Span A , ñäâè? âïå?åä çàñ÷å? î??èñîâêè.
    SenkouSpanB =Ref((HHV(H,n3)+LLV(L,n3))/2,-n2); // Senkou Span B (Ñåíêîó ñïåí Â) / Down Kumo - ñ?åäíåå çíà÷åíèå öåíû çà ??å?èé â?å?åííîé èí?å?âàë, ñäâèíó?îå âïå?åä íà âåëè÷èíó â?î?î?î â?å?åííî?î èí?å?âàëà.
    SpB =(HHV(H,n3)+LLV(L,n3))/2; // ??àôè÷åñêèé Senkou Span B, ñäâè? âïå?åä çàñ÷å? î??èñîâêè.
    DL = Ref( C, 25 );


    Cond1 = Ref(Close > Max(SenkouSpanA,SenkouSpanB),-1); //öåíà âûøå îáëàêà -- áû÷üå íàñ??îåíèå
    Cond2 = Ref(Close < Min(SenkouSpanA,SenkouSpanB),-1); //öåíà íèæå îáëàêà -- ?åäâåæüå íàñ??îåíèå
    Cond3 = Ref(Cross(TenkanSen,KijunSen),-1); //ïå?åñå÷åíèå ?åíêàí è Êèäæóí -- ñè?íàë íà ïîêóïêó
    Cond4 = Ref(Cross(KijunSen,TenkanSen),-1); //ïå?åñå÷åíèå ?åíêàí è Êèäæóí -- ñè?íàë íà ï?îäàæó
    Cond5 = Ref(Cross(Close,ChinkouSpan ),-1); //ïå?åñå÷åíèå ×èêîó è öåíû
    Cond6 = Ref(Cross(ChinkouSpan ,Close),-1); //ïå?åñå÷åíèå ×èêîó è öåíû
    Cond7 = Ref(Cross (Close , Max(SenkouSpanA,SenkouSpanB)),-1); //öåíà âû?îäè? ââå?? èç îáëàêà -- ñè?íàë íà ïîêóïêó
    Cond8 = Ref(Cross ( Min(SenkouSpanA,SenkouSpanB), Close),-1); //öåíà âû?îäè? âíèç èç îáëàêà -- ñè?íàë íà ï?îäàæó
    Cond9 = Close > TenkanSen AND TenkanSen > KijunSen AND KijunSen > Max(SenkouSpanA,SenkouSpanB); // ñè?íàë ??å? ëèíèé ââå??
    Cond10= Close < TenkanSen AND TenkanSen < KijunSen AND KijunSen < Min(SenkouSpanA,SenkouSpanB); // ñè?íàë ??å? ëèíèé âíèç
    RemCond9=ExRem(Cond9,NOT Cond9);
    RemCond10=ExRem(Cond10,NOT Cond10);

    ColSenk =IIf (Cond1,colorGreen, IIf(Cond2,colorRed,colorLightGrey)); // çàäàå? öâå?, åñëè öåíà âûøå/íèæå/âíó??è îáëàêà.
    Flat = TenkanSen == Ref(TenkanSen,-1) OR (NOT(Cond1) AND NOT(Cond2)) ;

    for( i = 0; i < BarCount; i++ ) //?àñê?àøèâàå? ñ?åäí?? ëèíè? èíäèêà?î?à ïî âçàè?î?àñïîëîæåíè? è íàï?àâëåíèÿ äâèæåíèÿ TenkanSen, öåíû è îáëàêà.
    {
    if (Flat)
    ColTenk = colorLightGrey;
    else
    {
    if (Cond1 AND TenkanSen > TenkanSen[i-1])
    ColTenk = colorGreen;
    if (Cond1 AND TenkanSen < TenkanSen[i-1])
    ColTenk = colorRed;
    if (Cond2 AND TenkanSen < TenkanSen[i-1])
    ColTenk = colorRed;
    if (Cond2 AND TenkanSen > TenkanSen[i-1])
    ColTenk = colorGreen;
    }
    }

    //PlotShapes(IIf(Cond7, shapeSmallUpTriangle ,shapeNone),colorGreen,0,H,10);
    //PlotShapes(IIf(Cond8, shapeSmallDownTriangle ,shapeNone),colorRed,0,L,10);
    //PlotShapes(IIf(Cond3, shapeHollowSmallUpTriangle,shapeNone),colorGreen,0,H,12);
    //PlotShapes(IIf(Cond4, shapeHollowSmallDownTriangle ,shapeNone),colorRed,0,L,12);
    //PlotShapes(IIf(Cond5, shapeSmallCircle ,shapeNone),colorGreen,0,H,4);
    //PlotShapes(IIf(Cond6, shapeSmallCircle + shapePositionAbove ,shapeNone),colorRed,0,L,4);
    //PlotShapes(IIf(RemCond9 , shapeHollowSquare ,shapeNone),colorGreen,0,H,18);
    //PlotShapes(IIf(RemCond10, shapeHollowSquare + shapePositionAbove ,shapeNone),colorRed,0,L,18);

    //Plot (C,"Close",colorBlack,styleThick);
    Plot (C,"Bars",colorBlack,styleCandle);
    Plot (TenkanSen,"Tenkan-sen",colorRed);
    Plot (KijunSen, "Kijun-sen", colorBlue);
    Plot (Cks,"Chinkou Span",colorLime, style = styleLine,0,0,-n2);
    Plot (SpA,"SenkouSpanA",colorOrange,styleDashed,0,0,n2);
    Plot (SpB,"SenkouSpanB",colorViolet,styleDashed + styleThick,0,0,n2);
    PlotOHLC (SpA,SpA,SpB,SpB,"Cloud",IIf (SpA > SpB,ColorRGB( 64, 128, 128 ),ColorRGB( 128, 128, 128 )),styleCloud, 10, 10, n2 );
    above = IIf(KijunSen>SenkouSpanA AND TenkanSen>SenkouSpanB,1,0);
    within = IIf(KijunSen>SenkouSpanA AND TenkanSen<SenkouSpanB,1,0);
    below = IIf(TenkanSen<SenkouSpanA AND TenkanSen<SenkouSpanB,1,0);
    DK1 = C> SenkouSpanB;
    DK2 = (SpB > SpA);
    DK3 = (SenkouSpanB > SenkouSpanA);
    DK4 = Cross(C, SenkouSpanB) or Cross(C, SenkouSpanA);
    Buy = DK1 AND DK3 AND DK4;
    PlotShapes( shapeUpArrow * Buy ,6,0,L,Offset=-15);
    DK5 = MA(V, 20) > 100000;
    Cover = Buy AND DK5;
    Filter = Cover OR buy;
    AddColumn(V,"Khoi Luong",1.0);
    AddColumn(Cover,"Break Out Vuot May",True,colorcustom2,colorCustom6);
    //Buy = Cross(TenkanSen,KijunSen) AND (DL>Close);
    //Sell = Cross(KijunSen,TenkanSen) AND (DL<KijunSen);
    //StrongBuy = Buy AND above;
    //MediumBuy = Buy AND within;
    //WeakBuy = Buy AND below;
    //StrongSell = Sell AND below;
    //MediumSell = Sell AND within;
    //WeakSell = Sell AND above;


    //IIf( (StrongBuy),PlotShapes(shapeUpTriangle*StrongBuy,colorGreen),0);
    //IIf( (MediumBuy),PlotShapes(shapeUpArrow*MediumBuy,colorGreen),0);
    //IIf( (WeakBuy),PlotShapes(shapeHollowUpArrow*WeakBuy,colorIndigo),0);
    //IIf( (StrongSell),PlotShapes(shapeDownTriangle*StrongSell,colorRed),0);
    //IIf( (MediumSell),PlotShapes(shapeDownArrow*MediumSell,colorRed),0);
    //IIf( (WeakSell),PlotShapes(shapeHollowDownArrow*WeakSell,colorBrown),0);


    // ?î?èçîí?àëüíàÿ öâå?íàÿ èíäèêà?î?íàÿ ïîëîñà (ï?è?å?).


    Plot( 1, "Ribbon", ColTenk, styleOwnScale|styleArea|styleNoLabel, -2, 200 ); // èíäèöè?óå? ôë?? íà TenkanSen.
    Plot( 4, "Ribbon", ColSenk, styleOwnScale|styleArea|styleNoLabel, -1, 200 ); // èíäèöè?óå? ïîëîæåíèå öåíû î?íîñè?åëüíî îáëàêà
    _SECTION_END();
    _SECTION_BEGIN("Price");
    _SECTION_BEGIN("Magnified Market Price");
    FS=Param("Font Size",35,11,100,1);
    GfxSelectFont("Times New Roman", 28, 700, italic = True, underline = False, True );
    GfxSetBkMode( colorWhite );
    GfxSetTextColor( ParamColor("Color",colorCustom9) );
    Hor=Param("Horizontal Position",220,1,1200,1);
    Ver=Param("Vertical Position",1,1,1,1);
    GfxTextOut(""+C,Hor-150 , Ver+25 );
    GfxTextOut( Name(), Hor,Ver-50 );
    YC=TimeFrameGetPrice("C",inDaily,-1);
    DD=Prec(C-YC,2);
    xx=Prec((DD/YC)*100,2);
    GfxSelectFont("Times New Roman", 10, 700, italic =True, underline = False, True );
    GfxSetBkMode( colorWhite );
    GfxSetTextColor(ParamColor("Color",colorCustom9) );
    GfxTextOut(""+DD+" ("+xx+"%)", Hor-150, Ver+65 );
    GfxSelectFont("arial", 18 );
    GfxSetTextColor(ParamColor("dong",colorCustom8) );
    GfxSetTextAlign( 6 );// center alignment
    GfxSetTextColor( ColorRGB( 255, 255, 0 ) );
    GfxSetBkMode(0); // transparent
    GfxSelectFont("UVN But Long 1", Status("pxheight")/45 );
    GfxTextOut( "CODE ICHIMOKU VUOT MAY KUMO", Status("pxwidth")/2, Status("pxheight")/10.5 );
    GfxSelectFont("UVN But Long 1", Status("pxheight")/45 );
    GfxSetTextColor( colorLightGrey );
    GfxSelectFont("UVN But Long 1", Status("pxheight")/50 );
    GfxTextOut( FullName() , Status("pxwidth")/1.2, Status("pxheight")/11 );
    GfxTextOut( "("+Name()+") " , Status("pxwidth")/1.2, Status("pxheight")/8 );
    _SECTION_END();
     

    Các file đính kèm:

    Chỉnh sửa cuối: 21/8/23
  2. Đang tải...

    Bài viết tương tự Diễn đàn Date
    nhờ các cao thủ giúp đỡ code amibroker về volume Bàn luận về Amibroker, Metastock, Metatrader 4 22/10/24
    Nhờ các bác cao thủ sửa giúp e đoạn code sau Bàn luận về Amibroker, Metastock, Metatrader 4 24/6/24
    Nhờ các bạn cao thủ sửa giúp đoạn code sau Bàn luận về Amibroker, Metastock, Metatrader 4 3/4/24
    Nhờ các bác chỉ giúp e code adx ạ Bàn luận về Amibroker, Metastock, Metatrader 4 2/9/23
    Nhờ các bác code giúp em với điều kiện sau với ạ Bàn luận về Amibroker, Metastock, Metatrader 4 8/6/23

  3. luisnguyen09

    luisnguyen09 Well-Known Member

    Tham gia ngày:
    13/8/22
    Bài viết:
    48
    Đã được thích:
    13
    Giới tính:
    Nam
    Bạn up cả file code lên ntn rất khó nhìn
     
    luisnguyen09, via a mobile device, 13/8/23
    #2
  4. Đỗ Văn DUy

    Đỗ Văn DUy New Member

    Tham gia ngày:
    26/10/22
    Bài viết:
    3
    Đã được thích:
    0
    Giới tính:
    Nam
    Gửi file đính kèm nhờ các bác giúp
     

    Các file đính kèm:

  5. Đỗ Văn DUy

    Đỗ Văn DUy New Member

    Tham gia ngày:
    26/10/22
    Bài viết:
    3
    Đã được thích:
    0
    Giới tính:
    Nam
    Bác xem giúp file e gửi kèm
     

    Các file đính kèm:

Lượt bình luận : 3

Chia sẻ trang này