CANDLESTICK BASE | INDICATOR -Valid Supply-Demand Zones Afl

Mỗi thị trường chứng khoán đều có Vùng cung-cầu hợp lệ . Có  giao dịch cung cầu  liên  tục trên thị trường chứng khoán. Nếu bạn kiểm tra chéo độ sâu của thị trường, bạn sẽ thấy lệnh mua và bán ở  các mức giá khác nhau. Những con số như vậy thể hiện nhu cầu và cung cấp tính thương mại. Cách xác định vùng cung và cầu trên biểu đồ là gì?

Như chúng ta đều biết, ý tưởng cơ bản nhất là chúng ta cần xác nhận đỉnh hoặc đáy để cố định. tức là sử dụng chờ cho đến khi giá tăng/giảm đến một tỷ lệ phần trăm nhất định. Tỷ lệ phần trăm để có đỉnh/đáy hợp lệ. Ở đây, afl này đã sử dụng đỉnh/đáy hợp lệ được mã hóa bởi tomasz. Để vẽ vùng, vùng [đáy mây] sẽ chỉ vẽ sau khi đỉnh/đáy được xác nhận.

_SECTION_BEGIN("Ami");

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);

bk=ParamColor( "Bk col",ColorRGB(85,90,60));

SetChartBkColor(bk);

 

amount = Param("Sensitivity", 0.5, 0.1, 2, 0.1 );

 

array = C ;

zz0 = Zig( array, amount );

zz1 = Ref( zz0, -1 );

zz2 = Ref( zz0, -2 );

 

tr = ValueWhen(zz0 > zz1 AND zz1 < zz2, zz1);

pk = ValueWhen(zz0 < zz1 AND zz1 > zz2, zz1);

PU = tr + 0.01 * abs(tr)*amount;

PD = pk - 0.01 * abs(pk)*amount;

 

ZZT = IIf( array >= PU AND zz0 > zz1, 1,

       IIf( array <= PD AND zz0 < zz1, -1, 0 ) );

 

ZZT = ValueWhen( ZZT != 0, ZZT );

 

Buy_Valid_=zzt>0;

Sell_Valid_=zzt<0;

Buy_Valid = ExRem(Buy_Valid_,Sell_Valid_);

Sell_Valid = ExRem(Sell_Valid_,Buy_Valid_);

Plot(Ref(Buy_valid,0),"",ColorRGB(0,0,100),styleHistogram|styleDashed|styleOwnScale|styleNoLabel,0,0,0,-1);

Plot(Ref(Sell_valid,0),"",ColorRGB(100,0,0),styleHistogram|styleDashed|styleOwnScale|styleNoLabel,0,0,0,-1);

 

Candlecol=IIf(BarsSince(Buy_Valid)<BarsSince(Sell_Valid) AND BarsSince(Buy_Valid)!=0,5,

          IIf(BarsSince(Buy_Valid)>BarsSince(Sell_Valid) AND BarsSince(Sell_Valid)!=0,4,1));

cc1=IIf(Buy_valid,colorYellow,IIf(Sell_valid,colorBlack,Candlecol));

SetBarFillColor(Cc1);

Plot(C,"pipschart.com",Cc1,64,0,0,0,0);

 

pk=BarsSince(Buy_Valid)<BarsSince(Sell_Valid) ;//AND BarsSince(Buy_Valid)!=0;//Zz>Ref(zz,-1);

tr=BarsSince(Buy_Valid)>BarsSince(Sell_Valid) ;//AND BarsSince(Sell_Valid)!=0;//Zz<Ref(zz,-1);

 

Ll=LowestSince(sell_valid,L,1);

hH=HighestSince(Buy_Valid,H,1);

Llm=LowestSince(sell_valid,Min(O,C),1);

hHm=HighestSince(Buy_Valid,Max(O,C),1);

 

xx=Cum(1);

NoLines = Param("No of Lines",5,1,10,1);

 

Col2=ParamColor( "Res Color", colorRed );

Col1=ParamColor( "Sup Color", colorGreen );

 

for( i = 1; i < NoLines+1 ; i++ )

{

scol=ColorBlend(Col1,2,0.1*i);

rcol=ColorBlend(Col2,2,0.1*i);

 

px1 = LastValue(ValueWhen(Buy_valid,Cum(1),i)) ;

py1 = LastValue(ValueWhen(Buy_valid,Ll,i)) ;

pz1 = LineArray(px1, py1, (BarCount-1), py1);

Plot(pz1,"",scol,32);

 

tx1 = LastValue(ValueWhen(sell_valid,Cum(1),i)) ;

ty1 = LastValue(ValueWhen(sell_valid,Hh,i)) ;

tz1 = LineArray(tx1, ty1, (BarCount-1), ty1);

Plot(tz1,"",rcol,32);

 

px1m = LastValue(ValueWhen(Buy_valid,Cum(1),i)) ;

py1m = LastValue(ValueWhen(Buy_valid,Llm,i)) ;

pz1m = LineArray(px1m, py1m, (BarCount-1), py1m);

PlotOHLC(pz1,pz1,pz1m,pz1m,"",scol,styleCloud|styleNoLabel,0,0,0,-i-nolines);

 

tx1m = LastValue(ValueWhen(sell_valid,Cum(1),i)) ;

ty1m = LastValue(ValueWhen(sell_valid,Hhm,i)) ;

tz1m = LineArray(tx1m, ty1m, (BarCount-1), ty1m);

PlotOHLC(tz1,tz1,tz1m,tz1m,"",rcol,styleCloud|styleNoLabel,0,0,0,-i-nolines);

}

 

for( j = 0; j < BarCount; j++ )

{

if( Buy_valid [j])  PlotText( "Trn"+Ll[ j ], j, Ll[j], colorPaleGreen );

if( Sell_valid[j] ) PlotText( "Pkn"+Hh[ j ], j, Hh[j], colorRose);

}

👉Tải tại đây

 https://drive.google.com/file/d/1-W79IHxdU2LtFrJpY7bWo2IPAR0XS4po/view?usp=drive_link