AmiBroker v5.2 : Phân Tích Cung Cầu.Hướng dẫn A -> Z

Woodie''s CCI ...piên bản 2009 ...scan stocks cho tín hiệu báo động cực kỳ sớm ... so với tất cả indicator khác

code ;

///////////////////////////////
// CCI Panel for Amibroker
// Codded/Added by Dennis, Kris, Wring, Santacs
// Last Update: 1/02/2008
///////////////////////////////
// Go to www.woodiescciclub.com to learn everything about this system.
// You must be a registered user to see the images and downloads.
///////////////////////////////
// Setup Axes and Grid section (right click on chart panel, click on Parameters):
// Scaling: Custom , Min=-250 Max=250
// Show Date Axis = Yes , Show Middle Lines = No
///////////////////////////////
// To activate the timer properly, make sure the following is set:
// click on Tools==>Preferences==>Intraday....
// make sure "Allign minute bars to market hours" is checked...
// make sure "Start time of interval" is checked...
// make sure "Override: Weekly/monthly bars use day of last trade" is checked.
///////////////////////////////
// Tic/PIP values: YM=1.0, ER2=0.10, NQ=0.25, EUR/USD=.0001, USD/JPY=0.01, Stocks=0.01
///////////////////////////////
// Rangebar Settings :
// ER2 1.50
// YM 25
// ES 3
// NQ 3.75
// DAX 5
// ZG 1.5
///////////////////////////////
// Discalimer: For educational purposes only. Trade at your own risk.
///////////////////////////////

// Timer

TTMperiod = 6;
Low_ma = EMA(L, TTMperiod);
High_ma = EMA(H, TTMperiod);
Low_third = (High_ma - Low_ma) / 3 + Low_ma;
High_third = 2 * (High_ma - Low_ma) / 3 + Low_ma;
tempnum = Now( 4 ) - TimeNum();
TimeRem = Interval() - ((int(tempnum[BarCount - 1] / 100) * 60) + (tempnum[BarCount - 1] - int(tempnum[BarCount - 1] / 100) * 100));
if (TimeRem[BarCount - 1] < 0) TimeRem = 0;
MinuteVar = int(TimeRem / 60);
SecondsVar = int(frac(TimeRem / 60) * 60);
if (TimeRem[BarCount - 1] > 60)
{
TitleTimeRem = EncodeColor(colorWhite) + MinuteVar + ":" + WriteIf(SecondsVar > 9, "", "0") + SecondsVar;
}
else if (TimeRem[BarCount - 1] > 20)
{
TitleTimeRem = EncodeColor(colorYellow) + MinuteVar + ":" + WriteIf(SecondsVar > 9, "", "0") + SecondsVar;
}
else
{
TitleTimeRem = EncodeColor(colorRed) + MinuteVar + ":" + WriteIf(SecondsVar > 9, "", "0") + SecondsVar;
}

// Background color

//SetChartBkColor(ParamColor("Panel color ",colorPaleBlue));

// CCI colors

zcolor= ParamColor("WCCI color",colorBlack);
z9color= ParamColor("CCI color",colorWhite);
z6color= ParamColor("TCCI color",colorBrightGreen);

// CCI periods

zperiod=Param("WCCI period",14,0,100);
z = CCI(zperiod);
z9period=Param("CCI period",9,0,1000);
z9 = CCI(z9period);
z6period=Param("TCCI period",6,0,1000);
z6 = CCI(z6period);

// Tic/PIP value

TicMult= Param("Tic multiplier(ER2=10,YM=1,ES=4,FOREX=1)",1,0,1000000);
TicDiv= Param("Tic or PIP value(ER2=0.1,YM=1,FOREX=1)",1,0,1000000);

// Rangebar interval

rbint= Param("Rangebar intervalYM=25.0,AB=1.5,NQ=3.75,ES=3.0)",1.0,0.25,1000000);

// Rangebar counter

rbcounter= round(((rbint-(H-L))) * ticmult);
rbcounterpercent= round((rbcounter/(rbint * ticmult))*100);

// Timer/counter title

timercode= Param("Timerminutes=1,rangebar=2)",1,1,2);
timetitle= WriteIf(timercode==1,TitleTimeRem, EncodeColor(colorWhite) + "Countdown " + rbcounter + " (" + rbcounterpercent + "%)");

// Spread

spread= Param("Spread (included in stop)",0,0,1000000);

// Stop value

stopval= Param("Stop above/below entry bar",2,0,1000000);

// Plot grids

PlotTheGrids = ParamToggle("Plot grids","No|Yes",0);
if (PlotTheGrids ==1)
{
PlotGrid(0);
PlotGrid(-100);
PlotGrid(100);
PlotGrid(-200);
PlotGrid(200);
}

// Angle variables

PI = atan(1.00) * 4;
periods = 30;
HighHigh = HHV(H, periods);
LowLow = LLV(L, periods);
range = 25 / (HighHigh - LowLow) * LowLow;

// EMA34 Angle

EMA34 = EMA(C,34);
x1_EMA34 = 0;
x2_EMA34 = 1;
y1_EMA34 = 0;
y2_EMA34 = (Ref(EMA34, -1) - EMA34) / Avg * range;
c_EMA34 = sqrt((x2_EMA34 - x1_EMA34)*(x2_EMA34 - x1_EMA34) + (y2_EMA34 - y1_EMA34)*(y2_EMA34 - y1_EMA34));
angle_EMA34 = round(180 * acos((x2_EMA34 - x1_EMA34)/c_EMA34) / PI);
angle_EMA34 = IIf(y2_EMA34 > 0, - angle_EMA34, angle_EMA34);

// LSMA25 Angle

LSMA25 = LinearReg(C, 25 );
x1_LSMA25 = 0;
x2_LSMA25 = 1;
y1_LSMA25 = 0;
y2_LSMA25 = (Ref(LSMA25, -1) - LSMA25) / Avg * range;
c_LSMA25 = sqrt((x2_LSMA25 - x1_LSMA25)*(x2_LSMA25 - x1_LSMA25) + (y2_LSMA25 - y1_LSMA25)*(y2_LSMA25 - y1_LSMA25));
angle_LSMA25 = round(180 * acos((x2_LSMA25 - x1_LSMA25)/c_LSMA25) / PI);
angle_LSMA25 = IIf(y2_LSMA25 > 0, - angle_LSMA25, angle_LSMA25);

// Color the bars for Woodies Trend Following

function Consecutive( array )
{
return BarsSince( NOT( array ) );
}
function Occurrences( array , period )
{
return Sum( array, period );
}
array = z;
HighBars = Consecutive( array > 0 );
LowBars = Consecutive( array < 0 );
UpCondition = BarsSince( HighBars >= 6 AND Occurrences( array > 100 , 5 ) > 0 );
DnCondition = BarsSince( LowBars >= 6 AND Occurrences( array < -100 , 5 ) > 0 );
UpTrend = ( array > 0 ) AND ( UpCondition < DnCondition );
DnTrend = ( array < 0 ) AND ( UpCondition > DnCondition );
TrTrend = ( HighBars >= 5 AND NOT UpTrend ) OR ( LowBars >= 5 AND NOT DnTrend );
Color = IIf( UpTrend, colorBlue, IIf( DnTrend, colorRed, IIf( TrTrend, colorYellow, colorGrey40 ) ) );

// 14 CCI Line

Plot(round(z),"WCCI", zcolor, styleLine | styleThick);

// 9 CCI

Plot(round(z9),"CCI", z9color, styleLine);
// Turbo CCI

Plot(round(z6),"TCCI", z6color, styleLine);

// CCI Histogram

Plot( array, "", colorDefault, styleLine | styleThick | styleNoLabel);
Plot( array, "", Color, styleHistogram | styleThick| styleNoLabel);

Buy=( Cross(round(z6),round(z9)) OR Cross(round(z6),round(z)) OR Cross(round(z9),round(z)) ) AND round(z9) < -99;
Sell=( Cross(round(z),round(z9)) OR Cross(round(z),round(z6)) OR Cross(round(z9),round(z6)) ) AND round(z9) > 99;

// Plot signals
PlotShapes( IIf( Cross(round(z9),round(z)) , shapeSmallUpTriangle, shapeNone ),
colorBlue, 0, round(z9) );
PlotShapes( IIf( Cross(round(z9),round(z6)) , shapeSmallDownTriangle, shapeNone ),
colorRed, 0, round(z9) );
PlotShapes( IIf( ( Cross(round(z6),round(z9)) OR Cross(round(z6),round(z)) ) AND round(z9) < -99 , shapeSmallCircle, shapeNone ),
colorBlue, 0, round(z6) );
PlotShapes( IIf( ( Cross(round(z),round(z9)) OR Cross(round(z),round(z6)) ) AND round(z9) > 99, shapeSmallCircle, shapeNone ),
colorRed, 0, round(z) );


// Zero line 25lsma

Plot(0,"", IIf(C > LSMA25,colorBrightGreen,IIf(C < LSMA25,colorRed,colorTeal)), styleLine | styleThick | styleNoLabel);

// Plot the Mock CZI on the 100s

ColorANGLE_EMA = IIf(angle_EMA34 >=5,colorTurquoise,
IIf(angle_EMA34 <5 AND angle_EMA34 >=3.57,colorDarkGreen,
IIf(angle_EMA34 <3.57 AND angle_EMA34 >=2.14,colorPaleGreen,
IIf(angle_EMA34 <2.14 AND angle_EMA34 >=.71,colorLime,
IIf(angle_EMA34 <=-1*5,colorDarkRed,
IIf(angle_EMA34 >-1*5 AND angle_EMA34 <=-1*3.57,colorRed,
IIf(angle_EMA34 >-1*3.57 AND angle_EMA34 <=-1*2.14,colorOrange,
IIf(angle_EMA34 >-1*2.14 AND angle_EMA34 <=-1*.71,colorLightOrange,colorYellow))))))));
Plot(100,"", ColorANGLE_EMA , styleLine | styleThick | styleNoLabel);
Plot(-100,"", ColorANGLE_EMA , styleLine | styleThick | styleNoLabel);

// Plot the Mock Sidewinder on the 200s

SW = IIf((abs(angle_EMA34) >= 15) AND (abs(angle_EMA34 + angle_LSMA25) >= 50), IIf(angle_LSMA25 > 0, 2, -2),
IIf((abs(angle_EMA34) >= 0) AND (((angle_EMA34 >= 0) AND (angle_LSMA25 >= 0)) OR ((angle_EMA34 <= 0) AND (angle_LSMA25 <= 0))) AND (abs(angle_EMA34 + angle_LSMA25) >= 5), IIf(angle_LSMA25 > 0, 1, -1), 0));
ColorSW = IIf(abs(SW) == 2, colorBrightGreen,
IIf(abs(SW) == 1, colorYellow, colorRed));
Plot(200,"", ColorSW, styleLine | styleThick | styleNoLabel);
Plot(-200,"", ColorSW, styleLine | styleThick | styleNoLabel);

// CCI Points

CCipointmove= z-Ref(z,-1);
CCIpointmovetitle= WriteIf(abs(CCipointmove)<15,EncodeColor(colorRed) + "
" + "DIFF " +
abs(round(CCipointmove)),WriteIf(abs(CCipointmove)>=15 AND abs(CCipointmove)<20,EncodeColor(colorYellow) + "
" + "DIFF " +
abs(round(CCipointmove)),WriteIf(abs(CCIpointmove)>=20,EncodeColor(colorBrightGreen) + "
" + "DIFF " +
abs(round(CCipointmove)),"")));

// Price Panel

Lastpricetitlehi= WriteIf(H>Ref(H,-1),EncodeColor(colorBrightGreen) + Ref(H,-1) + " " + H , EncodeColor(colorWhite)+ Ref(H,-1) + " " + H);
Lastpricetitlelo= WriteIf(L<Ref(L,-1),EncodeColor(colorRed) + Ref(L,-1) + " " + L , EncodeColor(colorWhite) + Ref(L,-1) + " " + L);
Closecolor=WriteIf(C==H AND H>Ref(H,-1),EncodeColor(colorBrightGreen),WriteIf(C==L AND L<Ref(L,-1),EncodeColor(colorRed),EncodeColor(colorWhite)));

// Stop in

Longbar= L+rbint;
Shortbar= H-rbint;
sstoptitle=WriteIf(timercode==2, EncodeColor(colorBlue) + "
" + "Stop In Long " + Longbar + EncodeColor(colorRed) + "
" + "Stop In Short " + Shortbar + "
","");

// Stop out

stopCode=ParamToggle("Display stop-out ","No|Yes",0);
StopLong1= C -(L - (stopval*ticdiv) - (spread*ticdiv));
stoplong1c=C-stoplong1;
stoplong= round(StopLong1/ticdiv);
StopShort1= (H + (stopval*ticdiv) + (spread*ticdiv)) - C;
stopshortc= C+StopShort1;
StopShort= round(StopShort1/ticdiv);
stoptitle= WriteIf(stopcode==1,EncodeColor(colorBlue) + "
" + "Stop Out Long " + stoplong1c + " " + stoplong + "
" +
EncodeColor(colorRed) + "Stop Out Short " + stopshortc + " " + stopshort + "
","");

// Title

Title = "
" + "" + EncodeColor(colorWhite) + Date() + "
" + "
" +
timetitle + "
" + "
" + Lastpricetitlehi + "
" + Closecolor + C +
"
" + Lastpricetitlelo + "
" + CCIpointmovetitle + "
" + sstoptitle + stoptitle;

_SECTION_BEGIN("Change Background Color");
SetChartBkGradientFill( ParamColor("BgTop", ColorRGB( 172,172,172 )),
ParamColor("BgBottom", ColorRGB( 172,172,172 )),ParamColor("titleblock",ColorRGB( 172,172,172 )));
_SECTION_END();

scan stocks = Woodie''s CCI ...n = 1

Ticker,Trade,Date,Close,
ACB,Buy,7/21/2009,43.6000
ACL,Buy,7/21/2009,23.0000
BBS,Buy,7/21/2009,14.1000
BCI,Buy,7/21/2009,40.0000
BLF,Buy,7/21/2009,11.4000
VTO,Buy,7/21/2009,12.5000
BVS,Buy,7/21/2009,44.1000
CAD,Buy,7/21/2009,11.3000
CAN,Buy,7/21/2009,13.6000
CJC,Buy,7/20/2009,21.0000
VTC,Buy,7/21/2009,10.8000
CTN,Buy,7/21/2009,13.1000
CYC,Buy,7/21/2009,9.7000
VTA,Buy,7/21/2009,8.4000
DC4,Buy,7/21/2009,19.1000
DCL,Buy,7/21/2009,64.5000
DCT,Buy,7/21/2009,12.4000
DPC,Buy,7/21/2009,16.3000
DST,Buy,7/21/2009,9.6000
DXV,Buy,7/21/2009,10.0000
HAX,Buy,7/21/2009,18.5000
HCM,Buy,7/21/2009,54.5000
VSG,Buy,7/21/2009,10.5000
HHC,Buy,7/21/2009,21.0000
HNM,Buy,7/21/2009,14.1000
HSG,Buy,7/21/2009,30.2000
KHP,Buy,7/21/2009,15.0000
KMF,Buy,7/21/2009,8.9000
KMR,Buy,7/21/2009,10.7000
L62,Buy,7/21/2009,16.0000
LCG,Buy,7/21/2009,47.1000
LGC,Buy,7/21/2009,21.7000
LUT,Buy,7/21/2009,9.5000
MCP,Buy,7/21/2009,15.1000
MPC,Buy,7/21/2009,21.3000
MTG,Buy,7/21/2009,10.0000
NSC,Buy,7/21/2009,34.7000
NTL,Buy,7/21/2009,68.5000
PJT,Buy,7/21/2009,12.1000
PPG,Buy,7/21/2009,10.7000
PTM,Buy,7/21/2009,9.8000
PTS,Buy,7/21/2009,16.0000
RAL,Buy,7/21/2009,24.3000
S64,Buy,7/21/2009,16.0000
S91,Buy,7/21/2009,12.3000
S96,Buy,7/21/2009,12.6000
SAF,Buy,7/21/2009,20.0000
SD4,Buy,7/21/2009,13.0000
SD6,Buy,7/21/2009,24.5000
SD7,Buy,7/21/2009,30.0000
SD9,Buy,7/21/2009,26.0000
SDC,Buy,7/20/2009,22.5000
SDJ,Buy,7/21/2009,15.8000
SDP,Buy,7/21/2009,18.5000
SDY,Buy,7/21/2009,18.9000
SEB,Buy,7/21/2009,14.0000
SFI,Buy,7/21/2009,35.0000
SJE,Buy,7/21/2009,20.1000
SJM,Buy,7/21/2009,14.3000
SNG,Buy,7/21/2009,35.3000
SRB,Buy,7/21/2009,7.3000
SSI,Buy,7/21/2009,55.0000
SSS,Buy,7/21/2009,14.1000
STL,Buy,7/21/2009,31.8000
SVC,Buy,7/21/2009,32.0000
SZL,Buy,7/21/2009,40.2000
TCT,Buy,7/21/2009,79.0000
TDH,Buy,7/21/2009,67.0000
TDN,Buy,7/20/2009,19.0000
VNS,Buy,7/21/2009,34.9000
TTF,Buy,7/21/2009,18.1000
TXM,Buy,7/21/2009,10.6000
TYA,Buy,7/21/2009,10.3000
V11,Buy,7/21/2009,12.0000
VC6,Buy,7/21/2009,14.6000
VDL,Buy,7/16/2009,47.0000
VIP,Buy,7/21/2009,14.5000
VNC,Buy,7/21/2009,14.3000
VNE,Buy,7/21/2009,13.3000
VTV,Buy,7/21/2009,18.5000

DAC,Sell,7/21/2009,44.5000
CMC,Sell,7/21/2009,14.8000
BMP,Sell,7/21/2009,73.5000
HCT,Sell,7/20/2009,17.8000
TRC,Sell,7/21/2009,46.9000

Williams %R with 3-5-8 period signal line 1

code

_SECTION_BEGIN("Williams %R and 3,5,8 day Mov.avg 1");

MaxGraph =10;

R = ((HHV(H,14) - C) /(HHV (H,14) -LLV (L,14))) *-100;
Graph0 = R;
Graph1 =-30;
Graph2 =-70;
Graph3 =-90;
Graph4 =-10;

PlotOHLC( r,r,-50,r, "", IIf( r > -50, ParamColor( "Color+", colorGold), ParamColor( "Color-", colorTeal)),styleCloud | styleClipMinMax, -70, -30 );

Graph5=MA(R , 8);
Graph5Style = styleLine; //1+4;
Graph5Color =colorWhite; //MA`u ti`n Hiê?u?// 1

Graph6=MA(R , 5);
Graph6Style = styleLine; //1+4;
Graph6Color =colorRed; //MA`u ti`n Hiê?u?// 1

Graph7=MA(R , 3);
Graph7Style = styleLine;
Graph7Color =colorYellow; //MA`u ti`n Hiê?u?// 1

Graph0Style=styleLine|styleThick;//1+4;
Graph0Color =colorBlue;

Graph1Style =Graph2Style= styleDashed; // 1
Graph2Color = Graph1Color =colorBlack; //ma`u mu´c ngang// 12

Graph3Style =Graph4Style =0;
Graph3Color = Graph4Color =2; //MA`u nê`n// 2 or 5


Buy=Cross(R,Graph7) AND Graph7 < -70;
Sell=Cross(Graph6,R) AND Graph6 > -30;

PlotShapes(IIf(Buy ,shapeSmallUpTriangle,shapeNone) ,colorBrightGreen ,0 ,Graph7);
PlotShapes(IIf(Sell,shapeSmallDownTriangle,shapeNone),colorOrange ,0 ,Graph6);

/*x = BarsSince( Cross( r, MA( r, 9)));*/
/*y = BarsSince( Cross( MA(r, 9), r));*/
/*Graph8 = ( x == 0 OR y == 0 ) * 30;*/

Title =Name() + " -Williams %R: " +" % R Line " +"("+ WriteVal ( Graph0,format=1.2)+")"+ " Signal Line " + ""+"("+WriteVal(Graph5,format=1.2)+")" +" , " + Date( );

_SECTION_END();

_SECTION_BEGIN("Change Background Color");
SetChartBkGradientFill( ParamColor("BgTop", ColorRGB( 172,172,172 )),
ParamColor("BgBottom", ColorRGB( 172,172,172 )),ParamColor("titleblock",ColorRGB( 172,172,172 )));
_SECTION_END();

DSS Bressert

code


Slw = 4; Pds = 4;

A = EMA((Close-LLV(Low,Pds))/(HHV(H,pds)-LLV(L,Pds)),Slw)*100;

DSS = EMA((A-LLV(A,pds))/(HHV(A,Pds)-LLV(A,Pds)),Slw)*100;

MaxGraph = 10;
//Graph0 = DSS; Graph0Color = 2;
Graph2 = DSS;
Overbought = 80; Oversold = 20;

Graph2BarColor = IIf (Graph2 > overbought, 4,
IIf (Graph2 < oversold,5,6));

Plot(20,"",colorBrightGreen);
Plot(80,"",colorRed);
Plot(50,"",colorWhite);

Plot( DSS, "", 2, styleLine );

Buy = Cross (DSS, 20) OR Cross (DSS, 15) OR Cross (DSS, 10) OR Cross (DSS, 5);
Sell = Cross (80,DSS) OR Cross (85,DSS) OR Cross (90,DSS) OR Cross (95,DSS);

//Title = "Double Smoothed Stochastics Bressert" + " " + _DEFAULT_NAME() + " " + Date( ) ;
Title =Name() + " Double Smoothed Stochastics Bressert " +" DSS Bressert " +"("+ WriteVal ( Graph2,format=1.2)+")" +" " + Date( );

_SECTION_BEGIN("Change Background Color");
SetChartBkGradientFill( ParamColor("BgTop", ColorRGB( 172,172,172 )),
ParamColor("BgBottom", ColorRGB( 172,172,172 )),ParamColor("titleblock",ColorRGB( 172,172,172 )));
_SECTION_END();

Dynamic Momentum Index 2007

code

_SECTION_BEGIN("Dynamic Momentum Index");
period = Param( "RSI Period", 13, 1, 100, 1 );
MAperiod = Param( "MA Period", 5, 1, 100, 1 );
StDevperiod = Param( "StDev Period", 8, 1, 100, 1 );

upday=IIf(C>Ref(C,-1),C-Ref(C,-1),0);
downday=IIf(Ref(C,-1)> C,Ref(C,-1)-C,0);

Stda=MA(StDev(C,StDevperiod),MAperiod);
V1=StDev(C,StDevperiod)/Stda;
TD=int(period/V1);

Su=Sum(upday,TD);
Sd=Sum(downday,TD);
M1=(Su-Sd);
M2=abs(Su+Sd);
DMI=50*(M1+M2)/M2;
xs=Param("Smoothing",3,1,10,1);
xs1=Param("Trigger Line",5,1,10,1);

Plot(EMA(DMI,xs),"Dynamic Momentum Index ",colorRed,1);
Plot(MA(DMI,xs1),"trigger",colorBlue,1);

Buy=Cross(EMA(DMI,xs),MA(DMI,xs1));
Sell=Cross(MA(DMI,xs1),EMA(DMI,xs));
PlotShapes(IIf(Buy ,shapeUpArrow,shapeNone) ,colorBrightGreen);
PlotShapes(IIf(Sell,shapeDownArrow,shapeNone),colorOrange);




Plot(70,"",2,1);Plot(30,"",2,1);
_SECTION_END();

_SECTION_BEGIN("Change Background Color");
SetChartBkGradientFill( ParamColor("BgTop", ColorRGB( 172,172,172 )),
ParamColor("BgBottom", ColorRGB( 172,172,172 )),ParamColor("titleblock",ColorRGB( 172,172,172 )));
_SECTION_END();

DSS Bressert:

Chỉ số Williams %R

thùy linh http://www.stox.vn/stox/stoxexpert/expert_page.asp?MenuID=5#Phan46

chúng ta sử dụng 3 MA cu thể là MA3 MA5 MA8 ...để phát hiện tín hiệu đảo chiếu

chúng ta sử dụng 3 đường CCI cùng 1 lúc để phát hiện cảnh báo đảo chiều sớm ...cực kỳ chính xác ...mà đường giá chưa hề bật lên or rớt xuống mà chúng ta đã phát hiện ra vấn đề rồi

cụ thể CCI 6, CCI 9, CCI 14

VÙNG BÁN WÁ ĐÀ ...CCI 6 CROSS CCI 9 OR CCI 14 ...XUẤT HIỆN CỤC XANH XANH TRÒN TRÒN. KHI CCI 9 CROSS CCI 14 ...XUẤT HIỆN TAM GIÁC XANH XANH

VÙNG MUA WÁ ĐÀ ...NGƯỢC LẠI

SCAN STOCKS SẼ PHÁT HIỆN BOTTOM OR TOP CỦA MARKET OR BẤT KỲ STOCKS NÀO CỰC KỲ SỚM

21-7:
BMP DRC ITA MHC SAM TCM VFMVF1 VIS