AH:=90+(100-90)/2;
B:=(100-90)/2;
CCD:=COST(AH);
DDD:=COST(B);
CMJZD:=(CCD-DDD)/(CCD+DDD)*100/2;
筹码集中度:=MA(CMJZD,3),COLORGRAY;
拉高加仓:=IF(筹码集中度>REF(筹码集中度,3) AND MA(C,20)>REF(MA(C,20),3),1,0),COLOR0095FF;
STICKLINE(拉高加仓>0,0,-筹码集中度*13.3,2.1,0),COLOR0064FF;
STICKLINE(拉高加仓>0,0,-筹码集中度*13.3,1.5,0),COLOR0093FF;
STICKLINE(拉高加仓>0,0,-筹码集中度*13.3,0.9,0),COLOR00C2FF;
STICKLINE(拉高加仓>0,0,-筹码集中度*13.3,0.3,0),COLOR00FFFF;
拉高加仓X:-IF(筹码集中度>REF(筹码集中度,3) AND MA(C,20)>REF(MA(C,20),3),1,0)*100,COLORFF00FF,LINETHICK3;
Y:=MA(((WINNER((C*0.9))*100)*C),5);
D:=(IF((Y>10),Y,0)/2);
D,STICK,LINETHICK4,COLORFF0000;
STICKLINE(D>200,D,200,1,0),COLOR0000FF;
AC:=IF(CODELIKE('688'),0,1);
换手:=VOL/CAPITAL*100;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C<REF(C,1);
DY2:=REF(V2,1)-DY;
TT:=(V2*1.01-REF(V2,1));
TT2:=(REF(V2*1.01,1)-REF(V2,2));
YY:=TT>3*ABS(TT2);
TT1:=EMA(V2,15);
A111:=COST(85);
A222:=COST(15);
A333:=A111-A222;
A444:=(A111+A222)/2;
筹码:=A333/A444*100<30,LINETHICK0;
BU1:=HHV(HIGH,250);
BU2:=LLV(LOW,250);
BU3:=BU1-BU2;
BU4:=(A444-BU2);
比例:=A444<(BU3*04+BU2),LINETHICK0;
吸筹结束:=筹码 AND 比例;
BU5:=C/REF(C,1)>1.04; {AND V/REF(V,1)>2;{ AND H=C;}
主力持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);
主力持仓:=主力持仓%>=75 {AND 主力持仓%<=91} AND C>0 AND CLOSE>OPEN;
强庄:=FILTER(主力持仓 AND 吸筹结束 AND BU4 AND WINNER(C)>=0.90 AND BU5 AND C/REF(C,1)>1.092 AND C=H AND C<40 AND AC AND 换手<20 ,10);
X_1:=(2*CLOSE+HIGH+LOW)/4;
X_2:=LLV(LOW,5);
X_3:=HHV(HIGH,5);
X_4:=EMA((X_1-X_2)/(X_3-X_2)*100,5);
X_5:=MA(X_4,2);
X_6:=REF(CLOSE,1)/REF(CLOSE,2)<0.95;
X_7:=X_5<20 AND X_6 AND CLOSE>LOW AND OPEN>LOW;
X_8:=CLOSE/REF(CLOSE,3)<0.95;
X_9:=REF(X_8,1)=1 AND CLOSE/REF(CLOSE,1)>1.025;
X_10:=VOL>REF(HHV(VOL,10),1) AND NOT(OPEN=CLOSE) AND HIGH/CLOSE<1.0007;
X_11:=REF(EVERY(MA(CLOSE,5)<MA(CLOSE,10),5),1) AND VOL/MA(VOL,10)>1.8;
X_12:=COUNT(X_7=1,3)>0 AND REF(CLOSE,1)<REF(CLOSE,2);
X_13:=VOL/REF(VOL,1)>1.7 AND REF(OPEN,1)<100;
跟庄乾坤:X_9 AND X_10 AND X_11 AND X_12 AND X_13;
DRAWTEXT(跟庄乾坤,10,'--跟庄乾坤'),COLORMAGENTA;
STICKLINE(跟庄乾坤,14,12,3.5,0),COLOR0000FF;
STICKLINE(跟庄乾坤,15,14.9,1.7,0),COLOR0000FF;
STICKLINE(跟庄乾坤,20.11,9.6,0.1,0),COLOR0000FF;
STICKLINE(跟庄乾坤,19.16,9.2,0.3,0),COLOR0000FF;
STICKLINE(强庄,14,12,3.5,0),COLORA8A8A8;
STICKLINE(强庄,15,14.9,1.7,0),COLORA8A8A8;
STICKLINE(强庄,14.9,14.8,1.9,0),COLORA8A8A8;
STICKLINE(强庄,14.8,14.7,2.1,0),COLORA8A8A8;
STICKLINE(强庄,14.7,14.6,2.3,0),COLORA8A8A8;
STICKLINE(强庄,14.6,14.5,2.5,0),COLORA8A8A8;
STICKLINE(强庄,14.5,14.4,2.7,0),COLORA8A8A8;
STICKLINE(强庄,14.4,14.3,2.9,0),COLORA8A8A8;
STICKLINE(强庄,14.3,14.2,3.1,0),COLORA8A8A8;
STICKLINE(强庄,14.2,14.1,3.3,0),COLORA8A8A8;
STICKLINE(强庄,14.1,14.0,3.5,0),COLORA8A8A8;
STICKLINE(强庄,20.11,9.6,0.1,0),COLORWHITE;
STICKLINE(强庄,19.16,9.2,0.3,0),COLORWHITE;
STICKLINE(强庄,19.12,8.8,0.6,0),COLORWHITE;
STICKLINE(强庄,18.8,18.4,0.9,0),COLORWHITE;
STICKLINE(强庄,18.4,18.0,1.2,0),COLORWHITE;
STICKLINE(强庄,18.0,15.0,1.4,0),COLORWHITE;
STICKLINE(强庄,17.4,17.0,0.6,0),COLORRED;
STICKLINE(强庄,16.5,16.4,1.5,0),COLORBLUE;
STICKLINE(强庄,15.1,14.9,1.5,0),COLORBLUE;
STICKLINE(强庄,14.9,12.5,1.5,0),COLORWHITE;
STICKLINE(强庄,12.5,12.0,1.3,0),COLORRED;
STICKLINE(强庄,12.0,11.3,1,0),COLORRED;
STICKLINE(强庄,11.3,10.7,0.7,0),COLORRED;
STICKLINE(强庄,10.77,10.1,0.3,0),COLORRED;
STICKLINE(强庄,12.4799999,12.1799999,1,0),COLORYELLOW;
STICKLINE(强庄,12.1799999,11.8799999,0.5,0),COLORYELLOW;
STICKLINE(强庄,11.8799999,11.58,0.1,0),COLORYELLOW;
STICKLINE(强庄,16.0,15.5,0.5,0),COLORRED;
WR1:100*(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3));
WR2:100*(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3));
