beyond202104 发表于 2023-8-28 16:47:45

金凤分时（通达信公式 分时主图 源码 测试图）


{金凤分时}{涨停时间}DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.99,TIME),COLORYELLOW;{所属板块}DRAWTEXT_FIX(C>0,0.09,0.78,0,DYBLOCK),COLORYELLOW,LINETHICK2;{地域}DRAWTEXT_FIX(C>0,0.35,0.78,0,HYBLOCK),COLORYELLOW,LINETHICK2;{行业}DRAWTEXT_FIX(C>0,0.09,1,0,GNBLOCK),COLORCYAN,LINETHICK2;{概念}DRAWICON(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C,1);DRAWNUMBER(FILTER(CROSS(C,DYNAINFO(3)*1.1-0.01),60),C*0.99,TIME),COLORWHITE;{划线与买卖拉冲突标记}XG:HHV(H,480),DOTLINE,COLORCYAN;STICKLINE(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.998,C,1,0),COLORWHITE;{和突配套的白色柱子}DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10) AND C>REF(XG,1),C*0.995,'突')AND C<ZTPRICE(REF(CLOSE,1),0.1),COLORYELLOW;RQ:=DATETODAY(DATE)-DATETODAY(REF(DATE,TOTALBARSCOUNT-CURRBARSCOUNT))+1;JY:=BARSLAST((RQ-REF(RQ,1))!=WEEKDAY-REF(WEEKDAY,1) OR TOTALBARSCOUNT-CURRBARSCOUNT=0)+1;MA01:=REF(C,JY);MA02:=REF(MA01,JY);MA03:=REF(MA02,JY);MA04:=REF(MA03,JY);MA05:=REF(MA04,JY);MA6:=REF(MA05,JY);MA7:=REF(MA6,JY);MA8:=REF(MA7,JY);MA9:=REF(MA8,JY);H1:=MAX(DYNAINFO(3),DYNAINFO(5)); L1:=MIN(DYNAINFO(3),DYNAINFO(6)); P1:=H1-L1; 阻力:L1+P1*8/9,COLORLIRED,DOTLINE; 支撑:L1+P1*0.5/9,COLORGREEN,DOTLINE;XX:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(V*100,BARSCOUNT(CLOSE));主力:=EXPMA(CLOSE/XX,20);大户:=EXPMA(CLOSE/XX,60);散户:=EXPMA(CLOSE/XX,120);底:=1;中:=1.022,NODRAW;高:=1.033;DRAWICON(LONGCROSS(支撑 ,C,2),C-0.01,7);STICKLINE(LONGCROSS(支撑,C,2),C,阻力,0,-1),COLORCYAN;DRAWICON(LONGCROSS(C,阻力,2)AND C<ZTPRICE(REF(CLOSE,1),0.1),C+0.01,8);STICKLINE(LONGCROSS(C,阻力,2),C,支撑,0,-1),COLORRED;{流通市值}DRAWTEXT_FIX(1,0.60,0.78,0,STRCAT(STRCAT('流通市值：',CON2STR(FINANCE(46)*C/100000000,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.90,0.65,0,STRCAT('占昨成交：',STRCAT(CON2STR(DYNAINFO(15)/REF(AMO,1)*100,2),'%')))COLORYELLOW;今日竞价股数:=DYNAINFO(15)/DYNAINFO(4);ZSPJ:=REF(C,1);A:=今日竞价股数/FINANCE(46)*10000*(O-ZSPJ)/ZSPJ;

DRAWTEXT_FIX(1,0.70,0.65,0,STRCAT(STRCAT('竞价动能：',CON2STR(A,2)),''))COLORYELLOW;




纯农赣 发表于 2023-8-29 21:44:12

真是 收益 匪浅

买包子不排队 发表于 2023-12-14 23:26:15

好东西，收了

zmhg799417 发表于 2023-12-16 20:49:34

感谢感谢

更儿岛 发表于 2024-1-21 15:16:35

不知该说些什么。。。。。。就是谢谢

天使之城落汤鸡 发表于 2024-1-23 23:10:13

找了很久了，多谢！

雁千渡 发表于 2024-3-16 16:07:46

已收藏！

珺公主 发表于 2024-4-7 14:42:19

沙发！沙发!

成圣 发表于 2024-4-8 00:01:52

没看完~~~~~~ 先顶，好同志
页: [1]
查看完整版本: 金凤分时（通达信公式 分时主图 源码 测试图）