分析家公式网,提供指标公式,股票软件 用户登录  |  用户 注册
当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：单季利润，净利润指标（通达信公式 副图 源码 测试图）

软件名称：[B]单季利润，净利润指标（通达信公式 副图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win9X/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：8.00 KB
官方主页：Home Page
更新时间：2020-11-23 00:15:53
软件简介:

单季利润，净利润指标
源码奉送，可以自己修改！
{单季利润源码}
年份:=20;  {2020年就是20 2021就是21 以此类推}
第一季18:=FINONE(232,年份-2,331)/10000;
第二季18:=FINONE(232,年份-2,630)/10000;
第三季18:=FINONE(232,年份-2,930)/10000;
第四季18:=FINONE(232,年份-2,1231)/10000;
 
第一季18扣:=FINONE(233,年份-2,331)/10000;
第二季18扣:=FINONE(233,年份-2,630)/10000;
第三季18扣:=FINONE(233,年份-2,930)/10000;
第四季18扣:=FINONE(233,年份-2,1231)/10000;
DRAWTEXT_FIX(ISLASTBAR,0.60,0,0,STRCAT(CON2STR(年份-2,0),' 年')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.60,0.5,0,'扣非'),COLORRED;
STICKLINE(CURRBARSCOUNT=74 AND 第一季18>=0,0,第一季18,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=74 AND 第一季18<0,0,ABS(第一季18),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.10,0,STRCAT('[一季度] ',STRCAT(CON2STR(第一季18,2),'万元'))),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.60,0,STRCAT('[一季度] ',STRCAT(CON2STR(第一季18扣,2),'万元'))),COLORLIGRAY;
 
STICKLINE(CURRBARSCOUNT=73 AND 第二季18>=0,0,第二季18,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=73 AND 第二季18<0,0,ABS(第二季18),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.20,0,STRCAT('[二季度] ',STRCAT(CON2STR(第二季18,2),'万元'))),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.70,0,STRCAT('[二季度] ',STRCAT(CON2STR(第二季18扣,2),'万元'))),COLORLIGRAY;
 
STICKLINE(CURRBARSCOUNT=72 AND 第三季18>=0,0,第三季18,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=72 AND 第三季18<0,0,ABS(第三季18),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.30,0,STRCAT('[三季度] ',STRCAT(CON2STR(第三季18,2),'万元'))),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.80,0,STRCAT('[三季度] ',STRCAT(CON2STR(第三季18扣,2),'万元'))),COLORLIGRAY;
 
STICKLINE(CURRBARSCOUNT=71 AND 第四季18>=0,0,第四季18,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=71 AND 第四季18<0,0,ABS(第四季18),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.40,0,STRCAT('[四季度] ',STRCAT(CON2STR(第四季18,2),'万元'))),COLORLIGRAY;
DRAWTEXT_FIX(ISLASTBAR,0.55,0.90,0,STRCAT('[四季度] ',STRCAT(CON2STR(第四季18扣,2),'万元'))),COLORLIGRAY;
{分析家公式网 www.70822.com}
第一季19:=FINONE(232,年份-1,331)/10000;
第二季19:=FINONE(232,年份-1,630)/10000;
第三季19:=FINONE(232,年份-1,930)/10000;
第四季19:=FINONE(232,年份-1,1231)/10000;
 
第一季19扣:=FINONE(233,年份-1,331)/10000;
第二季19扣:=FINONE(233,年份-1,630)/10000;
第三季19扣:=FINONE(233,年份-1,930)/10000;
第四季19扣:=FINONE(233,年份-1,1231)/10000;
DRAWTEXT_FIX(ISLASTBAR,0.75,0,0,STRCAT(CON2STR(年份-1,0),' 年')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.5,0,'扣非'),COLORRED;
STICKLINE(CURRBARSCOUNT=69 AND 第一季19>=0,0,第一季19,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=69 AND 第一季19<0,0,ABS(第一季19),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.10,0,STRCAT('[一季度] ',STRCAT(CON2STR(第一季19,2),'万元'))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.60,0,STRCAT('[一季度] ',STRCAT(CON2STR(第一季19扣,2),'万元'))),COLORWHITE;
 
STICKLINE(CURRBARSCOUNT=68 AND 第二季19>=0,0,第二季19,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=68 AND 第二季19<0,0,ABS(第二季19),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.20,0,STRCAT('[二季度] ',STRCAT(CON2STR(第二季19,2),'万元'))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.70,0,STRCAT('[二季度] ',STRCAT(CON2STR(第二季19扣,2),'万元'))),COLORWHITE;
 
STICKLINE(CURRBARSCOUNT=67 AND 第三季19>=0,0,第三季19,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=67 AND 第三季19<0,0,ABS(第三季19),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.30,0,STRCAT('[三季度] ',STRCAT(CON2STR(第三季19,2),'万元'))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.80,0,STRCAT('[三季度] ',STRCAT(CON2STR(第三季19扣,2),'万元'))),COLORWHITE;
 
STICKLINE(CURRBARSCOUNT=66 AND 第四季19>=0,0,第四季19,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=66 AND 第四季19<0,0,ABS(第四季19),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.40,0,STRCAT('[四季度] ',STRCAT(CON2STR(第四季19,2),'万元'))),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.70,0.90,0,STRCAT('[四季度] ',STRCAT(CON2STR(第四季19扣,2),'万元'))),COLORWHITE;
 
第一季20:=FINONE(232,年份,331)/10000;
第二季20:=FINONE(232,年份,630)/10000;
第三季20:=FINONE(232,年份,930)/10000;
第四季20:=FINONE(232,年份,1231)/10000;
 
第一季20扣:=FINONE(233,年份,331)/10000;
第二季20扣:=FINONE(233,年份,630)/10000;
第三季20扣:=FINONE(233,年份,930)/10000;
第四季20扣:=FINONE(233,年份,1231)/10000;
DRAWTEXT_FIX(ISLASTBAR,0.9,0,0,STRCAT(CON2STR(年份,0),' 年')),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.9,0.5,0,'扣非'),COLORRED;
STICKLINE(CURRBARSCOUNT=64 AND 第一季20>=0,0,第一季20,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=64 AND 第一季20<0,0,ABS(第一季20),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.10,0,STRCAT('[一季度] ',STRCAT(CON2STR(第一季20,2),'万元'))),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.60,0,STRCAT('[一季度] ',STRCAT(CON2STR(第一季20扣,2),'万元'))),COLORYELLOW;
 
STICKLINE(CURRBARSCOUNT=63 AND 第二季20>=0,0,第二季20,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=63 AND 第二季20<0,0,ABS(第二季20),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.20,0,STRCAT('[二季度] ',STRCAT(CON2STR(第二季20,2),'万元'))),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.70,0,STRCAT('[二季度] ',STRCAT(CON2STR(第二季20扣,2),'万元'))),COLORYELLOW;
 
STICKLINE(CURRBARSCOUNT=62 AND 第三季20>=0,0,第三季20,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=62 AND 第三季20<0,0,ABS(第三季20),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.30,0,STRCAT('[三季度] ',STRCAT(CON2STR(第三季20,2),'万元'))),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.80,0,STRCAT('[三季度] ',STRCAT(CON2STR(第三季20扣,2),'万元'))),COLORYELLOW;
 
STICKLINE(CURRBARSCOUNT=61 AND 第四季20>=0,0,第四季20,2,0),COLORRED;
STICKLINE(CURRBARSCOUNT=61 AND 第四季20<0,0,ABS(第四季20),2,0),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.40,0,STRCAT('[四季度] ',STRCAT(CON2STR(第四季20,2),'万元'))),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.85,0.90,0,STRCAT('[四季度] ',STRCAT(CON2STR(第四季20扣,2),'万元'))),COLORYELLOW;
 
机构总家数:=FINONE(246,0,0);
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT('[机构总数] ',STRCAT(CON2STR(机构总家数,0),' 家'))),COLORYELLOW;
机构占比:=100*FINVALUE(247)/FINVALUE(239);
DRAWTEXT_FIX(ISLASTBAR,0.1,0.0,0,STRCAT('[机构占比] ',STRCAT(CON2STR(机构占比,2),' %'))),COLORYELLOW;
QFII:=FINONE(248,0,0);
DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,STRCAT('[QFII外资] ',STRCAT(CON2STR(QFII,0),' 家'))),COLORYELLOW;
QFII占比:=100*FINVALUE(249)/FINVALUE(239);
DRAWTEXT_FIX(ISLASTBAR,0.1,0.1,0,STRCAT('[QFII占比] ',STRCAT(CON2STR(QFII占比,2),' %'))),COLORYELLOW;
券商:=FINONE(250,0,0);
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,STRCAT('[证券券商] ',STRCAT(CON2STR(券商,0),' 家'))),COLORYELLOW;
券商占比:=100*FINVALUE(251)/FINVALUE(239);
DRAWTEXT_FIX(ISLASTBAR,0.1,0.2,0,STRCAT('[券商占比] ',STRCAT(CON2STR(券商占比,2),' %'))),COLO
[url=http://www.70822.com/soft/sort013/sort05/down-152259.html]单季利润，净利润指标（通达信公式 副图 源码 测试图）[/url]

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