在文章《顶底分型的应用举例》里没有分享选择的算法，今天继续完成这个作业。

作业1.

应网友的要求做的RB下碰RE的主图标注已经完成，算法代码也作了分享。在主图标注的思路之下上，选择的思路为：

1. 给已经得到的RB线与RE线进行空间范围的限定，这里用的是1%；
2. 当前的RB为刚刚发生，这里用的是发生的第1天。

算法建立

1.

TB:=CONST(TROUGHBARS(2,3,1));

RB:=CONST(TROUGH(2,3,1));

RE:=PEAK(1,15,1);

WZ:=BARSLAST(ABS(RB/RE-1)<=0.01);

2.

QD:=CONST(REF(BARSLAST(WZ

TB=1 AND ABS(IF(CURRBARSCOUNT<=QD+1,RB,DRAWNULL)/IF(CURRBARSCOUNT<=QD+1,CONST(REF(H,QD)),DRAWNULL)-1)<=0.01;

完整代码

TB:=CONST(TROUGHBARS(2,3,1));

RB:=CONST(TROUGH(2,3,1));

RE:=PEAK(1,15,1);

WZ:=BARSLAST(ABS(RB/RE-1)<=0.01);

QD:=CONST(REF(BARSLAST(WZ

TB=1 AND ABS(IF(CURRBARSCOUNT<=QD+1,RB,DRAWNULL)/IF(CURRBARSCOUNT<=QD+1,CONST(REF(H,QD)),DRAWNULL)-1)<=0.01;

作业2.

“日K叠加周K，只需要周K实体，不要上下影线，并且实体上下边界向右画线，望老师帮忙，谢谢“。

思路步骤

1. 取周线的基本数据，画出周线的实体部分的柱体；
2. 向左获取实体部分的数据，并延续至当下；
3. 优化标示。

算法建立

1.

STICKLINE(C#WEEK>=O#WEEK,O#WEEK,C#WEEK,4.5,0),COLOR000099;

STICKLINE(C#WEEK

2.

ZC:IF(CURRBARSCOUNT<=M,CONST(REF(C#WEEK,M)),DRAWNULL);

ZO:IF(CURRBARSCOUNT<=M,CONST(REF(O#WEEK,M)),DRAWNULL);

3.

DRAWNUMBER(ISLASTBAR,ZC,ZC);

DRAWNUMBER(ISLASTBAR,ZO,ZO);

DRAWKLINE(H,O,L,C);

代码流程

江丰鱼的代码

效果示意

叠加周线数据的效果图

完整代码

STICKLINE(C#WEEK>=O#WEEK,O#WEEK,C#WEEK,4.5,0),COLOR000099;

STICKLINE(C#WEEK

ZC:IF(CURRBARSCOUNT<=M,CONST(REF(C#WEEK,M)),DRAWNULL);

ZO:IF(CURRBARSCOUNT<=M,CONST(REF(O#WEEK,M)),DRAWNULL);

DRAWNUMBER(ISLASTBAR,ZC,ZC);

DRAWNUMBER(ISLASTBAR,ZO,ZO);

DRAWKLINE(H,O,L,C);

我的努力只为达成你的成功，赞赏是我们相伴前行的动力。

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