• 首页
  • 米博logo介绍
  • 产品展示
  • 新闻动态
  • 新闻动态 你的位置:米博logo > 新闻动态 > 3分钟等距线
    3分钟等距线
    发布日期:2025-05-21 16:57    点击次数:99

    本文的算法包含了两个方面的内容:

    一、3分钟周期的第一根K线标示显著颜色;

    二、对3分钟周期的第一根K线做纵向等距画线---阳线向上画水平线;阴线向下画水平线。

    (一)、思路步骤:

    1.应用BARSLAST函数对当前日的分钟周期的第一个数据的位置进行确定;

    2.限定首根数据的位置条件并计算其基本数据;

    3.首根数据的上涨变色条件及满足条件下的颜色标识;

    4.首根数据的下跌变色条件及满足条件下的颜色标识;

    5.首根数据的最大振幅;

    6. 首根数据的上涨条件以及输出等距水平画线---

    重点是应用IF函数的条件切换功能,实现了向下水平画线与向上的水平画线。

    (二)、算法的建立过程:

    1. 当前日的分钟周期的第一个数据的位置

    WZ:=CONST(BARSLAST(DAY!=REF(DAY,1)));

    2. 首根数据的位置条件及其基本数据

    WZTJ:=CURRBARSCOUNT<=WZ+1;

    WZH:IF(WZTJ,CONST(REF(H,WZ)),DRAWNULL);

    WZO:=IF(WZTJ,CONST(REF(O,WZ)),DRAWNULL);

    WZL:IF(WZTJ,CONST(REF(L,WZ)),DRAWNULL);

    WZC:=IF(WZTJ,CONST(REF(C,WZ)),DRAWNULL);

    3. 首根数据的上涨变色条件及满足条件下的颜色标识

    ZTJ:=WZC>=WZO AND CURRBARSCOUNT=WZ+1; {涨条件}

    STICKLINE(ZTJ,WZH,WZL,0,0),COLOR0000FF;

    STICKLINE(ZTJ,WZC,WZO,3,0),COLOR000099;

    STICKLINE(ZTJ,WZC,WZO,2,0),COLOR0000BB;

    STICKLINE(ZTJ,WZC,WZO,1,0),COLOR0000DD;

    STICKLINE(ZTJ,WZC,WZO,0.3,0),COLOR0000FF;

    4. 首根数据的下跌变色条件及满足条件下的颜色标识

    DTJ:=WZC<WZO AND CURRBARSCOUNT=WZ+1;

    STICKLINE(DTJ,WZH,WZL,0,0),COLOR00FF00;

    STICKLINE(DTJ,WZC,WZO,3,0),COLOR009900;

    STICKLINE(DTJ,WZC,WZO,2,0),COLOR00BB00;

    STICKLINE(DTJ,WZC,WZO,1,0),COLOR00DD00;

    STICKLINE(DTJ,WZH,WZL,0,1),COLORGREEN;

    STICKLINE(DTJ,WZC,WZO,3.2,0),COLOR006600;

    STICKLINE(DTJ,WZC,WZO,2.6,0),COLOR008800;

    STICKLINE(DTJ,WZC,WZO,1.9,0),COLOR00AA00;

    STICKLINE(DTJ,WZC,WZO,1.1,0),COLOR00CC00;

    STICKLINE(DTJ,WZC,WZO,0.3,0),COLOR00FF00;

    5. 首根数据的最大振幅

    JJ:=WZH-WZL;{间距}

    6.首根数据的上涨条件2以及输出等距水平画线,重点是IF函数的条件切换,实现了向下水平画线与向上的水平画线

    ZTJ2:=WZC>=WZO;{涨条件2}

    IF(ZTJ2,WZH+JJ*(1+M),WZL-JJ*(1+M));

    IF(ZTJ2,WZH+JJ*(2+M),WZL-JJ*(2+M));

    IF(ZTJ2,WZH+JJ*(3+M),WZL-JJ*(3+M));

    IF(ZTJ2,WZH+JJ*(4+M),WZL-JJ*(4+M));

    IF(ZTJ2,WZH+JJ*(5+M),WZL-JJ*(5+M));

    IF(ZTJ2,WZH+JJ*(6+M),WZL-JJ*(6+M));

    (三)、主图标注算法的完整代码:

    图片

    WZ:=CONST(BARSLAST(DAY!=REF(DAY,1)));

    WZTJ:=CURRBARSCOUNT<=WZ+1;

    WZH:IF(WZTJ,CONST(REF(H,WZ)),DRAWNULL);

    WZO:=IF(WZTJ,CONST(REF(O,WZ)),DRAWNULL);

    WZL:IF(WZTJ,CONST(REF(L,WZ)),DRAWNULL);

    WZC:=IF(WZTJ,CONST(REF(C,WZ)),DRAWNULL);

    ZTJ:=WZC>=WZO AND CURRBARSCOUNT=WZ+1; {涨条件}

    STICKLINE(ZTJ,WZH,WZL,0,0),COLOR0000FF;

    STICKLINE(ZTJ,WZC,WZO,3,0),COLOR000099;

    STICKLINE(ZTJ,WZC,WZO,2,0),COLOR0000BB;

    STICKLINE(ZTJ,WZC,WZO,1,0),COLOR0000DD;

    STICKLINE(ZTJ,WZC,WZO,0.3,0),COLOR0000FF;

    DTJ:=WZC<WZO AND CURRBARSCOUNT=WZ+1;

    STICKLINE(DTJ,WZH,WZL,0,0),COLOR00FF00;

    STICKLINE(DTJ,WZC,WZO,3,0),COLOR009900;

    STICKLINE(DTJ,WZC,WZO,2,0),COLOR00BB00;

    STICKLINE(DTJ,WZC,WZO,1,0),COLOR00DD00;

    STICKLINE(DTJ,WZH,WZL,0,1),COLORGREEN;

    STICKLINE(DTJ,WZC,WZO,3.2,0),COLOR006600;

    STICKLINE(DTJ,WZC,WZO,2.6,0),COLOR008800;

    STICKLINE(DTJ,WZC,WZO,1.9,0),COLOR00AA00;

    STICKLINE(DTJ,WZC,WZO,1.1,0),COLOR00CC00;

    STICKLINE(DTJ,WZC,WZO,0.3,0),COLOR00FF00;

    JJ:=WZH-WZL;{间距}

    ZTJ2:=WZC>=WZO;{涨条件2}

    IF(ZTJ2,WZH+JJ*(1+M),WZL-JJ*(1+M));

    IF(ZTJ2,WZH+JJ*(2+M),WZL-JJ*(2+M));

    IF(ZTJ2,WZH+JJ*(3+M),WZL-JJ*(3+M));

    IF(ZTJ2,WZH+JJ*(4+M),WZL-JJ*(4+M));

    IF(ZTJ2,WZH+JJ*(5+M),WZL-JJ*(5+M));

    IF(ZTJ2,WZH+JJ*(6+M),WZL-JJ*(6+M));

    本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报。

    Powered by 米博logo @2013-2022 RSS地图 HTML地图

    Copyright Powered by365站群 © 2013-2024