分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
当前位置：分析家公式网 → 软件中心 → 股票公式 → 飞狐公式
盈利能力指标（F10指标）
  • 软件大小：4.00 KB
  • 推荐星级：
  • 更新时间：2008-09-19 07:42:24
  • 软件类别： 国产软件 / 飞狐公式
  • 软件语言：简体中文
  • 授权方式： 解密版
  • 联系方式：暂无联系方式
  • 官方主页： Home Page
  • 点击大图：  【一键转帖到论坛】
  • 插件情况：
  • 运行环境：Win9X/2000/XP/2003/
  • 相关Tags：F10  盈利能力指标  
  • (0)0%
    (0)0%

软件介绍

F10公式—《盈利能力指标》（Wind、鹏搏）


{销shou毛利率-适用于Wind、鹏搏}
INPUT:N(2,1,3);
//确定F10种类
F10:=IF(F10FIND('Wind资讯就是',1)>0,2,IF(F10FIND('鹏搏资讯',1)>0,3,0));
DRAWTEXT(SYSPARAM(2)+20=BARPOS AND F10=0,15,'本公式不适合该种F10资料。'),COLOREEFF;
IF F10=0 THEN EXIT;

//设定最新指标名称
指标名称:=IF(N=1,'净资产收益率',IF(N=2,'主营业务利润率','销shou毛利率'));

WA:=IF(F10=2,F10FIND('最新简况→',10),F10FIND('财务指标-盈利能力',10));
//Wind临时
JA:=F10FIND('【3:利润构成与盈利能力】',WA+200);

VARIABLE:SJ[8]='str',SY[8]='str';
IF WA<0 then EXIT;
LTZ:=IF(F10=3,74,70);
SJT:=F10TEXT(F10FIND(IF(F10=3,'指标名称','★最新财务指标★'),WA),70);
SJJ:=STRRIGHT(SJT,69-STRFIND(SJT,IF(F10=2,'｜','│'),1)+2);
SYT:=F10TEXT(F10FIND(指标名称,WA),LTZ);
SYT:=STRRIGHT(SYT,LTZ-1-STRFIND(SYT,IF(F10=2,'｜','│'),1)+2);

//DRAWTEXT(SYSPARAM(2)+20=BARPOS,25,Syt);//调试用语句

FOR j=1 TO 4 DO BEGIN
  SJ[j]:=STRMID(SJJ,IF(F10=3,14*(j-1)+5,12*(j-1)+IF(j<4,5,4)),8);
  SY[j]:=LTRIM(STRMID(SYT,IF(F10=3,14*(j-1)+7,IF(F10=2,12*(j-1)+3,10*(j-1))),8));
END;

//DRAWTEXT(SYSPARAM(2)+20=BARPOS,15,SJ[1]);//调试用语句

DRAWTEXT(SYSPARAM(2)=BARPOS,0,'《'+指标名称+'》'+' \n \n最新日期：'+SJ[1]),ALIGN4,COLOREEFF;
TMP:=IF(STRCMP(STRMID(SJ[1],4,2),'12')=0,0,1);
WT:=IF(STRLEN(RTRIM(SJ[4]))>4,1,0);

XSL:=IF(DATACOUNT<60,1,5);
KG:='             ';
SJT1:=LTRIM(F10TEXT(IF(F10=2,F10FIND('财务指标(单位)',JA)+14,F10FIND('指标名称',WA+700)+12),56));
SYT1:=F10TEXT(F10FIND(指标名称, IF(F10=2,JA+100,WA+700))+18,56);

//DRAWTEXT(SYSPARAM(2)+20=BARPOS,15,SYT1);//调试用语句

FOR j=5 TO 8 DO BEGIN
  SJ[j]:=STRMID(SJT1,IF(F10=3,14*(j-5)+5,IF(F10=2,12*(j-5)+5,3)),8);
  SY[j]:=LTRIM(STRMID(SYT1,IF(F10=3,14*(j-5)+5,IF(F10=2,12*(j-5)+5,3)),8));
END;

最新:STRTONUM(IF(TMP=1 AND F10=2 AND N=3,SY[5],SY[1])),PRECISION4,COLORFFFFFF,LINETHICK;

IF TMP=1 AND F10=2 THEN BEGIN
    SJ[5]:=SJ[6]; SJ[6]:=SJ[7]; SJ[7]:=SJ[8]; //SJ[8]:=SJA[5];
    SY[5]:=SY[6]; SY[6]:=SY[7]; SY[7]:=SY[8];// SY[8]:=SYA[5];
END;
IF NOT(F10=2 AND N=3) THEN BEGIN
  二期:STRTONUM(SY[2]),PRECISION4,COLORFFFF,LINETHICK;
  三期:STRTONUM(SY[3]),PRECISION4,COLORFF00FF,LINETHICK;
  四期:STRTONUM(SY[4]),PRECISION4,COLORFF00,LINETHICK;
  增长2:(最新/二期-1)*100,COLORFFFF00,LINETHICK;
END;

去年:STRTONUM(SY[5]),PRECISION4,COLOREEEEEE,LINETHICK;
前年:STRTONUM(SY[6]),PRECISION4,COLOREEEE,LINETHICK;
前二:STRTONUM(SY[7]),PRECISION4,COLOREE00EE,LINETHICK;
前三:STRTONUM(SY[8]),PRECISION4,COLOREE00,LINETHICK;
//倍增选:((一期/二期-1)*100>50 and 二期>=0.1)or((一期/STRTONUM(SY[5])-1)*100>=50 and STRTONUM(SY[5])>=0.1),LINETHICK;

EXPLAIN(1,'**'+指标名称-'(%)'+'**'),coloryellow;
IF NOT(F10=2 AND N=3) THEN BEGIN
  EXPLAIN(1,'***近期***\n'+SJ[1]+'：'+NUMTOSTR(STRTONUM(SY[1]),4)+STRRIGHT('  '+NUMTOSTR((最新/二期-1)*100,2)+'%',10)),colorcyan;
  EXPLAIN(1,SJ[2]+'：'+NUMTOSTR(STRTONUM(SY[2]),4)+STRRIGHT('  '+NUMTOSTR((二期/三期-1)*100,2)+'%',10)),colorcyan;
  EXPLAIN(1,SJ[3]+'：'+NUMTOSTR(STRTONUM(SY[3]),4)+STRRIGHT('  '+NUMTOSTR((三期/if(四期<>0,四期,1)-1)*100,2)+'%',10)),colorcyan;
  EXPLAIN(WT,SJ[4]+'：'+NUMTOSTR(STRTONUM(SY[4]),4)),colorcyan;
END;
EXPLAIN(TMP=1 AND F10=2 AND N=3,'***近期***\n'+SJ[1]+'：'+NUMTOSTR(最新,2)),colorcyan;

EXPLAIN(WT,'***往年***\n'+SJ[5]+'：'+NUMTOSTR(STRTONUM(SY[5]),4)+STRRIGHT('  '+NUMTOSTR((去年/前年-1)*100,2)+'%',10)),colorgreen;
EXPLAIN(WT,SJ[6]+'：'+NUMTOSTR(STRTONUM(SY[6]),4)+STRRIGHT('  '+NUMTOSTR((前年/前二-1)*100,2)+'%',10)),colorgreen;
EXPLAIN(WT,SJ[7]+'：'+NUMTOSTR(STRTONUM(SY[7]),4)+STRRIGHT('  '+NUMTOSTR((前二/前三-1)*100,2)+'%',10)),colorgreen;
EXPLAIN(WT,SJ[8]+'：'+NUMTOSTR(STRTONUM(SY[8]),4)),colorgreen;

值2:=IF(TMP,去年,前年),LINETHICK;
值3:=IF(TMP,前年,前二),LINETHICK;
值4:=IF(TMP,前二,前三),LINETHICK;

IF DATACOUNT>20 THEN BEGIN
//画柱线
-0.05,COLOR99;
A3:=SYSPARAM(3);AG:=INTPART((SYSPARAM(3)-SYSPARAM(2))/IF(DATACOUNT>120,20,20));A5:=SYSPARAM(5);
//STICKLINE(BARPOS=A3-AG*2,0,一期,AG*4,0),colorFF,LINETHICK2;
STICKLINE(BARPOS=A3-AG*2,0,最新,AG*4,0),colorFF,LINETHICK2;
STICKLINE(BARPOS=A3-AG*5,0,值2,AG*4,0),colorFFFF,LINETHICK2;
STICKLINE(BARPOS=A3-AG*8,0,值3,AG*4,0),colorFFFF00,LINETHICK2;
STICKLINE(BARPOS=A3-AG*11,0,值4,AG*4,0),colorFF00,LINETHICK2;
//显示数值
DRAWNUMBER(BARPOS=A3-AG*1,IF(最新<0,最新/2,0),最新,3),,COLORFFD000,ALIGN,PXUP30;
DRAWNUMBER(BARPOS=A3-AG*4,IF(值2<0,值2/2,0),值2,3),COLORFFD000,ALIGN,PXUP30;
DRAWNUMBER(BARPOS=A3-AG*7,IF(值3<0,值3/2,0),值3,3),,COLORFFD000,ALIGN,PXUP30;
DRAWNUMBER(BARPOS=A3-AG*10,IF(值4<0,值4/2,0),值4,3),,COLORFFD000,ALIGN,PXUP30;
//显示时间
DRAWTEXT(BARPOS=A3-AG*3,0,SJ[1]),COLORCCEE90,ALIGN5,PXDN5;
DRAWTEXT(BARPOS=A3-AG*6,0,IF(TMP,SJ[5],SJ[6])),COLORCCEE90,ALIGN5,PXDN5;
DRAWTEXT(BARPOS=A3-AG*9,0,IF(TMP,SJ[6],SJ[7])),COLORCCEE90,ALIGN5,PXDN5;
DRAWTEXT(BARPOS=A3-AG*12,0,IF(TMP,SJ[7],SJ[8])),COLORCCEE90,ALIGN5,PXDN5;
END;
//
{参数精灵：
选择指标：Param#1(1-3)
1- 净资产收益率  2- 主营业务利润率  3- 销shou毛利率
 

地址


·上一软件：基金持仓
·下一软件：现金流量

软件评论评论内容只代表网友观点，与本站立场无关！

   评论摘要(共 0 条，得分 0 分，平均 0 分) 查看完整评论

说明

* 使用方法：点击上面蓝色块，打开新页面按照提示进行

* 本网站提供的各种股票软件，例如大智慧软件，通达信软件，同花顺软件，东方财富通等等，和各种股票公式指标，例如大智慧公式，通达信公式，同花顺公式，文华公式，博易大师公式，股票价格计算公式等等公式指标等，都来源网上公开来源收集

本网提供的公式文件说明：
* alg格式飞狐股票公式，可以用飞狐交易师或者交易师软件导入；
* fnc格式大智慧新一代公式指标，可以用大智慧股票软件使用，少部分可以用分析家股票软件引入使用；
* exp格式大智慧经典版股票公式，仅可以用大智慧经典版股票软件引入使用；
* tni和tnc格式通达信股票公式，仅可以用通达信新引入使用，例如可以用通达信股票软件引入使用；
* tne，tn6格式通达信公式，可以用通达信公式编辑器5.0版导入，推荐通达信金融终端版本；
* hxf格式同花顺股票公式，仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!

* 关于股票公式时间限制,如果在引入大智慧公式，交易师公式或者飞狐公式的时候，发现公式名称栏是空白的，这时候调整电脑时间到1997年，又能出现公式名称，并且能正常显示，可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式，通达信公式，同花顺公式,操盘手公式,飞狐公式，博易大师公式，金字塔公式，文华公式和交易师公式等等公式的密码，本网可帮恢复源码，有.偿.服.务无意勿扰，点击在线咨询联系我。

* 关于股票公式源码编辑
本网提供的源码，一般都可以编辑成公式，如果不明白公式的编辑，在本页右侧教程录像可参考，或者找公式教程资料学习，请搜索：教程

* 如果您发现软件内容或者链接错误，请点击报告错误谢谢！
* 站内提供的所有软件包含源码均是由网上搜集，若侵犯了你的版权利益，请联系通知我们!

~

栏目导航

本类热门

相关软件

如何导入公式

关于本站 | 网站帮助 | 广告合作 | 声明 | 友情连接 | 网站地图 |
分析家公式网声明：本站所有股票公式软件资料均网上公开收集，如侵权请联系删帖。站内所有广告，均与本站无关！
Copyright © 2003-2022 fxjgsw.Com. All Rights Reserved .
页面执行时间：170.89840 毫秒