公司基本面 {公司基本面指标可与任何通达信主图叠加}
涨跌:=REF(C,1);
涨停:=IF((C-涨跌)*100/涨跌>=(10-0.01*100/涨跌),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(涨停,H,L,0,0),COLORRED;
跌停:=IF((涨跌-C)*100/涨跌>=(10-0.01*100/涨跌),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLOR808000;
换手:HSL.HSL,NODRAW;
成交量:VOL/10000,NODRAW;
昨日成交额:REF(AMOUNT/100000000,1),NODRAW;{亿元}
今日成交额:AMOUNT/100000000,NODRAW;
ZTCS:=COUNT(涨停,BARSLAST(涨停+1));
DRAWTEXT_FIX(FINANCE(3)=3||FINANCE(3)=4,0,0.37,0,STRCAT('涨停价: ',VAR2STR(ZTPRICE(REF(C,1),0.2),2)));
DRAWTEXT_FIX(FINANCE(3)=3||FINANCE(3)=4,0,0.42,0,STRCAT('跌停价: ',VAR2STR(DTPRICE(REF(C,1),0.2),2)));
DRAWTEXT_FIX(FINANCE(3)=1||FINANCE(3)=2,0,0.37,0,STRCAT('涨停价: ',VAR2STR(ZTPRICE(REF(C,1),0.1),2)));
DRAWTEXT_FIX(FINANCE(3)=1||FINANCE(3)=2,0,0.42,0,STRCAT('跌停价: ',VAR2STR(DTPRICE(REF(C,1),0.1),2)));
开盘价:OPEN,NODRAW;
最高价:HIGH,NODRAW;
最低价:LOW,NODRAW;
板块上涨家:HY_INDEXADV,NODRAW;
板块下跌家:HY_INDEXDEC,NODRAW;
{涨跌停家数}
涨停数:"880006$C",NODRAW;
跌停数:"880006$O",NODRAW;
GZT1:=STRCAT(' 共涨停: ',CON2STR(ZTCS,0));
GZT2:=STRCAT(GZT1,'次');
SSTS1:=STRCAT(' 上市: ',CON2STR(FINANCE(42),0));
SSTS2:=STRCAT(SSTS1,'天');
NTZZT1:=STRCAT(' 距今:',CON2STR(CONST(BARSLAST(涨停)),0));
NTZZT2:=STRCAT(NTZZT1,'天有涨停');
ZTTJ1:=STRCAT(SSTS2,GZT2);
ZTTJ2:=STRCAT(ZTTJ1,NTZZT2);
ZTTJ:=STRCAT('涨停统计:',ZTTJ2);
DRAWTEXT_FIX(CURRBARSCOUNT=1,0,0.33,0,ZTTJ),COLORYELLOW;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(涨停)),REF(HIGH,BARSLAST(涨停)),0.1,0),COLORDDDD00;
STICKLINE(CLOSE,REF(LOW,BARSLAST(涨停)),REF(LOW,BARSLAST(涨停)),0.1,0),COLOR00DDDD;
竞价额:=DYNAINFO(15)/10000;{万元}
DRAWTEXT_FIX(C>0,0.00,0.46,0,VARCAT(VARCAT('竞价: ',VAR2STR(竞价额,0)),' 万')),
COLORMAGENTA;
CJE:=VOL*C/100,NODRAW;
主题1:=STRCAT('【主题投资】:',EXTERNSTR(0,1));
主营1:=STRCAT('【主营业务】:',EXTERNSTR(0,2));
主题和主营1:=STRCAT(主营1,' ■■ ');
主题和主营2:=STRCAT(主题和主营1,主题1);
主题和主营3:=STRCAT(STRCAT(STRCAT(STRCAT('【行业信息】:',HYBLOCK),' ■■ '),主题和主营2),'');
DRAWTEXT_FIX(1,0.95,0.98,1,主题和主营3),COLOR00FFFF;
TJ:=ISLASTBAR AND C<500;
DRAWTEXT_FIX(TJ,0.005,0.04,0,FGBLOCK),COLORGREEN;
所属板块:=STRCAT('所属板块: ',STRCAT(STRCAT(STRCAT('[行业]-',HYBLOCK),STRCAT(' [地域]-',DYBLOCK)),STRCAT(' [概念]-',GNBLOCK)));
主收同比:=STRCAT(' 主收同比: ',CON2STR(FINANCE(44),2));
市盈率:=STRCAT('市盈率: ',CON2STR(C/FINANCE(33),2));
市销率:=STRCAT(' 市销率: ',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));
市净率:=STRCAT(' 市净率: ',CON2STR(C/FINANCE(34),2));
毛利率:=STRCAT(' 毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
净利润率:=STRCAT(' 净利润率: ',CON2STR(FINANCE(30)/FINANCE(20)*100,2));
现金流:=STRCAT(' 现金流: ',CON2STR(FINANCE(25)/FINANCE(1),2));
利润同比:=STRCAT(' 利润同比: ',CON2STR(FINANCE(43),2));
DRAWTEXT_FIX(ISLASTBAR,0.003,0.11,0,市盈率);
DRAWTEXT_FIX(ISLASTBAR,0,0.14,0,市销率);
DRAWTEXT_FIX(ISLASTBAR,0,0.17,0,市净率);
DRAWTEXT_FIX(ISLASTBAR,0,0.21,0,毛利率);
DRAWTEXT_FIX(ISLASTBAR,0.1,0.21,0,现金流);
DRAWTEXT_FIX(ISLASTBAR,0.1,0.11,0,主收同比);
DRAWTEXT_FIX(ISLASTBAR,0.1,0.14,0,净利润率);
DRAWTEXT_FIX(ISLASTBAR,0.1,0.17,0,利润同比);
{业绩}
净资收益率:=STRCAT(' 净资收益率: ',CON2STR(FINANCE(29)/FINANCE(19)*100,2));
主营利润率:=STRCAT(' 主营利润率 ',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('当前业绩: ',STRCAT(STRCAT(净资收益率,毛利率),主营利润率));
{主图显示}
DRAWTEXT_FIX(ISLASTBAR,0.005,0.00,0,所属板块),COLOR00C0C0;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.07,0,当前业绩),COLOR00C0C0;
总额:=AMOUNT;
买:=IF(O=C AND (C-REF(C,1))/REF(C,1)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));
买%:=买/AMOUNT*100;
流入:=AMOUNT*买%/10000000000;
流出:=AMOUNT/100000000-流入;
净流:=(流入-流出);
总额3:=SUM(AMOUNT,3);
流入3:=SUM(流入,3);
流出3:=SUM(流出,3);
净流3:=SUM(流入-流出,3);
总额5:=SUM(AMOUNT,5);
流入5:=SUM(流入,5);
流出5:=SUM(流出,5);
净流5:=SUM(流入-流出,5);
总额10:=SUM(AMOUNT,10);
流入10:=SUM(流入,10);
流出10:=SUM(流出,10);
净流10:=SUM(流入-流出,10);
画:=CONST(FINDHIGH(总额10,0,190,1));
DRAWTEXT_FIX(1,0.71,0.07,0,'净流(亿):'),COLOR8080FF,COLORWHITE;
DRAWTEXT_FIX(1,0.78,0.05,0,'1日'),COLOR8080FF,COLORWHITE;
DRAWTEXT_FIX(1,0.83,0.05,0,'3日'),COLOR8080FF,COLORWHITE;
DRAWTEXT_FIX(1,0.88,0.05,0,'5日'),COLOR8080FF,COLORWHITE;
DRAWTEXT_FIX(1,0.93,0.05,0,'10日'),COLOR8080FF,COLORWHITE;
DRAWNUMBER_FIX(1,0.78,0.10,0,CONST((净流))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.83,0.10,0,CONST((净流3))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.88,0.10,0,CONST((净流5))),COLORYELLOW;
DRAWNUMBER_FIX(1,0.93,0.10,0,CONST((净流10))),COLORYELLOW;
股东人数:=FINANCE(8);
人均持股:=ROUND(FINANCE(7)/FINANCE(8));
DRAWTEXT_FIX(1,0.05,0.24,1,'股东人数:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.05,0.28,1,'人均持股:'),COLORYELLOW;
DRAWNUMBER_FIX(1,0.08,0.24,1,股东人数),COLORWHITE;
DRAWNUMBER_FIX(1,0.08,0.28,1,人均持股),COLORWHITE;
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;
Z值:=X1+X2+X3+X4+X5;
DRAWTEXT_FIX(1,0.85,0.01,1,'财务预警:'),COLORRED;
DRAWTEXT_FIX(Z值<1.2,0.838,0.11,1,' ●重 警●'),COLORLIRED;
DRAWTEXT_FIX( BETWEEN(Z值,1.2,2.6),0.838,0.11,1,' ○轻 警○'),COLOR0099FF;
DRAWTEXT_FIX(Z值>2.6,0.838,0.11,1,' ◎无 警◎'),COLORLIGREEN;
|
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!