真实成交量彩带

{真实成交量彩带}

jj:=(HIGH+LOW+CLOSE)/3;

qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);

主买:=(qj0*(jj-MIN(CLOSE,OPEN)));

主卖:=(qj0*(MIN(OPEN,CLOSE)-LOW));

主净:主买-主卖,COLORRED,LINETHICK2;

散买:=(qj0*(HIGH-MAX(OPEN,CLOSE)));

散卖:=(qj0*(MAX(CLOSE,OPEN)-jj));

散净:散买-散卖,COLORCYAN;

FILLRGN(0,散净,散净>0,rgb(0,250,250));

FILLRGN(0,主净,主净>0,rgb(255,0,0));

天z:COUNT(主净>0,10),PRECIS0,COLORMAGENTA;

DRAWTEXTABS(80,10,'主净十天内翻红:'+NUMTOSTRN(天z,0)+' 天'),COLORMAGENTA;

天s:COUNT(散净>0,10),PRECIS0,COLORCYAN;

DRAWTEXTABS(360,10,'散净十天内翻红:'+NUMTOSTRN(天s,0)+ ' 天'),COLORCYAN;

0,colorwhite;

{股票教程网-承接通达信软件和公式破解，普通加密破解，完全加密破解，导入密码破解，时间限制破解，公式编写，可按您的要求写公式指标，价格按难度不同报价，有需要可以找我们}