成交额统计(通达信公式 副图 源码 测试图)

[复制链接]
查看61 | 回复0 | 2022-6-27 15:21:11 | 显示全部楼层 |阅读模式

 成交额统计

YC:=YC#DAY;
COEF:=IF(NAMELIKE('S') OR NAMELIKE('*S'),0.05,IF(INBLOCK('科创板') OR INBLOCK('创业板'),0.2,0.1));
ZT:=ZTPRICE(YC,COEF);
ZF:=(C/YC-1)*100;
FO:=FROMOPEN;
B0:=ZF<(COEF)*100*0.7;
B7:=ZF>=(COEF)*100*0.7 AND ZF<(COEF)*100*0.8;
B8:=ZF>=(COEF)*100*0.8 AND ZF<(COEF)*100*0.9;
B9:=ZF>=(COEF)*100*0.9 AND C<>ZT;
B10:=C=ZT;
AMO0:=CONST(SUM(AMO*(B0),FO))/100000000;
AMO7:=CONST(SUM(AMO*B7,FO))/100000000;
AMO8:=CONST(SUM(AMO*B8,FO))/100000000;
AMO9:=CONST(SUM(AMO*B9,FO))/100000000;
AMO10:=CONST(SUM(AMO*B10,FO))/100000000;
AMO_TOTAL:=CONST(SUM(AMO,FO))/100000000;
HABL:=(1-AMO0/AMO_TOTAL)*100;
高价成交额:AMO_TOTAL-AMO0,COLORYELLOW,NODRAW;
总额:AMO_TOTAL,COLORWHITE,NODRAW;
T5:=40;
H5:=50;
L5:=10;
LL0:=AMO0/AMO_TOTAL*300;
LL7:=AMO7/AMO_TOTAL*300+LL0;
LL8:=AMO8/AMO_TOTAL*300+LL7;
LL9:=AMO9/AMO_TOTAL*300+LL8;
LL10:=AMO10/AMO_TOTAL*300+LL9;
DRAWRECTREL(L5+LL0,T5,L5+LL7,T5+H5,RGB(255,255,0));
DRAWRECTREL(L5+LL7,T5,L5+LL8,T5+H5,RGB(255,128,64));
DRAWRECTREL(L5+LL8,T5,L5+LL9,T5+H5,RGB(255,0,255));
DRAWRECTREL(L5+LL9,T5,L5+LL10,T5+H5,RGB(255,0,0));
DRAWRECTREL(L5,T5,L5+LL0,T5+H5,RGB(64,64,64));
STICKLINE(B0,0,AMO,0.8,0),COLORGRAY;
STICKLINE(B7,0,AMO,0.8,0),COLORYELLOW;
STICKLINE(B8,0,AMO,0.8,0),COLOR4080FF;
STICKLINE(B9,0,AMO,0.8,0),COLORFF00FF;
STICKLINE(B10,0,AMO,0.8,0),COLOR0000FF;
ZB:=STRCAT(STRCAT('高价成交额占比: ',CON2STR(HABL,1)),'%');
DRAWTEXT_FIX(1,(L5+320)/1000,(T5)/1000,0,ZB),COLORYELLOW;
 

20223172371649748.png

20223172371649748.png
 

20223172372364810.png

20223172372364810.png

2022317237470976.rar

2.6 KB, 下载次数: 0

售价: 2 金钱  [记录]  [购买]

2022317237470976.rar

回复

使用道具 举报

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

本版积分规则