通达信红绿主力出入副图指标 源码 贴图

CPJJ:=DMA((((HIGH + LOW) + (CLOSE * 2)) / 4),0.9);
CJJ:=REF(EMA(CPJJ,3),1);{公式网WWW.GPXIAZAI.COM}
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;
VAR1:=CLOSE-REF(CLOSE,1);
VAR2:=OPEN-REF(OPEN,1);
VAR3:=HIGH-REF(HIGH,1);
VAR4:=LOW-REF(LOW,1);
VAR5:=(VAR1+VAR2+VAR3+VAR4)/4;
主力资金:VAR5*VOL/10000,NODRAW;
STICKLINE(主力资金>0,主力资金,0,2.3,0),COLORRED;
开始流入:=主力资金>0;
流入:=BARSLASTCOUNT(开始流入)=1;
DRAWICON(流入,1,1);
STICKLINE(主力资金< 0,主力资金,0,2.3,0),COLORGREEN;