主图:
{基本信息}
每股收益:=FINANCE2(3);
每股市盈率:=DYNAINFO(39);
每股净资产:=FINANCE2(4);
每股现金流:=FINANCE2(6);
主营收入同比:=FINANCE2(11);
净利润同比增长:=FINANCE2(10);
每股未分配:=FINANCE2(8);
每股公积金:=FINANCE2(7);
资产负债率:=FINANCE2(20)/FINANCE2(14)*100;
每股市净率:=DYNAINFO(58);
销shou毛利率:=FINANCE2(12);
净资产收益率:=FINANCE2(5);
总市值:=C*CAPITAL*VOLUNIT/100000000;
总股本:=FINANCE2(35)/10000;
流通盘:=FINANCE2(37)/10000;
DRAWTEXTABS(1,10,'■所属板块:'+BKNAME),COLOR00FFFF;
DRAWTEXTABS(1,25,'■主营业务:'+SELFSTRING('主营业务')),color00D7FF;
DRAWTEXTABS(1,40,'■主题库:'+SELFSTRING('主题库')),COLOR00A5FF;
DRAWTEXTABS(1,60,'■净利润同比增长:'+NUMTOSTRN(净利润同比增长,2)+'%'),LINETHICK1,COLORB48246;
DRAWTEXTABS(1,75,'■净资产收益率:'+NUMTOSTRN(净资产收益率,2)+'%'),LINETHICK1,COLORFFBF00;
DRAWTEXTABS(1,90,'■销shou毛利率:'+NUMTOSTRN(销shou毛利率,2)+'%'),LINETHICK1,COLOREBCE87;
DRAWTEXTABS(1,105,'■每股市盈率:'+NUMTOSTRN(每股市盈率,1)+'倍'),COLORD0E040;
DRAWTEXTABS(1,120,'■每股收益:'+NUMTOSTRN(每股收益,2)+'元'),COLOrD4FF7F;
DRAWTEXTABS(1,140,'■流通盘:'+NUMTOSTRN(流通盘,2)+'亿'),LINETHICK1,COLORFFFFFF;
DRAWTEXTABS(135,140,'总股本:'+NUMTOSTRN(总股本,2)+'亿'),LINETHICK1,COLOR808080;
DRAWTEXTABS(1,155,'■流通市值:'+DYNAINFO(57)/100000000+'亿'),COLOR808080;
DRAWTEXTABS(135,155,'总市值:'+DYNAINFO(56)/100000000+'亿'),COLOR808080;
{涨停}
ZT:=C/ref(C,1)>1.097;
XH:=FILTER(ZT,13);
BH:=BARSLAST(ZT);
CZ:=REF(H,BH)-REF(L,BH);
STICKLINE(ZT,REF(O,BH),REF(C,BH),7,0),COLORYELLOW;
DRAWTEXT(ZT,L*0.98,'涨停'),COLOR9314FF;
成交量副图:
{地量}
VOL,VOLSTICK;
AA:=SUMBARS(VOL,CAPITAL);
地量:IF(CAPITAL=0,AMOUNT=LLV(AMOUNT,34),VOL<MA(VOL,AA)/3) ,LINETHICK0;
STICKLINE(地量,VOL,0,7,0),COLORYELLOW;
{解禁股}
解禁股:=SelfString('限shou流通股. 大智慧');
XOffset:= 0;
YOffset:= 0;
lineHeight:= 18;
pos1:= STRFIND(解禁股, ';', 1);
pos2:= STRFIND(解禁股, ';', pos1 + 1);
pos3:= STRFIND(解禁股, ';', pos2 + 1);
pos4:= STRFIND(解禁股, ';', pos3 + 1);
pos5:= STRFIND(解禁股, ';', pos4 + 1);
str1:= STRMID(解禁股, 1 , pos1-1);
str2:= STRMID(解禁股, pos1 + 1, pos2 - pos1 - 1);
str3:= STRMID(解禁股, pos2 + 1, pos3 - pos2 - 1);
str4:= STRMID(解禁股, pos3 + 1, pos4 - pos3 - 1);
str5:= STRMID(解禁股, pos4 + 1, pos5 - pos4 - 1);
IF pos1 THEN DRAWTEXTABS(XOffset, YOffset + lineHeight , '解禁股: '+ str1), Color808080;
IF pos1 AND pos2 THEN DRAWTEXTABS(XOffset + 52, YOffset + lineHeight * 2, str2), Color908070;
IF pos1 AND pos2 AND pos3 THEN DRAWTEXTABS(XOffset + 52, YOffset + lineHeight * 3, str3), Color808080;
IF pos1 AND pos2 AND pos3 AND pos4 THEN DRAWTEXTABS(XOffset + 52, YOffset + lineHeight * 4, str4), Color908070;
IF pos1 AND pos2 AND pos3 AND pos4 AND pos5 THEN DRAWTEXTABS(XOffset + 52, YOffset + lineHeight * 5, str5), Color808080;
|