原资金分时进出指标优化版， 适用通达信交易软件，本人经过一段实盘应用，效果不错，现把 " 资金分时进出指标优化版" 分享给各位！！！
{用法：1.机构控股状态下的笑脸，是买入信号。 2.出现钻石表示有主力资金流入，可积极参与。3.判断机构控股的方法，一看像钢琴键盘一样的红黄柱体。 二看机构买入，注意关注机构买入百分比50%以上，机构总买入（即机构买入-机构卖出）15%以上的股票，当然愈多愈好！ 机构买入百分比过低时，没有红黄柱体和笑脸信号，建议不要买入。
炒股需谨慎！ 指标需活用，经验和盘感结合在一起，方能选出好的股票。祝股友们股市长虹！
{用法：1.机构控股状态下的笑脸，是买入信号。 2.判断机构控股的方法，一看像钢琴键盘一样的红黄柱体。 二看机构买入，注意关注机构买入百分比50%以上，机构总买入（即机构买入-机构卖出）15%以上的股票，当然愈多愈好！ 机构买入百分比过低时，没有红黄柱体和笑脸信号，建议不要买入。}
A1:=SUM(IF(CLOSE>REF(CLOSE,1),VOL/CAPITAL*100,IF(CLOSE<REF(CLOSE,1),-VOL/CAPITAL*100,0)),0);
成交额:=V*C/100,NODRAW;
A2:=SUM((IF(((成交额/8>20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A3:=SUM((IF(((成交额/8>20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A4:=SUM((IF(((成交额/8<20) AND (CLOSE>(REF(CLOSE,1)))),成交额,0)),0);
A5:=SUM((IF(((成交额/8<20) AND (CLOSE<(REF(CLOSE,1)))),成交额,0)),0);
A6:=((A2+A3)+A4)+A5;
A7:=IF((ISLASTBAR),((100*A2)/A6),0);
A8:=IF((ISLASTBAR),((100*A3)/A6),0);
A9:=IF((ISLASTBAR),((100*A4)/A6),0);
A10:=IF((ISLASTBAR),((100*A5)/A6),0);
机构买:(A2),LINETHICK6,COLORRED;
机构卖:(A3),LINETHICK6,COLORGREEN;
机构进出:机构买-机构卖,NODRAW;
散户买:(A4),COLOR5555FF;
散户卖:(A5),COLOR55FF55;
散户进出:=散户买-散户卖,NODRAW;
强势:((100*A2)/A6>50);
STICKLINE(强势,机构买*1.02,机构买*1.1,1,0),COLORYELLOW;
拉升:((100*A2)/A6-(100*A3)/A6)>18 AND (100*A2)/A6-(100*A5)/A6>18;
STICKLINE(拉升,机构买*1.1,机构买*1.2,1,0),COLORRED;
DRAWTEXT(ISLASTBAR=1,机构买*0.95,''),LINETHICK2,COLORRED;
DRAWTEXT(ISLASTBAR=1,机构卖*0.95,''),LINETHICK2,COLORFFFF55;
Q:=BETWEEN(C/(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))),1.05,0.95);
Q2:=IF(Q=0,MA(C,BARSCOUNT(C)),(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))));
DRAWICON(CROSS((C/Q2),1.03),机构买,5);
XG:=C/Q2;
DD1:=1;
AAA1:=STRCAT(STRCAT('机买',CON2STR((100*A2)/A6,0)),'%');
AAA2:=STRCAT(STRCAT('机卖',CON2STR((100*A3)/A6,0)),'%');
AAA0:=STRCAT(STRCAT('机构总买',CON2STR((100*(A2-A3))/A6,0)),'%');
AAA3:=STRCAT(STRCAT('散买',CON2STR((100*A4)/A6,0)),'%');
AAA4:=STRCAT(STRCAT('散卖',CON2STR((100*A5)/A6,0)),'%');
AAA5:=STRCAT(STRCAT('散户总买',CON2STR((100*(A4-A5))/A6,0)),'%');
DRAWTEXT_FIX(DD1=1,0.801,0.05,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0.801,0.15,0,AAA2),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0.801,0.25,0,AAA3),COLORRED;
DRAWTEXT_FIX(DD1=1,0.801,0.35,0,AAA4),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0.801,0.65,0,AAA0),LINETHICK5,COLORCYAN;
DRAWTEXT_FIX(DD1=1,0.801,0.50,0,AAA5),LINETHICK5,COLORCYAN;
主力净买:=(机构进出+散户进出)/成交额,NODRAW;
AAA6:=STRCAT(STRCAT('主力净买',CON2STR(主力净买,0)),'%');
DRAWTEXT_FIX(DD1=1,0.801,0.80,0,AAA6),COLORMAGENTA;
均价:=SUM(V*C,0)/SUM(V,0),COLORYELLOW;
地:EMA(均价,50)/0.97,LINETHICK2,COLORGREEN,NODRAW;
买单次数:=COUNT(V>4000 AND C>REF(C,1),0);
黄次数:=COUNT(V>DYNAINFO(16)*10 AND C>REF(C,1),0),COLORYELLOW,NODRAW;
DRAWICON(买单次数>REF(买单次数,1) AND 黄次数>REF(黄次数,1) AND CROSS(C,地),机构买,24);
HD:=HIGH-REF(HIGH,1);
LD:=REF(LOW,1)-LOW;
DMP:=EMA(IF(HD>0 AND HD>LD,HD,0),28);
DMM:=EMA(IF(LD>0 AND LD>HD,LD,0),28);
VZH:=EMA(DMP/TR,28);
VZL:=EMA(DMM/TR,28);
MA1:=EMA((CLOSE+HIGH+LOW)/3,2);
VAR1:=MAX((DYNAINFO(3)),EMA(DYNAINFO(5),5));
VAR2:=MIN((DYNAINFO(3)),EMA(DYNAINFO(6),5));
HH:=(COST(95)+DYNAINFO(11))/2;
LL:=(COST(5)+DYNAINFO(11))/2;
VAR3:=CONST((VAR1+HH)/2);
VAR4:=CONST((VAR2+LL)/2);
VAR5:=(VAR3+VAR4)/2;
VAR6:=(VAR4+VAR5)-VAR3;
VAR7:=(VAR4+VAR6)/2;
VAR8:=(VAR6+VAR7)/2;
VAR10:=(3*SMA((C-LLV(L,54))/(HHV(H,54)-LLV(L,54)),3,1)-2*SMA(SMA((C-LLV(L,54))/(HHV(H,54)-LLV(L,54)),3,1),3,1));
VAR11:=MEMA(VAR10,10);
VAR12:=EMA(VAR11,10);
VAR13:=IF(EXIST(CROSS(VAR3,MA1),5) AND EXIST(C>VAR3,10) AND VAR11<HHV(VAR11,10) AND VAR12<REF(VAR12,1),1,0);
VAR14:=IF(EXIST(CROSS(MA1,VAR4),5) AND EXIST(C<VAR4,10) AND VAR11>LLV(VAR11,10) AND VAR12>REF(VAR12,1),1,0);
顶:=VAR3,POINTDOT,COLORFF00FF;
底:=VAR4,POINTDOT,COLORGREEN;
多空:=IF(VZH>VZL,VAR7,VAR6);
DRAWICON(VAR13=1 AND REF(VAR13,1)=0,机构买,8);
DRAWICON(VAR14=1 AND REF(VAR14,1)=0,机构买,7);
