DRAWTEXTEX(1,0,5,5,'财'),colorred,NOAXIS;
DRAWTEXTEX(1,0,5,20,'务'),colorred,NOAXIS;
DRAWTEXTEX(1,0,5,35,'分'),colorred,NOAXIS;
DRAWTEXTEX(1,0,5,50,'析'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,65,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,80,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,95,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,110,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,125,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,140,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,155,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,170,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,185,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,9,200,'|'),colorred,NOAXIS;
净利润总额:=SELFSTRING('净利润总额');
zh51:STRTONUM(净利润总额),LINETHICK;
DRAWTEXTEX(1,0,20,5,'净利润总额:'+NUMTOSTR(zh51,2)+' 所属行业:'+SELFSTRING('所属板块')),colorred,NOAXIS;
DRAWTEXTEX(1,0,20,20,'**********************************************************'),colorgreen,NOAXIS;
同比净利润增长率:=SELFSTRING('同比净利润增长率');
同行业净利润增长率:=SELFSTRING('同行业净利润增长率');
zh11:STRTONUM(同比净利润增长率),LINETHICK;
zh12:STRTONUM(同行业净利润增长率),LINETHICK;
DRAWTEXTEX(1,0,20,35,'净利润增长率:'+NUMTOSTR(zh11,2)+'%'),COLOR000099,NOAXIS;
DRAWTEXTEX(1,0,20,50,'同行业净利润增长率:'+NUMTOSTR(zh12,2)+'%'),COLOR000099,NOAXIS;
DRAWTEXTEX(1,0,20,65,'**********************************************************'),colorgreen,NOAXIS;
pd1:=if(zh11>zh12,'增长能力较同行业平均数强','增长能力较同行业平均数弱');
DRAWTEXTEX(1,0,220,40,pd1),colorwhite,NOAXIS;
同比净资产增长率:=SELFSTRING('同比净资产增长率');
同行业净资产收益率:=SELFSTRING('同行业净资产收益率');
zh21:STRTONUM(同比净资产增长率),LINETHICK;
zh22:STRTONUM(同行业净资产收益率),LINETHICK;
DRAWTEXTEX(1,0,20,80,'净资产收益率:'+NUMTOSTR(zh21,2)+'%'),COLORBB00BB,NOAXIS;
DRAWTEXTEX(1,0,20,95,'同行业净资产收益率:'+NUMTOSTR(zh22,2)+'%'),COLORBB00BB,NOAXIS;
DRAWTEXTEX(1,0,20,110,'**********************************************************'),colorgreen,NOAXIS;
pd2:=if(zh21>zh22,'盈利能力较同行业平均数强','盈利能力较同行业平均数弱');
DRAWTEXTEX(1,0,220,85,pd2),colorwhite,NOAXIS;
同比资产负债比率:=SELFSTRING('同比资产负债比率');
同行业资产负债比率:=SELFSTRING('同行业资产负债比率');
zh31:STRTONUM(同比资产负债比率),LINETHICK;
zh32:STRTONUM(同行业资产负债比率),LINETHICK;
DRAWTEXTEX(1,0,20,125,'资产负债比率:'+NUMTOSTR(zh31,2)+'%'),COLOR0099FF,NOAXIS;
DRAWTEXTEX(1,0,20,140,'同行业资产负债比率:'+NUMTOSTR(zh32,2)+'%'),COLOR0099FF,NOAXIS;
DRAWTEXTEX(1,0,20,155,'**********************************************************'),colorgreen,NOAXIS;
pd3:=if(zh31>zh32,'负债较同行业多偿债压力大','负债较同行业少偿债压力小');
DRAWTEXTEX(1,0,220,130,pd3),colorwhite,NOAXIS;
同比净利润现金含量:=SELFSTRING('同比净利润先进含量');
同行业净利润现金含量:=SELFSTRING('同行业净利润现金含量');
zh41:STRTONUM(同比净利润现金含量),LINETHICK;
zh42:STRTONUM(同行业净利润现金含量),LINETHICK;
DRAWTEXTEX(1,0,20,170,'净利润现金含量:'+NUMTOSTR(zh41,2)+'%'),COLORBB0000,NOAXIS;
DRAWTEXTEX(1,0,20,185,'同行业净利润现金含量:'+NUMTOSTR(zh42,2)+'%'),COLORBB0000,NOAXIS;
DRAWTEXTEX(1,0,20,200,'**********************************************************'),colorgreen,NOAXIS;
pd4:=if(zh41>zh42,'现金流动较强收益质量较好','现金流动较弱收益质量较差');
DRAWTEXTEX(1,0,220,175,pd4),colorwhite,NOAXIS;
r1:=F10FIND('【1.机构持股汇总】【2.股东户数】【3.机构持股明细】【4.异动上榜】',1);
r2:=F10FIND('基金持股',r1);//基金持股;
rr1:=STRTONUM(F10TEXT(r2+88,15));
r3:=F10FIND('家数及|',r2);
r22:=STRTONUM(F10TEXT(r3+12,3));//共计
r222:=STRTONUM(F10TEXT(r3+20,3));//共计
rr6:=STRTONUM(F10TEXT(r2+104,15));//上季比例
r4:=F10FIND('保险持股',r1);
r5:=F10FIND('社保持股',r1);
r6:=F10FIND('QFII持股',r1);
r7:=F10FIND('券商持股',r1);
r44:=STRTONUM(F10TEXT(r4+88,15));
r55:=STRTONUM(F10TEXT(r5+88,15));
r66:=STRTONUM(F10TEXT(r6+88,15));
r77:=STRTONUM(F10TEXT(r7+88,15));
rr22:=if(rr1,NUMTOSTR(rr1,2)+'%','0');
rr33:=if(r22,NUMTOSTR(r22,0)+'家','0');
rr333:=if(r222,NUMTOSTR(r222,0)+'家','0');
rr44:=if(r44,NUMTOSTR(r44,2)+'%','0');
rr55:=if(r55,NUMTOSTR(r55,2)+'%','0');
rr66:=if(r66,NUMTOSTR(r66,2)+'%','0');
rr77:=if(r77,NUMTOSTR(r77,2)+'%','0');
rr88:=if(rr6,NUMTOSTR(rr6,2)+'%','0');
DRAWTEXTEX(1,0,370,5,'主'),colorred,NOAXIS;
DRAWTEXTEX(1,0,370,20,'力'),colorred,NOAXIS;
DRAWTEXTEX(1,0,370,35,'情'),colorred,NOAXIS;
DRAWTEXTEX(1,0,370,50,'况'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,65,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,80,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,95,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,110,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,125,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,140,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,155,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,170,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,185,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,374,200,'|'),colorred,NOAXIS;
DRAWTEXTEX(c,0,383,65,'基金:'+rr33),ColorFF80FF;
DRAWTEXTEX(c,0,383,80,'新进:'+rr333),ColorFF80FF;
DRAWTEXTEX(c,0,383,95,'比例:'+rr22),ColorFF80FF;
DRAWTEXTEX(c,0,383,110,'上季:'+rr88),Color00FF00;
DRAWTEXTEX(c,0,383,140,'保险:'+rr44),Color0080FF;
DRAWTEXTEX(c,0,383,155,'社保:'+rr55),ColorFFFF80;
DRAWTEXTEX(c,0,383,170,'QFII:'+rr66),ColorFF8000;
DRAWTEXTEX(c,0,383,185,'券商:'+rr77),ColorFF8580;
DRAWTEXTEX(1,0,460,5,'图'),colorred,NOAXIS;
DRAWTEXTEX(1,0,460,20,'例'),colorred,NOAXIS;
DRAWTEXTEX(1,0,460,35,'显'),colorred,NOAXIS;
DRAWTEXTEX(1,0,460,50,'示'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,65,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,80,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,95,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,110,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,125,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,140,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,155,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,170,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,185,'|'),colorred,NOAXIS;
DRAWTEXTEX(1,0,465,200,'|'),colorred,NOAXIS;
STICKLINE(BARPOS=DATACOUNT-75,0,zh11,80,0),COLOR000099;
STICKLINE(BARPOS=DATACOUNT-65,0,zh12,80,0),COLOR000099;
STICKLINE(BARPOS=DATACOUNT-55,0,zh21,80,0),COLORBB00BB;
STICKLINE(BARPOS=DATACOUNT-45,0,zh22,80,0),COLORBB00BB;
STICKLINE(BARPOS=DATACOUNT-35,0,zh31,80,0),COLOR0099FF;
STICKLINE(BARPOS=DATACOUNT-25,0,zh32,80,0),COLOR0099FF;
STICKLINE(BARPOS=DATACOUNT-15,0,zh41,80,0),COLORBB0000;
STICKLINE(BARPOS=DATACOUNT-5,0,zh42,80,0),COLORBB0000;
DRAWTEXT(BARPOS=DATACOUNT-78,0,' 净利\n'+NUMTOSTR(zh11,2)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-68,0,' 同行\n'+NUMTOSTR(zh12,2)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-58,0,' 净资\n'+NUMTOSTR(zh21,2)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-48,0,' 同行\n'+NUMTOSTR(zh22,2)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-38,0,' 资负\n'+NUMTOSTR(zh31,2)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-28,0,' 同行\n'+NUMTOSTR(zh32,2)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-18,0,' 含金\n'+NUMTOSTR(zh41,2)),PXUP60,ColorFFFFFF;
DRAWTEXT(BARPOS=DATACOUNT-8,0,' 同行\n'+NUMTOSTR(zh42,2)),PXUP60,ColorFFFFF;
|