【通达信源码分享】资金净流入，监控资金流入流出

{副图}

买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));

买%:买/AMOUNT*100,COLORRED,NODRAW;

流入亿元:AMOUNT*买%/10000000000,COLORMAGENTA,NODRAW; 

流出亿元:AMOUNT/100000000-流入亿元,COLORGREEN,NODRAW;

净流亿元:流入亿元-流出亿元,COLORCYAN,NODRAW;

净流亿元5:SUM(流入亿元-流出亿元,5),COLORCYAN,NODRAW;

STICKLINE(AMOUNT,0,AMOUNT,2,1),COLORGREEN;

STICKLINE(买,0,买,2,0),COLORRED;

A:MA(买,3)COLORYELLOW;