真实成交量彩带(大智慧)

[复制链接]
查看203 | 回复0 | 2021-8-21 14:04:06 | 显示全部楼层 |阅读模式

{真实成交量彩带}
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;

202108211321.gif

202108211321.gif

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则