通达信主图幅图显示板块,题材,概念,涨停,换手等 源码
-
相关简介:显示板块,题材,概念
-
文章来源:股海网作者:129402发布时间:2021-08-29浏览次数:
感谢股友发帖,标题和配图给您编辑了!加1积分,请查收!下次发帖前,请仔细学习,股海网顶部:发帖教程!谢谢
以下公式源码:
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.001,0.050,0,GNBLOCK);{概念};
DRAWKLINE(H,O,L,C);
换手:VOL/CAPITAL*100, NODRAW,COLORBLUE;
量比:V/(REF(MA(V,5),1)), NODRAW,COLORBLUE;
{振幅:DYNAINFO(13)*100, NODRAW,COLORYELLOW;}
流通:FINANCE( 7)/100000000, NODRAW,COLORRED;
TM:=1200823;
涨停:IF(DATE<TM,ZTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;
跌停:IF(DATE<TM,DTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORBLACK;
明涨停:IF(DATE<TM,C*IF(CODELIKE('688'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(IF(CODELIKE('688') OR CODELIKE('300'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)))),NODRAW,COLORLIMAGENTA;
明跌停:IF(DATE<TM,C*IF(CODELIKE('688'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(IF(CODELIKE('688') OR CODELIKE('300'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)))),NODRAW,COLORBLACK;
DRAWTEXT_FIX(ISLASTBAR,0,2,0,CODE),COLORBLUE;