%>
DRAWTEXTEX(CLOSE,1,4,0,'机构红多禄空,大户紫多青空.中户橙多兰空,散户白多灰空'),Color80FFFF;
VV:=IF(CAPITAL<1,INDEXV,VOL);
VVC:=IF(CAPITAL<1,SUM(INDEXV,71),CAPITAL);
换手:=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);
{股票教程网-股票公式网站 www.gwgz.net}
机构:=机构0/VIRVOL*VV;
大户:=大户0/VIRVOL*VV;
中户:=中户0/VIRVOL*VV;
散户:=散户0/VIRVOL*VV;
机构1日:机构,LINETHICK0,Color0000FF;
大户1日:大户,,LINETHICK0,ColorFF00FF;
中户1日:中户,LINETHICK0,Color0080FF;
散户1日:散户,LINETHICK0,ColorFFFFFF;
{--------------------机构户量----------------}
KC4:=ABS(机构)+ABS(大户)+ABS(中户)+ABS(散户);
KO4:=ABS(大户)+ABS(中户)+ABS(散户);
STICKLINE(机构>0,KC4,KO4,5,0 ),Color0000FF;
STICKLINE(机构<=0,KC4,KO4,5,0 ),Color00FF00;
{--------------------大户量----------------}
KC3:=ABS(大户)+ABS(中户)+ABS(散户);
KO3:=ABS(中户)+ABS(散户);
STICKLINE(大户>0,KC3,KO3,5,0 ),ColorFF00FF;
STICKLINE(大户<=0,KC3,KO3,5,0 ),ColorFFFF00;
{--------------------中户量----------------}
KC2:=ABS(中户)+ABS(散户);
KO2:=ABS(散户);
STICKLINE(中户>0,KC2,KO2,5,0 ),Color0080FF;
STICKLINE(中户<=0,KC2,KO2,5,0 ),ColorC5753A;
{--------------------散户量----------------}
KC1:=ABS(散户);
KO1:=0;
STICKLINE(散户>0,KC1,KO1,5,0 ),ColorFFFFFF;
STICKLINE(散户<=0,KC1,KO1,5,0 ),Color585858;
{股票教程网-http://gwgz.net/承接通达信软件和公式破解,普通加密破解,完全加密破解,导入密码破解,时间限制破解,公式编写,可按您的要求写公式指标,价格按难度不同报价,有需要可以找我们}