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;