通达信资金进出量 计算未加密选股指标公式源码

通达信资金进出量 计算公式

前段时间看到一位高人自编的资金进出量 计算公式，使用中量出不错，主要是自己总是不相信官方数据，所以就替代了，自己来统计数据了。
看需要自己下吧
{资金进出}
总亿:FINANCE(1)*C/100000000,NODRAW,COLORWHITE;
总量万:VOL/10000,NODRAW;
总额亿:AMOUNT/100000000,NODRAW,COLORCYAN;
AA:=(VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)));
B:=(IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+
(CLOSE-LOW)),VOL/2)));
S:=ABS((IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2))));
流量:=(B-S)/10000;
净亿:((B-S)*AMOUNT/VOL)/100000000,NODRAW,COLORRED;
STICKLINE(流量>0,0,B,2,0),COLORWHITE;
STICKLINE(流量<0,0,S,2,0),COLORCYAN;
买:B,COLORRED,LINETHICK2;
卖:S,COLORBLUE,LINETHICK2;
{~W^W~W+X!G?5^1_C*N_{_};

源码正文：

N（2,250,120）

ma1:MA(wr,N),COLORRED;WR1:100*(HHV(HIGH,N)-CLOSE)/(HHV(HIGH,N)-LLV(LOW,N)){XG51};
REVERSE(WR1);REVERSE(MA1){XG51};
80{XG51};
50{XG51};
20{XG51};
-20{XG51};
-50{XG51};
-80{X~G_5+1~C~N~{};