大小单分时主图指标 通达信公式(附图)

[复制链接]
查看181 | 回复0 | 2021-8-20 19:03:24 | 显示全部楼层 |阅读模式

量:=SUM(V,FROMOPEN);
现:=100*(C-REF(C,1))/REF(C,1);
大买:=SUM(IF(现>0 AND V>=500,V,0),FROMOPEN);
大卖:=SUM(IF(现<0 AND V>=500,V,0),FROMOPEN);
B1:=大买/量*100;
B2:=大卖/量*100;
DRAWRECTREL(600,CONST(100-B1)*1000/100,620,1000,RGB(255,0,0))COLOR000000;
DRAWRECTREL(625,CONST(100-B2)*1000/100,645,1000,RGB(0,255,0))COLOR000000;
DRAWTEXT_FIX(PERIOD=0,0,8,0,STRCAT(STRCAT('【大买】',CON2STR(B1,2)),'%')),COLOR0000FF;
DRAWTEXT_FIX(PERIOD=0,0.2,8,0,STRCAT(STRCAT('【大卖】',CON2STR(B2,2)),'%')),COLOR00FF00;
小买:=SUM(IF(现>0 AND V<500,V,0),FROMOPEN);
小卖:=SUM(IF(现<0 AND V<500,V,0),FROMOPEN);
B3:=小买/量*100;
B4:=小卖/量*100;
DRAWRECTREL(650,CONST(100-B3)*1000/100,670,1000,90);
DRAWRECTREL(675,CONST(100-B4)*1000/100,695,1000,RGB(0,255,0));
DRAWTEXT_FIX(PERIOD=0,0.6,8,0,STRCAT(STRCAT('【小买】',CON2STR(B3,2)),'%')),COLOR0000FF;
DRAWTEXT_FIX(PERIOD=0,0.8,8,0,STRCAT(STRCAT('【小卖】',CON2STR(B4,2)),'%')),COLOR00FF00;

14O45F04040-11046.jpg

14O45F04040-11046.jpg

 

回复

使用道具 举报

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

本版积分规则