1. THÔNG BÁO VỀ VIỆC TUÂN THỦ QUY ĐỊNH PHÁP LUẬT KHI THAM GIA DIỄN ĐÀN

    Đề nghị toàn thể thành viên diễn đàn nghiêm túc tuân thủ Luật Chứng khoán, các quy định của Ủy ban Chứng khoán Nhà nước, đồng thời tuân thủ các quy định pháp luật liên quan đến an ninh mạng, giao dịch điện tử và trách nhiệm cá nhân khi đăng tải, chia sẻ thông tin trên môi trường mạng, bao gồm các quy định tại Nghị định 174/2026/NĐ-CP. xem thêm

Code T+4 trên Amibroker

Chủ đề trong 'Thị trường chứng khoán' bởi tomtep, 18/03/2011.

Có 15218 người đang online, trong đó có 97 thành viên. 17:09 (UTC+07:00) Bangkok, Hanoi, Jakarta
  1. Có 1 người đang xem box này (Thành viên: 0, Khách: 1)
Chủ đề này đã có 18539 lượt đọc và 55 bài trả lời
  1. tomtep

    tomtep Thành viên rất tích cực

    Tham gia ngày:
    27/06/2005
    Đã được thích:
    16
    Không biết dùng ami thì có code cho Meta luôn;)):
    Mã:
    If(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),
       Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),
       If(C<Ref(Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),-1),
          Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),
          PREV)
      )
    Nguồn:
    http://srsc.com.vn/forum/showthread.php?1541-Code-T-4-trên-Metastock&p=1553#post1553
  2. tomtep

    tomtep Thành viên rất tích cực

    Tham gia ngày:
    27/06/2005
    Đã được thích:
    16
    Hi hi vội quá nên copy thiếu:


    đây là code full:
    //4-Day-Range Switch
    prev=AMA2(C,1,0);
    d=IIf(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),
    IIf(CRef(state,-1);
    ss=state<Ref(state,-1);
    sss=state==Ref(state,-1);
    col=IIf(state == 1 ,51,IIf(state ==0,4,1));
    Plot(C,"",Col,128);
    PlotShapes( shapeUpArrow * s ,6,0,L);
    PlotShapes( shapeDownArrow *ss ,4,0,H);

    Filter = s OR sss OR sss ;
    AddColumn(C,"close",1.2);
    AddColumn( IIf( s, 66,1 ), "buy", formatChar, 1, bkcolor =IIf (s,colorGreen, colorRed ));
    AddColumn( IIf( Ss, 83,1 ), "sell", formatChar, 1, bkcolor =IIf (Ss,colorRed, colorGreen ));
    AddColumn( IIf( sss, 87,1 ), "wait", formatChar, 1, bkcolor =IIf (sss,colorYellow, colorRed ));

    _SECTION_BEGIN("");
    _N(Title = "{{NAME}} - {{INTERVAL}} {{DATE}}: "+_DEFAULT_NAME()+" : {{OHLCX}} {{VALUES}}"
    +"\n"+EncodeColor(colorYellow)+
    WriteIf(s,"EXIT all Short positions\nif trading long positions, enter long Now-\nOR at the market price on tomorrow's Open with stop="+EncodeColor(4)+WriteVal(L+.75*ATR(5),1.4)+" ,","")+
    WriteIf(ss,"exit all long positions today with a Market On Close (MOC) order\nOR at the market price on tomorrow's Open with stop="+EncodeColor(4)+WriteVal(Ref(H+.75*ATR(5), -1),1.4)+",","")+
    WriteIf( sss ,"No trading signals today.","") );

    AlertIf( s, "SOUND D:\songs\bhi.mp3", "Audio alert", 2 );
    AlertIf( ss, "SOUND C:\\Windows\\Media\\Ding.wav", "Audio alert", 5 );


    Nguồn:
    http://srsc.com.vn/forum/showthread.php?1535-Code-T-4-trên-Amibroker
  3. tomtep

    tomtep Thành viên rất tích cực

    Tham gia ngày:
    27/06/2005
    Đã được thích:
    16
  4. ThichVND

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

    Tham gia ngày:
    25/05/2009
    Đã được thích:
    0
    vẫn sai bạn ơi. check lại hộ với
  5. nguoicuoipho

    nguoicuoipho Thành viên rất tích cực

    Tham gia ngày:
    21/11/2005
    Đã được thích:
    0
    backtest rồi ko ăn thua đâu bác [-X[-X[-X[-X[-X[-X[-X
  6. ChiHuyPho

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

    Tham gia ngày:
    16/03/2011
    Đã được thích:
    537
  7. nguoicuoipho

    nguoicuoipho Thành viên rất tích cực

    Tham gia ngày:
    21/11/2005
    Đã được thích:
    0
    lấy lại của anh FPT
    //4-Day-Range Switch code for AmiBoker
    prev=AMA2(C,1,0);
    d=IIf(C>Ref(Max(Max(H,Ref(H,-3)),Max(Ref(H,-1),Ref(H,-2))),-1),Min(Min(L,Ref(L,-3)),Min(Ref(L,-1),Ref(L,-2))),
    IIf(C
    a=Cross(Close,d);
    b=Cross(d,Close);
    state=IIf(BarsSince(a)
    s=state>Ref(state,-1);
    ss=state
    sss=state==Ref(state,-1);
    col=IIf(state == 1 ,51,IIf(state ==0,4,1));
    Plot(C,"",Col,128);
    PlotShapes( shapeUpArrow * s ,6,0,L);
    PlotShapes( shapeDownArrow *ss ,4,0,H);

    Filter = s OR sss OR sss ;
    AddColumn(C,"close",1.2);
    AddColumn( IIf( s, 66,1 ), "buy", formatChar, 1, bkcolor =IIf (s,colorGreen, colorRed ));
    AddColumn( IIf( Ss, 83,1 ), "sell", formatChar, 1, bkcolor =IIf (Ss,colorRed, colorGreen ));
    AddColumn( IIf( sss, 87,1 ), "wait", formatChar, 1, bkcolor =IIf (sss,colorYellow, colorRed ));

    _SECTION_BEGIN("4-Day-Range Switch");
    _N(Title = "{{NAME}} - {{INTERVAL}} {{DATE}}: "+_DEFAULT_NAME()+" : {{OHLCX}} {{VALUES}}"
    +"\n"+EncodeColor(colorYellow)+
    WriteIf(s,"EXIT all Short positions\nif trading long positions, enter long Now-\nOR at the market price on tomorrow's Open with stop="+EncodeColor(4)+WriteVal(L+.75*ATR(5),1.4)+",","")+
    WriteIf(ss,"exit all long positions today with a Market On Close (MOC) order\nOR at the market price on tomorrow's Open with stop="+EncodeColor(4)+WriteVal(Ref(H+.75*ATR(5), -1),1.4)+",","")+
    WriteIf( sss ,"No trading signals today.","") );

    //AlertIf( s, "SOUND D:\songs\bhi.mp3", "Audio alert", 2 );
    //AlertIf( ss, "SOUND C:\\Windows\\Media\\Ding.wav", "Audio alert", 5 );
    _SECTION_END();

    _SECTION_BEGIN("ichimoku Charts");

    /* ICHIMOKU CHART */

    /* AFL code by Prakash Shenoi */
    //Plot function modified Misha Nathani

    SL=(HHV(H,22)+LLV(L,22))/2;
    TL=(HHV(H,7)+LLV(L,7))/2;
    DL=Ref(C,21);
    Sp1=Ref((SL+TL)/2,-21);
    Sp2=Ref((HHV(H,44)+LLV(L,44))/2,-21);

    //Plot(C,"Bars",colorBlack,styleBar);

    Plot (SL,"Standard",colorYellow);
    Plot (TL,"Turning",colorWhite);
    //Plot (C,"Close",colorBlack,styleThick);
    Plot (DL,"Delayed",colorBlue,styleThick);
    PlotOHLC (Sp1,Sp1,Sp2,Sp2,"\n" + "Cloud",IIf(Sp1>Sp2,ParamColor("Up Color",colorLime),ParamColor("Dn Color",colorLightOrange)),styleNoLabel|styleNoTitle|styleCloud);
    _SECTION_END();
  8. volimtexo

    volimtexo Thành viên quen thuộc

    Tham gia ngày:
    21/06/2009
    Đã được thích:
    0
    meta cái nào mua cái nào bán bạn
  9. tomtep

    tomtep Thành viên rất tích cực

    Tham gia ngày:
    27/06/2005
    Đã được thích:
    16
  10. hocaptrung

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

    Tham gia ngày:
    29/04/2010
    Đã được thích:
    819
    [};-

Chia sẻ trang này