飞狐用的板块个股要点分析.docVIP

这个公式是飞狐用的！！！{板块个股分析2}DRAWGBK((CLOSE 0),COLORRGB(0,0,0),COLORRGB(0,0,0),1);RQ:=DATE;//取日期A:=BLKNAME;HY:=STRLEFT(A,STRFIND(A,,,1)-1);HYs:=STKCOUNT(HY);板块个股数:HYs,LINETHICK0;DYZB:=IF(c0,GGZJ.一日,IF(c0,GGZJ.VV,GGZJ.VV1));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]=,vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do??begin? ?DDD:=STKFROMBLK(HY,k);? ?DM[k]:=DDD;? ?TMP:=STKINDI(DDD,DYZB,0,6);? ?TMPD:=STKINDI(DDD,GGZJ.DD,0,6);? ?vcp[k]:=TMP[DAS];? ?vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股? ?TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,15,50,当日攻击资金前五名),Color1080FA;DRAWTEXTEX(islastbar,1,10,250, +STKNAMEEX(DM[vci[1]])+:+numtostr(vcp[vci[1]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,400,② +STKNAMEEX(DM[vci[2]])+:+numtostr(vcp[vci[2]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,550,③ +STKNAMEEX(DM[vci[3]])+:+numtostr(vcp[vci[3]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,700,④ +STKNAMEEX(DM[vci[4]])+:+numtostr(vcp[vci[4]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,10,850,⑤ +STKNAMEEX(DM[vci[5]])+:+numtostr(vcp[vci[5]],2)),Color0000FF;DYZB1:=IF(c0,GGZJ.昨日,IF(c0,GGZJ.VV,GGZJ.VV1));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]=,vcp[HYs]=0,vci[HYs]=0,TP=0;for k=1 to HYs do??begin? ?DDD:=STKFROMBLK(HY,k);? ?DM[k]:=DDD;? ?TMP:=STKINDI(DDD,DYZB1,0,6);? ?TMPD:=STKINDI(DDD,GGZJ.DD,0,6);? ?vcp[k]:=TMP[DAS];? ?vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股? ?TP:=TP+IF(vci[k]=-1000,1,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,280,50,昨日攻击资金前五名),Color20FF20;DRAWTEXTEX(islastbar,1,275,250, +STKNAMEEX(DM[vci[1]])+:+numtostr(vcp[vci[1]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,400,② +STKNAMEEX(DM[vci[2]])+:+numtostr(vcp[vci[2]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,550,③ +STKNAMEEX(DM[vci[3]])+:+numtostr(vcp[vci[3]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,700,④ +STKNAMEEX(DM[vci[4]])+:+numtostr(vcp[vci[4]],2)),Color0000FF;DRAWTEXTEX(islastbar,1,275,850,⑤ +STKNAMEEX(DM[vci[5]])+:+n