1

_SECTION_BEGIN(“Price”);
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat(“{{NAME}} – {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}”, O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, “Close”, ParamColor(“Color”, colorBlack ), styleNoTitle | ParamStyle(“Style”) | GetPriceStyle() );
_SECTION_END();

mua =
(C >= Ref(C,-1)
AND C >= Ref(C,-2)
AND C >= Ref(C,-3)
AND V< 1.5MA(V,15) AND C>=MA(C,10) AND C>1.015Ref(C,-1) AND HHV(C,5) >= HHV(C,10)

AND Ref(C,-1)<=1.035Ref(C,-2) AND Ref(C,-2)<=1.035Ref(C,-3)
AND Ref(C,-3)<=1.035*Ref(C,-4)

AND Ref(C,-2)<=1.035Ref(C,-1) AND Ref(C,-3)<=1.035Ref(C,-2)
AND Ref(C,-4)<=1.035*Ref(C,-3)
)

OR
( C>1.04Ref(C,-1) AND V> 1.3MA(V,15) AND C>=0.98HHV(H,2)AND V< 1.5MA(V,15))

;

ban1=

(
C <=0.97*Ref(C,-1)

AND Cross(MA(C,10),C)

)

OR

(C <=0.97Ref(C,-1)AND C<=0.95HHV(O,1)AND C< (H+L)/2)
OR
(C<=0.93*HHV(O,2))

OR
(
Ref(C,-1)>1.03*Ref(C,-2)

AND C <=0.97*Ref(C,-1)

)

;
Short =
(ExRem(ban1, mua) AND C>MA(C,12))

OR

(ExRem(ban1, mua) AND V>Ref(V,-1)AND Cross(MA(C,12),C)AND C<=1.03*Ref(C,-1));
PlotShapes(IIf(Short,shapeDownArrow,shapeNone),colorBlue,0,High,Offset=-10);
_SECTION_BEGIN(“3.ADX3”);

_SECTION_END();

no=Param( “Swing”, 5, 1, 55 );
res=HHV(H,no);
sup=LLV(L,no);
tsl=IIf(ValueWhen(IIf(C>Ref(res,-1),1,IIf(CRef(res,-1),1,IIf(C<Ref(sup,-1),-1,0)),1)==1,sup,res);
Plot(tsl, _DEFAULT_NAME(), colorGreen, styleStaircase);
Buy = Cross(C,res) ;
Sell = Cross(sup,C) ;
_SECTION_END();
x = res;
y = sup;

PlotOHLC( x, x, y, y, “”, IIf(C > tsl,colorPaleGreen, colorPink),styleNoLabel|styleCloud );

_SECTION_BEGIN(“Price”);
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat(“{{NAME}} – {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}”, O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, “Close”, ParamColor(“Color”, colorBlack ), styleNoTitle | ParamStyle(“Style”) | GetPriceStyle() );
_SECTION_END();

_SECTION_BEGIN(“3.ADX3”);

_SECTION_END();

_SECTION_BEGIN(“Price Line”);

PriceLineColor=ParamColor(“PriceLineColor”,colorBlue);
PriceLevel = ParamField(“PriceField”, field = 3);

Daysback = Param(“Bars Back”,200,10,500,1);
FirstBar = BarCount – DaysBack;
YY = IIf(BarIndex() >= Firstbar,EndValue(PriceLevel),Null);

//Plot(YY,”Current Price”,colorCustom12,ParamStyle(“LineStyle”,styleLine|styleDashed|styleNoTitle|styleNoLabel|styleThick,maskAll));

side = Param(“side”,1,0,1000,1);

dist = 0;

for( i = 0; i < BarCount; i++ ) { if(i+side== BarCount) PlotText( ” Break if > ” + res +” Down if < “+ Ref(sup,-1) , i + 2, YY[ i ]-dist[i]+0.5, colorblue);
}
// Gia tham chieu test

_SECTION_END();

a=C;
g=(EMA(Close,3) * (2 / 4 – 1)-EMA(Close,5) * (2 / 6 – 1)) / (2 /4- 2 /6);
e=Ref(tsl,-1);
Buy = Cross(C,tsl) ;
Sell = Cross(tsl,C) ;
SellPrice=ValueWhen(Sell,e,1);
BuyPrice=ValueWhen(Buy,e,1);
Long=Flip(Buy,Sell);
Shrt=Flip(Sell,Buy );
Filter=Buy OR Sell;
Buy = Cross(C,tsl) ;
Sell = Cross(tsl,C) ;
shape = Buy * shapeUpArrow + Sell * shapeDownArrow;
PlotShapes( shape, IIf( Buy, colorGreen, colorRed ),0, IIf( Buy, Low, High ) );
a1=Ref(tsl,-1);

dist = 0.8ATR(1); //0.8 dist1 = 1.8ATR(1); //1.2
for( i = 0; i < BarCount; i++ )
{
if( Buy[i] )
{
PlotText(“\nSL<” + Prec(L[i],1) , i, L[ i ]-dist[i], colorBLUE);
}

}
_SECTION_END();

_SECTION_BEGIN(“Price”);
SetChartOptions(0,chartShowArrows|chartShowDates);
_N(Title = StrFormat(“{{NAME}} – {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) {{VALUES}}”, O, H, L, C, SelectedValue( ROC( C, 1 ) ) ));
Plot( C, “Close”, ParamColor(“Color”, colorDefault ), styleNoTitle | ParamStyle(“Style”) | GetPriceStyle() );
_SECTION_END();
Plot( 1.9C, “Target”, ParamColor(“Color”, colorWhite ),styleDashed|styleNoTitle|styleNoLabel,maskAll ); Plot( 0.8C, “Target1”, ParamColor(“Color”, colorWhite ), styleLine );

_SECTION_BEGIN(“Title”);
messageboard = ParamToggle(“Tat Title”,”Hien|An”,1);
function GetSecondNum()
{
Time = Now( 4 );
Seconds = int( Time % 100 );
Minutes = int( Time / 100 % 100 );
Hours = int( Time / 10000 % 100 );
SecondNum = int( Hours * 60 * 60 + Minutes * 60 + Seconds );
return SecondNum;
}
RequestTimedRefresh( 1 );
TimeFrame = Interval();
SecNumber = GetSecondNum();
SecsLeft = SecNumber – int( SecNumber / TimeFrame ) * TimeFrame;
SecsToGo = TimeFrame – SecsLeft;
YC=Ref(C,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)100,2); if (messageboard == 1 ) { Title = now()+” “+ EncodeColor(colorgreen) + “#CHI SO P/E ” + Prec(Close / GetFnData( “EPS” ),2) + EncodeColor(colorCustom12) + ” #Gia Hien Tai ” + Close+EncodeColor(colorGREEN) + ” #DINH GIA THEO P/E ” + NumToStr(MA(C / GetFnData( “EPS” )GetFnData(“EPS”),200),1.2)+ EncodeColor(colorCustom12) + ” #Target Ky Thuat 1 ” + HHV(c,30)+ EncodeColor(colorGREEN) + ” #Target Ky Thuat 2 ” + HHV(C,60) +EncodeColor(colorred)+” MA30: “+Prec(MA(C,30),2) + ” #RSI “+Prec(RSI(14),2);
}
_SECTION_END();
_SECTION_BEGIN(“Ten Doanh Nghiep”);

x=Param(“xposn”,1,0,1200,1);
y=Param(“yposn”,20,0,1200,1);

GfxSetBkMode(0);
GfxSelectFont( “Tahoma”, 12, 200, False );
GfxSetTextColor( colorOrange );
GfxTextOut( Name(), x+320, y+10 );
GfxTextOut(FullName(), x+390, y+10 );

_SECTION_END();

// cac thong tin co ban
GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( ColorRGB( 157,53,166 ) );
GfxTextOut(“EPS: ” + NumToStr( GetFnData(“EPS”)1000, 1.2 ), x+15, y+10 ); GfxTextOut(“ROE: ” + NumToStr(GetFnData(“ReturnOnEquity”),1.2) + “%”, x+15, y+30 ); GfxTextOut(“Von hoa (ty): ” + NumToStr(GetFnData(“SharesOut”)MA(C,20)/1000000, 1.2), x+15, y+50 );
GfxTextOut(“P/E: ” + NumToStr(C/GetFnData(“EPS”),1.2), x+15, y+70 );
//GfxTextOut(“Dinh Gia: ” + NumToStr(MA(C / GetFnData( “EPS” )GetFnData(“EPS”),200),1.2)+” – “+NumToStr(MA(C / GetFnData( “EPS” )GetFnData(“EPS”)(1+GetFnData(“ReturnOnEquity”)/200) ,200),1.2), x+15, y+90 ); GfxTextOut(“Book Value: ” + NumToStr(GetFnData( “BookValuePerShare” ),1.2), x+15, y+110 ); GfxTextOut(“Tang Truong EPS Quy’: ” + NumToStr(GetFnData(“QtrlyEarningsGrowth”)100,1.2)+ “%”, x+15, y+130 );
GfxTextOut(“Suc Manh: ” + NumToStr(C/HHV(C,120)*100,1.2)+”/100″, x+15, y+150 );

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorgreen );
GfxTextOut(“Danh gia Co Ban: “+ WriteIf( GetFnData(“EPS”)*1000 >=3000 AND GetFnData(“ReturnOnEquity”)>12 ,”Co Ban Tot”,” Binh thuong/ Kem “), x+15, y+190 );

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorgreen );
GfxTextOut(“GTGD: ” + NumToStr((CV)/1000000,1.2)+” ty”+ ” Dot Bien KL:”+ NumToStr(((V-MA(V,15))/MA(V,15))100)+”%”, x+320, y+95 );

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorred );
//GfxTextOut(“StopLoss:”+NumToStr(LLV(C,8))+ ” (+” + Prec((C-LLV(C,8))/LLV(C,8)*100,2) + ” %)”, x+15, y+260 );

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorgreen );
GfxTextOut(“GTGD binh quan:”+NumToStr((C*MA(V,30))/1000000,1.2)+” ty”, x+320, y+120 );

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorred );
GfxTextOut(“Neu <10 ty thi ko nen mua “, x+580, y+120 );
GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorgreen );
GfxTextOut(“Target 1:”+NumToStr(HHV(C,20)), x+320, y+300 );
GfxTextOut(“Target 2:”+NumToStr(HHV(C,60)), x+480, y+300 );
GfxTextOut(“Target 3:”+NumToStr(HHV(C,120)), x+640, y+300 );
//GfxTextOut(“Neu Vuot Dinh thi Target:”+ NumToStr(1.2*Ref(HHV(C,120), -5)), x+650, y+180 );

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorred );
GfxTextOut(“Khuyen nghi Theo PTKT:”, x+320, y+170 ) ;
GfxTextOut(“Neu Gia <=”+NumToStr((LLV(C,4))), x+320, y+220 ) ; GfxTextOut(“–> Thi Ban 50% CP”, x+520, y+220 ) ;
GfxTextOut(“Neu Gia <=”+NumToStr((LLV(C,8))), x+320, y+240 ) ; GfxTextOut(“–> Thi Ban 100% CP”, x+520, y+240 ) ;

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorgreen );
GfxTextOut(“Mua them Cp neu >=”+NumToStr((HHV(H,4))), x+320, y+270 ) ;

_SECTION_END();

_SECTION_BEGIN(“Magfied Market Price”);
FS=Param(“Font Size”,20,11,100,1);
GfxSelectFont(“Times New Roman”, FS, 700, True );
GfxSetBkMode( colorWhite );
bi = BarIndex();
ii = SelectedValue( bi ) – bi[ 0 ];
iii = SelectedValue( bi ) – bi[ 1 ];
if (C[ii] > C[iii])
GfxSetTextColor(colorGreen);
else if(C[ii] < C[iii])
GfxSetTextColor(colorRed);
else
GfxSetTextColor(colorOrange);

//GfxSetTextColor( ParamColor(“Color”,colorGreen));
//Iif( C<Ref(C,-1),GfxSetTextColor(colorRed) ,GfxSetTextColor(colorGreen));
Hor=Param(“Horizontal Position”,170,1,1200,1);
Ver=Param(“Vertical Position”,12,1,830,1);
GfxTextOut(“Price: “+C, Hor+150 , Ver+50 );
YC=TimeFrameGetPrice(“C”,inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont(“Times New Roman”, 15, 700, True );
GfxSetBkMode( colorBlack );
GfxTextOut(“”+DD+” (“+xx+”%)”, Hor+390 , Ver+FS+40 );
_SECTION_END();

// END SCRIPT UNTUK SUPPORT / RESISTANT
_SECTION_END();
_SECTION_BEGIN(“SupportResistance”);
// START SCRIPT UNTUK SUPPORT / RESISTANT

WarnaResistant = ParamColor(“Warna Garis Resistant”,colorRed);
WarnaSupport = ParamColor(“Warna Garis Support”,colorGreen);
R1_show = 0;
S1_show = 0;

SRStyle = ParamStyle(“S/R Style”,styleThick);

if (ParamToggle(“Garis Support&Resistance”, “Tidak|Ya”, 1 ))
{
// RESISTANT
LastHighestValue = LastVisibleValue(Ref(C,-1));
if (LastVisibleValue(C) == C[LastValue(BarIndex())])
LastHighestValue = LastVisibleValue(C);

i = 1;

if (LastHighestValue < HighestVisibleValue(C))
{
        while (LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1),Ref(C, -1), i)) < LastHighestValue)
            i++;

        R1 = LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1),Ref(C, -1), i));

        R1x = LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1),Ref(BarIndex(), -1), i));
        Plot(IIf(BarIndex() >= R1x,LastValue(HHV(C,20)),Null),"R1",WarnaResistant ,SRStyle);
        //PlotText("R1 : " + R1, BarCount + 1, LastValue(R1), WarnaResistant);
        R1_show = 1;

        i++;

        if (HighestVisibleValue( C ) > R1)
        {
            while (LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1), Ref(C,-1), i)) <= R1)
                i++;

            R2 = LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1), Ref(C,-1), i));
            R2x = LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1),Ref(BarIndex(), -1), i));

            Plot(IIf(BarIndex() >= R2x,LastValue(HHV(C,60)),Null),"R2",WarnaResistant ,SRStyle);
            PlotText("               R2 : " + HHV(C,60)+ " (+" + Prec((HHV(C,60)-C)/C*100,2) + " %)", BarCount + 1, LastValue(HHV(C,60)), WarnaResistant);
            i++;
            if (HighestVisibleValue( C )> R2)
            {       
                while (LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1), Ref(C,-1), i)) <= R2)
                    i++;
                R3 = HHV(C,120);
                R3x = LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1),Ref(BarIndex(), -1), i));   

                Plot(IIf(BarIndex() >= R3x,LastValue(HHV(C,120)),Null),"R3",WarnaResistant ,SRStyle);
                PlotText("               R3 : " + Prec(HHV(C,120),1) + " (+" + Prec((HHV(C,120)-C)/C*100,2) + " %)", BarCount + 1, LastValue(R3), WarnaResistant);
            }
        }
}
else if (LastHighestValue == HighestVisibleValue(H))
{
    R1 = LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1),Ref(C, -1), i));
    R1x = LastVisibleValue(ValueWhen(C <= Ref(C,-1) AND Ref(C,-2) <= Ref(C, -1),Ref(BarIndex(), -1), i));
    if (R1 == LastHighestValue)
    {
        Plot(IIf(BarIndex() >= R1x,LastValue(R1),Null),"R1",WarnaResistant ,SRStyle);
        //PlotText("R1 : " + R1, BarCount + 1, LastValue(R1), WarnaResistant);
        R1_show = 1;
    }
}

// SUPPORT
LastLowestValue = LastVisibleValue(Ref(C,-1));
if (LastVisibleValue(C) == C[LastValue(BarIndex())])
    LastLowestValue = LastVisibleValue(C);

i = 1;

if (LastLowestValue > LowestVisibleValue(C))
{   
        while (LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1),Ref(C, -1), i)) > LastLowestValue)
            i++;

        S1 = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1),Ref(C, -1), i));
        S1x = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1),Ref(BarIndex(), -1), i));
        Plot(IIf(BarIndex() >= S1x,LastValue(S1),Null),"S1",WarnaSupport ,SRStyle);
        //PlotText("        Ho Tro : " + Prec(S1,2)+ " ( " + Prec((C-s1)/C*100,2) + " %)", BarCount + 1, LastValue(S1), WarnaSupport);
        S1_show = 1;
        i++;

        if (LowestVisibleValue( C ) < S1)
        {
            while (LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1), Ref(C,-1), i)) >= S1)
                i++;

            S2 = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1), Ref(C,-1), i));
            S2x = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1), Ref(BarIndex(),-1), i));   

            Plot(IIf(BarIndex() >= S2x,LastValue(S2),Null),"S2",WarnaSupport ,SRStyle);
            PlotText("            \nS2:" + LLV(L,8), BarCount + 1, LastValue(LLV(L,8)), WarnaSupport);
            i++;
            if (LowestVisibleValue( C )< S2)
            {       
                while (LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1), Ref(C,-1), i)) >= S2)
                    i++;
                S3 = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1), Ref(C,-1), i));
                S3x = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1), Ref(BarIndex(),-1), i));
                Plot(IIf(BarIndex() >= S3x,LastValue(LLV(L,20)),Null),"S3",WarnaSupport ,SRStyle);
                PlotText("   \nS3:" + LLV(L,20), BarCount + 12, LastValue(LLV(L,20)), WarnaSupport);

            }
        }
}
else if (LastLowestValue == LowestVisibleValue(C))
{
    S1 = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1),Ref(C, -1), i));
    S1x = LastVisibleValue(ValueWhen(C >= Ref(C,-1) AND Ref(C,-2) >= Ref(C, -1),Ref(BarIndex(), -1), i));
    if (S1 == LastLowestValue)
    {
        Plot(IIf(BarIndex() >= S1x,LastValue(S1),Null),"S1",WarnaSupport ,SRStyle);
        //PlotText("S1 : " + S1, BarCount + 1, LastValue(S1), WarnaSupport);
        S1_show = 1;
    }
}

if (S1_show AND R1_show)
{
    SR = Prec((1-(S1/R1))*100,2);
}

}

// END SCRIPT UNTUK SUPPORT / RESISTANT
_SECTION_END();

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorred);
GfxTextOut(Name()+”: “+ C +” Xu huong ngan han: “+ WriteIf(C>MA(C,20),”uptrend”,”downtrend”), x+320, y+200 );

SetForeign(“vnindex”,True,True);
_SECTION_BEGIN(“Magfied Market Price”);
FS=Param(“Font Size”,20,11,100,1);
GfxSelectFont(“Times New Roman”, FS, 700, True );
GfxSetBkMode( colorWhite );
bi = BarIndex();
ii = SelectedValue( bi ) – bi[ 0 ];
iii = SelectedValue( bi ) – bi[ 1 ];
if (C[ii] > C[iii])
GfxSetTextColor(colorGreen);
else if(C[ii] < C[iii])
GfxSetTextColor(colorRed);
else
GfxSetTextColor(colorOrange);

//GfxSetTextColor( ParamColor(“Color”,colorGreen));
//Iif( C<Ref(C,-1),GfxSetTextColor(colorRed) ,GfxSetTextColor(colorGreen));
Hor=Param(“Horizontal Position”,170,1,1200,1);
Ver=Param(“Vertical Position”,12,1,830,1);
//GfxTextOut(“Price: “+C, Hor+750 , Ver+250 );
YC=TimeFrameGetPrice(“C”,inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont(“Times New Roman”, 11, 700, True );
GfxSetBkMode( colorBlack );
//GfxTextOut(“”+DD+” (“+xx+”%)”, Hor+920 , Ver+FS+190 );

no=Param( “Swing”, 5, 1, 55 );
res=HHV(H,no);
sup=LLV(L,no);
tsl=IIf(ValueWhen(IIf(C>Ref(res,-1),1,IIf(CRef(res,-1),1,IIf(C<Ref(sup,-1),-1,0)),1)==1,sup,res);
//Plot(tsl, _DEFAULT_NAME(), colorGreen, styleStaircase);
Buy = Cross(C,res) ;
Sell = Cross(sup,C) ;
_SECTION_END();

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorGREEN );
GfxTextOut(“QUY TAC DAU TU – HUNGCANSLIM.COM”, x+920, y+15 );
GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorcustom12 );
GfxTextOut(“1. Chi mua khi TT chung Uptrend”, x+920, y+40 );
GfxTextOut(“2. Chi mua cp GTGD >20ty 1 phien, hay có sóng”, x+920, y+60 );
GfxTextOut(“3. Chon 3 nganh khoe nhat, co cau chuyen ho tro”, x+920, y+80 );
GfxTextOut(“4. Chon 3 ma cp khoe nhat, nhay nhat nganh “, x+920, y+100 );
GfxTextOut(“5. Chi mua cp minh tin tuong, hieu ro cau chuyen, co ky vong”, x+920, y+120 );
GfxTextOut(“6. Target >=20%, Cutloss <7%”, x+920, y+140 );
GfxTextOut(“7. Tuan thu tuyet doi cac quy tac”, x+920, y+160 );

GfxSelectFont( “Tahoma”, 10, 200, True );
GfxSetTextColor( colorgreen );
GfxTextOut(“VNINDEX: “+ C + ” (“+ xx+”%)”+” Xu huong ngan han: “+ WriteIf(C>MA(C,20),”uptrend”,”downtrend”), x+920, y+220 );
//GfxTextOut(“Chi Mua neu target >15% “, x+920, y+240 );
//GfxTextOut(“Target:”+NumToStr(HHV(C,60))+ ” (+” + Prec((HHV(C,60)-C)/C100,2) + ” %)”, x+920, y+260 ); //GfxTextOut(“Target2:”+NumToStr(HHV(C,120))+ ” (+” + Prec((HHV(C,120)-C)/C100,2) + ” %)”, x+920, y+280 );

Filter= Buy;

AddColumn(((C – Ref(C,-1))/Ref(C,-1))100 ,”% Tang gia “); AddColumn(CV,”Gia tri GD “);
AddColumn(C,”Gia today”);
AddColumn(RSI(14),”RSI”);
AddColumn((GetFnData(“SharesOut”)*MA(C,20)/1000000),”Von Hoa”);
AddSummaryRows(31, 1.2,4);
SetSortColumns( -6 ) ;

AddColumn(((C – Ref(C,-1))/Ref(C,-1))100 ,”% Tang gia “); AddColumn(((V – MA(V,50))/MA(V,50))100 ,”% Dot bien KL”);

_SECTION_END();