预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10

亲,该文档总共21页,到这已经超出免费预览范围,如果喜欢就直接下载吧~

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

这个公式是飞狐用的!!!{板块个股分析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(c>0,'GGZJ.一日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;fork=1toHYsdobeginDDD:=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(c>0,'GGZJ.昨日',IF(c<0,'GGZJ.VV','GGZJ.VV1'));DAS:=DATACOUNT;D0:=RQ[DAS];//取最后日期variable:DM[HYs]='',vcp[HYs]=0,vci[HYs]=0,TP=0;fork=1toHYsdobeginDDD:=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]])+':'+numtostr(vcp[vci[5]],2)),Color0000FF;DYZB