指标公式第1071篇：通达信强庄控盘

N:=10; 
T1:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1; 
低离线:=-20; 高离线:=40; 
ABCC2:=CLOSE/REF(CLOSE,1)>=1.095 AND CLOSE/REF(CLOSE,1)<=1.105 OR (CLOSE/REF(CLOSE,1)>=1.195 AND CLOSE/REF(CLOSE,1)<=1.205) OR (CLOSE/REF(CLOSE,1)>=1.295 AND CLOSE/REF(CLOSE,1)<=1.305) AND CLOSE=HIGH; 
STICKLINE(ABCC2,OPEN,CLOSE,1,0),COLORMAGENTA; 
DRAWTEXT(ABCC2,H*1.026,' ★龙'),COLORYELLOW; 
ABC1:=(3*CLOSE+OPEN+HIGH+LOW)/6; 
控盘度:=(EMA(ABC1,12)-REF(EMA(ABC1,36),1))/REF(EMA(ABC1,36),1)*100+50,NODRAW; 
CYC13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13); 
高度控盘:(CLOSE-CYC13)/CYC13*1000,NODRAW; 换手:=VOL/CAPITAL*100; 
ABC5:=IF(CODELIKE('688'),0,1); 
ABC6:=COST(85); 
ABC7:=COST(15); ABC8:=ABC6-ABC7; 
ABC9:=(ABC6+ABC7)/2; 筹码:=ABC8/ABC9*100< 30,LINETHICK0; 
ABC10:=HHV(HIGH,250); 
ABC11:=LLV(LOW,250); 
ABC12:=ABC10-ABC11; 
ABC13:=(ABC9-ABC11); 
比例:=ABC9< (ABC12*04+ABC11),LINETHICK0; 
吸筹结束:=筹码 AND 比例; 
ABC15:=C/REF(C,1)>1.04; 
主力持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3); 
主力持仓:=主力持仓%>=75 AND C>0 AND CLOSE>OPEN; 
强庄:=FILTER(主力持仓 AND 吸筹结束 AND ABC13 AND WINNER(C)>=0.90 AND ABC15 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND ABC5 AND 换手< 20 ,10),NODRAW; 
短线成本线:EMA(CLOSE,5),LINETHICK1,COLORWHITE DOTLINE; 
A:=(3*C+L+O+H)/6; 
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+ 14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12) +7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+ REF(A,20))/210; 
中线成本线:EMA(X,34),LINETHICK2,COLORRED; 
STICKLINE(强庄,O,C,1,0),COLORFF0080; 
开始控盘:=BARSLASTCOUNT(高度控盘>0 AND 高度控盘>=50)=1; 
STICKLINE(开始控盘,C,O,2,0),COLORYELLOW; 
DRAWICON(开始控盘,L*1.002,9); 
DRAWTEXT(开始控盘,L*0.93,' ↖强庄'),COLORMAGENTA;

M:=55; 
N:=34; 
LC:=REF(CLOSE,1); 
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100); 
FF:=EMA(CLOSE,3); 
MA15:=EMA(CLOSE,21); 
DRAWTEXT(CROSS(85,RSI),75,'▼'),COLORGREEN; 
VAR1:=IF(YEAR>=2038 AND MONTH>=1,0,1); 
VAR2:=REF(LOW,1)*VAR1; 
VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100*VAR1; 
VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3)*VAR1; 
VAR5:=LLV(LOW,30)*VAR1; 
VAR6:=HHV(VAR4,30)*VAR1; 
VAR7:=IF(MA(CLOSE,58),1,0)*VAR1; 
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7*VAR1; 
吸筹:IF(VAR8>100,100,VAR8)*VAR1,COLORRED; 
庄家吸筹:STICKLINE(吸筹>-150,0,吸筹,3,0),COLORRED; 
散户: 100*(HHV(HIGH,M)-CLOSE)/(HHV(HIGH,M)-LLV(LOW,M)),COLORFFFF00,LINETHICK2; 
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100; 
K:=SMA(RSV,3,1);
D:=SMA(K,3,1); J:=3*K-2*D;
庄家:EMA(J,6),COLORFF00FF,LINETHICK2;