nhờ các cao thủ amibroker

Discussion in 'Thị trường chứng khoán' started by chungtruong668, Apr 15, 2017.

Có 650 người đang online, trong đó có 260 thành viên. 19:10 (UTC+07:00) Bangkok, Hanoi, Jakarta
  1. Có 0 người đang xem box này(Thành viên: 0, Khách: 0)
Page 1 of 6
thread_has_x_view_and_y_reply
  1. chungtruong668

    chungtruong668 Thành viên tích cực

    Joined:
    May 20, 2010
    Likes Received:
    2
    #1
    15/04/2017, 07:17
    xin nhờ bác nào viết giúp mình core cho amiborker làm sao có một mũi tên chỉ vào một nến ngày trước ngày hiện tại là 20 phiên tức là từ mũi tên đến phiên hiện tại là 20 phiên và nó cứ dịch chuyển theo lập trình đó . mình chân thành cám ơn!
    09xx189279 likes this.
    Loan tin| |Report
  3. chungtruong668

    chungtruong668 Thành viên tích cực

    Joined:
    May 20, 2010
    Likes Received:
    2
    #2
    15/04/2017, 10:09
    mong các bác để ý giúp cho
    Loan tin| |Report
  4. daubuonck

    daubuonck Thành viên gắn bó với f319.com

    Joined:
    Aug 28, 2014
    Likes Received:
    85,973
    #3
    15/04/2017, 11:00
    code chứ k phải core , viết văn hơi lủng cũng cũng ráng hiểu

    1/ yêu cầu (kế hoạch) : mũi tên cách ngày hiện tại 20 ngày

    Plot(C,"",colorGreen, styleCandle);
    bar = BarIndex();
    Len = bar - BarCount-1;
    PlotShapes(IIf(Len==-21 ,shapeUpArrow,shapeNone),colorBrightGreen,0,C,0);

    2/ vượt kế hoạch (bonus) : giá tại nơi có mũi tên + % chênh lệch từ mũi tên tới hiện tại

    PlotShapes(IIf(Len==-21 ,shapeUpArrow,shapeNone),colorBrightGreen,0,C,0);
    starbar= BeginValue( Len-21 );
    starprice=ValueWhen(starbar,C,1);
    endprice=LastValue(C);
    Change=100 * (endprice-starprice)/starprice ;
    dist = 0.5*ATR(10);
    lastBar=BarCount-1;
    for( i = 0; i < BarCount; i++ )
    {
    if(Len==-21) PlotText( "STAR " + C, i-1, C-dist, colorBrightGreen );
    if(Len==-21) PlotText("%"+CHANGE,Lastbar-1,C[Lastbar],colorBrightGreen);
    }

    3/ Kết quả trên chart

    [​IMG]
    Last edited: Apr 15, 2017
    Nguyenbinh234, 09xx189279, quocdai307 and 3 others like this.
    quocdai307 đã loan bài này
    Loan tin| |Report
  5. chungtruong668

    chungtruong668 Thành viên tích cực

    Joined:
    May 20, 2010
    Likes Received:
    2
    #4
    15/04/2017, 11:11
    cám ơn bác nhiều lắm rất chi tiết và chu đáo!
    quocdai307 likes this.
    Loan tin| |Report
  6. chungtruong668

    chungtruong668 Thành viên tích cực

    Joined:
    May 20, 2010
    Likes Received:
    2
    #5
    15/04/2017, 11:14
    bác cho mũi tên cách cây nến ra một chút và chỉnh được mầu được ko ah ?
    Loan tin| |Report
  7. luonguct

    luonguct Thành viên này đang bị tạm khóa Đang bị khóa Not Official

    Joined:
    Mar 7, 2016
    Likes Received:
    13,683
    #6
    15/04/2017, 11:14
    Báo lỗi là sao ta?

    [​IMG]
    Loan tin| |Report
  8. daubuonck

    daubuonck Thành viên gắn bó với f319.com

    Joined:
    Aug 28, 2014
    Likes Received:
    85,973
    #7
    15/04/2017, 11:18

    cho 2 chữ i vào , để sửa lại chứ k lại đánh đố nhau mất

    _SECTION_BEGIN("DK PLOT");
    Plot(C,"",colorGreen, styleCandle);
    bar = BarIndex();
    Len = bar - BarCount-1;
    PlotShapes(IIf(Len==-21 ,shapeUpArrow,shapeNone),colorBrightGreen,0,C,-10);
    starbar= BeginValue( Len-21 );
    starprice=ValueWhen(starbar,C,1);
    endprice=LastValue(C);
    Change=100 * (endprice-starprice)/starprice ;
    dist = 0.5*ATR(10);
    lastBar=BarCount-1;
    for( i = 0; i < BarCount; i++ )
    {
    if(Len==-21) PlotText( "STAR " + C, i-1, C-dist, colorBrightGreen );
    if(Len==-21) PlotText("%"+CHANGE,Lastbar-1,C[Lastbar],colorBrightGreen);
    }
    _SECTION_END();
    Last edited: Apr 15, 2017
    Nguyenbinh234 likes this.
    Loan tin| |Report
  9. daubuonck

    daubuonck Thành viên gắn bó với f319.com

    Joined:
    Aug 28, 2014
    Likes Received:
    85,973
    #8
    15/04/2017, 11:21
    cách ra về phía dưới thì cho dấu - vào chỗ 0,c,0, còn màu thì thích màu nào cho vào màu đó thôi

    _SECTION_BEGIN("DK PLOT");
    Plot(C,"",colorGreen, styleCandle);
    bar = BarIndex();
    Len = bar - BarCount-1;
    PlotShapes(IIf(Len==-21 ,shapeUpArrow,shapeNone),colorBrightGreen,0,C,-10);
    starbar= BeginValue( Len-21 );
    starprice=ValueWhen(starbar,C,1);
    endprice=LastValue(C);
    Change=100 * (endprice-starprice)/starprice ;
    dist = 0.5*ATR(10);
    lastBar=BarCount-1;
    for( i = 0; i < BarCount; i++ )
    {
    if(Len==-21) PlotText( "STAR " + C, i-1, C-dist, colorBrightGreen );
    if(Len==-21) PlotText("%"+CHANGE,Lastbar-1,C[Lastbar],colorBrightGreen);
    }
    _SECTION_END();

    [​IMG]
    Last edited: Apr 15, 2017
    Loan tin| |Report
  10. luonguct

    luonguct Thành viên này đang bị tạm khóa Đang bị khóa Not Official

    Joined:
    Mar 7, 2016
    Likes Received:
    13,683
    #9
    15/04/2017, 11:22
    Cảm ơn bác! Nhưng tớ dùng Amibroker phiên bản 6.00.2 chạy code mới này vẫn lỗi y chang. Tớ đang tìm hiểu code cho ami. :)
    Loan tin| |Report
  11. daubuonck

    daubuonck Thành viên gắn bó với f319.com

    Joined:
    Aug 28, 2014
    Likes Received:
    85,973
    #10
    15/04/2017, 11:26
    tôi sử dụng 5,6 vì nó ổn định, code này đơn giản có lẽ verson nào cũng chạy thôi , như báo lỗi trên là nó nói thiếu cái [] , vì vòng lặp FOR mà viết C, CHANGE không có [] nó báo lỗi thế thôi
    Loan tin| |Report
Page 1 of 6

Chủ đề cùng chuyên mục

Share This Page