这个很简单分时黄金大智慧指标源码贴图

2018-08-02 08:55:00来源:本站整理浏览:212

input:n(5,1,30,1) ;

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,LINETHICK3;
指数:zc,COLORMAGENTA,LINETHICK0;
涨跌％:(zc/zqc-1)*100,LINETHICK0,COLORMAGENTA,PRECIS2;

DRAWTEXTABS(0,98,'指数涨幅:'+涨跌％+'%'),Color00ff00,LINETHICK5;
DRAWTEXTABS(0,128,'指数:'+指数+''),Color00ff00,LINETHICK5;
DRAWTEXTABS(0,158,'涨跌:'+zc-zqc-1+''),Color00ff00,LINETHICK5;

均价:if(TIME<=145800 and TIME<=145900,j1,ref(j1,1)),LINETHICK0,COLOR00ff00,PRECIS2;
DRAWTEXTABS(0,8,'涨幅:'+DYNAINFO(14)*100+'%'),Color00FFFF,LINETHICK5;
DRAWTEXTABS(0,38,'现价:'+DYNAINFO(7)+'元'),Color00FFFF,LINETHICK5;
DRAWTEXTABS(0,68,'涨跌:'+DYNAINFO(12)+'元'),Color00FFFF,LINETHICK5;

x:=BARSLAST(DISPSTATUS=1)+1;
ah:=hhvall(hhv(h,x));
al:=llvall(llv(l,x));
qqqq:=BACKSET(DISPSTATUS=2 ,barslast(dispstatus=1));
nnl:=DISPSTATUS=2;
cc:=DYNAINFO(3);

ahl:=ah-al;
q191:=al+ahl*0.191;
q382:=al+ahl*0.382;
q500:=al+ahl*0.500;
q618:=al+ahl*0.618;
q809:=al+ahl*0.809;

DRAWTEXT(nnl,ah,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,COLOR0000ff;
DRAWTEXT(nnl,q809,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,COLORddaa00;
DRAWTEXT(nnl,q618,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,COLORddaa00;
DRAWTEXT(nnl,q500,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,COLOR0000ff;
DRAWTEXT(nnl,q382,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,COLORddaa00;
DRAWTEXT(nnl,q191,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,COLORddaa00;
DRAWTEXT(nnl,al,'￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,COLOR00ff00;

DRAWTEXT(nnl,ah,'最高价：'+ah+'元'),ALIGN1,Color00FF00,LINETHICK4;
DRAWTEXT(nnl,q809,'80.9%：' +q809+'元'),ALIGN1,ColorFF00FF,LINETHICK4;
DRAWTEXT(nnl,q618,'61.8%：'+q618+'元'),ALIGN1,Color00FF00,LINETHICK4;
DRAWTEXT(nnl,q500,'50%：'+q500+'元'),ALIGN1,ColorFF00FF,LINETHICK4;
DRAWTEXT(nnl,q382,'38.2%：'+q382+'元'),ALIGN1,Color00FF00,LINETHICK4;
DRAWTEXT(nnl,q191,'19.1%：'+q191+'元'),ALIGN1,ColorFF00FF,LINETHICK4;
DRAWTEXT(nnl,al,'最低价：'+al+'元'),ALIGN1,VALIGN2,Color00FF00,LINETHICK4;