分时主图公式交流

抓timing

本公式根据他人公式改写，经过deepseek与豆包提炼，本人确认后可用！防止网站把里的符号变为表情，特附TXT截图一幅！需要的根据自己的需求可增减其中语句！

NN:=MIN(BARSCOUNT(C),N);
FF:=(C-REF(C,NN))/REF(C,NN);
STICKLINE(FF>0,DYNAINFO(3),DYNAINFO(3)*(1+FF),0.5,0),COLORRED;
STICKLINE(FF<0,DYNAINFO(3),DYNAINFO(3)*(1+FF),0.5,0),COLORGREEN;

O1:="分时引用.O1#DAY";
H1:="分时引用.H1#DAY";
L1:="分时引用.L1#DAY";
J1:="分时引用.J1#DAY";
V1:="分时引用.V1#DAY";
S:="分时引用.S#DAY";
B:="分时引用.B#DAY";
RHS:="分时引用.HS#DAY";
LB:="分时引用.LB#DAY";
HS:=DYNAINFO(15)/OPEN/FINANCE(46)*100;
AAA1:=STRCAT('昨开:',CON2STR(O1,2));
AAA2:=STRCAT('昨高:',CON2STR(H1,2));
AAA3:=STRCAT('昨低:',CON2STR(L1,2));
AAA4:=STRCAT('昨均:',CON2STR(J1,2));
VVV1:=STRCAT('昨手:',CON2STR(V1,2));

SSSS:=STRCAT(STRCAT('内盘:',CON2STR(S/10000,2)),'万');
BBBB:=STRCAT(STRCAT('外盘:',CON2STR(B/10000,2)),'万');


HHSS:=STRCAT(STRCAT('竞价换手:',CON2STR(HS,2)),'%');

RHHS:=STRCAT(STRCAT('日换手:',CON2STR(RHS*100,2)),'%');
LLBB:=STRCAT('实时量比:',CON2STR(LB,2));


竞价量比:=(DYNAINFO(15)/DYNAINFO(4)/100)/DYNAINFO(16);
DRAWTEXT_FIX(ISLASTBAR,0.4,0.83,1,STRCAT('竞价量比:',CON2STR(竞价量比,2))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.4,0.87,1,HHSS),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0.6,0.83,0,LLBB),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.6,0.87,0,RHHS),COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0.4,0.91,1,BBBB),COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.6,0.91,0,SSSS),COLORGREEN;
X:=B/(S+B);Y:=S/(S+B);
ZBB:=CON2STR(X*100,2);
ZSB:=CON2STR(Y*100,2);
DRAWRECTREL(400,978,600,988,RGB(0,500,0));
DRAWRECTREL(400,978,200*X+400,988,RGB(500,0,0));

DRAWTEXT_FIX(ISLASTBAR,0.4,0.95,1,STRCAT(STRCAT('外盘',ZBB),'%')),COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.6,0.95,0,STRCAT(STRCAT(ZSB,'%'),'内盘')),COLORGREEN;

涨幅:=(DYNAINFO(4)-DYNAINFO(3))/ DYNAINFO(3)*100;
ZT:=H/REF(C,1)>1.095;

有庄手:=竞价量比>50  AND HHSS>0.2;
DRAWTEXT_FIX(有庄手,0.5,0.5,0,'有庄手'),COLORFF00FF;

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/100,2),'万股'));
JJ1:=STRCAT(JJ,' = ');
DRAWTEXT_FIX(1,0.01,0.98,0,STRCAT(JJ1,JJJE1)),COLORCYAN;


{ 分时主图 - 内外盘比值显示 [右上角] }
外盘:=DYNAINFO(23);
内盘:=DYNAINFO(22);
比值:=IF(内盘>0, 外盘/内盘, 0);  
DRAWTEXT_FIX(1, 0.46, 0.91, 0, '内外比:'), COLOR00FFFF;
DRAWNUMBER_FIX(1, 0.52, 0.91, 0, 比值), COLORFFFFFF;

{ 添加比值状态标识 }
DRAWTEXT_FIX(比值>1.2, 0.50, 0.95, 0, '◆ 买盘强'), COLORMAGENTA;
DRAWTEXT_FIX(比值<0.8, 0.50, 0.95, 0, '◆ 卖盘强'), COLORGREEN;
DRAWTEXT_FIX(比值>=0.8 AND 比值<=1.2, 0.50, 0.95, 0, '◆ 平衡'), COLORGRAY;

抓timing

如果这个打包的公式还提示错误那就没办法了，自己去写吧！！！

补充内容 (2025-6-3 14:56):
此公式公适用于开通L2数据包的通达信版或者是果子版与部分券商版！！！

补充内容 (2025-6-3 18:40):
另外，有些通达信软件可能不能引用DKCOL这个公式，你只在Ctrl+F公式编辑里找到特色型里的DKCOL，在它的基本上写入后面的代码，另存即可！

芷莹快乐

谢谢分享

zx850214

感谢分享，提示nn错误句

zx850214

抓timing 发表于 2025-6-3 13:05
如果这个打包的公式还提示错误那就没办法了，自己去写吧！！！

也不行，算了， ，，还是谢谢分享

抓timing

zx850214 发表于 2025-6-3 13:37
也不行，算了， ，，还是谢谢分享

你查一下哪句发个截图看，或者你换个券商版的通达信？

cindyyu999

谢谢分享

抓timing

zx850214 发表于 2025-6-3 13:37
也不行，算了， ，，还是谢谢分享

代码调用了L2数据，如果是通达信新版本可能用不了！如果是果子版或者是券商版可以用！！还有一个办法就是将代码放入DS里重写一下

zx850214

抓timing 发表于 2025-6-3 14:29
代码调用了L2数据，如果是通达信新版本可能用不了！如果是果子版或者是券商版可以用！！还有一个办法就是 ...

那应该问题出在l2了我没开l2,谢谢  代码没问题应该是没开L2

抓timing

zx850214 发表于 2025-6-3 14:35
那应该问题出在l2了我没开l2,谢谢  代码没问题应该是没开L2

用的券商版就行，中信至信，华T，长城等都可以用

泉府上士

谢谢分享，学习了。

抓timing

抓timing 发表于 2025-6-3 14:29
代码调用了L2数据，如果是通达信新版本可能用不了！如果是果子版或者是券商版可以用！！还有一个办法就是 ...

我下了一个新版通达信也能用啊

大老郭

好好学习天天向上

zx850214

抓timing 发表于 2025-6-3 17:42
我下了一个新版通达信也能用啊

我的是7.67，，，，提示也是最新版了

抓timing

zx850214 发表于 2025-6-3 22:20
我的是7.67，，，，提示也是最新版了

另外，有些通达信软件可能不让引用DKCOL这个公式，你只在Ctrl+F公式编辑里找到特色型里的DKCOL，在它的上面写入后面的代码，另存一个新公式即可！