主力资金（个股资金、主力进场）

通达信 主力资金（个股资金、主力进场）-指标公式源码

AB1:=VOL*CLOSE;{A}
AB2:=SUM(AB1,1)/SUM(VOL,1);{B}
AB3:=EMA(AB2,17);{B1}
AB4:=(C*2+H+L)/4*10;{V1B}
AB5:=EMA(AB4,13)-EMA(AB4,34);{V2B}
AB6:=EMA(AB5,5);{V3B}
AB7:=2*(AB5-AB6)*5.5;{V4B}
AB8:=(INDEXC*2+INDEXH+INDEXL)/4;{V8B}
AB9:=EMA(AB8,13)-EMA(AB8,34);{V9B}
AB10:=EMA(AB9,3);{VA}
AB11:=(AB9-AB10)/2;{VB}
个股资金:=(AB2-AB3)*100/AB2;
主力资金:=AB7;
大资金:=AB11;
红点主力进场:IF(个股资金>0 AND 主力资金>0 AND 大资金>0,-10,DRAWNULL),COLORRED,CIRCLEDOT,LINETHICK1;
V1:=EMA(EMA(CLOSE,20),20);{V1}
力度:=(V1-REF(V1,1))/REF(V1,1)*1000,COLORFF00FF,LINETHICK2;{控盘力度}
开始控盘:IF(CROSS(力度,0),20,0),LINETHICK2,COLORYELLOW;
【庄控盘】:IF(力度>REF(力度,1) AND 力度>0,8,0),LINETHICK2,COLORRED;
白线主力减仓:IF(力度< REF(力度,1) AND 力度>0,力度,0),LINETHICK2,COLORWHITE;
绿点主力出场:IF(个股资金<=0 AND 主力资金<=0 AND 大资金<=0,-10,DRAWNULL),COLORGREEN,CIRCLEDOT,LINETHICK1;
主力动态:(个股资金+主力资金+大资金),COLORYELLOW,NODRAW;
STICKLINE(主力动态>0,0,主力动态,1,0),COLORFF00FF;
STICKLINE(主力动态<=0,0,ABS(主力动态),1,0),COLORGREEN;
比例:(主力动态-REF(主力动态,1))/REF(主力动态,1),NODRAW;
底部:0,COLORFFCC66,LINETHICK2;

虚:IF(CURRBARSCOUNT=1 AND PERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,虚,0,-1,-1),COLOR00C0C0;
实:VOL,VOLSTICK;
换手:=VOL/CAPITAL*100;
贰换:SUM(V/CAPITAL*100,20),NODRAW,COLORMAGENTA;
动态市盈:=C/FINANCE(33),COLOR16CDEC,LINETHICK0 ;
VAR1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主动买盘:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK2;
主动卖盘:=IF(CLOSE>OPEN,0-VAR1*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR1*(HIGH-LOW),0-VOL/2)),LINETHICK2;
买卖盘:=-(主动买盘/主动卖盘),NODRAW,COLORYELLOW;
日净入（WS）:(主动买盘+主动卖盘)/10000,NODRAW,COLORMAGENTA;
STICKLINE(主动买盘>0,0,主动买盘,1,0),COLORRED;
STICKLINE(主动卖盘<0,VOL,主动买盘,1,0),COLOR00FF00;
STICKLINE(换手>0 ,0, 主动买盘,0,0),COLORYELLOW;
STICKLINE(换手>0,VOL, 主动买盘, 0,0) ,COLORRED;
AHC2:=(HIGH - LOW);
AHC3:=ABS((OPEN - CLOSE));
AHC4:=(HIGH - IF((CLOSE > OPEN),CLOSE,OPEN));
AHC5:=(IF((CLOSE > OPEN),OPEN,CLOSE) - LOW);
AHC6:=((AHC3 / AHC2) * VOL);
AHC7:=((AHC4 / AHC2) * VOL);
AHC8:=((AHC5 / AHC2) * VOL);
AHCA:=(((CLOSE - MA(CLOSE,5)) / MA(CLOSE,5)) * 100);
AHCB:=(((MA(CLOSE,5) > MA(CLOSE,10)) AND (MA(CLOSE,10) > MA(CLOSE,30))) AND (MA(CLOSE,30) > MA(CLOSE,60)));
AHCC:=((MA(CLOSE,5) < MA(CLOSE,10)) AND (MA(CLOSE,10) < MA(CLOSE,30)));
AB601:=HHV(V,5);
AB602:=O>C;
AB702:=C>O;
AB703:=C=O;
AB704:=((SUM(V,5)/AB601));
AB705:=IF(AB704>0.3,1,0);
AB706:=IF(AB602 AND AB705,V,0);
AB707:=IF(AB702 AND AB705,V,0);
钱出A:=SUM(AB706,5),COLORGREEN,LINETHICK2;
钱入A:=SUM(AB707,5),COLORRED,LINETHICK2;
钱出:=SUM(AB706,20),COLORGREEN,LINETHICK2;
钱入:=SUM(AB707,20),COLORRED,LINETHICK2;
伍净入（SW）:(钱入A-钱出A)/100000,COLORYELLOW,NODRAW;
贰净入:(钱入-钱出)/100000,COLORRED,NODRAW;
P5:MA(实,5),COLORMAGENTA,LINETHICK2;
P35:MA(实,35),COLORBLUE,LINETHICK2;
P135:MA(实,135),COLORWHITE,LINETHICK2;
DRAWTEXT(CROSS(P5,P135),(V *1.05),'★'),COLORYELLOW;
0,COLORBROWN;