KG1:=20;
F1:=10;
A1:=10;
A2:=10;
A3:=ZIG(1,A1);
A4:=PEAK(1,A1,1);
A5:=TROUGH(1,A1,1);
CC:=IF((A3 < (REF(A3,1))),A4,A5),LINETHICK2;
A6:=CROSS((A4 - 0.02),A3);
A7:=CROSS(A3,(A5 + 0.02));
A8:=A2