通达信主力资金副图指标，源码分享

CPJJ:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);

CJJ:=REF(EMA(CPJJ,3),1);

CQJJ:=(VOL / (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));

CXVL:=(IF((CLOSE > OPEN),(CQJJ * (HIGH - LOW)),IF((CLOSE < OPEN),(CQJJ * ((HIGH - OPEN) + (CLOSE - LOW))),(VOL / 2))) + IF((CLOSE > OPEN),(0 - (CQJJ * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE < OPEN),(0 - (CQJJ * (HIGH - LOW))),(0 - (VOL / 2)))));

CHSL:=((CXVL / 20) / 1.15);

攻击流量0:=(((CHSL * 0.55) + (REF(CHSL,1) * 0.33)) + (REF(CHSL,2) * 0.22));

CLLJX:=EMA(攻击流量0,3);

资金进出0:=(CHSL*0.4+CLLJX),LINETHICK0;

一日:=SUM(资金进出0,1),COLORWHITE,NODRAW;

DRAWNUMBER_FIX(1,0.75,0,0,CONST((一日))),COLORLIRED;

三日:=SUM(资金进出0,3),COLORWHITE,NODRAW;

五日:=SUM(资金进出0,5),COLORFF00FF,NODRAW;

十日:=SUM(资金进出0,10),COLOR0000FF,NODRAW;

DRAWNUMBER_FIX(1,1,0,0,CONST((三日))),COLORWHITE;

DRAWNUMBER_FIX(1,0.75,0.25,0,CONST((五日))),COLORRED;

DRAWNUMBER_FIX(1,1,0.25,0,CONST((十日))),COLORMAGENTA;

ABC1:=CLOSE-REF(CLOSE,1);

ABC2:=OPEN-REF(OPEN,1);

ABC3:=HIGH-REF(HIGH,1);

ABC4:=LOW-REF(LOW,1);

ABC5:=(ABC1+ABC2+ABC3+ABC4)/4;

主力资金:ABC5*VOL/10000,NODRAW;

STICKLINE(主力资金>0,主力资金,0,2.3,0),COLORRED;

开始流入:=主力资金>0;

流入:=BARSLASTCOUNT(开始流入)=1;

DRAWICON(流入,1,1);

STICKLINE(主力资金< 0,主力资金,0,2.3,0),COLORGREEN;