大智慧大智慧新一代L2大盘分时叠加主图源码

大智慧大智慧新一代L2大盘分时叠加主图源码

红色的即为大盘分时线，调出方法在个股分时线上打入：dpdj 要去除也同样再次打：dpdj即可。

此公式分两步：

一、先建公式，公式名为“001”，公式代码如下：

c1:c;
o1:o;
h1:h;
l1:l;
rc:dYNAINFO(3);
j:AMOUNT;

二、于建主公式，公式名可以随意，如“dpdj”，描述可输入：大盘分时叠加

公式源码如下：

gqc:=DYNAINFO(3);
gh:=DYNAINFO(5);
gL:=DYNAINFO(6);
gzdz:=max(gh-gqc,gqc-gL);
gf:=gzdz/gqc;
w:=gqc-gzdz;

shqc:=hhv(STKINDI('sh000001','001.rc#day'),0);
shH:=hhv(STKINDI('sh000001','001.H1#day'),0);
shL:=HHv(STKINDI('sh000001','001.L1#day'),0);
shc:=STKINDI('sh000001','001.c1#min1');
shjh:=STKINDI('sh000001','001.j#min1');

szqc:=hhv(STKINDI('399001','001.rc#day'),0);
szH:=hhv(STKINDI('399001','001.H1#day'),0);
szL:=HHv(STKINDI('399001','001.L1#day'),0);
szc:=STKINDI('399001','001.c1#min1');
szjh:=STKINDI('399001','001.j#min1');

zqc:=if(STRCMP(MARKETLABEL,'SH')=0,shqc,szqc);
zc:=if(STRCMP(MARKETLABEL,'SH')=0,shc,szc);
zh:=if(STRCMP(MARKETLABEL,'SH')=0,shh,szh);
zl:=if(STRCMP(MARKETLABEL,'SH')=0,shl,szl);
zjh:=if(STRCMP(MARKETLABEL,'SH')=0,shjh,szjh);

zzdz:=max(zh-zqc,zqc-zl);
ZF:=zzdz/zqc;
bl:=GF/ZF;
s:=(zc/zqc-1)*bl*gqc+gqc;
XS:=if(STRCMP(MARKETLABEL,'SH')=0,s,if(TIME<=145800 and TIME<=145900 and STRCMP(MARKETLABEL,'SH')>=1,s,ref(s,1)));
J:=SUM(XS*zjh,0)/SUM(zjh,0);
jj:=if(STRCMP(MARKETLABEL,'SH')=0,j,if(TIME<=145800 and TIME<=145900 and STRCMP(MARKETLABEL,'SH')>=1,j,ref(j,1)));
J1:=SUM(zc*zjh,0)/SUM(zjh,0);

POLYLINE(C,xs),COLORMAGENTA;
指数:zc,LINETHICK0,COLORMAGENTA,PRECIS2;
涨跌％:(zc/zq