gamson

价值排序-飞狐公式
{◆价值排序}
市盈率:=if(FINANCE(33){每股收益}>0,C/FINANCE(33){每股收益},0),LINETHICK;
QL1:=if(DYNAINFO(39){市盈率}>0,市盈率,0);
潜力排序L1/FINANCE(37){净资产收益率},LINETHICK,PRECISION2,COLORMAGENTA;//==================排序
{用法：潜力<1 and 潜力>0,越小越好}

净资产:=FINANCE(34);
比值排序:市盈率/FINANCE(37){净资产收益率},PRECISION2,LINETHICK,COLORGREEN;//==================排序
{以市盈率除以公司的增长率即ROE（净资产收益率）, 如果该值大于1，
则一般认为定价有点偏高，而如果该值小于1比较多，则认为价格很便宜．}

安全排序:C/FINANCE(34),PRECISION2,LINETHICK,COLORRED;//=========================排序
{买价如果超过净资产的2.2倍,价格就高了.这个比值和倍数,能够防止你头脑发热,
贸然买入.而是发现价值被市场低估的股票.}

{竖线}
x:=SYSPARAM(2)=BARPOS-20;
k:=((SYSPARAM(3)-SYSPARAM(2))/100);
x1:=SYSPARAM(2)+ROUND(60*k)=BARPOS;
x2:=SYSPARAM(2)+ROUND(89*k)=BARPOS;
VERTLINE(x or x1 or x2 ),colorgray;
{横线}
DRAWLINE(x,x+0,x2,x2+0,0),colorgray;
DRAWLINE(x,x+30,x2,x2+30,0),colorgray;
DRAWLINE(x,x+60,x2,x2+60,0),colorgray;
DRAWLINE(x,x+90,x2,x2+90,0),colorgray;
DRAWLINE(x,x+120,x2,x2+120,0),colorgray;
{}
GDW0:=F10FIND('净资产收益率(%)',1000);
GDT2:=F10TEXT(GDW0+25,8);//第三季度
GDT3:=F10TEXT(GDW0+39,8);//第二季度
GDT4:=F10TEXT(GDW0+54,6);//第一季度
GDT5:=F10TEXT(GDW0+67,8);//第四季度
DRAWTEXT(x,22,'  第四季度净增产增长率(%) =   '+GDT5),COLORWHITE;
DRAWTEXT(x,52,'  第三季度净增产增长率(%) =   '+GDT2),COLORCYAN;
DRAWTEXT(x,83,'  第二季度净增产增长率(%) =   '+GDT3),COLORGREEN;
DRAWTEXT(x,113,'  第一季度净增产增长率(%) =    '+GDT4),COLORYELLOW;
DRAWTEXT(x1,113,' 潜力<1,越小越好,潜力大 '),COLORYELLOW;
DRAWTEXT(x1,83,' 比值<1,越小越好,价便宜 '),COLORYELLOW;
DRAWTEXT(x1,52,' 安全<2.2,越小越好,票低估 '),COLORYELLOW;