金昌九老师的大智慧分时用ZIG
{FSZIG}
INPUT:ZF(1.5,0,10);
DRAWTEXTREL(50,15,'【ZIG(3,ZF)='+ZF+'%: 0不显示】'),COLOR00FFFF,LINETHICK3;
DRAWTEXTABS(490,5,'【大盘指数:'+NUMTOSTRN("05引.大盘指数#DAY",2)+'】【大盘涨跌:'+NUMTOSTRN("05引.大盘涨跌#DAY",2)+'】【大盘涨幅:'+NUMTOSTRN("05引.大盘涨幅#DAY",2)+'%】'),LINETHICK1,COLOR00FFFF,LAYER0;
DRAWTEXTABS(500,20,'【涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+ '】'),COLOR0000FF,LINETHICK1;
DRAWTEXTABS(625,20,'【平家数:'+NUMTOSTRN(DYNAINFO(71),0)+ '】'),COLOR00FFFF,LINETHICK1;
DRAWTEXTABS(740,20,'【跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+ '】'),COLOR00FF00,LINETHICK1;
DRAWRECTABS(490,35 ,490+(DYNAINFO(69)+DYNAINFO(71)+DYNAINFO(70))/2.59,42, RGB(0,255,0)),COLOR00FF00,LAYER4;
DRAWRECTABS(490,35 ,490+(DYNAINFO(69)+DYNAINFO(71))/2.59 ,42, RGB(255,255,0)),COLOR00FFFF,LAYER3;
DRAWRECTABS(490,35 ,490+(DYNAINFO(69))/2.5,42, RGB(255,0,0)),COLOR0000FF,LAYER2;
DYNAINFO(3),COLOR00FFFF,DOTLINE,LAYER0;
{最高.最低}
HH1:HHVALL(HHV(C,0)),COLOR0000FF,LINETHICK1;
LL1:LLVALL(LLV(C,0)),COLOR00FF00,LINETHICK1;
DRAWTEXT(BARSTATUS=2,HH1,' 最高:'+NUMTOSTRN(DYNAINFO(5),2)+'元 '+NUMTOSTRN(100*(DYNAINFO(5)/DYNAINFO(3)-1),2)+'%'),LINETHICK1,ALIGN0,VALIGN2,COLORFF00FF;
DRAWTEXT(BARSTATUS=2,LL1,' 最低:'+NUMTOSTRN(DYNAINFO(6),2)+'元 '+NUMTOSTRN(100*(DYNAINFO(6)/DYNAINFO(3)-1),2)+'%'),LINETHICK1,ALIGN0,VALIGN2,COLORGREEN;
现价:CLOSE,COLOR00FFFF,LINETHICK2,LAYER0;
FILLRGN(LL1,HH1,LL1<HH1,RGB(0,0,150)),LINETHICK2,LAYER7;
DRAWTEXT(TIME=100000,(HH1+LL1)/2, NUMTOSTR(C)),COLOR00FFFF,LINETHICK3,ALIGN0;
分钟数30:(TIME0=36000),PRECIS0,LINETHICK0;
VERTLINE(分钟数30,2),COLOR00FF00,LAYER4;
{均线}
TT:=BARSCOUNT(C);
ZZ:=SUM(AMOUNT,TT)/SUM(VOL*100,TT);
ZZ1:=BETWEEN(C/ZZ,1.05,0.95);
均线:IF(ZZ1=0,MA(C,TT),ZZ),COLOR00FFFF,LINETHICK1,LAYER0;
{叠加股票}
TC:=STRCMP(STRLEFT(MARKETLABEL,2),'SZ');
DPSH:="SH000001$CLOSE"/HHV(STKINDI('SH000001','050引.RC#DAY'),0);
DPSZ:="399901$CLOSE"/HHV(STKINDI('399901','050引.RC#DAY'),0);
DPC:=IF(INBLOCK('A股板块'),DYNAINFO(3)*IF(TC=0,DPSZ,DPSH),C);
POLYLINE(C>0,DPC),COLOR0099FF,LAYER0,LINETHICK2;
{未定飘逸区}
Z10:ZIG(3,ZF),COLOR00FF00,LINETHICK0;
PARTLINE(Z10,Z10>REF(Z10,1),RGB(255,0,0),Z10=REF(Z10,1),RGB(255,200,0),Z10<REF(Z10,1),RGB(0,255,0)),LINETHICK2,LAYER0;
持有:LAST(Z10>REF(Z10,1)),PRECIS0 ,LINETHICK0;
空仓:LAST(Z10<REF(Z10,1)),PRECIS0,LINETHICK0;
LOW1:=TROUGH(3,ZF ,1);
HIGH1:=PEAK(3,ZF,1);
{下转折待定区}
STICKLINE(BARSTATUS=2 AND 空仓>0,HIGH1,HIGH1*(1-ZF/100),40,0),COLORFF9900,ALIGN1,LAYER5;
DRAWTEXT(BARSTATUS=2 AND 空仓>0,HIGH1,'LJ【'+NUMTOSTRN(HIGH1,2)+'】 '),ALIGN2,COLOR00FF00,LINETHICK2,LAYER0;
DRAWTEXT(BARSTATUS=2 AND 空仓>0,HIGH1*(1-ZF/100),'ZF【'+NUMTOSTRN(HIGH1*(1-ZF/100),2)+'】 '),ALIGN2,COLOR00FF00,LINETHICK2,LAYER0;
{上转折待定区}
STICKLINE(BARSTATUS=2 AND 持有>0,LOW1,LOW1*(1+ZF/100),40,0),COLORAAAACF,ALIGN1,LAYER5;
DRAWTEXT(BARSTATUS=2 AND 持有>0,LOW1,'LJ【'+NUMTOSTRN(LOW1,2)+'】 '),ALIGN2,COLOR0044FF,LINETHICK2,LAYER0;
DRAWTEXT(BARSTATUS=2 AND 持有>0,LOW1*(1+ZF/100),'ZF【'+NUMTOSTRN(LOW1*(1+ZF/100),2)+'】 '),ALIGN2,COLOR0044FF,LINETHICK2,LAYER0; |