G1:=REF(H,N)=HHV(H,2*N+1);
J1:=FILTER(G1,N);
K1:=BACKSET(J1,N+1);
L1:=FILTER(K1,N);{高点}
R11:=BACKSET(ISLASTBAR,BARSLAST(L1)+1);
S11:=R11>REF(R11,1);
DRAWLINE(L1,H,S11,H,1),LINETHICK1,COLORBLUE;
G2:=REF(L,N)=LLV(L,2*N+1);
J2:=FILTER(G2,N);
K2:=BACKSET(J2,N+1);
L2:=FILTER(K2,N);{低点}
T11:=BACKSET(ISLASTBAR,BARSLAST(K2)+1);
U11:=T11>REF(T11,1);
DRAWLINE(L2,L,U11,L,1),LINETHICK1,COLORBLUE;
M:=INTPART(3*N/5);
G12:=REF(H,M)=HHV(H,2*M+1);
J12:=FILTER(G12,M);
K12:=BACKSET(J12,M+1);
L12:=FILTER(K12,M);{高点}
R112:=BACKSET(ISLASTBAR,BARSLAST(L12)+1);
S112:=R112>REF(R112,1);
DRAWLINE(K12,H,S112,H,1),LINETHICK1,COLORRED;
G22:=REF(L,M)=LLV(L,2*M+1);
J22:=FILTER(G22,M);
K22:=BACKSET(J22,M+1);
L22:=FILTER(K22,M);{低点}
T112:=BACKSET(ISLASTBAR,BARSLAST(K22)+1);
U112:=T112>REF(T112,1);
DRAWLINE(L22,L,U112,L,1),LINETHICK1,COLORRED;

LOWN:=10;
HIGHN:=10;
MM:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(MM,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),LINETHICK4,COLOR0055FF,POINTDOT;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),LINETHICK4,COLORYELLOW,POINTDOT;
MM1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1:=BACKSET(MM1,LOWN+1);
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),LINETHICK4,COLORMAGENTA,POINTDOT,;
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),LINETHICK4,COLORCYAN,POINTDOT;