beyond202104 发表于 2023-8-28 16:43:16

竞价情况（通达信公式 分时公式 源码 测试图）


{所属板块}{DRAWTEXT_FIX(C>0,0.920,0.66,0,HYBLOCK),COLORCYAN,LINETHICK2;{行业}DRAWTEXT_FIX(C>0,0.00,0.80,0,GNBLOCK),COLORCYAN,LINETHICK2;{概念};{流通市值}DRAWTEXT_FIX(1,0.710,0.66,0,STRCAT(STRCAT('流通市值：',CON2STR(FINANCE(46)*C/100000000,2)),'亿元'))COLORCYAN;{竞价情况}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.00,0.66,0,STRCAT(JJ1,JJJE1))COLORRED;{竞价量额位置}DRAWTEXT_FIX(1,0.00,0.73,0,STRCAT('占昨成交：',STRCAT(CON2STR(DYNAINFO(15)/ZZ.昨日额#DAY*100,2),'%')))COLORYELLOW;KPLB:=DYNAINFO(15)/DYNAINFO(4)/100/DYNAINFO(16);DRAWTEXT_FIX(1,0.1,0.73,0,STRCAT('开盘量比：',STRCAT(CON2STR(KPLB,2),' ')))COLORYELLOW;今日竞价股数:=DYNAINFO(15)/DYNAINFO(4);ZSPJ:=ZZ.ZSP#DAY;A:=今日竞价股数/FINANCE(46)*10000*(O-ZSPJ)/ZSPJ;DRAWTEXT_FIX(1,0.410,0.66,0,STRCAT(STRCAT('竞价动能：',CON2STR(A,2)),''))COLORRED;ZG:=ZZ.H1#DAY;昨均:=ZZ.昨均价#DAY;ZD:=ZZ.L1#DAY;DRAWTEXT_FIX(1,1,1-0.988,1,STRCAT('昨高 :',CON2STR(ZG,2))),COLORWHITE;DRAWTEXT_FIX(1,1,1-0.857,1,STRCAT('昨均 :',CON2STR(昨均,2))),COLORCYAN;DRAWTEXT_FIX(1,1,1-0.714,1,STRCAT('昨低 :',CON2STR(ZD,2))),COLORWHITE;五日:=ZZ.M5#DAY,COLORMAGENTA;十日:=ZZ.M10#DAY,COLORGREEN;二十日:=ZZ.M20#DAY;六十日:=ZZ.M60#DAY;{一百二十日:=ZZ.M120#DAY;}DRAWTEXT_FIX(1,1,1-0.571,1,STRCAT('M5 :',CON2STR(五日,2))),COLORMAGENTA;DRAWTEXT_FIX(1,1,1-0.428,1,STRCAT('M10 :',CON2STR(十日,2))),COLORYELLOW;DRAWTEXT_FIX(1,1,1-0.285,1,STRCAT('M20 :',CON2STR(二十日,2))),COLORCYAN;DRAWTEXT_FIX(1,1,1-0.142,1,STRCAT('M60 :',CON2STR(六十日,2))),COLORWHITE;{DRAWTEXT_FIX(1,1,1-0.0,1,STRCAT('M120 :',CON2STR(一百二十日,2))),COLORWHITE;}DK:=ZZ.DKX#DAY;DRAWTEXT_FIX(1,0,1,0,STRCAT('BBI :',CON2STR(DK,2))),COLORGREEN;DRAWTEXT_FIX(1,0.15,1,0,STRCAT('净流入: ',CON2STR(ZJBY.净流入#DAY,2))),COLORWHITE;DRAWTEXT_FIX(1,0.3,1,0,STRCAT('超大单(万): ',CON2STR(ZJBY.超大单#DAY,2))),COLORMAGENTA;DRAWTEXT_FIX(1,0.45,1,0,STRCAT('大单(万): ',CON2STR(ZJBY.大单#DAY,2))),COLORRED;DRAWTEXT_FIX(1,0.6,1,0,STRCAT('中单(万): ',CON2STR(ZJBY.中单#DAY,2))),COLORGREEN;DRAWTEXT_FIX(1,0.75,1,0,STRCAT('小单(万): ',CON2STR(ZJBY.小单#DAY,2))),COLORLIGRAY;




孤独的根号三点5 发表于 2023-9-8 03:19:49

帮顶！

太阳爱糯 发表于 2023-9-17 20:33:57

找了很久的东西！

123457989 发表于 2023-11-26 19:32:25

路过，帮顶一下！

ljj451833976 发表于 2023-11-30 20:56:37

感谢楼主分享好资源

123457265 发表于 2023-12-16 20:18:22

帮你顶下哈！！

天流域窃 发表于 2023-12-31 00:59:06

楼主哪儿来的这么多好东西！
页: [1]
查看完整版本: 竞价情况（通达信公式 分时公式 源码 测试图）