通达信主力控筹指标

主力控筹
 
个股趋势:=MA(C,1)/MA(REF(C,18),18)*100;
 大盘趋势:=MA(INDEXC,1)/MA(REF(INDEXC,18),18)*100;
 位置:(个股趋势-大盘趋势),LINETHICK0;
 VAR1:=EMA(EMA(CLOSE,13),13);
 控盘:= (VAR1-REF(VAR1,1))/REF(VAR1,1)*2000;
 STICKLINE(控盘<0,控盘,0,3,0),COLORWHITE;
 STICKLINE(控盘<0 AND 控盘>MA(控盘,5),控盘,0,3,0),COLOR10BBBB;
 
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,3,1),COLORRED;
 VAR2:=100*WINNER(CLOSE*0.95);
 STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,3,0),COLOR00FF00;
 STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,3,0),COLORFF00FF;
 A10:=CROSS(控盘,0);
 开始控盘:IF(A10,3,0),COLORYELLOW;
 AA:=WINNER(CLOSE+CLOSE*15/100)*100;
 BB:=WINNER(CLOSE+CLOSE*0/100)*100;
 CC:=AA-BB;
 DD:=(WINNER(CLOSE-CLOSE*0.1/100)-WINNER(CLOSE-CLOSE*15/100))*100;
 EE:=CC<3 AND DD<0.5 AND OPEN=LOW;
 A1:=DYNAINFO(6);
 A2:=IF(LOW>A1,0,IF(HIGH<A1,1,(A1-LOW+0.01)/(HIGH-LOW+0.01)));
 A3:=VOL/WINNER(LOW);
 A4:=REF(HHV(CLOSE,120),1);
 A5:=REF(LLV(CLOSE,120),1);
 A6:=100*(CLOSE-A5)/(A4-A5);
 A7:=A2>0 OR A2=1;
 A8:=A7 AND A3/REF(A3,3)>=3 AND A6<80;
 A9:=REF(A8,1) OR REF(A8,2) OR REF(A8,3) OR REF(A8,4);
 A20:=A8 AND A9;
 A21:=IF(FILTER(A8,3),5,0);
 A22:=IF(FILTER(A20,3) OR EE,10,0);
 资金进场:IF(A21,8,0),LINETHICK0;
 STICKLINE(A22,0,5,3,0),COLORFF00FF;
 加仓:IF(A22,8,0),LINETHICK0;
 STICKLINE(A21,0,8,3,0),COLORFF7700;
 STICKLINE(A21,0,8,2,0),COLORFF8800;
 STICKLINE(A21,0,8,1,0),COLORFF9900;
 {STICKLINE(A21,0,5,3.5,0),COLORFFAA00;
 STICKLINE(A21,0,5,3,0),COLORFFBB00;
 STICKLINE(A21,0,5,2.5,0),COLORFFCC00;
 STICKLINE(A21,0,5,2,0),COLORFFDD00;
 STICKLINE(A21,0,5,1,0),COLORFFEE00;}
 {STICKLINE(A22,0,15,4.5,0),COLOR102099;
 STICKLINE(A22,0,15,4,0),COLOR1020AA;
 STICKLINE(A22,0,15,3.5,0),COLOR1020BB;}
 STICKLINE(A22,0,15,3,0),COLOR1020CC;
 STICKLINE(A22,0,15,2.5,0),COLOR1020DD;
 STICKLINE(A22,0,15,2,0),COLOR1020EE;
 STICKLINE(A22,0,15,1,0),COLOR1020FF;
 DRAWTEXT(A21,5,'资金进场'),COLORYELLOW;
 DRAWTEXT(A22,8,'★加仓'),COLORGREEN;
 V1:=REF(C,1);
 V2:=SMA(MAX(C-V1,0),6,1)/SMA(ABS(C-V1),6,1)*100;
 DRAWICON(IF(CROSS(81,V2),1,0),控盘,8),COLORFFF000;
 AA1:=AMOUNT/V;
 BB1:=L<AA1*0.9;
 CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
 DD1:=L<MA(C,5)*0.921;
 EE1:=V<MA(V,5)*1.5;
 FF1:(BB1 AND CC1 AND DD1 AND EE1)*5,LINETHICK0;
 DRAWTEXT(FF1,L*0.9,' 老鼠仓'),COLORYELLOW;
 STICKLINE(FF1,5,0,2,0),COLORFF0000;
 VA1:=EMA(CLOSE,60)-EMA(CLOSE,300);
 VA2:=EMA(VA1,300);
 VA3:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;
 VA4:=SMA(VA3,2,1);
 VA5:=SMA(VA4,2,1);
 VA6:(VA4-50)*0.4,COLOREE00EE,linethick1;
 VA7:(VA5-50)*0.4,COLOREEEE00,linethick1;
 N:=5;
 VAA1:=4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1); 
 主力启动: IF(CROSS(VAA1,8) and VA6>VA7,6,0),COLOR0000FF,LINETHICK0;  
 DRAWTEXT(CROSS(VAA1,8) and VA6>VA7,6,'主力启动'),COLOR0000FF; 
 STICKLINE(CROSS(VAA1,8) ,0,6,6,0),COLOR0000FF;
 
STICKLINE(位置>=0,0,0,10,0),COLORFF00FF;
 STICKLINE(位置<0,0,0,10,1),COLORFF0000;