分析家公式网,提供股票公式,股票软件用户登录  |  用户 注册
盈利能力指标(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-2024 70822.Com. All Rights Reserved .
页面执行时间:12,687.01000 毫秒