it is multiple zigzags 
good luck
good luck
Code:
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,"",1,64);
function zz (percent,shape,colour,style,offset)
{
pk=PeakBars(H,percent)==0;
tr=TroughBars(L,percent)==0;
zzHi=Zig(H,percent);
zzLo=Zig(L,percent);
Avg=(zzHi+zzLo)/2;
x=IIf(pk,zzHi,IIf(tr,zzLo,IIf(Avg>Ref(Avg,-1),H,L)));
zzHiLo=Zig(x,percent);
Plot( zzHiLo, "", colour, styleLine + style);
PlotShapes(IIf(H==zzhilo,shape,shapeNone),colour,0,H,offset);
PlotShapes(IIf(l==zzhilo,shape,shapeNone),colour,0,L,-offset);
}
zz (5,shapeDigit3,colorred,styleThick,50);
zz (3,shapeDigit2,colorblue,styleDashed,40);
zz (1,shapeDigit1,colorgreen,styleDashed,30);
zz (0.5,shapeDigit0,colorBlack,styleDashed,20);
Last edited: