通达信筹码集中+主力持仓+资金流 源码 副图

通达信筹码集中+主力持仓+资金流 源码 副图

我们知道，一支股票的拉升，往往是主力吃货造成，那就是主力持仓上升，而主力持仓上升，可筹码集中度却不一定上升，就应该是主力在悄悄的派发，另外一支股票的拉升之前一定有一个前提:那就是资金流一定由零轴下上升，并上穿零轴，代表资金出现了正流入。这个指标综合了上述的几点而制作，有一定的指导操作意义，只是对大盘的筹码集中度无法体现，希望大家优化。
 
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
 买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0,COLORRED;
 卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORGREEN;
 进出量:=买量+卖量,COLOR00FFFF;STICKLINE(进出量<0,0,进出量,1,0),COLORFF6600;
 STICKLINE(进出量<0,0,进出量,3,0),COLORFF9900;
 STICKLINE(进出量<0,0,进出量,1.5,0),COLORFFCC00;
 STICKLINE(进出量<0,0,进出量,0.5,0),COLORCYAN;
 STICKLINE(进出量>0,0,进出量,3,0),COLOR000099;
 STICKLINE(进出量>0,0,进出量,3,0),COLOR0000CC;
 STICKLINE(进出量>0,0,进出量,1.0,0),COLOR0000FF;
 STICKLINE(进出量>0,0,进出量,0.5,0),COLORCC66FF;N:=1;QJ0:=(HIGH+LOW+CLOSE)/3;
 QJ1:=IF(HIGH=LOW,1,HIGH-MAX(OPEN,CLOSE));
 QJ2:=IF(HIGH=LOW,1,MAX(CLOSE,OPEN)-QJ0);
 QJ3:=IF(HIGH=LOW,1,MIN(OPEN,CLOSE)-LOW);
 QJ4:=IF(HIGH=LOW,1,QJ0-MIN(CLOSE,OPEN));
 QJ5:=VOL/(IF(HIGH=LOW,4,HIGH-LOW));
 QJ6:="MACD.DIF">"MACD.DEA" AND "MACD.DEA"<0;
 QJ7:="KDJ.K">"KDJ.D" AND "KDJ.D"<30;
 QJ8:="MACD.DIF"<"MACD.DEA";
 QJ9:="KDJ.K"<"KDJ.D" AND "KDJ.K">80;
 特大:=QJ4*QJ5,NODRAW;大单:=QJ3*QJ5,NODRAW;
 中单:=QJ1*QJ5,NODRAW;小单:=QJ2*QJ5,NODRAW;
 W1:=SUM(大单,N)+SUM(特大,N);W2:=SUM(小单,N)+SUM(中单,N);
 量振1:=特大>大单 AND 大单>小单;
 量振2:=特大<小单 AND 大单<小单;
 标振1:QJ6 AND QJ7; {原文链接由股海网（WWW.Guhai.com.cn）提供}
 标振2:QJ8 AND QJ9;
 A:=W1-W2;A0:=IF(A>0,A,0);B0:=IF(A<0,A,0);
 STICKLINE(A0,0,A0,1,0),COLOR000044;
 主力持仓:2000*EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3),COLORFF00FF;
 主力筹码集中度:WINNER(C)*200000,COLORRED;