HaClose =EMA((H+L+C)/3,3);
HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
HaHigh = Max( H, Max( HaClose, HaOpen ) );
HaLow = Min( L, Min( HaClose, HaOpen ) );
O=HaOpen; H=HaHigh; L=HaLow; C=HaClose;
PlotOHLC( O, H, L, C, "Modified " + Name(), Colorblack , styleCandle | styleNoLabel );