简单的水平射线

CURRBARSCOUNT函数的应用举例第一篇。

网友的留言：能否在关键价格K线（高量、大阴线、大阳线)的实顶（阳线为收盘价、阴线为开盘价）画一条到当前的水平直线呢？

思路步骤：

1. 三个逻辑条件；
2. 用BARSLAST数取得符合条件的数据位置；
3. 输出对应位置的数据；
4. 标示条件数据的位置。

算法建立：

1. 三个条件

V=HHV(V,100);

O/C>=1.05;

C/O>=1.05;

2. 用BARSLAST数取得符合条件的数据位置

大量位:=CONST(BARSLAST(V=HHV(V,100)));

大阴位:=CONST(BARSLAST(O/C>=1.05));

大阳位:=CONST(BARSLAST(C/O>=1.05));

3. 输出对应位置的数据

大量:IF(CURRBARSCOUNT<=大量位+1,CONST(REF(H,大量位)),DRAWNULL);

大阴:IF(CURRBARSCOUNT<=大阴位+1,CONST(REF(O,大阴位)),DRAWNULL);

大阳:IF(CURRBARSCOUNT<=大阳位+1,CONST(REF(C,大阳位)),DRAWNULL);

4. 标示条件数据的位置

DRAWTEXT(CURRBARSCOUNT=大量位+1,H*1.008,'大量');

DRAWTEXT(CURRBARSCOUNT=大阴位+1,H*1.008,'大阴');

DRAWTEXT(CURRBARSCOUNT=大阳位+1,H*1.008,'大阳');

DRAWNUMBER(ISLASTBAR,大量,大量);

DRAWNUMBER(ISLASTBAR,大阴,大阴);

DRAWNUMBER(ISLASTBAR,大阳,大阳);

完整代码

大量位:=CONST(BARSLAST(V=HHV(V,100)));

大阴位:=CONST(BARSLAST(O/C>=1.05));

大阳位:=CONST(BARSLAST(C/O>=1.05));

大量:IF(CURRBARSCOUNT<=大量位+1,CONST(REF(H,大量位)),DRAWNULL);

大阴:IF(CURRBARSCOUNT<=大阴位+1,CONST(REF(O,大阴位)),DRAWNULL);

大阳:IF(CURRBARSCOUNT<=大阳位+1,CONST(REF(C,大阳位)),DRAWNULL);

DRAWTEXT(CURRBARSCOUNT=大量位+1,H*1.008,'大量');

DRAWTEXT(CURRBARSCOUNT=大阴位+1,H*1.008,'大阴');

DRAWTEXT(CURRBARSCOUNT=大阳位+1,H*1.008,'大阳');

DRAWNUMBER(ISLASTBAR,大量,大量);

DRAWNUMBER(ISLASTBAR,大阴,大阴);

DRAWNUMBER(ISLASTBAR,大阳,大阳);

效果示意

效果示意图

计算创造价值，分享助你成功。

江丰鱼的文章只在今日头条首发；文中代码均可运行。