DRAWTEXT_FIX(ISLASTBAR,0,0.88,0,'{
绿线熊市观望，即使冒头也不动；
 蓝线震荡市，K线冒头变红进半仓，一旦变成红线加满仓，
 若又跌破蓝线则半仓止损出场。本金安全是第一位的！
'),COLORWHITE;
 {智能主图}
DIR2:=ABS(CLOSE-REF(CLOSE,30));
 VIR2:=SUM(ABS(CLOSE-REF(CLOSE,1)),30);
 ER2:=DIR2/VIR2;
 CS2:=ER2*(0.8-2/24)+2/24;
 CQ2:=CS2*CS2;
 M熊:EMA(DMA(CLOSE,CQ2),2),COLORGREEN,LINETHICK1;
牛熊:=M熊;
M震:IF(M熊/REF(M熊,1)>0.997,M熊,DRAWNULL),COLORBLUE,LINETHICK1;
 M牛:IF(M熊/REF(M熊,1)>1.001,M熊,DRAWNULL),COLORRED,LINETHICK1;
 XX1:=C>牛熊 AND 牛熊>REF(牛熊,1);
 DRAWTEXT_FIX(ISLASTBAR AND XX1,0,0.01,0,'【处于牛区】'),COLORRED;
 XX2:=C<牛熊 AND 牛熊<=REF(牛熊,1);
 DRAWTEXT_FIX(ISLASTBAR AND XX2,0,0.01,0,'【处于熊区】'),COLORGREEN;
 F111:=ZIG(3,15);
 F211:=IF((F111> REF(F111,1)),100,80);
 T01:=CONST(LLVBARS(LOW,10));
 T11HIGH:=CONST(REF(HIGH,T01));
 CC1:=CONST(CURRBARSCOUNT);
 T02:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T01)) AND (HIGH>T11HIGH)));
 T12HIGH:=CONST(REF(HIGH,T02));
 T03:=CONST(BARSLAST((CURRBARSCOUNT >(CC1+T02)) AND (HIGH>T12HIGH)));
 T13HIGH:=CONST(REF(HIGH,T03));
洗:DRAWLINE(CURRBARSCOUNT=T03+1, T13HIGH, ISLASTBAR, T13HIGH, 1),DOTLINE,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:=CONST(DINGBUTS);
 DINGBUTS1:=REF(DINGBUTS,DDD+1);
 GDCS2:=CONST(DINGBUTS1);
压:DRAWLINE(HIGH>=HHV(HIGH,10),HIGH,LOW<=LLV(LOW,3),HHV(HIGH,3),1),COLORFFFF00,LINETHICK1,DOTLINE;
 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);
支:DRAWLINE(D2,L,F2,L,1),COLORLIRED,DOTLINE;
高1:=REF(HHV(H,150),3);
低1:=REF(LLV(L,150),3);
 HH1:=高1-(高1-低1)*0.191;
冲:REFDATE(HH1,DATE),COLORLIGREEN;
 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(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
 VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
 VAR12:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
 VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
 VAR14:=ZIG(3,22)=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
 VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
 VAR16:=ZIG(3,51)=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
 VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
 VAR18:=ZIG(3,72)=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
 VAR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
买１:=F211=100 AND VAR10;
买２:=F211=100 AND (VAR11+VAR13+VAR15+VAR17);
卖１:=(VAR12+VAR14+VAR16+VAR18);
 F1:=ZIG(3,15);
 F21:=IF((F1> REF(F1,1)),100,80);
 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:=ZIG(3,5);
 EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);
 EX1:=PL5=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);
 PL10:=ZIG(3,10);
 EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);
 EX2:=PL10=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);
 PL20:=ZIG(3,20);
 EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);
 EX3:=PL20=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);
走强1:=BARSLAST(PL5 走弱1:=BARSLAST(PL5>REF(PL5,1));
走强2:=BARSLAST(PL10 走弱2:=BARSLAST(PL10>REF(PL10,1));
走强3:=BARSLAST(PL20 走弱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  DTJD5:=IF(PL10  ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);
 ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);
 DTJZ10:=IF(PL20  DTJD10:=IF(PL20  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;
 M5:=MA(C,5);M10:=MA(C,10);M20:=MA(C,20);M30:=MA(C,30);M60:=MA(C,60);
 MA5:=EMA(C,5);
 MA13:=EMA(C,6);
 UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(MA13,MA5))+1),LLV(L,BARSLAST(CROSS
 (MA13,MA5))+1),H=HHV(H,BARSLAST(CROSS(MA5,MA13))+1),HHV(H,BARSLAST(CROSS
 (MA5,MA13))+1),0);
 AAAL:=(3*C+H+L+O)/6;
 VAR1L:=(8*AAAL+7*REF(AAAL,1)+6*REF(AAAL,2)+5*REF(AAAL,3)+4*REF(AAAL,4)
 +3*REF(AAAL,5)+2*REF(AAAL,6)+REF(AAAL,8))/36;
 VAR6L:=(LLV(VAR1L,2)+LLV(VAR1L,4)+LLV(VAR1L,6))/3;
 DRAWTEXT(C>M5 AND O<一0.809 AND C>M10 AND C>M30 AND M30>=REF(M30,1) AND CROSS(C,VAR6L) AND C/REF(C,1)>1.03 AND C>O AND F211=100 AND UP,O,'牛'),COLORFFFFFF;
 Z:=ISLASTBAR;
 DRAWTEXT (REF(C,2)>REF(O,2)&&REF(C,1)>REF(O,1)&&C<=O&&Z,0.98*REF(H,1),'防调'),COLORGREEN;
 DRAWTEXT (REF(C,2)<=REF(O,2)&&REF(C,1)>REF(O,1)&&C<=O&&Z,0.98*REF(H,1),'跌势'),COLORGREEN;
 AAA:=CONST(HHV(H,90));
 A74:=MA(CLOSE,20);
 A75:=(CLOSE > MA(CLOSE,5));
 A76:=(MA(CLOSE,5) > MA(CLOSE,10));
 A77:=(CLOSE > MA(CLOSE,10));
 A78:=(MA(CLOSE,5) > MA(CLOSE,20));
 A79:=(CLOSE > MA(CLOSE,20));
 A710:=REF(A74,1);
 A711:=(A74 > A710);
 AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))
 + IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
 DSLX:=(CLOSE / INDEXC);
 DSLX1:=MA(DSLX,5);
 DSLX2:=MA(DSLX,10);
 V1:=MA(V