VAR1:=EMA(EMA(CLOSE,13),13); 控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; 
STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00; 
STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF; 
无庄控盘:=控盘<0; 
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF; 
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0; 
VAR2:=100*WINNER(CLOSE*0.95); 
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLORFFFF00; 
主力出货:=控盘<REF(控盘,1) AND 控盘>0; 
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,1),COLOR00FFFF; 
高度控盘: VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLOR00FFFF,LINETHICK2; 
A10:=CROSS(控盘,0); 
VAR1:=EMA(EMA(CLOSE,13),13); 
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000; 
STICKLINE(控盘<0,控盘,0,1,1),COLOR00FF00; 
STICKLINE(控盘>REF(控盘,1) AND 控盘<0,控盘,0,1,1),COLORFF00FF; 
无庄控盘:=控盘<0; 
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLOR0000FF; 
有庄控盘:=控盘>REF(控盘,1) AND 控盘>0; 
VAR2:=100*WINNER(CLOSE*0.95); 
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,1),COLORFFFF00; 
主力出货:=控盘<REF(控盘,1) AND 控盘>0; 
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,1),COLOR00FFFF; 
高度控盘: VAR2>50 AND COST(85)<CLOSE AND 控盘>0,COLOR00FFFF,LINETHICK2; 
A10:=CROSS(控盘,0); 
控盘B:=FILTER(IF(A10,1,0),5); 
JJ:=DYNAINFO(11); 
P:=55;S:=8;M1:=3; 
财:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10,colorred,LINETHICK2; 
神:=EMA(财,M1),colorgreen,LINETHICK1; 
DRAWBAND(财,RGB(255,0,0),神,RGB(0,100,50)); 
BTJ1:=(C-JJ)/JJ<-0.03; 
BTJ11:=(C-JJ)/JJ<-0.03; 
BTJ12:=LAST(JJ>=REF(JJ,1),5,1) AND (C-JJ)/JJ<0.005; 
STJ1:=(C-JJ)/JJ>0.005; 
STJ01:=控盘<REF(控盘,1) AND 控盘>0.5; 
STJ02:=控盘>0; 
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2; 
BTJ22:=控盘>REF(控盘,1) AND 控盘<0 ; 
BTJ3:=CROSS(财,神) AND 财<-0.3; 
BTJ32:=CROSS(财,神) AND 财<-0.1; 
STJ31:=CROSS(神,财); 
STJ32:=CROSS(神,财) AND 财>1.618; 
BTJ81:=FILTER(BTJ1 AND BTJ2 AND BTJ3,13); 
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13); 
BTJ82:=FILTER(BTJ12 AND BTJ22 AND BTJ32,13); 
DRAWTEXT(BTJ81,神,'↑买底'),colorred; 
DRAWTEXT(BTJ811,神*1.2,'↑有庄'),colorwhite; 
STJ81:=FILTER(STJ1 AND STJ01 AND STJ31,13); 
STJ82:=FILTER(STJ02 AND STJ32 ,13); 
STJ83:=STJ81 AND STJ82; 
DRAWTEXT(STJ83,神,'↓卖'),COLOR00FF00; 
DIFF: (EMA(CLOSE,8) - EMA(CLOSE,55))*10,colorred; 
DEA: EMA(DIFF,3),colorgreen; 
庄:= BTJ11 AND BTJ2 AND BTJ3; 
有庄:FILTER(庄,55),colorwhite; 
DRAWTEXT(BTJ811,有庄,'有庄'),colorwhite; 
VARF:=100-3*SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1); 
VAR19:=100-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1); 
VAR20:=VARF<REF(VAR19,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1); 
大资金活动:IF(VAR20 AND COUNT(VAR20,30)=1,18,0),LINETHICK1,colorred; 
STICKLINE(VAR20 AND COUNT(VAR20,30)=1,0,15,5,0),colorred; 
DRAWTEXT(VAR20 AND COUNT(VAR20,30)=1,15,'大资金活动'),colorred; 
 | 




