N:=10;
M:=9;
X1:=DRAWLINE(HIGH=HHV(HIGH,N),HIGH,LOW=LLV(LOW,M),LOW,0);
X2:=DRAWLINE(LOW=LLV(LOW,M),LOW,HIGH=HHV(HIGH,N),HIGH,0);
YDD1:=LOW=LLV(LOW,M) AND X1=X2;
DDTS:=BARSLAST(YDD1);
YGD1:=HIGH=HHV(HIGH,N) AND X1=X2;
GDTS:=BARSLAST(YGD1);
QDDD:=LOW=LLV(LOW,M) AND LOW=LLV(LOW,GDTS) AND GDTS>1;
QDGD:=HIGH=HHV(HIGH,N) AND HIGH=HHV(HIGH,DDTS) AND DDTS>1;
X3:=DRAWLINE(QDGD,HIGH,QDDD,LOW,0),COLORLIGRAY,LINETHICK3;
X4:=DRAWLINE(QDDD,LOW,QDGD,HIGH,0),COLORLIGRAY,LINETHICK3;
YGD:=HIGH=HHV(HIGH,N) AND X3=X4;
YDD:=LOW=LLV(LOW,M) AND X3=X4;
M1:=5;
M2:=3;
预前高值:=IF(YGD=1,REF(H,REF(BARSLAST(YGD),1)+1),REF(H,BARSLAST(YGD))),NODRAW;
预下高TS:=REF(BARSNEXT(YGD),1)+1;
预下高值:=REF(H,REF(BARSNEXT(YGD),1)+1);
下预下高TS:=REF(预下高TS,预下高TS)=DRAWNULL;
XH0:=(YGD AND H>预前高值 AND (H-预前高值)/预前高值*100>=M1 AND 预下高TS=DRAWNULL);
XH1:=(YGD AND H>预前高值 AND 预下高值>0 AND 下预下高TS=1) OR (YGD AND H>预前高值 AND 预下高值>0 AND 下预下高TS=1);
XH2:=(YGD AND H>预前高值 AND H>预下高值);
XH3:=(YGD AND H>预前高值 AND H<预下高值 AND (预下高值-H)/H*100>=M1);
XH4:=YGD AND H<预前高值 AND (1-H/预前高值)*100>=M2;
XH5:=YGD AND H<预前高值 AND (预前高值-H)/H*100>=M2;
GD:=XH0 OR XH1 OR XH2 OR XH3 OR XH4 OR XH5;
BCGDTS:=BARSLAST(GD);
BCGDDZHTS:=IF(GD,CURRBARSCOUNT,0);
高点值:=IF(BCGDTS,REF(H,BCGDTS),H);
TS:=IF(BCGDTS,REF(BCGDDZHTS,BCGDTS),BCGDDZHTS);
GDCL:=CONST(TS);
高点值1:=REF(高点值,BCGDTS+1);
TS1:=REF(TS,BCGDTS+1);
GDCL1:=CONST(TS1);
高点值2:=REF(高点值1,BCGDTS+1);
TS2:=REF(TS1,BCGDTS+1);
GDCL2:=CONST(TS2);
高点值3:=REF(高点值2,BCGDTS+1);
TS3:=REF(TS2,BCGDTS+1);
GDCL3:=CONST(TS3);
高点值4:=REF(高点值3,BCGDTS+1);
TS4:=REF(TS3,BCGDTS+1);
GDCL4:=CONST(TS4);
高点值5:=REF(高点值4,BCGDTS+1);
TS5:=REF(TS4,BCGDTS+1);
GDCL5:=CONST(TS5);
高点值6:=REF(高点值5,BCGDTS+1);
TS6:=REF(TS5,BCGDTS+1);
GDCL6:=CONST(TS6);
高点值7:=REF(高点值6,BCGDTS+1);
TS7:=REF(TS6,BCGDTS+1);
GDCL7:=CONST(TS7);
高点值8:=REF(高点值7,BCGDTS+1);
TS8:=REF(TS7,BCGDTS+1);
GDCL8:=CONST(TS8);
压力:DRAWLINE(CURRBARSCOUNT=GDCL,H,ISLASTBAR,REF(H,GDCL-1),1),COLORGREEN,LINETHICK2;
压力1:DRAWLINE(CURRBARSCOUNT=GDCL1,H,ISLASTBAR,REF(H,GDCL1-1),1),COLORMAGENTA,LINETHICK2;
压力2:DRAWLINE(CURRBARSCOUNT=GDCL2,H,ISLASTBAR,REF(H,GDCL2-1),1),COLORYELLOW,LINETHICK2;
压力3:DRAWLINE(CURRBARSCOUNT=GDCL3,H,ISLASTBAR,REF(H,GDCL3-1),1),COLORWHITE,LINETHICK2;
