资金流极品公式－精品通达信指标公式源码分享

N:=3;M:=8;

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

买量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),LINETHICK0,COLORRED;   

卖量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2)),LINETHICK0,COLORCYAN;   

进出量:=买量+卖量,COLOR00FFFF;   

STICKLINE(进出量<0,0,进出量,1,0),COLORFF6600;   

STICKLINE(进出量<0,0,进出量,1,0),COLORFF9900;   

STICKLINE(进出量<0,0,进出量,1.0,0),COLORFFCC00;   

STICKLINE(进出量<0,0,进出量,0.5,0),COLORGREEN;   

STICKLINE(进出量>0,0,进出量,1,0),COLOR000099;   

STICKLINE(进出量>0,0,进出量,1,0),COLOR0000CC;   

STICKLINE(进出量>0,0,进出量,1.0,0),COLOR0000FF;   

STICKLINE(进出量>0,0,进出量,0.5,0),COLORCC66FF;   

万手:VOL/10000,LINETHICK0,NODRAW;    

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

主动买:=IF(CLOSE>OPEN,BB*(HIGH-LOW),IF(CLOSE<OPEN,BB*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));   

主买:主动买/10000,COLORRED,NODRAW;   

主动卖:=IF(CLOSE>OPEN,0-BB*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-BB*(HIGH-LOW),0-VOL/2));   

主卖:-主动卖/10000,COLORGREEN,NODRAW;   

主净额:(主动买+主动卖)/10000,NODRAW;   

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

买:=IF(CLOSE>OPEN,VAR1*(HIGH-LOW),IF(CLOSE<OPEN,VAR1*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED;   

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

买卖差:=(买+卖);   

买卖比:ABS(买/卖);   

N日内净流入:SUM (买卖差,N), LINETHICK2,COLORGREEN;   

流入:IF (N日内净流入>REF(N日内净流入,1),N日内净流入,DRAWNULL),COLORMAGENTA,LINETHICK2;   

M日内翻红天数:COUNT(买卖差>0,M);   

连红天数:BARSLASTCOUNT(买卖差>0);