DRAWTEXT_FIX(ISLASTBAR,0.01,0.01,0,HYBLOCK),COLOR0000FF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.07,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.13,0,GNBLOCK),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.01,0.2,0,FGBLOCK),COLOR0080FF;
N1:=3;
N2:=5;
N3:=8;
N4:=13;
RSV:=-(HHV(HIGH,N4)-CLOSE)/(HHV(HIGH,N4)-LLV(LOW,N4))*100;
Lwr1:=SMA(RSV,N1,1);
LWR2:=SMA(LWR1,N1,1);
A1:=LWR1>LWR2;
Z1:=LWR1< LWR2;
RSV1:=(CLOSE-LLV(LOW,N3))/(HHV(HIGH,N3)-LLV(LOW,N3))*100;
K:=SMA(RSV1,N1,1);
DDU:=SMA(K,N1,1);
A2:=K>DDU;
Z2:=K< DDU;
LC:=REF(CLOSE,1);
rsi1:=(SMA(MAX(CLOSE-LC,0),N2,1))/(SMA(Abs(CLOSE-LC),N2,1))*100;
RSI2:=(SMA(MAX(CLOSE-LC,0),N4,1))/(SMA(ABS(CLOSE-LC),N4,1))*100;
A3:=RSI1>RSI2;
Z3:=RSI1< RSI2;
DIFF:=EMA(CLOSE,N3)-EMA(CLOSE,N4);
DEA:=EMA(DIFF,N2);
A4:=DIFF>DEA;
Z4:=DIFF< DEA;
bbi:=(MA(CLOSE,N1)+MA(CLOSE,N2)+MA(CLOSE,N3)+MA(CLOSE,N4))/4;
A5:=C>BBI;
Z5:=C< BBI;
mtm:=CLOSE-REF(CLOSE,1);
mms:=100*EMA(EMA(MTM,N2),N1)/EMA(EMA(ABS(MTM),N2),N1);
MMM:=100*EMA(EMA(MTM,N4),N3)/EMA(EMA(ABS(MTM),N4),N3);
A6:=MMS>MMM;
Z6:=MMS< MMM;
WJ:=(H+L+C)/3;
V1:=IF(H=L,1,H-MAX(O,C));
V2:=IF(H=L,1,MAX(C,O)-WJ);
V3:=IF(H=L,1,MIN(O,C)-L);
V4:=IF(H=L,1,WJ-MIN(C,O));
V5:=vol/IF(H=L,4,H-L);
V6:=(V1*V5);
V7:=(V2*V5);
V8:=(V3*V5);
V9:=(V4*V5);
买盘:=(V9+V8);
卖盘:=(V6+V7);
买卖差:=买盘-卖盘;
DCZ:=买卖差;
DX:=MA(买卖差,5)*20;
DCZ1:=SMA(DX,3,1);
DCZ2:=SMA(DCZ1,3,1);
DCZ3:=(5*DCZ2+4*REF(DCZ2,1)+3*REF(DCZ2,2)+2*REF(DCZ2,3)+REF(DCZ2,4))/15;
A7:=DCZ1>DCZ2;
Z7:=DCZ1< DCZ2;
量:=V;
换手:=V/CAPITAL*100;
DC1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
买盘1:=IF(CLOSE>OPEN,DC1*(HIGH-LOW),IF(CLOSE< OPEN,DC1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
卖盘1:=IF(CLOSE>OPEN,0-DC1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE< OPEN,0-DC1*(HIGH-LOW),0-VOL/2));
CTB:=(买盘1-(-卖盘1))/量*换手;
CTB1:=SUM(CTB,6);
CTB2:=MA(CTB1,5);
A8:=CTB1>CTB2;
Z8:=CTB1< CTB2;
Dcr1:=(2*CLOSE+HIGH+LOW)/4;
DCR2:=EMA(EMA(EMA(DCR1,4),4),4);
JE:=(DCR2-REF(DCR2,1))/REF(DCR2,1)*100;
DD:=MA(JE,3);
KK:=MA(JE,1);
A9:=KK>DD;
Z9:=KK< DD;
MTR:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(REF(CLOSE,1)-LOW)),14);
HD :=HIGH-REF(HIGH,1);
LDK :=REF(LOW,1)-LOW;
DMP:=SUM(IF(HD>0&&HD>LDK,HD,0),14);
DMM:=SUM(IF(LDK>0&&LDK>HD,LDK,0),14);
PDI:=DMP*100/MTR;
mdi:=DMM*100/MTR;
A10:=PDI>MDI;
Z10:=PDI< MDI;
T:=(A1 AND A2 AND A3 AND A4 AND A5 AND A6 AND A7 AND A8 AND A9 AND A10);
T1:=T AND REF(T,1)=0;
TT:=Z1 AND Z2 AND Z3 AND Z4 AND Z5 AND Z6 AND Z7 AND Z8 AND Z9 AND Z10;
TT1:=TT AND REF(TT,1)=0;
十指红柱:=IF(T1,10.4,DRAWNULL);
K1K:=IF(CLOSE>=REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW+CLOSE-REF(CLOSE,1),HIGH-OPEN+CLOSE-LOW);
K2K:=IF(CLOSE<=REF(CLOSE,1),OPEN-LOW+HIGH-CLOSE+REF(CLOSE,1)-CLOSE,OPEN-LOW+HIGH-CLOSE);
DT:=VOL*K1K/(K1K+K2K);
KT:=VOL-DT;
买量:=SUM(DT,1);
卖量:=SUM(KT,1);
DCZX:=EMA(买量-卖量,5)*VOL/CAPITAL*100;
DCZX1:=SMA(DCZX,3,1);
DCZX2:=SMA(DCZX1,3,1);
DCZX3:=EMA(DCZX2,5);
大单净量:=DCZX>0 AND MA(V,5)>MA(MA(V,5),5) AND CROSS(DCZX1,DCZX2);
DIFFX:=( EMA(CLOSE,12) - EMA(CLOSE,26))*100;
DEAX:=EMA(DIFFX,9);
macd:=2*(DIFFX-DEAX);
绿柱消失买入:=STICKLINE(DIFFX< 0,0,DIFFX,2,0);
红柱消失卖出:=STICKLINE(DIFFX>=0,0,DIFFX,2,0);
顺势红柱:=IF(DIFFX>DEAX,DIFFX,DRAWNULL);
VA:=IF(CLOSE>REF(CLOSE,1),VOL,-VOL);
obv:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
MAOBV:=MA(OBV,30);
KM:=OBV>MAOBV;
TTA1:=顺势红柱 AND 十指红柱 AND KM;
TTA2:=顺势红柱 AND 大单净量 AND 十指红柱 AND KM;
DCZ1S:=POW(10,6)+241230-DATE;
DCZ2S:=IF(DCZ1S>0,1,0);
DCZ3S:=IF(DCZ1S>0,1,0);
DCZ4S:=HHV(CLOSE,10);
起爆线:EMA(DCZ4S,30),COLORMAGENTA,LINETHICK2;
IF(起爆线<=REF(起爆线,1),起爆线,DRAWNULL),COLORCYAN,LINETHICK2;
DCZ5S:=EMA(DCZ4S,120);
DCZ6S:=MA(CLOSE*VOL,20);
DCZ7S:=MA(CLOSE*VOL,60);
DCZ8S:=1000*(DCZ6S-REF(DCZ6S,1))/REF(DCZ6S,1)*2;
DCZ9S:=1000*(DCZ7S-REF(DCZ7S,1))/REF(DCZ7S,1)*2;
DCZ10S:=(DCZ8S-DCZ9S)*VOL*CLOSE/MA(REF(VOL*CLOSE,1),5);
DCZ11S:=LLV(LOW,200);
DCZ12S:=EMA((CLOSE-DCZ11S)/DCZ11S,30)*100+200;
DCZ13S:=FILTER(CLOSE>=REF(CLOSE,1)*1.05 AND DCZ10S>=DCZ12S/2 AND CLOSE>=OPEN AND (CROSS(CLOSE,起爆线) OR (CLOSE>起爆线 AND REF(LOW,1)< 起爆线)),20);
DCZ14S:=SUMBARS(DCZ13S,1)*DCZ2S;
STICKLINE(DCZ13S,CLOSE,OPEN,2,0),COLORYELLOW;
STICKLINE(DCZ14S,REF(CLOSE,DCZ14S-1),REF(CLOSE,DCZ14S-1),2,0),COLORYELLOW;
STICKLINE(DCZ14S,REF(CLOSE,DCZ14S+1),REF(CLOSE,DCZ14S+1),2,0),COLORCYAN;
MM1:=TTA1 OR TTA2;
STICKLINE(TTA1 AND DCZ13S,H,L,0.1,0),COLORYELLOW;
STICKLINE(TTA1 AND DCZ13S,O,C,3,1),LINETHICK2,COLORYELLOW;
DRAWTEXT(MM1 AND DCZ13S,L*0.97,' 共振'),COLORYELLOW;
DRAWICON(MM1 AND DCZ13S,L*0.99,11);