DIFF:=EMA(CLOSE,8)-EMA(CLOSE,13);
DEA:=EMA(DIFF,5);
AA1:=DIFF>DEA;
A1:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
K:=SMA(A1,3,1);
D:=SMA(K,3,1);
AA2:=K>D;
LC:=REF(CLOSE,1);
gspt1:=(SMA(MAX(CLOSE-LC,0),5,1))/(SMA(ABS(CLOSE-LC),5,1))*100;
gspt2:=(SMA(MAX(CLOSE-LC,0),13,1))/(SMA(ABS(CLOSE-LC),13,1))*100;
AA3:=gspt1>gspt2;
A:=-(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*100;
MA5:MA(C,5)DOTLINE;
MA10:MA(C,13)LINETHICK2;
B1:=SMA(A,3,1);
B2:=SMA(B1,3,1);
AA4:=B1>B2;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
AA5:=CLOSE>BBI;
MTM:=CLOSE-REF(CLOSE,1);
MMS:=100*EMA(EMA(MTM,5),3)/EMA(EMA(ABS(MTM),5),3);
MMM:=100*EMA(EMA(MTM,13),8)/EMA(EMA(ABS(MTM),13),8);
AA6:=MMS>MMM;
MAV:=(C*2+H+L)/4;
SK:=EMA(MAV,13)-EMA(MAV,34);
SD:=EMA(SK,5);
ZBHJ:=(-2*(SK-SD))*3.8,COLORGREEN;
ZBHJ1:=(2*(SK-SD))*3.8,COLORRED;
AA7:=ZBHJ1>ZBHJ;
MA11:=MA(CLOSE,5);
MA22:=REF(MA(CLOSE,5),1);
ZBLJ2:=IF(MONTH< 12,1,1);
ZBLJ3:=(2*CLOSE+HIGH+LOW)/4;
ZBLJ4:=LLV(LOW,34);
ZBLJ5:=HHV(HIGH,34);
ZBHJ2:=EMA((ZBLJ3-ZBLJ4)/(ZBLJ5-ZBLJ4)*100,13)*ZBLJ2;
ZBHJ3:=EMA(0.667*REF(ZBHJ2,1)+0.333*ZBHJ2,2);
AA9:=ZBHJ2>ZBHJ3;
AA10:=(ZBHJ1>ZBHJ) AND (ZBHJ2>ZBHJ3);
AA11:=(ZBHJ1>ZBHJ) AND (ZBHJ2>ZBHJ3) AND (DIFF>DEA) AND (K>D) AND (gspt1>gspt2) AND (B1>B2) AND (CLOSE>BBI) AND (MMS>MMM);
ZBHJ4:=BARSLASTCOUNT((AA1 AND AA2 AND AA3 AND AA4 AND AA5 AND AA6 AND AA7 AND AA9 AND AA10 AND AA11))=1;
DRAWICON((AA1 AND AA2 AND AA3 AND AA4 AND AA5 AND AA6 AND AA7 AND AA9 AND AA10 AND AA11),L,1);
STICKLINE((AA1 AND AA2 AND AA3 AND AA4 AND AA5 AND AA6 AND AA7 AND AA9 AND AA10 AND AA11),OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE((AA1 AND AA2 AND AA3 AND AA4 AND AA5 AND AA6 AND AA7 AND AA9 AND AA10 AND AA11),OPEN,CLOSE,1,0),COLORFF00FF;
DRAWICON(ZBHJ4,L,5);
DRAWTEXT(ZBHJ4,L*0.96,'★共振'),COLORFF00FF;
N1:=BARSLAST(ZBHJ4);
XG:=ZBHJ4 AND LLV(L,REF(N1,1))< REF(L,REF(N1,1)+1);
STICKLINE(XG,C,O,3,0),COLORRED;
