K线界面显示基本面和限shou解禁 1、将解禁.txt导入到自定义数据里,名称必须是解禁。该数据是从同花顺官网导出的,可靠
2、将基本面和限shou解禁.txt内容复制到均线公式最后
效果如下:解禁最多可显示10行,最上面的是目前流通盘/总股本,下面是解禁日期、解禁量(万股)和解禁量占总股本的比例 公式源码: {K线显示基本面}
DRAWTEXTABS(0,10,BKNAME),COLORYELLOW;
DRAWTEXTABS(0,25,'流通(亿):'+STR(DYNAINFO(57)/100000000)),COLORYELLOW; DRAWTEXTABS(110,25,'市盈率:'+STR(DYNAINFO(39))),COLORYELLOW; DRAWTEXTABS(210,25,'净产收益率:'+STR(FINANCE2(5))),COLORYELLOW; DRAWTEXTABS(340,25,'报告期:'+STR(FINANCE2(1))),COLORYELLOW;
DRAWTEXTABS(0,40,'每股收益:'+STR(FINANCE2(3))),COLORYELLOW; DRAWTEXTABS(110,40,'净资产:'+STR(FINANCE2(4))),COLORYELLOW; DRAWTEXTABS(210,40,'每股现金流:'+STR(FINANCE2(6))),COLORYELLOW; DRAWTEXTABS(340,40,'净利(亿):'+STR(FINANCE2(33)/10000)),COLORYELLOW;
DRAWTEXTABS(0,55,'每股未分:'+STR(FINANCE2(8))),COLORYELLOW; DRAWTEXTABS(110,55,'公积金:'+STR(FINANCE2(7))),COLORYELLOW; DRAWTEXTABS(210,55,'现金流亿:'+STR(FINANCE2(23)/10000)),COLORYELLOW; DRAWTEXTABS(340,55,'净利同比:'+STR(FINANCE2(10))),COLORYELLOW;
DRAWTEXTABS(0,70,'机构吃货量:'+STR(DYNAINFO(104))),COLORYELLOW; DRAWTEXTABS(110,70,'吐量:'+STR(DYNAINFO(105))),COLORYELLOW; DRAWTEXTABS(210,70,'净量:'+STR(DYNAINFO(104)-DYNAINFO(105))),COLORYELLOW; DRAWTEXTABS(340,70,'未分利亿:'+STR((FINANCE2(34)/10000))),COLORYELLOW;
DRAWTEXTABS(0,85,'机构吃货数:'+STR(DYNAINFO(102))),COLORYELLOW; DRAWTEXTABS(110,85,'吐数:'+STR(DYNAINFO(103))),COLORYELLOW; DRAWTEXTABS(210,85,'净数:'+STR(DYNAINFO(102)-DYNAINFO(103))),COLORYELLOW; DRAWTEXTABS(340,85,'总负债亿:'+STR(FINANCE2(20)/10000)),COLORYELLOW;
{限shou解禁}
限shou解禁股:=Selfstring('解禁');
XXSJJOffset:= 480;
YXSJJOffset:= 25;
XSJJlineHeight:= 15;
XSJJpos1:= strFIND(限shou解禁股, ';', 1);
XSJJpos2:= strFIND(限shou解禁股, ';', XSJJpos1 + 1);
XSJJpos3:= strFIND(限shou解禁股, ';', XSJJpos2 + 1);
XSJJpos4:= strFIND(限shou解禁股, ';', XSJJpos3 + 1);
XSJJpos5:= strFIND(限shou解禁股, ';', XSJJpos4 + 1);
XSJJpos6:= strFIND(限shou解禁股, ';', XSJJpos5 + 1);
XSJJpos7:= strFIND(限shou解禁股, ';', XSJJpos6 + 1);
XSJJpos8:= strFIND(限shou解禁股, ';', XSJJpos7 + 1);
XSJJpos9:= strFIND(限shou解禁股, ';', XSJJpos8 + 1);
XSJJpos10:= strFIND(限shou解禁股, ';', XSJJpos9 + 1);
XSJJstr1:= strMID(限shou解禁股, 1 , XSJJpos1-1);
XSJJstr2:= strMID(限shou解禁股, XSJJpos1 + 1, XSJJpos2 - XSJJpos1 - 1);
XSJJstr3:= strMID(限shou解禁股, XSJJpos2 + 1, XSJJpos3 - XSJJpos2 - 1);
XSJJstr4:= strMID(限shou解禁股, XSJJpos3 + 1, XSJJpos4 - XSJJpos3 - 1);
XSJJstr5:= strMID(限shou解禁股, XSJJpos4 + 1, XSJJpos5 - XSJJpos4 - 1);
XSJJstr6:= strMID(限shou解禁股, XSJJpos5 + 1, XSJJpos6 - XSJJpos5 - 1);
XSJJstr7:= strMID(限shou解禁股, XSJJpos6 + 1, XSJJpos7 - XSJJpos6 - 1);
XSJJstr8:= strMID(限shou解禁股, XSJJpos7 + 1, XSJJpos8 - XSJJpos7 - 1);
XSJJstr9:= strMID(限shou解禁股, XSJJpos8 + 1, XSJJpos9 - XSJJpos8 - 1);
XSJJstr10:= strMID(限shou解禁股, XSJJpos9 + 1, XSJJpos10 - XSJJpos9 - 1);
DRAWTEXTABS(XXSJJOffset, YXSJJOffset, '目前流通率:'+STR(DYNAINFO(57)/DYNAINFO(56)*100)+'%'), ColorYELLOW;
IF XSJJpos1 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight, XSJJstr1), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*2, XSJJstr2), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*3, XSJJstr3), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 AND XSJJpos4 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*4, XSJJstr4), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 AND XSJJpos4 AND XSJJpos5 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*5, XSJJstr5), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 AND XSJJpos4 AND XSJJpos5 AND XSJJpos6 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*6, XSJJstr6), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 AND XSJJpos4 AND XSJJpos5 AND XSJJpos6 AND XSJJpos7 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*7, XSJJstr7), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 AND XSJJpos4 AND XSJJpos5 AND XSJJpos6 AND XSJJpos7 AND XSJJpos8 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*8, XSJJstr8), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 AND XSJJpos4 AND XSJJpos5 AND XSJJpos6 AND XSJJpos7 AND XSJJpos8 AND XSJJpos9 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*9, XSJJstr9), ColorYELLOW;
IF XSJJpos1 AND XSJJpos2 AND XSJJpos3 AND XSJJpos4 AND XSJJpos5 AND XSJJpos6 AND XSJJpos7 AND XSJJpos8 AND XSJJpos9 AND XSJJpos10 THEN DRAWTEXTABS(XXSJJOffset, YXSJJOffset + XSJJlineHeight*10, XSJJstr10), ColorYELLOW;
|
评论内容只代表网友观点,与本站立场无关!
本网提供的公式文件说明:
* alg格式飞狐股票公式,可以用飞狐交易师或者交易师软件导入;
* fnc格式大智慧新一代公式指标,可以用大智慧股票软件使用,少部分可以用分析家股票软件引入使用;
* exp格式大智慧经典版股票公式,仅可以用大智慧经典版股票软件引入使用;
* tni和tnc格式通达信股票公式,仅可以用通达信新引入使用,例如可以用通达信股票软件引入使用;
* tne,tn6格式通达信公式,可以用通达信公式编辑器5.0版导入,推荐通达信金融终端版本;
* hxf格式同花顺股票公式,仅可以用同花顺股票软件引入使用。
以上的各种软件都可以在本网股票软件栏目找到!
* 关于股票公式时间限制,如果在引入大智慧公式,交易师公式或者飞狐公式的时候,发现公式名称栏是空白的,这时候调整电脑时间到1997年,又能出现公式名称,并且能正常显示,可能是公式使用期限已过。
* 关于还原公式源码如果你忘记了自己编写的大智慧公式,通达信公式,同花顺公式,操盘手公式,飞狐公式,博易大师公式,金字塔公式,文华公式和交易师公式等等公式的密码,本网可帮恢复源码,有.偿.服.务无意勿扰,点击在线咨询联系我。
* 关于股票公式源码编辑
本网提供的源码,一般都可以编辑成公式,如果不明白公式的编辑,在本页右侧教程录像可参考,或者找公式教程资料学习,请搜索:教程
* 如果您发现软件内容或者链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含源码均是由网上搜集,若侵犯了你的版权利益,请联系通知我们!