- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2007-4-21
|
|
大智慧L2 版 大盘分时线自适应叠加图如下需建引用指标 001
001 代码:
c1:c;
o1:o;
h1:h;
l1:l;
rc:DYNAINFO(3);
j:AMOUNT;
叠加公式 选主图叠加 代码
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/zqc-1)*100,LINETHICK0,COLORMAGENTA,PRECIS2;
POLYLINE(C,jj),COLORMAGENTA;
成交额（亿）:zjh/10000/10000,LINETHICK0,COLORMAGENTA,PRECIS2;
均价:if(TIME<=145800 and TIME<=145900,j1,ref(j1,1)),LINETHICK0,COLORMAGENTA,PRECIS2;
if STRCMP(MARKETLABEL,'SH')<1 then
wz:='叠加:上证指数 000001';
if STRCMP(MARKETLABEL,'SH')>=1 then
wz:='叠加:深圳成指 399001';
DRAWTEXTABS( 2,3,wz),LINETHICK1,COLORMAGENTA;
va:=zjh/10000/10000;
vb:=gzdz/hhv(va,0);
vv:=zjh/10000/10000*vb+w;
STICKLINE(zc>=ref(zc,1),w,vv,0.1,1),COLORRED;
STICKLINE(zc<ref(zc,1),w,vv,0.1,1),COLORCYAN;
STICKLINE(c,w,w,10,1),COLORCYAN;
if CATEGORY>0 then begin
zg:=FINANCE(1);{总股}
lta:=FINANCE(7);{流通A}
wf:=FINANCE(32);{未分}
sy:=FINANCE(33);{收益}
jz:=FINANCE(34);{净资}
gj:=FINANCE(18);{公积}
cw:=' 总股:'+zg+' 流通A:'+lta+' 收益:'+sy+' 未分:'+wf+' 公积:'+gj+' 净资:'+jz;
DRAWTEXT(DISPSTATUS=1,w,BKNAME+cw),COLORWHITE,VALIGN0;
end;
但我的图不对（另外一台机器没有问题），不知道为什么？哪位大侠能够修改一下
[ 本帖最后由 zwererer 于 2008-8-7 22:32 编辑 ] |
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
|
|
[复制链接]
楼主
发表于 2008-8-7 20:52
