飞狐用的板块个股分析.doc

飞狐用的板块个股分析.doc这个公式是飞狐用的!!!{板块个股分析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,HICKO;DYZB:=IF(c>O,'',IF(cvO,'',''));DAS:=DATACOUNT;DO:=RQ[DAS];〃取最后LI期variable:DM[HYs]=M,vcp[HYs]=O,vci[HYs]=O,TP=O;fork=ItoHYsdobeginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB,0,6);TMPD:=STKINDI(DDD;;0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DAS],-1000);//去除当天停牌股TP:=TP+IF(vci[k]=-1000,l,0);end;PX1:=SORTPOS(vci,1,1,HYs);DRAWTEXTEX(islastbar,1,15,50;''iU攻击资金前一五•名'),Color1080FA;DRAWTEXTEX(islastbar,1,10,250; ①'+STKNAMEEX(DM[vci[I]])+':'+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; ④'4-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,'',IF(cvO,'',''));DAS:=DATACOUNT;D0:=RQ[DAS];〃取最后LI期variable:DM[HYs]=n,vcp[HYs]=0,vci[HYs]=0,TP=0;fork=ltoHYsdobeginDDD:=STKFROMBLK(HY,k);DM[k]:=DDD;TMP:=STKINDI(DDD,DYZB1,0,6);TMPD:=STKINDI(DDD;;0,6);vcp[k]:=TMP[DAS];vci[k]:=IF(TMPD[DAS]=D0,TMP[DASl,-1000);//去除当夭停牌股uiSaqops入h°3[=NJOj:O=dJL'O=[sAH]!OA,o=[s—H]doA\=[s—H]KI:0|q“3A膜n当窖油〃:[svq]Oh=:oq工Nnowivgsvci:((』AA[ZDD',AATZDD,'0>oNl'JR—l*ZDD「0<o)dI=:EZAQ•JH0000JoP3<((Z<[[^PA]doA)jjsojiunu+l:(+([[g]pA]na)Xaa]NVNNlS+.© 「0待 【如qis叩!)X3JLXa【MVHQ•Jd0000-K>P3t((Z<[[i7]PA]doA)jjsojainu+l:.+([[t7]pA]jva)xaaWVN>llS+.® :ooc^i^q^|S!)xaixaiMVHa•Hd(XMX)JOIo3t((Zl[C]PA]d3A)J3sojiunu+l:.+([[£]iOA]jva)XaarVVN[MlS+.© 「。拓'汁S'【*q】s田sDxaiXSLLMVHCI•±I0000JOIo3t((Z<[[Z]PA]d3A)jjsojiunu+l:,+([[^]pA]]A[a)xaa]A[VNMlS+.© ,'00*'9话'【'juqis田S!)X3LLX3LLAWXQ•HHOOOOJOlOD^fcllI]iOA]d3A)jjsojiunu+;(+([[IlPA]wa)XHHWVN>IlS+.① :0巽CbSTwq哄BDxHLXaLWVXQ:0()匕VZJJ