Code báo mua bán ATR Volatility System sử dụng hiệu quả trên Amibroker

chungsiviet
Chỉ báo ATR Volatility System thể hiện mức độ thay đổi giá trong kỳ hiện tại so với các kỳ trước. Nó được sử dụng trong các chiến lược xu hướng để đánh giá khả năng đảo ngược xu hướng và xác định thời điểm thị trường bắt đầu xu hướng mới.
Bạn có thể copy mã này hoặc tải chỉ báo về nếu bạn không chuyên môn về mã code , nút download ở phía dưới cuối khung chứa code này:


//chungsiviet.blogspot.com

// Tên: ATR Volatility System

//------------------------------------------------------------------------------

_SECTION_BEGIN("NewSystem ATR");
   /*Writed & composed by Tudor Marcelin - Art Invest*/
   n=Param( "perioada", 14, 5 , 20, 1 );
   k=Param( "factor de multiplicare", 1.4, 0.5 , 2.5, 0.1 );

  f=ATR(n);
    
/*R rezistenta pentru ziua curenta*/
    R[0] = C[0]; 
/*S rezistenta pentru ziua curenta*/ 
    S[0] = C[0];
  
for( i = n+1; i < BarCount; i++ ) 

    R[i]=R[i-1];
    S[i]=S[i-1];
    if (( S[i-1]<=C[i-1]) AND (C[i-1] <=R[i-1] ) AND (C[i-1]+k*f[i-1])<=RV)
 
        r[i] = C[i-1]+k*f[i-1];
   
     if (( S[i-1]<=C[i-1]) AND (C[i-1]<=R[i-1] ) AND  (C[i-1]-k*f[i-1])>=SV)

        s[i]= C[i-1]-k*f[i-1];
  


  


    if ( C[i-1] >R[i-1] )
{
       r[i] = C[i-1]+k*f[i-1];
       s[i]= C[i-1]-k*f[i-1];
       RV=r[i];
       SV=s[i]; 
}   
    if ( C[i-1] <S[i-1] )
{
       r[i] = C[i-1]+k*f[i-1];
       s[i]= C[i-1]-k*f[i-1];
       RV=r[i];
       SV=s[i]; 



 Buy=Close>R;
 Sell=Close<S;
 
Cump=IIf(Close>R,1,0);
Vanz=IIf(Close<S,1,0);
}
Plot(Close,"Close",colorBlack,styleCandle);
Plot(R, "Rez:",colorGreen,styleDots|styleNoLine);
Plot(S, "Sup:",colorRed,styleDots|styleNoLine);


Buy = ExRem( Buy, Sell ); //Elimina semnalele buy consecutive
Sell = ExRem( Sell, Buy ); //Elimina semnalele sell consecutive

shape = Buy * shapeUpArrow + Sell * shapeDownArrow;

fig=Cump*shapeHollowUpArrow + Vanz*shapeHollowDownArrow;

PlotShapes( fig, IIf( Cump, colorPaleGreen  , colorPink), 0, IIf( Cump, Low, High)); //Pentru a vizualiza semnalele consecutive eliminate de ExRem
PlotShapes( shape, IIf( Buy, colorGreen, colorRed ), 0, IIf( Buy, Low, High)); 

AlertIf( Buy, "", "Volatility System", 1 );
AlertIf( Sell, "", "Volatility System",2);

Color = IIf( Vanz OR Sell, colorRed, IIf(Buy,colorGreen,colorLightGrey)); 

Plot( 2, "", Color, styleArea | styleOwnScale | styleNoLabel, -0.1, 50 );

GraphXSpace = 3;

Title=EncodeColor(colorBlue)+"Volatility System"+EncodeColor(colorBlack)+ " Open:"+O+" High:"+H+" Low:"+L+" Close:"+C+EncodeColor(colorGreen)+" Rez:"+R+EncodeColor(colorRed)+" Sup:"+S+EncodeColor(colorBlue)+
" \nDate: "+EncodeColor(colorRed)+Date();
_SECTION_END();
Link tải mã nguồn về sử dụng:
Download here

Cách thêm sau khi tải về: Xem hướng dẫn tại phần 2: Đối với các chỉ báo không có sẵn trong Amibroker

Không có nhận xét nào:

Đăng nhận xét

Bài đăng Mới hơn Bài đăng Cũ hơn Trang chủ