N:=10;
CG:MA((LOW+HIGH+CLOSE*2)/4,n);
FL:HHV(CG,3),colorgreen,POINTDOT;
FS:IF(CG FL,(CG-(FL-CG)),FL),colorgreen;
FL1:HHV(CG,5),colorgreen,POINTDOT;
FS1:IF(CG FL1,(CG-(FL1-CG)),FL1),colorgreen;
FL2:HHV(CG,7),colorgreen,POINTDOT;
FS2:IF(CG FL2,(CG-(FL2-CG)),FL2),colorgreen;
FL3:HHV(CG,9),colorFFABA3,linethick2;
FS3:IF(CG FL3,(CG-(FL3-CG)),FL3),colorFFABA3,linethick2;
zlzc1:(HHV(H,144)-((HHV(H,144)-LLV(L,144))*0.618)),POINTDOT,linethick2;
zlzc2:(HHV(H,144)-((HHV(H,144)-LLV(L,144))*0.5)),POINTDOT,linethick2;
zlzc3:(HHV(H,144)-((HHV(H,144)-LLV(L,144))*0.382));
POLYLINE(FS3 MA(FS3,5),FS3),color1010F1,linethick2;