M:=10;
M1:=2*M;M2:=4*M;M3:=8*M;
A0:=REF(H,M3)=HHV(H,2*M3+1);
B0:=FILTER(A0,M3);
C0:=BACKSET(B0,M3+1);
D0:=FILTER(C0,M3);{高点}
R01:=BACKSET(ISLASTBAR,BARSLAST(D0)+1); S01:=R01>REF(R01,1);
DRAWLINE(D0,H,S01,H,1),COLORGREEN,LINETHICK1;
A02:=REF(L,M3)=LLV(L,2*M3+1);
B02:=FILTER(A02,M3);
C02:=BACKSET(B02,M3+1);
D02:=FILTER(C02,M3);{低点}
T011:=BACKSET(ISLASTBAR,BARSLAST(D02)+1); U011:=T011>REF(T011,1);
DRAWLINE(D02,L,U011,L,1),COLORGREEN;
A1:=REF(H,M1)=HHV(H,2*M1+1);
B1:=FILTER(A1,M1);
C1:=BACKSET(B1,M1+1);
D1:=FILTER(C1,M1);{高点}
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1);
DRAWLINE(D1,H,S11,H,1),COLORBLUE;
A2:=REF(L,M1)=LLV(L,2*M1+1);
B2:=FILTER(A2,M1);
H*0.92,DOTLINE;
BIAS(10),NODRAW;
MACD,NODRAW;
C2:=BACKSET(B2,M1+1);
D2:=FILTER(C2,M1);{低点}
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1);
DRAWLINE(D2,L,U11,L,1),COLORBLUE;
A12:=REF(H,M)=HHV(H,2*M+1);
B12:=FILTER(A12,M);
C12:=BACKSET(B12,M+1);
D12:=FILTER(C12,M);{高点}
R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1); S112:=R112>REF(R112,1);
DRAWLINE(D12,H,S112,H,1),COLORRED;
A22:=REF(L,M)=LL