Q = Param( "% Change", 2, 0.1, 10, 0.1 );
Z = Zig( C , q ) ;
HH = (( Z < Ref(Z, -1) AND Ref(Z, -1) > Ref(Z, -2)) AND (Peak(Z, Q, 1) > Peak(Z, Q, 2)));
LH = ((Z < Ref(Z, -1) AND Ref(Z, -1) > Ref(Z, -2)) AND (Peak(Z, Q, 1) < Peak(Z, Q, 2)));
HL = ((Z > Ref(Z, -1) AND Ref(Z, -1) < Ref(Z, -2)) AND (Trough(Z, Q, 1) > Trough(Z, Q, 2)));
LL = ((Z > Ref(Z, -1) AND Ref(Z, -1) < Ref(Z, -2)) AND (Trough(Z, Q, 1) < Trough(Z, Q, 2)));
GraphXSpace = 10;
dist = 0.5 * ATR(20);
for ( i = 0; i < BarCount; i++ )
{
if ( HH[i] )
PlotText( "HH", i, H[ i ] + dist[i], colorYellow );
if ( LH[i] )
PlotText( "LH", i, H[ i ] + dist[i], colorYellow );
if ( HL[i] )
PlotText( "HL", i, L[ i ] - dist[i], colorPink );
if ( LL[i] )
PlotText( "LL", i, L[ i ] - dist[i], colorPink );
}