CANDLESTICK BASE | INDICATOR -Heiken Ashi with Support Resistance Afl

Heiken Ashi with Support Resistance Afl mức kháng cự hỗ trợ tự động dựa trên khái niệm nến Heiken Ashi và lý thuyết mức kháng cự hỗ trợ. Bạn sẽ có được tất cả các chỉ báo cho nền tảng giao dịch của mình.

Nhà đầu tư thông minh sử dụng chiến lược afl này cho chiến lược scalping forex một cách nhất quán. Tâm lý nhà đầu tư về scalping forex hoàn toàn bị hệ thống này nắm bắt. Chuyển đổi usd sang euro, tỷ giá hối đoái usd zar, đô la Canada sang euro, tỷ giá hối đoái đô la Úc so với euro và euro yen –  tại sao không học giao dịch forex với Afl này.

Thị trường chứng khoán hoặc Forex hoặc bất kỳ sàn giao dịch nào đều có biểu đồ giao dịch riêng. Biểu đồ nến là một trong những biểu đồ phổ biến và hiệu quả nhất để giao dịch. Trên thực tế, biểu đồ nến xác định cung và cầu của thị trường. Trong phiên họp này, nhà phân tích thị trường cũng tìm ra một biểu đồ khác được gọi là Biểu đồ Heikin Ashi . Nó chỉ sửa đổi công thức nến nhưng rất hiệu quả so với biểu đồ nến thông thường.

Sửa đổi nến Heiken Ashi với hỗ trợ tự động Kháng cự đã sử dụng biểu đồ Heiken Ashi, đường Hỗ trợ & Kháng cự. Trong  biểu đồ Heiken Ashi, chúng tôi sửa đổi màu nến của nó thành ba màu. màu trắng có nghĩa là nến trung tính trong khi nến đỏ có nghĩa là nến giảm giá. Ngoài ra, nến xanh lá cây có nghĩa là nến tăng giá. 

Sau nến trắng nếu có xu hướng giảm thì nó sẽ bảo bạn bán ra. Ngược lại là tín hiệu mua. Mặt khác, đường Hỗ trợ & Kháng cự sẽ tập trung vào mức vị thế của bạn. Bằng cách sử dụng Amibroker AFL, bạn có thể tăng tiền trong danh mục đầu tư của mình .

Bạn cũng có thể sử dụng hệ thống này cho Giao dịch Forex:  Chiến lược Heiken Ashi Scalping

//  Author                    :      KrT group

//  Uploader           :      www.pipschart.com

//  E-mail                    :      info@pipschart.com

//  Amibroker Blog    :      www.pipschart.com/amibroker

//  Origin                     :      Modified & Collected from different sources.

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

 

_SECTION_BEGIN(" KrT group Logo");

GfxSetBkMode(1);

X=750;

Y=1;

Font=10;

GfxSelectFont("Impact",Font*2.2, 550);GfxSetTextColor(colorRed);GfxTextOut("KrT group",x,y);

GfxSelectFont("Impact",Font*2.2, 550);GfxSetTextColor(colorGreen);GfxTextOut("RESEARCH",x+120,Y);

 

_SECTION_END();

 

 

 

SetChartOptions(0,chartShowArrows|chartShowDates);

 

_SECTION_BEGIN("Background_Setting");

SetChartBkGradientFill( ParamColor("BgTop", colorBlack),

 

ParamColor("BgBottom", colorBlack),ParamColor("titleblock",colorDarkTeal ));

_SECTION_END();

 

 

_SECTION_BEGIN("Flower");

Prd1=Param("ATR Period",4,1,20,1);

Prd2=Param("Look Back",7,1,20,1);

green = HHV(LLV(L,Prd1)+ATR(Prd1),Prd2);

red = LLV(HHV(H,Prd1)-ATR(Prd1),Prd2);

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

barColor=IIf(C>Green ,colorBrightGreen,IIf(C < RED,colorRed,colorWhite));

PlotOHLC( IIf(flowerOpen<flowerClose, flowerOpen, flowerClose),flowerHigh,flowerLow,IIf(flowerOpen<flowerClose,

 

flowerClose, flowerOpen), "Close", barColor, styleNoTitle | styleCandle);

 

 

_SECTION_END();

 

_SECTION_BEGIN("OsSetting");

 

OBSetting=Param("Setting",45,1,500,1);

Bline = StochD(OBSetting);

Oversold=Bline<=30;

Overbought=Bline>=85;

 

 

PlotShapes (IIf(Oversold, shapeSmallCircle, shapeNone) ,colorDarkGrey, layer = 0, yposition = flowerLow, offset = -8 );

PlotShapes (IIf(Overbought, shapeSmallCircle, shapeNone) ,colorPlum, layer = 0, yposition = flowerHigh, offset = 7 );

_SECTION_END();

 

_SECTION_BEGIN("Parameters");

LB1= Param("Long LookBack Periods",42,1,60,1);

LB3= Param("Mid LookBack Periods",18,1,30,1);

LB2= Param("Short LookBack Periods",6,1,30,1);

 

_SECTION_END();

 

 

_SECTION_BEGIN("ResistanceLong");

 

RsColor=ParamColor("LongResColor",colorOrange);

BrCount=Param("LongBarLength",65,1,500,1);

for (i=0;i<BarCount-BrCount;i++) //hide the line except most recent 10 bars

{

            RsColor[i] = colorBlack;

}

 

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

 

R=ValueWhen(Cross(MA(flowerClose,LB1),C),HHV(flowerHigh,LB1),-1);

Plot(R,"Resistance",RsColor,ParamStyle("LongResStyle",styleNoTitle|styleLine|styleDots|styleStaircase|styleThick,maskAll));

_SECTION_END();

 

_SECTION_BEGIN("ResistanceMid");

Rs3Color=ParamColor("MidResColor",colorCustom4);

BrCount3=Param("MidBarLength",40,1,500,1);

for (i=0;i<BarCount-BrCount3;i++) //hide the line except most recent 10 bars

{

            Rs3Color[i] =colorBlack;

}

 

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

 

RM2=ValueWhen(Cross(EMA(flowerClose,LB3),C),HHV(flowerHigh,LB3),-1);

Plot(RM2,"MidRes",Rs3Color,ParamStyle("MidResStyle",styleLine|styleStaircase|styleNoTitle,maskAll));

_SECTION_END();

 

_SECTION_BEGIN("ResistanceShort");

Rs2Color=ParamColor("ShortResColor",colorCustom12);

BrCount2=Param("ShortResLength",12,1,500,1);

for (i=0;i<BarCount-BrCount2;i++) //hide the line except most recent 10 bars

{

            Rs2Color[i] = colorBlack;

}

 

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

 

RM=ValueWhen(Cross(TEMA(flowerClose,LB2),C),HHV(flowerHigh,LB2),-1);

Plot(RM,"ShortRes",Rs2Color,ParamStyle("ShortResStyle",styleDashed|styleThick|styleNoTitle|styleStaircase,maskAll));

_SECTION_END();

 

_SECTION_BEGIN("SupportLong");

Sup1Color=ParamColor("LongSupColor",colorBlue);

BrCount4=Param("LongSupBarLength",65,1,500,1);

for (i=0;i<BarCount-BrCount4;i++) //hide the line except most recent 10 bars

{

            Sup1Color[i] =colorBlack;

}

 

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

 

S=ValueWhen(Cross(MA(flowerClose,LB1),C),LLV(flowerLow,LB1),-1);

Plot(s,"Support",Sup1Color,ParamStyle("SupStyle",styleLine|styleDots|styleStaircase|styleThick|styleNoTitle,maskAll));

_SECTION_END();

 

_SECTION_BEGIN("SupportMid");

Sup3Color=ParamColor("MidSupColor",colorDarkYellow);

BrCount6=Param("MidBarLength",40,1,500,1);

for (i=0;i<BarCount-BrCount6;i++) //hide the line except most recent 10 bars

{

            Sup3Color[i] =colorBlack;

}

 

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

 

SM2=ValueWhen(Cross(EMA(flowerClose,LB3),C),LLV(flowerLow,LB3),-1);

Plot(SM2,"MidSup",Sup3Color,ParamStyle("MidSupStyle",styleLine|styleStaircase|styleNoTitle,maskAll));

_SECTION_END();

 

_SECTION_BEGIN("SupportShort");

Sup2Color=ParamColor("ShortSupColor",colorPink);

BrCount5=Param("ShortSupBarLength",12,1,500,1);

for (i=0;i<BarCount-BrCount5;i++) //hide the line except most recent 10 bars

{

            Sup2Color[i] =colorBlack;

}

 

 

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

 

SM=ValueWhen(Cross(TEMA(flowerClose,LB2),C),LLV(flowerLow,LB2),-1);

Plot(SM,"ShortSup",Sup2Color,ParamStyle("ShortSupStyle",styleDashed|styleThick|styleNoTitle|styleStaircase,maskAll));

_SECTION_END();

 

_SECTION_BEGIN("Cloud Setting");

//Cloud

ParmCloud = ParamToggle("Cloud", "No|Yes", 0);

 

CloudResColor=ParamColor("CloudResColor",colorDarkTeal);

BrCount7=Param("CloudResLength",15,1,500,1);

for (i=0;i<BarCount-BrCount7;i++) //hide the line except most recent 10 bars

{

            CloudResColor[i] = colorBlack;

}

 

flowerClose = EMA((Open+High+Low+Close)/4,3) ;

flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);

Temp = Max(High, flowerOpen);

flowerHigh = EMA(Max(Temp, flowerClose),3);

Temp = Min(Low,flowerOpen);

flowerLow = EMA(Min(Temp, flowerClose),3);

 

CS=ValueWhen(Cross(WMA(flowerClose,LB2),C),LLV(flowerLow,LB2),-1);

CR=ValueWhen(Cross(WMA(flowerClose,LB2),C),HHV(flowerHigh,LB2),-1);

 

 

if(parmCloud == 1)

{

            PlotOHLC( CS, CS, CR,CR, "Band", CloudResColor, styleCloud | styleNoLabel|styleNoTitle);

}

 

_SECTION_END();

 

Title = StrFormat("\c02 {{NAME}} | {{DATE}} | Open : %g | High : %g | Low : %g | Close : %g | Change = %.1f%% | Volume =

 

" +WriteVal( V, 1.0 ) +", {{VALUES}}",

O, H, L, C, SelectedValue( ROC( C, 1 )) );

 

_SECTION_BEGIN("Graphics");

GrpPrm=Param("Graphic Space",1,-5,10);

GraphXSpace=GrpPrm;

_SECTION_END();

 

 

Cách sử dụng AFL  cho Amibroker 

  • Tải xuống tệp Amibroker AFL.
  • Bây giờ hãy sao chép tệp afl và dán vào \Program Files\AmiBroker\Formulas\Custom. [Dành cho 32 bit] hoặc \Program Files(x86)\AmiBroker\Formulas\Custom. [Dành cho 64 bit]
  • Vào phần công thức của Amibroker và bạn sẽ thấy afl trong thư mục Custom.

Nguồn thông tin Dòng tiền chứng khoán sưu tầm 

https://pipschart.com/modify-heiken-ashi-candle/#google_vignette

Comments

Popular posts from this blog

TẠI SAO NÊN ĐẦU TƯ CHỨNG KHOÁN ?

LỰA CHỌN CÔNG TY CHỨNG KHOÁN MỞ TÀI KHOẢN GIAO DỊCH

ĂN NHỊP HỒI VNINDEX THÁNG 10/2024

Labels

Show more