- 金币:
-
- 奖励:
-
- 热心:
-
- 注册时间:
- 2005-3-25
|
|
发表于 2008-11-25 10:48
|
MA1:MA(CLOSE,P1);
MA2:MA(CLOSE,P2);
MA3:MA(CLOSE,P3);
MA4:MA(CLOSE,P4);
MA5:MA(CLOSE,P5);
MA6:MA(CLOSE,P6);
MA7:MA(CLOSE,P7);
市值:=C*CAPITAL*VOLUNIT/100000000;
股本:=FINANCE(1)/10000;
流通:=CAPITAL/1000000;
人均持股:=CEILING(CAPITAL*100/selfdata('shx'));
市盈率:={DYNAINFO(39);{zzzzzzz}c/FINANCE(33);
市净率:=c/FINANCE(34);
F:=COST(5 );J:=COST(95 );
M:=COST(15 );N:=COST(85 );
F1:=(J-F)/(F+J)*100;M1:=(N-M)/(N+M)*100;
成本集中度:=F1;
成本柒拾集中度:=M1;
莸利比例:=WINNER(c )*100;
日换手率:=vol/CAPITAL*100;
K:=HHV( H,600 ); K1:=LLV(LOW , 89); K2:=K-K1;
F2:=100-((K-K2)/K*100);
跌幅:=F2;
DRAWTEXTABS(10,13,'市值:'+市值+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(95,13,'股本:'+股本+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(170,13,'流通:'+流通+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(245,13,'人均持:'+人均持股+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(330,13,'市盈率:'+市盈率+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(430,13,'市净率:'+市净率+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(510,13,'成本集中度:'+成本集中度+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(620,13,'莸利比例:'+莸利比例+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(715,13,'日换手率:'+日换手率+' '),LINETHICK1,colorwhite;
DRAWTEXTABS(810,13,'跌幅:'+跌幅+'% '),LINETHICK1,colorwhite;
净资产:=FINANCE(34);
净资收益率:=FINANCE(37);
最新收益:=FINANCE(33);
年度收益:=FINANCE(33);
最新现金:=PROFFIN(3048 , 0);
年度现金:=PROFFINON(3048,2005,1231);
毛利润率:=FINANCE(23)/FINANCE(20)*100;
净利润率:=FINANCE(30)/FINANCE(20)*100;
主营增长率:=PROFFIN(3059,0);
利润增长率:=PROFFIN(3060,0);
股东权益比:=FINANCE(36);
每股未分配:=FINANCE(32);
每股公积金:=FINANCE(18);
分配预案:=SELFSTRING('分配预案');
A1:=PROFFINoN(5003 ,2007 ,1231 );A2:=PROFFINoN(5009 ,2007 ,1231 );
A3:=PROFFINoN(5015 ,2007 ,1231 );A4:=PROFFINoN(5021 ,2007 ,1231 );
A5:=PROFFINoN(5027 ,2007 ,1231 );A6:=PROFFINoN(5033 ,2007 ,1231 );
A7:=PROFFINoN(5039 ,2007 ,1231 );A8:=PROFFINoN(5045 ,2007 ,1231 );
A9:=PROFFINoN(5051 ,2006 ,1231 );A10:=PROFFINoN(5057 ,2007 ,1231 );
年度持股率:=A1+A2+A3+A4+A5+A6+A7+A8+A9+A10;
B1:=PROFFINON(5003 ,2008 ,0331 );B2:=PROFFINON(5009 ,2008 ,0331 );
B3:=PROFFINON(5015 ,2008 ,0331 );B4:=PROFFINON(5021 ,2008 ,0331 );
B5:=PROFFINON(5027 ,2008 ,0331 );B6:=PROFFINON(5033 ,2008 ,0331 );
B7:=PROFFINON(5039 ,2008 ,0331 );B8:=PROFFINON(5045 ,2008 ,0331 );
B9:=PROFFINON(5051 ,2008 ,0331 );B10:=PROFFINON(5057 ,2008 ,0331 );
壹季持股率:=B1+B2+B3+B4+B5+B6+B7+B8+B9+B10;
C1:=PROFFININ(5003 ,2008 ,0630 );C2:=PROFFININ(5009 ,2008 ,0630 );
C3:=PROFFININ(5015 ,2008 ,0630 );C4:=PROFFININ(5021 ,2008 ,0630 );
C5:=PROFFININ(5027 ,2008 ,0630 );C6:=PROFFININ(5033 ,2008 ,0630 );
C7:=PROFFININ(5039 ,2008 ,0630 );C8:=PROFFININ(5045 ,2008 ,0630 );
C9:=PROFFININ(5051 ,2008 ,0630 );C10:=PROFFININ(5057 ,2008 ,0630 );
年中持股率:=C1+C2+C3+C4+C5+C6+C7+C8+C9+C10;
D1:=PROFFININ(5003 ,2008 ,0930 );D2:=PROFFININ(5009 ,2008 ,0930 );
D3:=PROFFININ(5015,2008 ,0930 );D4:=PROFFININ(5021 ,2008 ,0930 );
D5:=PROFFININ(5027 ,2008 ,0930 );D6:=PROFFININ(5033 ,2008 ,0930 );
D7:=PROFFININ(5039 ,2008 ,0930 );D8:=PROFFININ(5045 ,2008 ,0930 );
D9:=PROFFININ(5051 ,2008 ,0930 );D10:=PROFFININ(5057 ,2008 ,0930 );
参季持股率:=D1+D2+D3+D4+D5+D6+D7+D8+D9+D10;
N1:=PROFFIN(5003 ,0 );N2:=PROFFIN(5009 ,0 );N3:=PROFFIN(5015 , 0);
N4:=PROFFIN(5021 ,0 );N5:=PROFFIN(5027 , 0);N6:=PROFFIN(5033 ,0 );
N7:=PROFFIN(5039 ,0 );N8:=PROFFIN(5045 ,0 );N9:=PROFFIN(5051 ,0 );
N10:=PROFFIN(5057 ,0 ); NN:=N1+N2+N3+N4+N5+N6+N7+N8+N9+N10;
最新持股率:=NN;
DRAWTEXTABS(10,35,'净资产:'+净资产+'元 '),LINETHICK2,COLOR0000FF;
DRAWTEXTABS(130,35,'净资收益率:'+净资收益率+'% '),LINETHICK2,COLOR0000FF;
DRAWTEXTABS(270,35,'机构评级:'+selfstring('评级')),coloryellow;
DRAWTEXTABS(130,60,'最新收益:'+最新收益+'元 '),LINETHICK2,COLOR00FFFF;
DRAWTEXTABS(10,60,'年度收益:'+年度收益+'元 '),LINETHICK2,COLOR00FFFF;
DRAWTEXTABS(260,60,'分配预案:'+selfstring('分配预案')),colorFFCC99;
DRAWTEXTABS(10,85,'年度现金:'+年度现金+'元 '),LINETHICK2,COLOR00FF00;
DRAWTEXTABS(130,85,'最新现金:'+最新现金+'元 '),LINETHICK2,COLOR00FF00;
DRAWTEXTABS(10,110,'毛利润率:'+毛利润率+'% '),LINETHICK2,COLOR0000FF;
DRAWTEXTABS(130,110,'净利润率:'+净利润率+'% '),LINETHICK2,COLOR0000FF;
DRAWTEXTABS(10,135,'主营增长率:'+主营增长率+'% '),LINETHICK2,COLOR00FFFF;
;
DRAWTEXTABS(145,135,'利润增长率:'+利润增长率+'% '),LINETHICK2,COLOR00FFFF;
;
DRAWTEXTABS(10,160,'股东权益比:'+股东权益比+'% '),LINETHICK2,COLOR00FF00;
DRAWTEXTABS(145,160,'每股未分配:'+每股未分配+'元 '),LINETHICK2,COLOR00FF00;
DRAWTEXTABS(10,185,'年度持股率:'+年度持股率+'% '),LINETHICK2,COLOR0000FF;
DRAWTEXTABS(145,185,'壹季持股率:'+壹季持股率+'% '),LINETHICK2,COLOR0000FF;
DRAWTEXTABS(10,210,'年中持股率:'+年中持股率+'% '),LINETHICK2,colorwhite;
DRAWTEXTABS(145,210,'参季持股率:'+参季持股率+'% '),LINETHICK2,colorwhite;
DRAWTEXTABS(10,235,'最新持股率:'+最新持股率+'% '),LINETHICK2,COLOR00FF00; |
|
|