通达信财务业绩副图指标 源码 贴图
2024-03-28 09:25:00来源:本站整理浏览:583
通达信财务业绩副图指标 源码 贴图
DRAWTEXT_FIX(1,0.1,0.01,1,'股票名称:'),COLORRED;
DRAWTEXT_FIX(1,0.155,0.01,1,STKNAME),COLORYELLOW;
品种类型:=FINANCE(3);
所属板块:=HYBLOCK;
上市天数:=FINANCE(42);
{股总市值:=ROUND(FINANCE(41)/100000000);}
流通盘:=(CAPITAL/1000000);
流通市值:=ROUND(FINANCE(40)/100000000);
股东人数:=FINANCE(8);{公式网WWW.GPXIAZAI.COM}
人均持股:=ROUND(FINANCE(7)/FINANCE(8));
DRAWTEXT_FIX(1,0.08,0.15,1,'品种类型:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.25,1,'所属板块:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.35,1,'上市天数:'),COLORYELLOW;
{DRAWTEXT_FIX(1,0.1,0.45,1,'股总市值:'),COLORYELLOW;}
DRAWTEXT_FIX(1,0.08,0.45,1,'流通盘:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.55,1,'流通市值:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.65,1,'股东人数:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.75,1,'人均持股:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.25,1,HYBLOCK),COLORLIGREEN;
DRAWNUMBER_FIX(1,0.15,0.35,1,上市天数),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.45,1,流通盘),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.55,1,流通市值),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.65,1,股东人数),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.75,1,人均持股),COLORWHITE;
DRAWTEXT_FIX(品种类型=1,0.15,0.15,1,'沪深A股'),COLORMAGENTA;
{DRAWTEXT_FIX(品种类型=2,0.15,0.15,1,' 中 小 板'),COLORMAGENTA;}
DRAWTEXT_FIX(品种类型=3,0.15,0.15,1,' 创 业 板'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.18,0.35,1,'天'),COLORCYAN;
DRAWTEXT_FIX(1,0.185,0.45,1,' 亿股'),COLORCYAN;
DRAWTEXT_FIX(1,0.185,0.55,1,' 亿元'),COLORCYAN;
DRAWTEXT_FIX(1,0.18,0.65,1,'人'),COLORCYAN;
DRAWTEXT_FIX(1,0.18,0.75,1,'股'),COLORCYAN;
{一以上是:文字数字分开写法}
DRAWTEXT_FIX(1,0.326,0.01,1,'业绩指标(如下):'),COLORRED;
净资收益率:=(FINANCE(33)/FINANCE(34)*100);
销售毛利率:=CONST(((FINANCE(20)-FINANCE(21))/FINANCE(20)*100));
净利润比率:=(FINANCE(30)/FINANCE(20)*100);
主营利润率:=(FINANCE(23)/FINANCE(20)*100);
优质资产率:=((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19));{理论上越大越好但不同行业有不同标准};
现金负债比:=(FINANCE(25)/FINANCE(15));{缺长期负债或负债总额,理论上越大越好但不同行业有不同标准};
净利同增率:=FINANCE(43);
总市值(亿):FINANCE(41)/100000000,NODRAW; 净资产:FINANCE(34),NODRAW;
销净利率:FINVALUE(199),NODRAW; 净利润(万):FINANCE(30)/10000,NODRAW; 净利增长率:=FINVALUE(184),NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.15,0,STRCAT('净资收益率:',CON2STR(净资收益率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.25,0,STRCAT('营业毛利率:',CON2STR(销售毛利率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.35,0,STRCAT('营业净利率:',CON2STR(净利润比率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.45,0,STRCAT('营业利润率:',CON2STR(主营利润率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.55,0,STRCAT('优质资产率:',CON2STR(优质资产率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.65,0,STRCAT('现金负债比:',CON2STR(现金负债比,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.75,0,STRCAT('净利同增率:',CON2STR(净利同增率,2)))COLORWHITE;
DRAWTEXT_FIX(1,0.49,0.01,1,'财务指标(如下):'),COLORRED;
PB:=CONST(DYNAINFO(7) / FINANCE(34));
市销率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));
{每股收益季:=CONST(FINANCE(33)/(5-FINANCE(37)));}
每股收益:=CONST(FINANCE(38));{最近一期}
每股现金流:=CONST((FINANCE(25)/FINANCE(1)));
每股未分配:=CONST(FINANCE(32));
每股公积金:=CONST(FINANCE(18));
PE:=CONST(C/FINANCE(33));
DRAWTEXT_FIX(ISLASTBAR,0.37,0.15,0,STRCAT('市净率:',CON2STR(PB,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.25,0,STRCAT('市销率:',CON2STR(市销率,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.35,0,STRCAT('市盈率:',CON2STR(PE,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.45,0,STRCAT('每股收益:',CON2STR(每股收益,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.55,0,STRCAT('每股现金流:',CON2STR(每股现金流,2)))COLORYELLOW;
{DRAWTEXT_FIX(ISLASTBAR,0.37,0.65,0,STRCAT('每股未分配:',CON2STR(每股未分配,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.75,0,STRCAT('每股公积金:',CON2STR(每股公积金,2)))COLORYELLOW;
{DRAWTEXT_FIX(1,0.37,0.15,0,STRCAT(STRCAT('市净率:',CON2STR(PB,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.25,0,STRCAT(STRCAT('市销率:',CON2STR(市销率,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.35,0,STRCAT(STRCAT('市盈率:',CON2STR(PE,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.45,0,STRCAT(STRCAT('每股收益:',CON2STR(每股收益,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.55,0,STRCAT(STRCAT('每股现金流:',CON2STR(每股现金流,2)),' ')),COLORYELLOW;}
DRAWTEXT_FIX(1,0.37,0.65,0,STRCAT(STRCAT('每股未分配:',CON2STR(每股未分配,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.75,0,STRCAT(STRCAT('每股公积金:',CON2STR(每股公积金,2)),' ')),COLORYELLOW;
{二以上是文字数字一起写,用或不用ISLASTBAR函数}
主力筹码估算:=EMA(WINNER(CLOSE)*70,3),NODRAW,LINETHICK0;
散户筹码估算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW;
散户套牢比率:=散户筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;
主力控盘比率:=主力筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;
DRAWTEXT_FIX(1,0.0,0.93,0,STRCAT(STRCAT('■主力筹码估算: ',CON2STR(主力筹码估算,2)),'%')),COLORLIRED;
DRAWTEXT_FIX(1,0.205,0.93,0,STRCAT(STRCAT('主力控盘比率: ',CON2STR(主力控盘比率,2)),'%')),COLORLIRED;
{三以上是文字数字一起写,不用ISLASTBAR函数}
{风险系数}
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替}
X3:=FINANCE(23)/FINANCE(10)*3.3;
X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}
X5:=FINANCE(20)/FINANCE(15)*0.999;
LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
获利筹码:=CONST(WINNER(C)*100);
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和:=(IF(SAT>1,1,SAT)*100);
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃:=(WRSI-WR10);
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));
DRAWTEXT_FIX(1,0.97,0.16,1,STRCAT(STRCAT('量能饱和: ',CON2STR(量能饱和,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(1,0.97,0.26,1,STRCAT(STRCAT('活跃度比: ',CON2STR(活跃度比,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(1,0.962,0.36,1,STRCAT(STRCAT('获利筹码: ',CON2STR(获利筹码,2)),'%')),COLORYELLOW;
{DRAWTEXT_FIX(1,0.96,0.01,1,'大盘趋势:'),COLORRED;
DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.95,0.16,1,'∧向上∧'),COLORRED;
{DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.95,0.11,1,'∧∧∧∧'),COLORRED;}
{DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.95,0.16,1,'∨向下∨'),COLORGREEN;
{DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.95,0.11,1,'∨∨∨∨'),COLORGREEN;}
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.53,0.93,0,'数据日期: '),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.83,0.93,0,' 财报更新第:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.925,0.93,0,FINANCE(37)),,COLORMAGENTA;
DRAWTEXT_FIX(1,0.97,0.93,1,'季度'),COLORCYAN;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.63,0.93,0,MACHINEDATE+19000000),COLORMAGENTA;
{-----优秀-------}
ER1:=净资收益率>=13.58;
ER2:=主营利润率>=22.4;
ER5:=净利润比率>=19.42;
SAX1:=每股收益>=0.175;
SAX4:=每股未分配>=2.57;
SAX5:=每股公积金>=3.53;
DP3:=销售毛利率>=49.13;
ZL:=IF((EMA(WINNER(CLOSE)*70,3))>41 AND ISLASTBAR,1,0);
优秀:=ER1 AND ER2 AND ER5 AND SAX1
AND SAX4 AND SAX5 AND DP3 AND ZL ;
DRAWTEXT_FIX(1,0.70,0.01,1,'基本面评估:'),COLORRED;
DRAWTEXT_FIX(优秀 AND ISLASTBAR,0.75,0.01,1,'[优秀]'),COLORYELLOW;
{较好}
ER12:=净资收益率<13.59 AND 净资收益率>6.23;
ER22:=主营利润率>=8.34;
ER52:=净利润比率>=7.31;
SAX12:= 每股收益>=0.061;
SAX42:=每股未分配>=1.185;
SAX52:=每股公积金>1.62;
DP32:=销售毛利率>=28.68;
ZL1:=IF((EMA(WINNER(CLOSE)*70,3))>=11.26 AND ISLASTBAR,1,0);
{ER42:=主营业增长率>1; SAX22:=每股净资产>0.2; DP42:=换手率>0.5; WMF12:=量比>0.5;}
较好:=ER12 AND ER22 AND ER52 AND SAX12
AND SAX42 AND SAX52 AND DP32 AND ZL1;
DRAWTEXT_FIX(较好 AND ISLASTBAR,0.75,0.01,1,'[良好]'),COLORYELLOW;
{指标偏低}
ER偏低:=净资收益率<=0.27;
ER2偏低:=主营利润率<=-1.27;
ER3偏低:=净利润比率<=0.34;
SAX偏低:=每股收益<=0.002;
SAX2偏低:=每股未分配<=0.26;
SAX3偏低:=每股公积金<=0.39;
DP偏低:=销售毛利率<=4.2;{排名后100}
ZL偏低:=IF(((EMA(WINNER(CLOSE)*70,3))<2.81 AND ISLASTBAR),1,0);
偏低:=IF((ER偏低 OR ER2偏低 OR ER3偏低 OR SAX偏低
OR SAX2偏低 OR SAX3偏低 OR DP偏低 OR ZL偏低) AND ISLASTBAR=1,1,0) ;
{一般};
一般:=IF((较好!=1 AND 优秀!=1 AND ZL偏低!=1 AND ISLASTBAR=1),1,0);
DRAWTEXT_FIX(一般 AND ISLASTBAR=1,0.75,0.01,1,'[一般]'),COLORYELLOW;
坏账:=FINVALUE(11)/(FINANCE(19));
投资:=FINVALUE(35)/(FINANCE(19));
负债:=FINVALUE(210)/100;
存货:=FINVALUE(17)/(FINANCE(19));
合计:=(坏账+投资+负债+存货)/4,COLORBROWN,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.168,0,STRCAT('综合评估:',CON2STR(合计,2)))COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.26,0,STRCAT('坏账评估:',CON2STR(坏账,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.36,0,STRCAT('投资评估:',CON2STR(投资,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.46,0,STRCAT('负债评估:',CON2STR(负债,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.56,0,STRCAT('存货评估:',CON2STR(存货,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.46,0,STRCAT('坏账等级:',IF(坏账<0.15 AND 坏账>=0 ,'低',IF(坏账<0.35 AND 坏账>=0.15 ,'正常',IF(坏账<0.45 AND 坏账>=0.35 ,'中',IF(坏账>=0.45 OR 坏账<0 ,'高','__')))))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.56,0,STRCAT('负债等级:',IF(负债<0.25 AND 负债>=0 ,'低',IF(负债<0.45 AND 负债>=0.25,'正常',IF(负债<0.65 AND 负债>=0.45 ,'中',IF(负债>=0.65 OR 负债<0 ,'高','__')))))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.66,0,STRCAT('财务风险等级:',IF(合计<0.3 AND 合计>=0 ,'低风险',IF(合计<0.5 AND 合计>=0.3 ,'中风险',IF(合计>=0.5 OR 合计<0 ,'高风险','__'))))),,COLORGREEN;
市盈率:=DYNAINFO(39);
市净率:=FINANCE(34)/C;
每股收益1:=FINANCE(33);
资产报酬率:=FINANCE(29)/FINANCE(10)*100;
股本报酬率:=FINANCE(29)/FINANCE(1)*100;
净值报酬率:=FINANCE(29)/FINANCE(19)*100;
营业纯益率:=FINANCE(29)/FINANCE(20)*100;
主营业务利润率:=FINANCE(21)/FINANCE(20)*100;
负债比率:=(FINANCE(15)+FINANCE(16))/FINANCE(10)*100;
存货周转率:=(FINANCE(20)-FINANCE(23))/FINANCE(27);
固定资产周转率:=FINANCE(20)/FINANCE(12);
市盈率评分:=IF(市盈率<=20 AND 市盈率>0,10,IF(市盈率<=40 AND 市盈率>20,9,
IF(市盈率<=60 AND 市盈率>40,8,IF(市盈率<=80 AND 市盈率>60,7,
IF(市盈率<=100 AND 市盈率>80,6,IF(市盈率<=130 AND 市盈率>100,5,
IF(市盈率<=160 AND 市盈率>130,4,IF(市盈率<=190 AND 市盈率>160,3,
IF(市盈率<=220 AND 市盈率>190,2,IF(市盈率<=250 AND 市盈率>220,1,0))))))))));
市净率评分:=IF(市净率>=1,10,IF(市净率<=1 AND 市净率>=0.9,9,
IF(市净率<=0.9 AND 市净率>0.8,8,IF(市净率<=0.8 AND 市净率>0.7,7,
IF(市净率<=0.7 AND 市净率>0.6,6,IF(市净率<=0.6 AND 市净率>0.5,5,
IF(市净率<=0.5 AND 市净率>0.4,4,IF(市净率<=0.4 AND 市净率>0.3,3,
IF(市净率<=0.3 AND 市净率>0.2,2,IF(市净率<=0.2 AND 市净率>0,1,0))))))))));
每股收益评分:=IF(每股收益>=2.7,10,IF(每股收益<2.7 AND 每股收益>=2.4,9,
IF(每股收益1<2.4 AND 每股收益1>=2.1,8,IF(每股收益1<2.1 AND 每股收益1>=1.8,7,
IF(每股收益1<1.8 AND 每股收益1>=1.5,6,IF(每股收益1<1.5 AND 每股收益1>=1.2,5,
IF(每股收益1<1.2 AND 每股收益1>=0.9,4,IF(每股收益1<0.9 AND 每股收益1>=0.6,3,
IF(每股收益1<0.6 AND 每股收益1>=0.3,2,IF(每股收益1<0.3 AND 每股收益1>=0,1,0))))))))));
资产报酬率评分:=IF(资产报酬率>=27,10,IF(资产报酬率<27 AND 资产报酬率>=24,9,
IF(资产报酬率<24 AND 资产报酬率>=21,8,IF(资产报酬率<21 AND 资产报酬率>=18,7,
IF(资产报酬率<18 AND 资产报酬率>=15,6,IF(资产报酬率<15 AND 资产报酬率>=12,5,
IF(资产报酬率<12 AND 资产报酬率>9,4,IF(资产报酬率<9 AND 资产报酬率>6,3,
IF(资产报酬率<6 AND 资产报酬率>=3,2,IF(资产报酬率<3 AND 资产报酬率>0,1,0))))))))));
股本报酬率评分:=IF(股本报酬率>=135,10,IF(股本报酬率<135 AND 股本报酬率>120,9,
IF(股本报酬率<120 AND 股本报酬率>=105,8,IF(股本报酬率<105 AND 股本报酬率>90,7,
IF(股本报酬率<90 AND 股本报酬率>=75,6,IF(股本报酬率<75 AND 股本报酬率>60,5,
IF(股本报酬率<60 AND 股本报酬率>=45,4,IF(股本报酬率<45 AND 股本报酬率>30,3,
IF(股本报酬率<30 AND 股本报酬率>=15,2,IF(股本报酬率<15 AND 股本报酬率>0,1,0))))))))));
净值报酬率评分:=IF(净值报酬率>=100,10,IF(净值报酬率<100 AND 净值报酬率>80,9,
IF(净值报酬率<80 AND 净值报酬率>=70,8,IF(净值报酬率<70 AND 净值报酬率>60,7,
IF(净值报酬率<60 AND 净值报酬率>=50,6,IF(净值报酬率<50 AND 净值报酬率>40,5,
IF(净值报酬率<40 AND 净值报酬率>=30,4,IF(净值报酬率<30 AND 净值报酬率>20,3,
IF(净值报酬率<20 AND 净值报酬率>=10,2,IF(净值报酬率<10 AND 净值报酬率>=0,1,0))))))))));
营业纯益率评分:=IF(营业纯益率>=60,10,IF(营业纯益率<60 AND 营业纯益率>=50,9,
IF(营业纯益率<50 AND 营业纯益率>=40,8,IF(营业纯益率<40 AND 营业纯益率>=30,7,
IF(营业纯益率<30 AND 营业纯益率>=20,6,IF(营业纯益率<20 AND 营业纯益率>15,5,
IF(营业纯益率<15 AND 营业纯益率>=10,4,IF(营业纯益率<10 AND 营业纯益率>5,3,
IF(营业纯益率<5 AND 营业纯益率>=3,2,IF(营业纯益率<3 AND 营业纯益率>=0,1,0))))))))));
主营利润率评分:=IF(主营业务利润率>=60,10,IF(主营业务利润率<60 AND 主营业务利润率>50,9,
IF(主营业务利润率<50 AND 主营业务利润率>=45,8,IF(主营业务利润率<45 AND 主营业务利润率>=40,7,
IF(主营业务利润率<40 AND 主营业务利润率>=35,6,IF(主营业务利润率<35 AND 主营业务利润率>=30,5,
IF(主营业务利润率<30 AND 主营业务利润率>=25,4,IF(主营业务利润率<25 AND 主营业务利润率>=20,3,
IF(主营业务利润率<20 AND 主营业务利润率>=10,2,IF(主营业务利润率<10 AND 主营业务利润率>=0,1,0))))))))));
负债比率评分:=IF(负债比率<=0,10,IF(负债比率>0 AND 负债比率<10,9,
IF(负债比率>10 AND 负债比率<=20,8,IF(负债比率>20 AND 负债比率<=30,7,
IF(负债比率>30 AND 负债比率<=40,6,IF(负债比率>40 AND 负债比率<=50,5,
IF(负债比率>50 AND 负债比率<=60,4,IF(负债比率>60 AND 负债比率<=70,3,
IF(负债比率>70 AND 负债比率<=80,2,IF(负债比率>80 AND 负债比率<=100,1,0))))))))));
存货周转率评分:=IF(存货周转率>=80,5,IF(存货周转率<80 AND 存货周转率>=60,4,
IF(存货周转率<60 AND 存货周转率>=40,3,IF(存货周转率<40 AND 存货周转率>=20,2,
IF(存货周转率<20 AND 存货周转率>=0,1,0)))));
资产周转率评分:=IF(固定资产周转率>=20,5,IF(固定资产周转率<20 AND 固定资产周转率>=15,4,
IF(固定资产周转率<15 AND 固定资产周转率>=10,3,IF(固定资产周转率<10 AND 固定资产周转率>=5,2,
IF(固定资产周转率<5 AND 固定资产周转率>=0,1,0)))));
估值评分:=市盈率评分+市净率评分+每股收益评分,COLORRED,NODRAW;
收益评分:=资产报酬率评分+股本报酬率评分+净值报酬率评分+营业纯益率评分+主营利润率评分,NODRAW;
资产评分:=负债比率评分+存货周转率评分+资产周转率评分,COLORYELLOW,NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.26,0,STRCAT('估值评分:',CON2STR(估值评分,2))),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.36,0,STRCAT('收益评分:',CON2STR(收益评分,2))),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.46,0,STRCAT('资产评分:',CON2STR(资产评分,2))),COLORLIRED;
评分:=估值评分+收益评分+资产评分;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.56,0,STRCAT('总评分:',CON2STR(评分,2))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.66,0,STRCAT('经营状况等级:',IF(评分<40 AND 评分>=30 ,'(合格)',IF(评分<50 AND 评分>=40 ,'(良好)',IF(评分<30 AND 评分>=0 ,'(不合格)',IF(评分>=50,'(优秀)','__')))))),COLORRED;
DRAWTEXT_FIX(1,0.775,0.66,1,'说明:估值评分没显示表示业绩亏损'),COLORRED;
DRAWTEXT_FIX(1,0.805,0.76,1,'说明:资产评分没显示表示为金融类行业'),COLORRED;
DRAWTEXT_FIX(1,0.753,0.095,1,'备注:需下载专业财务数据(盘后)'),COLORRED;
DRAWTEXT_FIX(1,0.155,0.01,1,STKNAME),COLORYELLOW;
品种类型:=FINANCE(3);
所属板块:=HYBLOCK;
上市天数:=FINANCE(42);
{股总市值:=ROUND(FINANCE(41)/100000000);}
流通盘:=(CAPITAL/1000000);
流通市值:=ROUND(FINANCE(40)/100000000);
股东人数:=FINANCE(8);{公式网WWW.GPXIAZAI.COM}
人均持股:=ROUND(FINANCE(7)/FINANCE(8));
DRAWTEXT_FIX(1,0.08,0.15,1,'品种类型:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.25,1,'所属板块:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.35,1,'上市天数:'),COLORYELLOW;
{DRAWTEXT_FIX(1,0.1,0.45,1,'股总市值:'),COLORYELLOW;}
DRAWTEXT_FIX(1,0.08,0.45,1,'流通盘:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.55,1,'流通市值:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.65,1,'股东人数:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.08,0.75,1,'人均持股:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.15,0.25,1,HYBLOCK),COLORLIGREEN;
DRAWNUMBER_FIX(1,0.15,0.35,1,上市天数),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.45,1,流通盘),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.55,1,流通市值),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.65,1,股东人数),COLORWHITE;
DRAWNUMBER_FIX(1,0.15,0.75,1,人均持股),COLORWHITE;
DRAWTEXT_FIX(品种类型=1,0.15,0.15,1,'沪深A股'),COLORMAGENTA;
{DRAWTEXT_FIX(品种类型=2,0.15,0.15,1,' 中 小 板'),COLORMAGENTA;}
DRAWTEXT_FIX(品种类型=3,0.15,0.15,1,' 创 业 板'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.18,0.35,1,'天'),COLORCYAN;
DRAWTEXT_FIX(1,0.185,0.45,1,' 亿股'),COLORCYAN;
DRAWTEXT_FIX(1,0.185,0.55,1,' 亿元'),COLORCYAN;
DRAWTEXT_FIX(1,0.18,0.65,1,'人'),COLORCYAN;
DRAWTEXT_FIX(1,0.18,0.75,1,'股'),COLORCYAN;
{一以上是:文字数字分开写法}
DRAWTEXT_FIX(1,0.326,0.01,1,'业绩指标(如下):'),COLORRED;
净资收益率:=(FINANCE(33)/FINANCE(34)*100);
销售毛利率:=CONST(((FINANCE(20)-FINANCE(21))/FINANCE(20)*100));
净利润比率:=(FINANCE(30)/FINANCE(20)*100);
主营利润率:=(FINANCE(23)/FINANCE(20)*100);
优质资产率:=((FINANCE(19)-FINANCE(22)-FINANCE(27))/FINANCE(19));{理论上越大越好但不同行业有不同标准};
现金负债比:=(FINANCE(25)/FINANCE(15));{缺长期负债或负债总额,理论上越大越好但不同行业有不同标准};
净利同增率:=FINANCE(43);
总市值(亿):FINANCE(41)/100000000,NODRAW; 净资产:FINANCE(34),NODRAW;
销净利率:FINVALUE(199),NODRAW; 净利润(万):FINANCE(30)/10000,NODRAW; 净利增长率:=FINVALUE(184),NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.15,0,STRCAT('净资收益率:',CON2STR(净资收益率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.25,0,STRCAT('营业毛利率:',CON2STR(销售毛利率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.35,0,STRCAT('营业净利率:',CON2STR(净利润比率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.45,0,STRCAT('营业利润率:',CON2STR(主营利润率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.55,0,STRCAT('优质资产率:',CON2STR(优质资产率,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.65,0,STRCAT('现金负债比:',CON2STR(现金负债比,2)))COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.21,0.75,0,STRCAT('净利同增率:',CON2STR(净利同增率,2)))COLORWHITE;
DRAWTEXT_FIX(1,0.49,0.01,1,'财务指标(如下):'),COLORRED;
PB:=CONST(DYNAINFO(7) / FINANCE(34));
市销率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));
{每股收益季:=CONST(FINANCE(33)/(5-FINANCE(37)));}
每股收益:=CONST(FINANCE(38));{最近一期}
每股现金流:=CONST((FINANCE(25)/FINANCE(1)));
每股未分配:=CONST(FINANCE(32));
每股公积金:=CONST(FINANCE(18));
PE:=CONST(C/FINANCE(33));
DRAWTEXT_FIX(ISLASTBAR,0.37,0.15,0,STRCAT('市净率:',CON2STR(PB,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.25,0,STRCAT('市销率:',CON2STR(市销率,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.35,0,STRCAT('市盈率:',CON2STR(PE,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.45,0,STRCAT('每股收益:',CON2STR(每股收益,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.55,0,STRCAT('每股现金流:',CON2STR(每股现金流,2)))COLORYELLOW;
{DRAWTEXT_FIX(ISLASTBAR,0.37,0.65,0,STRCAT('每股未分配:',CON2STR(每股未分配,2)))COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.37,0.75,0,STRCAT('每股公积金:',CON2STR(每股公积金,2)))COLORYELLOW;
{DRAWTEXT_FIX(1,0.37,0.15,0,STRCAT(STRCAT('市净率:',CON2STR(PB,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.25,0,STRCAT(STRCAT('市销率:',CON2STR(市销率,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.35,0,STRCAT(STRCAT('市盈率:',CON2STR(PE,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.45,0,STRCAT(STRCAT('每股收益:',CON2STR(每股收益,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.55,0,STRCAT(STRCAT('每股现金流:',CON2STR(每股现金流,2)),' ')),COLORYELLOW;}
DRAWTEXT_FIX(1,0.37,0.65,0,STRCAT(STRCAT('每股未分配:',CON2STR(每股未分配,2)),' ')),COLORYELLOW;
DRAWTEXT_FIX(1,0.37,0.75,0,STRCAT(STRCAT('每股公积金:',CON2STR(每股公积金,2)),' ')),COLORYELLOW;
{二以上是文字数字一起写,用或不用ISLASTBAR函数}
主力筹码估算:=EMA(WINNER(CLOSE)*70,3),NODRAW,LINETHICK0;
散户筹码估算:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3),NODRAW;
散户套牢比率:=散户筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;
主力控盘比率:=主力筹码估算/(主力筹码估算+散户筹码估算)*100,NODRAW;
DRAWTEXT_FIX(1,0.0,0.93,0,STRCAT(STRCAT('■主力筹码估算: ',CON2STR(主力筹码估算,2)),'%')),COLORLIRED;
DRAWTEXT_FIX(1,0.205,0.93,0,STRCAT(STRCAT('主力控盘比率: ',CON2STR(主力控盘比率,2)),'%')),COLORLIRED;
{三以上是文字数字一起写,不用ISLASTBAR函数}
{风险系数}
X1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2;
X2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替}
X3:=FINANCE(23)/FINANCE(10)*3.3;
X4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额}
X5:=FINANCE(20)/FINANCE(15)*0.999;
LC:=REF(CLOSE,1);
WRSI:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
获利筹码:=CONST(WINNER(C)*100);
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
量能饱和:=(IF(SAT>1,1,SAT)*100);
WR10:=(HHV(HIGH,3)-CLOSE)/(HHV(HIGH,3)-LLV(LOW,3))*100;
活跃:=(WRSI-WR10);
活跃度比:=IF(活跃>=0,(活跃+100)/2,100-ABS((活跃-100)/2));
DRAWTEXT_FIX(1,0.97,0.16,1,STRCAT(STRCAT('量能饱和: ',CON2STR(量能饱和,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(1,0.97,0.26,1,STRCAT(STRCAT('活跃度比: ',CON2STR(活跃度比,2)),'%')),COLORYELLOW;
DRAWTEXT_FIX(1,0.962,0.36,1,STRCAT(STRCAT('获利筹码: ',CON2STR(获利筹码,2)),'%')),COLORYELLOW;
{DRAWTEXT_FIX(1,0.96,0.01,1,'大盘趋势:'),COLORRED;
DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.95,0.16,1,'∧向上∧'),COLORRED;
{DRAWTEXT_FIX( CONST(INDEXC) >SAR(4,2,20),0.95,0.11,1,'∧∧∧∧'),COLORRED;}
{DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.95,0.16,1,'∨向下∨'),COLORGREEN;
{DRAWTEXT_FIX( CONST(INDEXC) <SAR(4,2,20),0.95,0.11,1,'∨∨∨∨'),COLORGREEN;}
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.53,0.93,0,'数据日期: '),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.83,0.93,0,' 财报更新第:'),COLORYELLOW;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.925,0.93,0,FINANCE(37)),,COLORMAGENTA;
DRAWTEXT_FIX(1,0.97,0.93,1,'季度'),COLORCYAN;
DRAWNUMBER_FIX(CURRBARSCOUNT=1,0.63,0.93,0,MACHINEDATE+19000000),COLORMAGENTA;
{-----优秀-------}
ER1:=净资收益率>=13.58;
ER2:=主营利润率>=22.4;
ER5:=净利润比率>=19.42;
SAX1:=每股收益>=0.175;
SAX4:=每股未分配>=2.57;
SAX5:=每股公积金>=3.53;
DP3:=销售毛利率>=49.13;
ZL:=IF((EMA(WINNER(CLOSE)*70,3))>41 AND ISLASTBAR,1,0);
优秀:=ER1 AND ER2 AND ER5 AND SAX1
AND SAX4 AND SAX5 AND DP3 AND ZL ;
DRAWTEXT_FIX(1,0.70,0.01,1,'基本面评估:'),COLORRED;
DRAWTEXT_FIX(优秀 AND ISLASTBAR,0.75,0.01,1,'[优秀]'),COLORYELLOW;
{较好}
ER12:=净资收益率<13.59 AND 净资收益率>6.23;
ER22:=主营利润率>=8.34;
ER52:=净利润比率>=7.31;
SAX12:= 每股收益>=0.061;
SAX42:=每股未分配>=1.185;
SAX52:=每股公积金>1.62;
DP32:=销售毛利率>=28.68;
ZL1:=IF((EMA(WINNER(CLOSE)*70,3))>=11.26 AND ISLASTBAR,1,0);
{ER42:=主营业增长率>1; SAX22:=每股净资产>0.2; DP42:=换手率>0.5; WMF12:=量比>0.5;}
较好:=ER12 AND ER22 AND ER52 AND SAX12
AND SAX42 AND SAX52 AND DP32 AND ZL1;
DRAWTEXT_FIX(较好 AND ISLASTBAR,0.75,0.01,1,'[良好]'),COLORYELLOW;
{指标偏低}
ER偏低:=净资收益率<=0.27;
ER2偏低:=主营利润率<=-1.27;
ER3偏低:=净利润比率<=0.34;
SAX偏低:=每股收益<=0.002;
SAX2偏低:=每股未分配<=0.26;
SAX3偏低:=每股公积金<=0.39;
DP偏低:=销售毛利率<=4.2;{排名后100}
ZL偏低:=IF(((EMA(WINNER(CLOSE)*70,3))<2.81 AND ISLASTBAR),1,0);
偏低:=IF((ER偏低 OR ER2偏低 OR ER3偏低 OR SAX偏低
OR SAX2偏低 OR SAX3偏低 OR DP偏低 OR ZL偏低) AND ISLASTBAR=1,1,0) ;
{一般};
一般:=IF((较好!=1 AND 优秀!=1 AND ZL偏低!=1 AND ISLASTBAR=1),1,0);
DRAWTEXT_FIX(一般 AND ISLASTBAR=1,0.75,0.01,1,'[一般]'),COLORYELLOW;
坏账:=FINVALUE(11)/(FINANCE(19));
投资:=FINVALUE(35)/(FINANCE(19));
负债:=FINVALUE(210)/100;
存货:=FINVALUE(17)/(FINANCE(19));
合计:=(坏账+投资+负债+存货)/4,COLORBROWN,LINETHICK2;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.168,0,STRCAT('综合评估:',CON2STR(合计,2)))COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.26,0,STRCAT('坏账评估:',CON2STR(坏账,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.36,0,STRCAT('投资评估:',CON2STR(投资,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.46,0,STRCAT('负债评估:',CON2STR(负债,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.56,0,STRCAT('存货评估:',CON2STR(存货,2))),COLORLIGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.46,0,STRCAT('坏账等级:',IF(坏账<0.15 AND 坏账>=0 ,'低',IF(坏账<0.35 AND 坏账>=0.15 ,'正常',IF(坏账<0.45 AND 坏账>=0.35 ,'中',IF(坏账>=0.45 OR 坏账<0 ,'高','__')))))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.56,0,STRCAT('负债等级:',IF(负债<0.25 AND 负债>=0 ,'低',IF(负债<0.45 AND 负债>=0.25,'正常',IF(负债<0.65 AND 负债>=0.45 ,'中',IF(负债>=0.65 OR 负债<0 ,'高','__')))))),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.832,0.66,0,STRCAT('财务风险等级:',IF(合计<0.3 AND 合计>=0 ,'低风险',IF(合计<0.5 AND 合计>=0.3 ,'中风险',IF(合计>=0.5 OR 合计<0 ,'高风险','__'))))),,COLORGREEN;
市盈率:=DYNAINFO(39);
市净率:=FINANCE(34)/C;
每股收益1:=FINANCE(33);
资产报酬率:=FINANCE(29)/FINANCE(10)*100;
股本报酬率:=FINANCE(29)/FINANCE(1)*100;
净值报酬率:=FINANCE(29)/FINANCE(19)*100;
营业纯益率:=FINANCE(29)/FINANCE(20)*100;
主营业务利润率:=FINANCE(21)/FINANCE(20)*100;
负债比率:=(FINANCE(15)+FINANCE(16))/FINANCE(10)*100;
存货周转率:=(FINANCE(20)-FINANCE(23))/FINANCE(27);
固定资产周转率:=FINANCE(20)/FINANCE(12);
市盈率评分:=IF(市盈率<=20 AND 市盈率>0,10,IF(市盈率<=40 AND 市盈率>20,9,
IF(市盈率<=60 AND 市盈率>40,8,IF(市盈率<=80 AND 市盈率>60,7,
IF(市盈率<=100 AND 市盈率>80,6,IF(市盈率<=130 AND 市盈率>100,5,
IF(市盈率<=160 AND 市盈率>130,4,IF(市盈率<=190 AND 市盈率>160,3,
IF(市盈率<=220 AND 市盈率>190,2,IF(市盈率<=250 AND 市盈率>220,1,0))))))))));
市净率评分:=IF(市净率>=1,10,IF(市净率<=1 AND 市净率>=0.9,9,
IF(市净率<=0.9 AND 市净率>0.8,8,IF(市净率<=0.8 AND 市净率>0.7,7,
IF(市净率<=0.7 AND 市净率>0.6,6,IF(市净率<=0.6 AND 市净率>0.5,5,
IF(市净率<=0.5 AND 市净率>0.4,4,IF(市净率<=0.4 AND 市净率>0.3,3,
IF(市净率<=0.3 AND 市净率>0.2,2,IF(市净率<=0.2 AND 市净率>0,1,0))))))))));
每股收益评分:=IF(每股收益>=2.7,10,IF(每股收益<2.7 AND 每股收益>=2.4,9,
IF(每股收益1<2.4 AND 每股收益1>=2.1,8,IF(每股收益1<2.1 AND 每股收益1>=1.8,7,
IF(每股收益1<1.8 AND 每股收益1>=1.5,6,IF(每股收益1<1.5 AND 每股收益1>=1.2,5,
IF(每股收益1<1.2 AND 每股收益1>=0.9,4,IF(每股收益1<0.9 AND 每股收益1>=0.6,3,
IF(每股收益1<0.6 AND 每股收益1>=0.3,2,IF(每股收益1<0.3 AND 每股收益1>=0,1,0))))))))));
资产报酬率评分:=IF(资产报酬率>=27,10,IF(资产报酬率<27 AND 资产报酬率>=24,9,
IF(资产报酬率<24 AND 资产报酬率>=21,8,IF(资产报酬率<21 AND 资产报酬率>=18,7,
IF(资产报酬率<18 AND 资产报酬率>=15,6,IF(资产报酬率<15 AND 资产报酬率>=12,5,
IF(资产报酬率<12 AND 资产报酬率>9,4,IF(资产报酬率<9 AND 资产报酬率>6,3,
IF(资产报酬率<6 AND 资产报酬率>=3,2,IF(资产报酬率<3 AND 资产报酬率>0,1,0))))))))));
股本报酬率评分:=IF(股本报酬率>=135,10,IF(股本报酬率<135 AND 股本报酬率>120,9,
IF(股本报酬率<120 AND 股本报酬率>=105,8,IF(股本报酬率<105 AND 股本报酬率>90,7,
IF(股本报酬率<90 AND 股本报酬率>=75,6,IF(股本报酬率<75 AND 股本报酬率>60,5,
IF(股本报酬率<60 AND 股本报酬率>=45,4,IF(股本报酬率<45 AND 股本报酬率>30,3,
IF(股本报酬率<30 AND 股本报酬率>=15,2,IF(股本报酬率<15 AND 股本报酬率>0,1,0))))))))));
净值报酬率评分:=IF(净值报酬率>=100,10,IF(净值报酬率<100 AND 净值报酬率>80,9,
IF(净值报酬率<80 AND 净值报酬率>=70,8,IF(净值报酬率<70 AND 净值报酬率>60,7,
IF(净值报酬率<60 AND 净值报酬率>=50,6,IF(净值报酬率<50 AND 净值报酬率>40,5,
IF(净值报酬率<40 AND 净值报酬率>=30,4,IF(净值报酬率<30 AND 净值报酬率>20,3,
IF(净值报酬率<20 AND 净值报酬率>=10,2,IF(净值报酬率<10 AND 净值报酬率>=0,1,0))))))))));
营业纯益率评分:=IF(营业纯益率>=60,10,IF(营业纯益率<60 AND 营业纯益率>=50,9,
IF(营业纯益率<50 AND 营业纯益率>=40,8,IF(营业纯益率<40 AND 营业纯益率>=30,7,
IF(营业纯益率<30 AND 营业纯益率>=20,6,IF(营业纯益率<20 AND 营业纯益率>15,5,
IF(营业纯益率<15 AND 营业纯益率>=10,4,IF(营业纯益率<10 AND 营业纯益率>5,3,
IF(营业纯益率<5 AND 营业纯益率>=3,2,IF(营业纯益率<3 AND 营业纯益率>=0,1,0))))))))));
主营利润率评分:=IF(主营业务利润率>=60,10,IF(主营业务利润率<60 AND 主营业务利润率>50,9,
IF(主营业务利润率<50 AND 主营业务利润率>=45,8,IF(主营业务利润率<45 AND 主营业务利润率>=40,7,
IF(主营业务利润率<40 AND 主营业务利润率>=35,6,IF(主营业务利润率<35 AND 主营业务利润率>=30,5,
IF(主营业务利润率<30 AND 主营业务利润率>=25,4,IF(主营业务利润率<25 AND 主营业务利润率>=20,3,
IF(主营业务利润率<20 AND 主营业务利润率>=10,2,IF(主营业务利润率<10 AND 主营业务利润率>=0,1,0))))))))));
负债比率评分:=IF(负债比率<=0,10,IF(负债比率>0 AND 负债比率<10,9,
IF(负债比率>10 AND 负债比率<=20,8,IF(负债比率>20 AND 负债比率<=30,7,
IF(负债比率>30 AND 负债比率<=40,6,IF(负债比率>40 AND 负债比率<=50,5,
IF(负债比率>50 AND 负债比率<=60,4,IF(负债比率>60 AND 负债比率<=70,3,
IF(负债比率>70 AND 负债比率<=80,2,IF(负债比率>80 AND 负债比率<=100,1,0))))))))));
存货周转率评分:=IF(存货周转率>=80,5,IF(存货周转率<80 AND 存货周转率>=60,4,
IF(存货周转率<60 AND 存货周转率>=40,3,IF(存货周转率<40 AND 存货周转率>=20,2,
IF(存货周转率<20 AND 存货周转率>=0,1,0)))));
资产周转率评分:=IF(固定资产周转率>=20,5,IF(固定资产周转率<20 AND 固定资产周转率>=15,4,
IF(固定资产周转率<15 AND 固定资产周转率>=10,3,IF(固定资产周转率<10 AND 固定资产周转率>=5,2,
IF(固定资产周转率<5 AND 固定资产周转率>=0,1,0)))));
估值评分:=市盈率评分+市净率评分+每股收益评分,COLORRED,NODRAW;
收益评分:=资产报酬率评分+股本报酬率评分+净值报酬率评分+营业纯益率评分+主营利润率评分,NODRAW;
资产评分:=负债比率评分+存货周转率评分+资产周转率评分,COLORYELLOW,NODRAW;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.26,0,STRCAT('估值评分:',CON2STR(估值评分,2))),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.36,0,STRCAT('收益评分:',CON2STR(收益评分,2))),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.46,0,STRCAT('资产评分:',CON2STR(资产评分,2))),COLORLIRED;
评分:=估值评分+收益评分+资产评分;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.56,0,STRCAT('总评分:',CON2STR(评分,2))),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.53,0.66,0,STRCAT('经营状况等级:',IF(评分<40 AND 评分>=30 ,'(合格)',IF(评分<50 AND 评分>=40 ,'(良好)',IF(评分<30 AND 评分>=0 ,'(不合格)',IF(评分>=50,'(优秀)','__')))))),COLORRED;
DRAWTEXT_FIX(1,0.775,0.66,1,'说明:估值评分没显示表示业绩亏损'),COLORRED;
DRAWTEXT_FIX(1,0.805,0.76,1,'说明:资产评分没显示表示为金融类行业'),COLORRED;
DRAWTEXT_FIX(1,0.753,0.095,1,'备注:需下载专业财务数据(盘后)'),COLORRED;
- 上一篇公式:通达信擒暴龙副图指标 源码 贴图
- 下一篇公式:通达信青龙寻底选股指标 源码 贴图