通达信资金进出源码 有效，简单，好用

第一次发帖，免费分享，如果你有，你也看看，我改过参数了，很好用。

{资金进出 N:1,100,8;M:1,100,13;P:1,100,60;S:1,100,3}
V1:=(C*2+H+L)/4*10;
V2:=EMA(V1,13)-EMA(V1,34);
V3:=EMA(V2,5);
V4:=2*(V2-V3)*5.5;
主力开始出: IF(V4<=0,V4,0),COLOR00FF00,LINETHICK2;
主力开始进: IF(V4>=0,V4,0),COLORFF00FF,LINETHICK2;

优化

{资金进出}
VF1:=(C*2+H+L)/4*10;
VF2:=EMA(VF1,13)-EMA(VF1,34);
VF3:=EMA(VF2,5);
VF4:=2*(VF2-VF3)*5.5;{
主力开始出: IF(V4<=0,V4,0),COLOR00FF00,LINETHICK2;
主力开始进: IF(V4>=0,V4,0),COLORFF00FF,LINETHICK2;}
EM主力:EMA(C,3)+VF4/10,LINETHICK3;EM力:EMA(C,3)-VF4/10,LINETHICK3;
DRAWBAND(EM主力,RGB(88,0,0),EM力,RGB(00,88,0));
DRAWKLINE(H,O,L,C);