通达信分时BS突破主图指标 源码 贴图
{公式之家 BBS.GSZB.TOP}
DRAWTEXT_FIX(1,0.60,0.78,0,STRCAT(STRCAT('流通市值:',CON2STR(FINANCE(46)*C/100000000,2)),'亿元'))COLORYELLOW;
DRAWTEXT_FIX(1,0.60,0.55,0,STRCAT(STRCAT('昨日换手:',CON2STR(REF(V,1)#DAY/FINANCE(7)*10000,2)),'%'))COLORYELLOW;
{竞价情况}
JJCJL:=DYNAINFO(15)/DYNAINFO(4)/100;
JJJEDW:=IF(DYNAINFO(15)>10000,'万元','元');
JJJE:=IF(DYNAINFO(15)>10000,CON2STR(DYNAINFO(15)/10000,1),CON2STR(DYNAINFO(15),1));
JJJE1:=STRCAT(JJJE,JJJEDW);
JJ:=STRCAT('竞价量额:',STRCAT(CON2STR(JJCJL/10000,2),'万手'));
JJ1:=STRCAT(JJ,' = ');
DRAWTEXT_FIX(1,0.09,0.65,0,STRCAT(JJ1,JJJE1))COLORMAGENTA;{竞价量额位置}
{DRAWTEXT_FIX(1,0.95,0.50,0,STRCAT('占昨成交:',STRCAT(CON2STR(DYNAINFO(15)/分时引用.昨日额#DAY*100,2),'%')))COLORYELLOW;}
今日竞价股数:=DYNAINFO(15)/DYNAINFO(4); |
|