
网有战事估值
{鹏搏资讯F10资料--取参数}
GDT1:=F10FIND('主要指标',100);
GDT2:=F10TEXT(GDT1+177,9);
GDT3:=F10TEXT(GDT1+180,6);
XXx:=STRTONUM(GDT3);
N:=MAX(MAX(IF(XXx=3,12/3,0),IF(XXx=6, 12/6,0)),MAX(IF(XXx=9,12/9,0),IF(XXx=12,12/12,0)));
{股东增减}
x1:=F10FIND('总户数',500);
x2:=F10FIND('占流通A股比例',500);
x3:=F10FIND('200',x1+40);
x4:=F10FIND('200',x3+40);
大股东本期占:=STRTONUM(STRRIGHT(F10TEXT(x2,20),6));
大股东上期占:=STRTONUM(STRRIGHT(F10TEXT(F10FIND('占流通A股比例',x2+20),20),6));
十大股东增减:=大股东本期占 - 大股东上期占;
//////////{网有战事估值}/////////
净资产:FINANCE(34),PRECISION2,LINETHICK,COLORWHITE;//净资产
净资率:FINANCE(37),PRECISION2,LINETHICK,COLORGREEN;//净资产收益率
NJSL:=净资率*n;//估计年净资产收益率
收益率倍数:IF(NJSL>=36 ,5.65,IF(NJSL>=35 and NJSL<36,5.5,IF(NJSL>=34 and NJSL<35,5.34,
IF(NJSL>=33 and NJSL<34,5.18,IF(NJSL>=32 and NJSL<33,5.02,IF(NJSL>=31 and NJSL<32,4.87,
IF(NJSL>=30 and NJSL<31,4.71,IF(NJSL>=29 and NJSL<30,4.55,IF(NJSL>=28 and NJSL<29,4.4,
IF(NJSL>=27 and NJSL<28,4.24,IF(NJSL>=26 and NJSL<27,4.09,IF(NJSL>=25 and NJSL<26,3.92,
IF(NJSL>=24 and NJSL<25,3.77,IF(NJSL>=23 and NJSL<24,3.61,IF(NJSL>=22 and NJSL<23,3.45,
IF(NJSL>=21 and NJSL<22,3.3,IF(NJSL>=20 and NJSL<21,3.14,IF(NJSL>=19 and NJSL<20,2.98,
IF(NJSL>=18 and NJSL<19,2.83,IF(NJSL>=17 and NJSL<18,2.67,IF(NJSL>=16 and NJSL<17,2.51,
IF(NJSL>=15 and NJSL<16,2.35,IF(NJSL>=14 and NJSL<15,2.2,IF(NJSL>=13 and NJSL<14,2.04,
IF(NJSL>=12 and NJSL<13,1.89,IF(NJSL>=11 and NJSL<12,1.73,IF(NJSL>=10 and NJSL<11,1.57,
IF(NJSL>=9 and NJSL<10,1.41,IF(NJSL>=8 and NJSL<9,1.26,IF(NJSL>=7 and NJSL<8,1.1,
IF(NJSL>=6 and NJSL<7,0.94,IF(NJSL>=5 and NJSL<6,0.74,IF(NJSL>=4 and NJSL<5,0.62,
IF(NJSL>=3 and NJSL<4,0.47,IF(NJSL>=2 and NJSL<3,0.31,0.31)
)))))))))))))))))))))))))))))))))),LINETHICK,COLORYELLOW;
壳子参数:IF(NJSL,1,0),LINETHICK,COLORWHITE;//根据中国的实际情况,7%以下加一元壳子钱.
流通盘:=FINANCE(7){流通A股},LINETHICK,COLORMAGENTA;
小盘倍数:=IF(流通盘<=3000,0.7,IF(流通盘<5000 and 流通盘>3000,0.6,
IF(流通盘<6000 and 流通盘>=5000,0.5,IF(流通盘<7000 and 流通盘>=6000,0.4,
IF(流通盘<8000 and 流通盘>=7000,0.3,IF(流通盘<8000 and 流通盘>=7000,0.3,
IF(流通盘<9000 and 流通盘>=8000,0.2,IF(流通盘>9000,0.1,0.1)))))))),LINETHICK,COLORWHITE;
{流通盘大小的壳子参数}
估值:=(净资产*收益率倍数 + 壳子参数 + 净资产*小盘倍数);
潜力排序:估值-C,PRECISION2,LINETHICK,COLORRED;//估价潜力排序
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,'该股估值: = '+NUMTOSTR(估值,2)+'元'),ALIGN4,COLORCYAN;
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,' 流通盘: = '+NUMTOSTR(流通盘,2)+'万股'
+' 小盘倍数'+NUMTOSTR(小盘倍数,2)),ALIGN4,COLORMAGENTA;
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,' \n \n时间参数: = '+NUMTOSTR(N,0)),ALIGN4,COLORGREEN;
DRAWTEXT(barpos=SYSPARAM(2),10,' \n \n 取数据日期(报表):'+GDT2),ALIGN4,COLORWHITE;
DRAWTEXT(BARPOS=SYSPARAM(2)+2,c,' \n \n \n \n十大股东增减: = '+NUMTOSTR(十大股东增减,2)+'%'),ALIGN4,COLORYELLOW;