CURRBARSCOUNT:=DATACOUNT-BARPOS+1;
 T01:=REFX1(LLVBARS(LOW,10),100000);
T11HIGH:=REFX1(REF(HIGH,T01),100000);
CC1:=REFX1(CURRBARSCOUNT,100000);
T02:=REFX1(BARSLAST((CURRBARSCOUNT >(CC1+T01)) AND (HIGH>T11HIGH)),100000);
T12HIGH:=REFX1(REF(HIGH,T02),100000);
T03:=REFX1(BARSLAST((CURRBARSCOUNT >(CC1+T02)) AND (HIGH>T12HIGH)),100000);
T13HIGH:=REFX1(REF(HIGH,T03),100000);
洗:TRENDLINES(CURRBARSCOUNT=T03+1, T13HIGH, ISLASTBAR, T13HIGH),DOT,COLORFFFFFF,NODRAW;
DRAWLINE1(CURRBARSCOUNT=T03+1, T13HIGH, ISLASTBAR, T13HIGH, 0),DOT,COLORFFFFFF;
AY:=REF(H,10)=HHV(H,2*10+1);
QYY:=BACKSET(AY,10+1);
CC:=FILTER(QYY,10) AND H=HHV(H,10+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
GDCS1:=REFX1(DINGBUTS,100000);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=REFX1(DINGBUTS1,100000);
压:TRENDLINES(CROSS(BACKSET(LOW<=LLV(LOW,3),BARSLAST(HIGH>=HHV(HIGH,10))+1),0.5),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3)),COLORFFFF00,LINETHICK2,NODRAW;

DRAWLINE1(CROSS(BACKSET(LOW<=LLV(LOW,3),BARSLAST(HIGH>=HHV(HIGH,10))+1),0.5),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),0),COLORFFFF00,LINETHICK2,DOT;

//QHQQW.COM 

A2:=REF(L,5)=LLV(L,2*5+1);
B2:=FILTER(A2,5);
C2:=BACKSET(B2,5+1);
D2:=FILTER(C2,5);
E2:=BACKSET(ISLASTBAR,BARSLAST(D2)+1);
F2:=E2>REF(E2,1);
支:TRENDLINES(CROSS(BACKSET(F2,BARSLAST(D2)+1),0.5),L,F2,L),COLORRED,NODRAW;
DRAWLINE1(CROSS(BACKSET(F2,BARSLAST(D2)+1),0.5),L,F2,L,0),COLORRED,DOT;
高1:=REF(HHV(H,150),3);
低1:=REF(LLV(L,150),3);
HH1:=高1-(高1-低1)*0.191;
冲:REFX1(HH1,100000),COLORGREEN;
LTG:=LLVBARS(L,60);
LT1:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=REFX1(LTG,10000)+1);
HTG:=HHVBARS(H,60);

锅顶:=TRENDLINES(CURRBARSCOUNT=REFX1(HTG,100000)+1,H,ISLASTBAR,REF(H,HTG)),COLORYELLOW,LINETHICK2;
TT:=BARSLAST(CURRBARSCOUNT=REFX1(HTG,100000)+1);
AAG:=CROSS(C,REFX1(锅顶,100000));
BB:TRENDLINES(CROSS(BACKSET(LTT=0,BARSLAST(TT=0)+1),0.5),H,LTT=0,L),COLORRED,NODRAW;
DRAWLINE1(CROSS(BACKSET(LTT=0,BARSLAST(TT=0)+1),0.5),H,LTT=0,L,0),COLORRED,LINETHICK2;

锅底:TRENDLINES(CROSS(BACKSET(ISLASTBAR,BARSLAST(CURRBARSCOUNT>REFX1(LT1,10000)+0)+1),0.5),L,ISLASTBAR,REF(L,LT1)),COLORWHITE,NODRAW;
DRAWLINE1(CROSS(BACKSET(ISLASTBAR,BARSLAST(CURRBARSCOUNT>REFX1(LT1,10000)+0)+1),0.5),L,ISLASTBAR,REF(L,LT1),0),COLORWHITE;

ZF1:=(C-REF(C,1))/REF(C,1)*100;
AZ:=IF(C>O,ZF1,1);
TJZ:=EVERY(RANGE(AZ,0,4),3);
TZ:=BARSLAST(COUNT(CROSS(C,MA(C,5)),3)=2 AND CROSS(C,MA(C,5)) AND TJZ);
XGZ:=REF(EVERY(H<REF(H,TZ),TZ),1) AND CROSS(C,REF(H,TZ));
突破价:REF(H,TZ) ,NODRAW,COLORMAGENTA;
LTS:=LLVBARS(L,100);
HTS:=HHVBARS(H,60);
LT1S:=LLVBARS(L,30);
LTTS:=BARSLAST(CURRBARSCOUNT=REFX1(LTS,10000)+1);
LTT1:=BARSLAST(CURRBARSCOUNT=REFX1(LT1S,10000)+1);
HT1:=LLVBARS(H,LTTS+1);
HT1T:=BARSLAST(CURRBARSCOUNT=REFX1(HT1,10000)+1);
HT2T:=BARSLAST(CURRBARSCOUNT=REFX1(HTS,10000)+1);
TJS:=L>REF(L,LTTS);
TJ1S:=H>REF(H,HT1T);
升下轨:TRENDLINES(CROSS(BACKSET(LTT1=0 AND TJS,BARSLAST(LTTS=0)+1),0.5),L,LTT1=0 AND TJS,L),COLORYELLOW,NODRAW;
升上轨:TRENDLINES(CROSS(BACKSET(HT2T=0 AND TJ1S,BARSLAST(HT1T=0)+1),0.5),H,HT2T=0 AND TJ1S,H),COLORYELLOW,NODRAW;

DRAWLINE1(CROSS(BACKSET(LTT1=0 AND TJS,BARSLAST(LTTS=0)+1),0.5),L,LTT1=0 AND TJS,L,0),COLORYELLOW,DOT;
DRAWLINE1(CROSS(BACKSET(HT2T=0 AND TJ1S,BARSLAST(HT1T=0)+1),0.5),H,HT2T=0 AND TJ1S,H,0),COLORYELLOW,DOT;


XLT:=HHVBARS(H,HT2T+1);
XLT1:=BARSLAST(CURRBARSCOUNT=REFX1(XLT,10000)+1);
XH1T:=HHVBARS(H,10);
XH1TT:=BARSLAST(CURRBARSCOUNT=REFX1(XH1T,10000)+1);
DF:=(C-REF(C,HT2T+1))/REF(C,HT2T+1)*100;
XL2TT:=BARSSINCEN(DF<-15,HT2T+1);
TJ2S:=H<REF(H,HT2T);
TJ3S:=L<REF(L,XL2TT);
降上轨:TRENDLINES(CROSS(BACKSET(XH1TT=0 AND TJ2S,BARSLAST(HT2T=0)+1),0.5),H,XH1TT=0 AND TJ2S,H),COLORGREEN,NODRAW;
DRAWLINE1(CROSS(BACKSET(XH1TT=0 AND TJ2S,BARSLAST(HT2T=0)+1),0.5),H,XH1TT=0 AND TJ2S,H,0),COLORGREEN,DOT;

降下轨:TRENDLINES(CROSS(BACKSET(XLT1=0 AND TJ3S,BARSLAST(XL2TT=0)+1),0.5),L,XLT1=0 AND TJ3S,L),COLORGREEN,NODRAW;

DRAWLINE1(CROSS(BACKSET(XLT1=0 AND TJ3S,BARSLAST(XL2TT=0)+1),0.5),L,XLT1=0 AND TJ3S,L,0),COLORGREEN,DOT;

STICKLINE1(TZ>=0,REF(H,TZ),REF(H,TZ),4,-1),COLORGREEN;
STICKLINE1(CROSS(XGZ=1,0.5),C,O,2,0);
STICKLINE1(CROSS(XGZ=1,0.5),H,L,0,0);
DRAWICON(CROSS(XGZ=1,0.5),L*0.95,11);
VAR3:=LLV(HIGH,240);

VAR4:=100*(CLOSE-VAR3)/VAR3;

VAR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VAR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(C,16,1,1)=0 AND HIGH>LOW+0.04,4,0);
VAR11:=ZIGZAG(C,6,1)>REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)<=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)<=REF(ZIGZAG(C,6,1),3);
VAR12:=ZIGZAG(C,6,1)<REF(ZIGZAG(C,6,1),1) AND REF(ZIGZAG(C,6,1),1)>=REF(ZIGZAG(C,6,1),2) AND REF(ZIGZAG(C,6,1),2)>=REF(ZIGZAG(C,6,1),3);
VAR13:=ZIGZAG(C,22,1)>REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)<=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)<=REF(ZIGZAG(C,22,1),3);
VAR14:=ZIGZAG(C,22,1)<REF(ZIGZAG(C,22,1),1) AND REF(ZIGZAG(C,22,1),1)>=REF(ZIGZAG(C,22,1),2) AND REF(ZIGZAG(C,22,1),2)>=REF(ZIGZAG(C,22,1),3);
VAR15:=ZIGZAG(C,51,1)>REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)<=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)<=REF(ZIGZAG(C,51,1),3);
VAR16:=ZIGZAG(C,51,1)<REF(ZIGZAG(C,51,1),1) AND REF(ZIGZAG(C,51,1),1)>=REF(ZIGZAG(C,51,1),2) AND REF(ZIGZAG(C,51,1),2)>=REF(ZIGZAG(C,51,1),3);
VAR17:=ZIGZAG(C,72,1)>REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)<=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)<=REF(ZIGZAG(C,72,1),3);
VAR18:=ZIGZAG(C,72,1)<REF(ZIGZAG(C,72,1),1) AND REF(ZIGZAG(C,72,1),1)>=REF(ZIGZAG(C,72,1),2) AND REF(ZIGZAG(C,72,1),2)>=REF(ZIGZAG(C,72,1),3);
VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);



VARE1:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VAR1A:=IF(VARE1>0,VARE1,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
大顶0:=VAR1C AND COUNT(VAR1C,30)=1;
DRAWTEXT(大顶0=1,H*1.03,'大顶!'),COLORWHITE;
PL5:=ZIGZAG(C,5,1);
EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);
EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);
PL10:=ZIGZAG(C,10,1);
EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);
EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);
PL20:=ZIGZAG(C,20,1);
EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);
EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);
走强1:=BARSLAST(PL5<REF(PL5,1));
走弱1:=BARSLAST(PL5>REF(PL5,1));
走强2:=BARSLAST(PL10<REF(PL10,1));
走弱2:=BARSLAST(PL10>REF(PL10,1));
走强3:=BARSLAST(PL20<REF(PL20,1));
走弱3:=BARSLAST(PL20>REF(PL20,1));

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);

DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);

ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);

DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);

DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'㈠'),COLORFFFFFF;
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'㈡'),COLORGREEN;
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'㈢'),COLORFFFFFF;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLORFFFFFF;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR00FFFF;
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLORFFFF00;
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR00FFFF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLORGREEN;

DRAWTEXT(EN2 AND DTJZ10=1,L*0.95,'Ⅰ'),COLORFFFFFF;
DRAWTEXT(EX2 AND DTJD10=2,H,'Ⅱ'),COLORGREEN;
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'Ⅲ'),COLORFF00FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),COLORFFFF00;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,'②'),COLORFF00FF;
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.06,'③'),COLORGREEN;
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.94,'④'),COLORFF00FF;