_SECTION_BEGIN("Plot-Pivots");
change = Param("% change",0.15,0.1,25,0.05);
Z = Zig(C, change);
j = k = PH[0] = PL[0] = 0;
for( i = 1; i < BarCount-1; i++ )
{
if (Z < Z[i-1] AND Z < Z[i+1])
{
if (PL[k] > Z)
{
PlotShapes(IIf(Z < Ref(Z,-1) AND Z < Ref(Z,1),shapeSmallCircle,shapeNone),colorRed,0,L,-20);
}
else
{
PlotShapes(IIf(Z > Ref(Z,-1) AND Z > Ref(Z,1),shapeSmallCircle,shapeNone),colorGreen,0,H,20);
}
k = k + 1;
PL[k] = Z;
}
if (Z > Z[i-1] AND Z > Z[i+1])
{
if (PH[j] < Z)
{
PlotShapes(IIf(Z > Ref(Z,-1) AND Z > Ref(Z,1),shapeSmallCircle,shapeNone),colorGreen,0,H,20);
}
else
{
PlotShapes(IIf(Z < Ref(Z,-1) AND Z < Ref(Z,1),shapeSmallCircle,shapeNone),colorRed,0,L,-20);
}
j = j + 1;
PH[j] = Z;
}
}
_SECTION_END();