股资源-股票学习站-学炒股-股票课程-炒股教程-分析选股指标-入门基础知识

 找回密码
 注册昵称

QQ登录

只需一步,快速开始

搜索
上一主题 下一主题

[通达信] 【福利】公布我的各级别DELTA(三角洲/时空之门)彩线公式方便大家研究


    [-----复制链接-----]
楼主
 通达信源码安装路径:1,工具栏点击公式选项。2,弹出公式窗口点击新建。3,把源码复制到指标编辑器保存。4,回到K线图界面安装建立好的公式 || 2023-10-7 10:52:06

以下是【福利】公布我的各级别DELTA(三角洲/时空之门)彩线公式方便大家研究

由于DETLA的研究需要画彩线,最常用的是通达信软件,苦于没有农历函数,所以刚开始彩线都是手动画的,已经很累了。问题是研究到分钟级别,还要算上自然日的循环,那线画的实在是绝望。所以网上找别的软件里的公式,发现都不对(比较全的是百度DETLA理论贴吧吧主发的,但是也有不少细节没有考虑全,会造成彩线的混乱)。
最后无奈只能在网上公式的基础思路上自己研究,花了好几天时间,不过,最后终于完整的能让计算机画出正确位置的彩线。

现在我把彩线公式分享出来,以免大家被网上错误的公式误导,也方便大家的自己研究。

由于我现在快下班了,时间有限,就先更新最难的分时级别的。等我有时间在贴其他时间的。

由于最常用的通达信缺少函数,所以我用的是金字塔软件(这里真不是给软件做广告。。。),可能其他软件也可以,细节就需要你们自己修改了。

----------------------DETLA彩线--------------短期彩线公式-------------------------------

①纯公式:(注意需要设置“原点时间”作为参数)
日:=date;
年:year;nodraw;
月:month;nodraw;
号:DAY;nodraw;
QD:=Date>=原点时间;
QQ:=barslast(cross(date,原点时间))+1;
JC:=日-ref(日,1);
isColor:=if(日>ref(日,1) and Date>原点时间,1,0);
交易日总数:=count(ISCOLOR,QQ)+1;
PPP日:=if(JC<50 and JC>0,JC-1,0);
PPP大月:=if(月=2 or 月=4 or 月=6 or 月=8 or 月=9 or 月=11,JC-70,0);
PPP小月:=if(月=5 or 月=7 or 月=10 or 月=12,JC-71,0);
PPP跨年:=if(月=1,JC-8870,0);
PPP二闰月:=if(月=3 and mod(年,4)=0,JC-72,0);
PPP二平月:=if(月=3 and mod(年,4)<>0,JC-73,0);
PPP二月:=PPP二闰月+PPP二平月;
PPP宗:=PPP大月+PPP小月+PPP跨年+PPP二月;
PPP月:=if(JC>50 and JC<10000,PPP宗,0);
PPP世:=if(JC>10000,JC-18870,0);
PPPX:=PPP日+PPP月+PPP世;
空白日总数:=SUM(IF(JC>0 AND QD,PPPX,0),QQ);
NUM:=交易日总数+空白日总数;
VERTLINE(日>ref(日,1) and QD and mod(Num,4)=0),colormagenta;
VERTLINE(日>ref(日,1) and QD and mod(Num,4)=1),coloryellow;
VERTLINE(日>ref(日,1) and QD and mod(Num,4)=2),colorblue;
VERTLINE(日>ref(日,1) and QD and mod(Num,4)=3),colorwhite;
VERTLINE(Barslast(日=原点时间)=0 and FILTER(日=原点时间,100)),coloryellow;
KLINE(O,H,L,C,0);


②说明
之前也是只能编一些简单的公式,果然还是要不断的学习其它人,再加上自己思考才能慢慢提高。所以也是把我每一步所想的含义也与大家交流。万一我哪里想错了,或者表达错了,还能被大家及时纠正出来。以免自己或者大家误入歧途~~


③公式代码分解思路
日:=date;
年:year;nodraw;
月:month;nodraw;
号:DAY;nodraw; {显示年、月、号没什么意义,就是方便读取当天时间,可以不显示}


QD:=Date>=原点时间;
QQ:=barslast(cross(date,原点时间))+1; {从原点时间到目前的K线总数}


JC:=日-ref(日,1); {基础模型,为了方便以后书写}
{上一个交易日的自然日期减去下一个交易日自然日期}


isColor:=if(日>ref(日,1) and Date>原点时间,1,0); {如果日线变动了一天则返回1表示}
交易日总数:=count(ISCOLOR,QQ)+1; {从原点到目前范围,一共有多少个交易日}
{多加的1,是为了算上原点时间当日}


{后面几个重要参数的说明,这里就是公式最难理解的地方,就是这里我卡了1整天-_-}
{由于日期转换为数字的时候,同月之间,日期顺序是同数字顺序一样,连续变化的}
{但是,不同月之间,数字不是连续增加,会有跳跃}
{如:2018.4.30到2018.5.1日,实际上他们的自然日只增加了1日}
{但是转变为代码的时候为:1180430和1180501,那么其数字之间相差会多出71}
{同时还需要考虑大小月之间会有细微的差别,换大月数字为70,换小月为71}
{如果牵扯到2月换3月,还需要考虑是否是为闰年,闰年为72,非闰年为73}
{这个71或70和上面的1日,就是代码与实际之间的相差数字}
{上面是换月的时候出现的问题,同理,换年的时候也会出现这样的问题,相差为8870}
{同理,换世纪的时候也会出现这样的问题,相差为18870}
{当然在代码范围内,换世纪只用到1次,那就是1999年向2000年转变的时候}


{注意其中几个重要的数字:70、8870、18870}
{所以我们在判断是否有月份变化的时候,可以用差值介于什么位置之间,就能知道是同月的日期变化,还是有新的一个月转变,还是有新的一年转变,还是有新的是个世纪转变}
{所以我们取50、10000做为两个分割的标准数字}


PPP日:=if(JC<50 and JC>0,JC-1,0); {同一个月内,没有参与交易的自然日有几天}


{每次空白了几天}
{数字为0就是正常连续,数字为1就是休息了1天,数字为2就是休息了2天}
{对应的,0就更新一条彩线顺序,1就更新2条彩线的顺序,2就是更新3个彩线的顺序}


PPP大月:=if(月=2 or 月=4 or 月=6 or 月=8 or 月=9 or 月=11,JC-70,0); {如果是换大月}
PPP小月:=if(月=5 or 月=7 or 月=10 or 月=12,JC-71,0); {如果是换小月}
PPP跨年:=if(月=1,JC-8870,0); {如果是换年}


PPP二闰月:=if(月=3 and mod(年,4)=0,JC-72,0); {如果是闰年}
PPP二平月:=if(月=3 and mod(年,4)<>0,JC-73,0); {如果是平年}
PPP二月:=PPP二闰月+PPP二平月; {如果是换二月}


PPP宗:=PPP大月+PPP小月+PPP跨年+PPP二月;
{换月时,没有参与交易的自然日有几天}
PPP月:=if(JC>50 and JC<10000,PPP宗,0);
{当换月的那天才计算换月没有参与交易的自然日有几天}


PPP世:=if(JC>10000,JC-18870,0); {如果是世纪转换,没有参与交易的自然日有几天}


PPPX:=PPP日+PPP月+PPP世; {考虑了各种情况后的空白日数}


空白日总数:=SUM(IF(JC>0 AND QD,PPPX,0),QQ);


NUM:=交易日总数+空白日总数; {所有自然日的总数,就是交易日总数+空白日总数}


VERTLINE(日>ref(日,1) and QD and mod(Num,4)=0),colormagenta;
VERTLINE(日>ref(日,1) and QD and mod(Num,4)=1),coloryellow;
VERTLINE(日>ref(日,1) and QD and mod(Num,4)=2),colorblue;
VERTLINE(日>ref(日,1) and QD and mod(Num,4)=3),colorwhite;
{每4根线一个循环,按照:红--黄--蓝--白,的色彩顺序循环}


VERTLINE(Barslast(日=原点时间)=0 and FILTER(日=原点时间,100)),coloryellow;
{因为原点的竖线不显示,所以补画原点线,方便观察,以黄色表示}
{因为彩色循环的第一根都是从黄色开始}


KLINE(O,H,L,C,0); {绘制K线,以确保K线的上下影线不被彩线挡住}


④最后一些用法说明
设计“原点时间”的好处就是,由于分钟级别K线太多,不可能从上市第一根有效K线开始读取数据,所以随着数据选取的范围不同,可能造成彩线变化。
此外实际使用DETLA密码时,只要设置好原点彩线的颜色位置K线,就可以只调用最新的一些数据,保证数据量小,且彩线颜色不会发生变化。
该软件的时间参数书写规则:(举例你就明白了)
例子1: 2018年5月25日 ------------- 1180525;
例子2: 2017年3月21日 ------------- 1170321;
例子3: 2001年1月9日 ------------- 1010109;
例子4: 1999年1月9日 ------------- 990109;
例子5: 1991年12月19日 ------------- 911219;

如果你还不明白,我也没办法了- -, 也方便各软件书写格式不同,你好自行修改公式里的一些数据。

原点数据的彩线一定是黄色,但“原点时间”假如你一不小心设置的原点时间是非交易日,那么这个原点彩线虽然不在K线图上显示,但是会计算原点为这个非交易日的前面一个交易日。(举例:假如3.31日是交易日,4.1日、4.2日是非交易日,4.3日是交易日;那么如果“原点时间”设置在4.1日,那么实际上系统会把3.31日作为黄色,和你设置3.31日为原点的效果是一样的)


设计“原点时间”的实际用处是什么呢?也就是当如果数据太多,打算后期移动彩色原点的时候,只要找到一个之前是黄色的彩线位置,修改“原点时间”参数为这个彩线位置的时间,就可以保证把彩线顺利移动到后面啦!

---------------------------------------------------下班了---------------------------其他级别我有空再发------------------



回复

举报

QQ|

GMT+8, 2024-11-6 02:38

快速回复 返回顶部 返回列表