机构持股-港澳
C/C++ Code复制内容到剪贴板
- //机构持股-港澳
- n:=12;
- S:=F10FIND('【1.机构持股汇总】',100);
- S1:=F10FIND('报告日期 |',S)+11;
- S2:=F10FIND('|',S1);
- 季:STRTONUM(F10TEXT(S1,S2-S1)-'-')-19000000,LINETHICK0;
- S3:=F10FIND('基金持股 |',1);
- 基金持股:strtonum(f10text(S3+11,11)),LINETHICK0;
- //11----"基金持股 |"的字符长度
- S33:=F10FIND('占流通A比 |',S3);
- 基金占比:if(基金持股>0,strtonum(f10text(S33+12,11)),0),LINETHICK0;
- S4:=F10FIND(' QFII持股 |',1);
- QFII持股:strtonum(f10text(S4+12,11)),LINETHICK0;
- S44:=F10FIND('占流通A比 |',S4);
- QFII占比:if(QFII持股>0,strtonum(f10text(S44+n,11)),0),LINETHICK0;
- S5:=F10FIND(' 券商持股 |',1);
- 券商持股:strtonum(f10text(S5+12,11)),LINETHICK0;
- S55:=F10FIND('占流通A比 |',S5);
- 券商占比:if(券商持股>0,strtonum(f10text(S55+n,11)),0),LINETHICK0;
- S6:=F10FIND(' 社保持股 |',1);
- 社保持股:strtonum(f10text(S6+12,11)),LINETHICK0;
- S66:=F10FIND('占流通A比 |',S6);
- 社保占比:if(社保持股>0,strtonum(f10text(S66+n,11)),0),LINETHICK0;
- S7:=F10FIND(' 保险持股 |',1);
- 保险持股:strtonum(f10text(S7+12,11)),colorcyan,LINETHICK0;
- S77:=F10FIND('占流通A比 |',S7);
- 保险占比:if(保险持股>0,strtonum(f10text(S77+n,11)),0),LINETHICK0;
- S8:=F10FIND(' 信托持股 |',1);
- 信托持股:strtonum(f10text(S8+12,11)),LINETHICK0,colorcyan;
- S88:=F10FIND('占流通A比 |',S8);
- 信托占比:if(信托持股>0,strtonum(f10text(S88+n,11)),0),LINETHICK0;
- 机构持股:基金持股+QFII持股+券商持股+社保持股+保险持股+信托持股,colorcyan,LINETHICK0;
- 机构占比:基金占比+QFII占比+券商占比+社保占比+保险占比+信托占比,colorcyan,LINETHICK0;
- DRAWTEXTEX(c,1,300,10,'基金持股:'),LINETHICK2,ColorAFFF00;
- DRAWTEXTEX(c,1,300,160,'QFII持股:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,300,310,'券商持股:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,300,460,'社保持股:'),LINETHICK2,ColorAFFF00;
- DRAWTEXTEX(c,1,300,610,'保险持股:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,300,760,'信托持股:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,300,900,'机构持股:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,400,10,NUMTOSTR(基金持股,0)),ColorAFFF00;
- DRAWTEXTEX(c,1,400,160,NUMTOSTR(QFII持股,0)),Color00FFFF;
- DRAWTEXTEX(c,1,400,310,NUMTOSTR(券商持股,0)),Color00FFFF;
- DRAWTEXTEX(c,1,400,460,NUMTOSTR(社保持股,0)),ColorAFFF00;
- DRAWTEXTEX(c,1,400,610,NUMTOSTR(保险持股,0)),Color00FFFF;
- DRAWTEXTEX(c,1,400,760,NUMTOSTR(信托持股,0)),Color00FFFF;
- DRAWTEXTEX(c,1,400,900,NUMTOSTR(机构持股,0)),Color00FFFF;
- DRAWTEXTEX(c,1,500,10,'基金占比:'),LINETHICK2,ColorAFFF00;
- DRAWTEXTEX(c,1,500,160,'QFII占比:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,500,310,'券商占比:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,500,460,'社保占比:'),LINETHICK2,ColorAFFF00;
- DRAWTEXTEX(c,1,500,610,'保险占比:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,500,760,'信托占比:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,500,900,'机构占比:'),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,600,10,NUMTOSTR(基金占比,2)),LINETHICK2,ColorAFFF00;
- DRAWTEXTEX(c,1,600,160,NUMTOSTR(QFII占比,2)),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,600,310,NUMTOSTR(券商占比,2)),LINETHICK2,ColorFFFF00;
- DRAWTEXTEX(c,1,600,460,NUMTOSTR(社保占比,2)),LINETHICK2,Color00FFFF;
- DRAWTEXTEX(c,1,600,610,NUMTOSTR(保险占比,2)),LINETHICK2,Color007DFF;
- DRAWTEXTEX(c,1,600,760,NUMTOSTR(信托占比,2)),LINETHICK2,ColorFFFF00;
- DRAWTEXTEX(c,1,600,910,NUMTOSTR(机构占比,2)),LINETHICK2,ColorFFFF00;
- DRAWTEXTEX(CLOSE,1,100,10,STKLABEL+' '+STKNAME+''),colorFFFF;
- DRAWTEXTEX(c,1,100,160,'【数据更新:'+NUMTOSTR(季,0)+' 】'),COLORccffff;