通达信资金动能指标源码

VV:=IF(CAPITAL<1,INDEXV,VOL);
VVC:=IF(CAPITAL<1,SUM(INDEXV,71),CAPITAL);
{----------------------------------------------}
STICKLINE(C>REF(C,1),VOL,0,3,1),COLOR330099;
STICKLINE(C<=REF(C,1),VOL,0,3,1),COLORCC9900;
{---------------------}
换手:=VV/VVC;
机构意图:=MA(换手,21)*100;
大户意图:=MA(换手,13)*100;
中户意图:=MA(换手,8)*100;
散户意图:=MA(换手,5)*100;
均量:=(机构意图+大户意图+中户意图+散户意图)/4;
机构0:=机构意图-均量;
大户0:=大户意图-均量;
中户0:=中户意图-均量;
散户0:=散户意图-均量;
VIRVOL:=ABS(机构0)+ABS(大户0)+ABS(中户0)+ABS(散户0);
机构:=机构0/VIRVOL*VV;
大户:=大户0/VIRVOL*VV;
中户:=中户0/VIRVOL*VV;
散户:=散户0/VIRVOL*VV;
机构1日:机构,LINETHICK0;
大户1日:大户,,LINETHICK0;
中户1日:中户,LINETHICK0;
散户1日:散户,LINETHICK0;
{--------------------机构户量----------------}
KC4:=ABS(机构)+ABS(大户)+ABS(中户)+ABS(散户);
KO4:=ABS(大户)+ABS(中户)+ABS(散户);
STICKLINE(机构>0,KC4,KO4,2,0 ),COLOR330066;
STICKLINE(机构>0,KC4,KO4,1,0 ),COLOR663399;
STICKLINE(机构<=0,KC4,KO4,2,0 ),COLOR660033;
STICKLINE(机构<=0,KC4,KO4,1,0 ),COLOR990033;
{--------------------大户量----------------}
KC3:=ABS(大户)+ABS(中户)+ABS(散户);
KO3:=ABS(中户)+ABS(散户);
STICKLINE(大户>0,KC3,KO3,2,0 ),COLOR0000CC;
STI