Chia sẻ công cụ theo dõi chốt lời và cắt lỗ.

Thảo luận trong 'Bàn luận về Amibroker, Metastock, Metatrader 4' bắt đầu bởi TruongTitt, 30/8/21.

Lượt xem : 3,696

  1. TruongTitt

    TruongTitt Member

    Tham gia ngày:
    11/8/21
    Bài viết:
    7
    Đã được thích:
    6
    Giới tính:
    Nam
    Sau một hồi thì mình cũng code dc. Do mù code nên có thể chưa được hoàn thiện lắm nhưng cũng xin chia sẻ với anh em. Cái này để theo dõi cổ phiếu mình mua từ ngày nào và đến ngày hiện tại lãi lỗ bao nhiêu % đồng thời để anh em chủ động chốt lãi với cắt lỗ.
    [​IMG]
    - Cutlo01 -5% .Nếu ae mua mà giá giảm liên tục thì chính là -5% từ giá mua, còn giá cổ phiếu nó tăng thì là -5% từ giá cao nhất Price1.
    - Price1 là giá cao nhất kể từ ngày mua cổ phiếu.
    - Mũi tên xanh chỉ vào ngày ae mua cổ phiếu.

    Đây là code như hình xin chia sẻ với anh em:
    Mã:
    _SECTION_BEGIN("TPvsSL");
    GiaMua=Param("GiaMua",0, minimum = 0,maximum = 200,step = 0.01,sincr = 0); 
    NgayMua = ParamDate("NgayMua","default", fomat = 2);
    TP1=Param("MucTieu01",15);
    TP2=Param("MucTieu02",25);
    CL1=Param("CutLo01",5);
    CL2=Param("CutLo02",8);
    Price1= Giamua;
     
    
    function Masocuangay( AAA )
    {
      p=0;
      g=0;
      j=1900;
      do 
            {
                if (j%100==0)
                {
                    if(j%400==0)
                        {
                            P=P+1;
                        }
                    else
                        {
                            G=G+1;
                        }
    
    
                }
                else
                {
                    if( j%4==0 )
                        {
                            P= P+1;
                        }
                    else
                        {
                            G=G+1;
                        }
    
                } 
            }
        while( ++j < StrToNum(DateTimeFormat("%#Y",AAA)) );
        b= StrToNum(DateTimeFormat("%#j",AAA))+1;
        return p*366+g*365+b;
    }
    
    ee= LastValue(DaysSince1900())- masocuangay(NgayMua);
    
    
    
    
    x= Now(5);
    if (Masocuangay(x) != LastValue(DaysSince1900()))
    {
        x=DateTimeAdd(x, Masocuangay(x) - LastValue(DaysSince1900()), inDaily);
    }
    else x= x;
    
    bar=1;
    for( i = 0; i < ee +1 && Masocuangay(NgayMua) != masocuangay(DateTimeAdd(x,-i,inDaily)) ; i++ )
    {
      if (Masocuangay(NgayMua) != masocuangay(DateTimeAdd(x,-i,inDaily)) AND StrToNum(DateTimeFormat("%w",DateTimeAdd(x,-i,inDaily))) != 0 AND StrToNum(DateTimeFormat("%w",DateTimeAdd(x,-i,inDaily))) != 6)
      {
      bar= bar+1;
      }
      else bar = bar;
    }
    
    bar1 = BarIndex();
    Len = bar1 - BarCount-1;
    PlotShapes(IIf(Len== -bar ,shapeUpArrow,shapeNone),colorBrightGreen,0,L,-12);
    
    Price1 = HHV(H,bar);
    
    
    CutLo01=IIf(Price1 > GiaMua,(Price1-((Price1/100)*CL1)), (GiaMua-((GiaMua/100)*CL1)));
    MucTieu01=GiaMua+((GiaMua/100)*TP1);  // Gia muc tieu 01
    
    PC1=((Price1-GiaMua)/GiaMua)*100; // Dinh lai da dat duoc
    TG1=((MucTieu01-GiaMua)/GiaMua)*100; // Muc tieu huong toi
    GHT=((c-GiaMua)/GiaMua)*100;
    GCL=((Cutlo01 - GiaMua)/GiaMua)*100;
    
    
    Plot(SelectedValue(Price1),"Price1",colorYellow,styleDots); x = LastValue( BarIndex() ) + 1; y = LastValue( Price1 );PlotText("Price1== "+ WriteVal(pc1, 1.2) +" %", x, y,colorYellow);
    Plot(SelectedValue(CutLo01),"CutLo01",colorPink,styleLine); x = LastValue( BarIndex() ) + 1; y = LastValue( CutLo01 );PlotText("CutLo01==  "+WriteVal(GCL, 1.2) +" %", x, y,colorPink);
    Plot(SelectedValue(MucTieu01),"MucTieu01",colorGreen,styleLine);x = LastValue( BarIndex() ) + 1; y = LastValue( MucTieu01 );PlotText("MucTieu01== " +WriteVal(TG1, 1.2)+" %", x, y,colorGreen);
    Plot(SelectedValue(GiaMua),"GiaMua",colorLightBlue,styleLine);x = LastValue( BarIndex() ) + 1; y = LastValue( GiaMua );PlotText("GiaMua", x, y,colorLightBlue);
    Plot(SelectedValue(C),"GiaHienTai",colorRed,styleLine);x = LastValue( BarIndex() ) + 1; y = LastValue( C );PlotText("GiaHienTai== " +WriteVal(GHT, 1.2)+" %", x, y,colorRed);
    
    _SECTION_END();
    MÌNH KHÔNG PHẢI BÊN CHUYÊN NÊN CÓ SAI SÓT MONG ANH EM CHỈ GIÁO. THANKS!


    ============================================================
    Mình không biết về code nên tự mò cái code để chốt lời với cắt lỗ. Xin nhờ các bác chỉ giúp để hoàn thiện ạ.
    Mình muốn khi nhập ngày mua cổ phiếu thì code chỉ chạy từ ngày đó thôi nhưng không biết làm thế nào. Xin cảm ơn các bác!
    [​IMG]

    Mã:
    GiaMua=Param("GiaMua",LastValue( BarIndex() ), minimum = 0,maximum = 200,step = 0.01,sincr = 0); // Gia mua co phieu
    Price1= GiaMua;
    NgayMua= ParamDate("NgayMua","default",0);// Ngay mua co phieu
    for( i = 1; i < BarCount; i++ )
    {
    
       if( price1 <= High[ i ] )
       {
          price1 = High[ i ] ;
       }
       else price1= price1 ;
     }
    CutLo01=IIf(price1 > GiaMua,(Price1-((price1/100)*Param("CutLo01",5))), (GiaMua-((GiaMua/100)*Param("CutLo01",5))));
    MucTieu01=GiaMua+((GiaMua/100)*Param("MucTieu01",15));  // Gia muc tieu 01
    
    PC1=((price1-GiaMua)/GiaMua)*100; // Dinh lai da dat duoc
    TG1=((MucTieu01-GiaMua)/GiaMua)*100; // Muc tieu huong toi
    GHT=((c-GiaMua)/GiaMua)*100;
    
    
    
    Plot(SelectedValue(price1),"price1",colorYellow,styleDashed); x = LastValue( BarIndex() ) + 2; y = LastValue( price1 );PlotText("price1--- "+ WriteVal(pc1, 1.2) +" %", x, y,colorYellow);
    Plot(SelectedValue(CutLo01),"CutLo01",colorPink,styleDashed); x = LastValue( BarIndex() ) + 2; y = LastValue( CutLo01 );PlotText("CutLo01", x, y,colorPink);
    Plot(SelectedValue(MucTieu01),"MucTieu01",colorGreen,styleDashed);x = LastValue( BarIndex() ) + 2; y = LastValue( MucTieu01 );PlotText("MucTieu01--- " +WriteVal(TG1, 1.2)+" %", x, y,colorGreen);
    Plot(SelectedValue(GiaMua),"GiaMua",colorLightBlue,styleDashed);x = LastValue( BarIndex() ) + 2; y = LastValue( GiaMua );PlotText("GiaMua", x, y,colorLightBlue);
    Plot(SelectedValue(C),"GiaHienTai",colorRed,styleDashed);x = LastValue( BarIndex() ) + 2; y = LastValue( C );PlotText("GiaHienTai---" +WriteVal(GHT, 1.2)+" %", x, y,colorRed);
     
    Chỉnh sửa cuối: 5/9/21
  2. Đang tải...

    Bài viết tương tự Diễn đàn Date
    Chia sẽ anh em bộ rrg chart trên sàn chứng khoán Việt Nam Bàn luận về Amibroker, Metastock, Metatrader 4 17/2/22
    Chia sẻ code RRG Chart trên Amibroker - hữu ích trong việc tìm dòng tiền Bàn luận về Amibroker, Metastock, Metatrader 4 26/1/22
    Xin nhờ anh chị em chia sẽ indicator như hình với ạ, hoặc bác nào có bán em cũng được ạ. Bàn luận về Amibroker, Metastock, Metatrader 4 3/10/21
    Chia sẻ 2 code: hiển thị tên + giá và làm gọn title. Bàn luận về Amibroker, Metastock, Metatrader 4 16/9/21
    Chia sẻ khoảng 5000 code AFL cho Amibroker Bàn luận về Amibroker, Metastock, Metatrader 4 4/9/21

  3. TruongTitt

    TruongTitt Member

    Tham gia ngày:
    11/8/21
    Bài viết:
    7
    Đã được thích:
    6
    Giới tính:
    Nam
    Chia sẻ lại, mong dc góp ý.
     
    Hungtqhp thích bài này.
  4. Hungtqhp

    Hungtqhp Well-Known Member

    Tham gia ngày:
    17/8/21
    Bài viết:
    89
    Đã được thích:
    28
    Giới tính:
    Nam
    Cảm ơn tinh thần chia sẻ của bác. Cùng hóng cao thủ.
     
  5. GIÓ

    GIÓ Active Member

    Tham gia ngày:
    24/8/21
    Bài viết:
    32
    Đã được thích:
    8
    Giới tính:
    Nam
    thanks b
     
  6. Tommytep

    Tommytep Member

    Tham gia ngày:
    22/7/21
    Bài viết:
    22
    Đã được thích:
    51
    Cám ơn bro. mình có modify lại 1 chút theo mục đích sử dụng của mình.
    - Đưa thông tin lên title bar
    - Cho phép ẩn hiện trên title và ẩn hiện các thanh bar.
    - Bổ sung công thức tính tỉ lệ R/R theo 2 target
    - Nhập giá chốt lời và cutloss thủ công: add giá chứ ko add theo %
    Minh hoạ như hình dưới

    upload_2021-9-16_22-31-21.png
     

    Các file đính kèm:

    Hungtqhp and GIÓ like this.
  7. Nguyễn Chí Hào

    Nguyễn Chí Hào New Member

    Tham gia ngày:
    15/7/21
    Bài viết:
    3
    Đã được thích:
    0
    Giới tính:
    Nam
    xin quả code tín hiệu mua bán mũi tên lun đc ko bác :D
     

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

Tags:

Chia sẻ trang này