通达信分时买卖量价比公式

[复制链接]
查看133 | 回复0 | 2022-7-24 06:03:02 | 显示全部楼层 |阅读模式

通达信分时买卖量价比公式

源码:

A1:=(VOL/CLOSE)/3;
 A2:=SUM((IF(((A1>40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);
 A3:=SUM((IF(((A1>40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);
 A4:=SUM((IF(((A1<40) AND (CLOSE>(REF(CLOSE,1)))),A1,0)),0);
 A5:=SUM((IF(((A1<40) AND (CLOSE<(REF(CLOSE,1)))),A1,0)),0);
 A6:=((A2+A3)+A4)+A5;
 A7:=IF((BARSTATUS=2),((100*A2)/A6),0);
 A8:=((IF((BARSTATUS=2),((100*A3)/A6),0)));
 A9:=((IF((BARSTATUS=2),((100*A4)/A6),0)));
 A10:=((IF((BARSTATUS=2),((100*A5)/A6),0)));
机构买盘:=(A2),LINETHICK2;
机构卖盘:=(A3),LINETHICK2;
散户买盘:=(A4);
散户卖盘:=(A5);
 DRAWTEXT_FIX(1,0.000,1-0.05,0,STRCAT(STRCAT('【机构买盘】',CON2STR(机构买盘,2)),'万')),COLORRED;
 DRAWTEXT_FIX(1,0.250,1-0.05,0,STRCAT(STRCAT('【机构卖盘】',CON2STR(机构卖盘,2)),'万')),COLOR00FF00;
 DRAWTEXT_FIX(1,0.500,1-0.05,0,STRCAT(STRCAT('【散户买盘】',CON2STR(散户买盘,2)),'万')),COLORRED;
 DRAWTEXT_FIX(1,0.745,1-0.05,0,STRCAT(STRCAT('【散户卖盘】',CON2STR(散户卖盘,2)),'万')),COLOR00FF00;
 

1113288513.png

1113288513.png

回复

使用道具 举报

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

本版积分规则