PARTLINE(wma(c,5),cyc(3)>cyc(7),RGB(255,0,0),cyc(3)<cyc(7),RGB(0,255,0)),PRECIS2,LINETHICK2;
外盘:=sum(if(DYNAINFO(23)*close,DYNAINFO(23),0),0)*0.003906;
内盘:=sum(if(DYNAINFO(22)*close,DYNAINFO(22),0),0)*0.003906;
主动率:=(外盘-内盘)/(内盘+外盘)*100;
单数比:=DYNAINFO(92)/DYNAINFO(91);
通吃率:=((DYNAINFO(95)+DYNAINFO(94))-(DYNAINFO(98)+DYNAINFO(97)))*VOL/VOL*100;
zim:=8; cb:=barslast(CROSS(ZIG(3,zim),REF(ZIG(3,zim),1)));
成本:=SUM(AMOUNT,cb)/SUM(VOL,cb)/100;
DRAWTEXTABS(1,18,'波段成本: '+NUMTOSTRN(成本,2)+' 元'),ColorFFC000,linethick2;
DRAWTEXTREL(0,22,'流通盘：'+STR(CAPITAL/100)+'万股'),COLORYELLOW;
DRAWTEXTREL(0,980,'板块: '+BKNAME),COLORGRAY;
DRAWTEXTABS(500,5,'主动率:'+ NUMTOSTRN(主动率,2)+' 单数比:'+ NUMTOSTRN(单数比,2)+' 通吃率:'+ NUMTOSTRN(通吃率,2)),COLOR00FFFF;
DRAWTEXTABS(170,5,'上涨家数:'+NUMTOSTRN(DYNAINFO(69),0)+'家'),COLOR0000FF;
DRAWTEXTABS(280,5,'平盘家数:'+NUMTOSTRN(DYNAINFO(71),0)+'家'),COLORFFFFFF;
DRAWTEXTABS(390,5,'下跌家数:'+NUMTOSTRN(DYNAINFO(70),0)+'家'),COLOR00FF00;
ddx:="ddx.ddx";ddy:="ddy.ddy";
DDX连红:if(last(ddx>0),last(ddx>0),0 - last(ddx<0)),color808000,PRECIS0,linethick0;
DDY连红:if(last(ddy>0),last(ddy>0),0 - last(ddy<0)),color808000,PRECIS0,linethick0;
廿日DDX红:count(ddx>0,20),color808000,PRECIS0,linethick0;
廿日DDX值:sum(ddx,20),color808000,PRECIS1,linethick0;
天河:MAXCYC*1.191,PRECIS2,COLOR9DFFFF,DOTLINE,LINETHICK1;
汉界:MAXCYC,PRECIS2,COLORWHITE,DOTLINE,LINETHICK3;
楚河:MAXCYC*0.809,PRECIS2,COLOR9DFFFF,DOTLINE,LINETHICK1;
Z:=BARSTATUS=2;
①:=(REF(C,2)>REF(O,2) and REF(C,1)>REF(O,1) and C>O and Z);
②:=(REF(C,2)>REF(O,2) and REF(C,1)>REF(O,1) and C<=O and Z);
③:=(REF(C,2)>REF(O,2) and REF(C,1)<=REF(O,1) and C>O and Z);
④:=(REF(C,2)>REF(O,2) and REF(C,1)<=REF(O,1) and C<=O and Z);
⑤:=(REF(C,2)<=REF(O,2) and REF(C,1)>REF(O,1) and C>O and Z);
⑥:=(REF(C,2)<=REF(O,2) and REF(C,1)>REF(O,1) and C<=O and Z);
⑦:=(REF(C,2)<=REF(O,2) and REF(C,1)<=REF(O,1) and C>O and Z);
⑧:=(REF(C,2)<=REF(O,2) and REF(C,1)<=REF(O,1) and C<=O and Z);
EV:=IFS(①,'①乾/天：阳极,防变',ifs(②,'②兑/泽：阳减,调整',ifs(③,'③离/火：阳光,关注',ifs(④,'④震/雷：继阴,空仓',
ifs(⑤,'⑤巽/风：继阳,持股',ifs(⑥,'⑥坎/水：阴风,看跌',ifs(⑦,'⑦艮/山：阴减,反弹',ifs(⑧,'⑧坤/地：阴极,待转','1'))))))));
DRAWTEXTREL(0.168,888,'卦相:'+EV),colorwhite,linethick2;
{判断趋势}
KK:="KDJ.K"; KD:="KDJ.D"; WK:="KDJ.K#WEEK"; WD:="KDJ.D#WEEK"; MK:="KDJ.K#MONTH"; MD:="KDJ.D#MONTH";
aa:=if(wk>wd and mk>md and cross(kk,kd),1,if(kk>kd and mk>md and cross(wk,wd),1,if(kk>kd and wk>wd and cross(mk,md),1,0)));
bb:=if(wk<wd and mk<md and cross(kd,kk),1,if(kk<kd and mk<md and cross(wd,wk),1,if(kk<kd and wk<wd and cross(md,mk),1,0)));
A1:=BARSLAST(REF(CROSS(KD,KK),1)); 顶背离:=REF(CLOSE,A1+1)<CLOSE AND REF(KK,A1+1)>KK AND CROSS(KD,KK);
A2:=BARSLAST(REF(CROSS(KK,KD),1)); 底背离:=REF(CLOSE,A2+1)>CLOSE AND KK>REF(KK,A2+1) AND CROSS(KK,KD);
drawbmp(aa,llv(l,5),'b.bmp'),align1,valign0,layer5;
drawbmp(bb,hhv(h,5),'s.bmp'),align1,valign1,layer5;
drawicon(底背离,llv(l,5),4),align1,valign0,layer7;
drawicon(顶背离,hhv(h,5),14),align1,valign2,layer7; |
