Plot( Close, "", colorDefault, styleCandle );
sophien = Param( "sophien", 10, 0, 100, 1 );
chenhlech_loc = Param( "% biendong kenh", 0.05, 0.05, 10, 0.05 );
caonhat = Ref( HHV( High, sophien ), -1 );
thapnhat = Ref( LLV( Low, sophien ), -1 );
chenhlech = ( caonhat - thapnhat ) / thapnhat <= chenhlech_loc;
butpha = chenhlech AND Volume > EMA( Volume, sophien ) AND Close > caonhat AND volume > 50000;
duongtren = ValueWhen( butpha, caonhat, 0 );
duongduoi = ValueWhen( butpha, thapnhat, 0 );
Plot( duongtren, "", colorRed, styleNoLine + styleDots );
Plot( duongduoi, "", colorRed, styleNoLine + styleDots );
butpha_moi[0] = 0;
butpha_moi[1] = 0;

for( i = 0; i <= BarCount - 1; i++ )
{
    if( butpha[i] == 1 AND( butpha[i - 1] == 1 OR butpha[i - 2] == 1 OR butpha[i - 3] == 1 ) )
    {
        butpha_moi[i] = 0;
    }
    else
        if( butpha[i] == 0 )
        {
            butpha_moi[i] = 0;
        }
        else
        {
            butpha_moi[i] = 1;
        }

    if( butpha_moi[i] == 1 )
    {
        PlotText( "breakout", i, thapnhat[i], colorBlue, colorLightOrange );
    }
}

PlotShapes( butpha_moi*shapeUpArrow, colorRed, 0, thapnhat );
Filter = butpha_moi;
AddColumn( Close, "Dong Cua" );
AddColumn( butpha_moi, "Breakout" );
Buy = butpha_moi;
Sell = Cross( EMA( Close, 10 ), Close );