算法背后的价值

接受网友们留给我的作业题，是每天都在行进中的考试，更是一种乐趣。

这是一道普通到看不出任何价值的题，却毫不客气地占用了我两个晚上的休息的时间---算法的建立完成与我无关，我发现了我算法观念中的重要错误！

题目如下：

网友留下的作业

思路步骤

算法建立

1.三条均线

MA5:MA(C,5);

MA13:MA(C,13);

MA30:MA(C,30);

2. 三角区的起点与终点

TJ1330:=CONST(BARSLAST(CROSS(MA13,MA30)));

TJ513:=CONST(BARSLAST(REF(CROSS(MA5,MA13),TJ1330)))+TJ1330;

3.输出画线

TH:IF(CURRBARSCOUNT<=TJ513+1,CONST(REF(HHV(H,IF(TJ513-TJ1330=1,2,TJ513-TJ1330)),TJ1330)),DRAWNULL);

DRAWNUMBER(ISLASTBAR,TH,TH);

DRAWICON(CURRBARSCOUNT=TJ1330+1,MA30,85);

DRAWICON(CURRBARSCOUNT=TJ513+1,MA13,85);

效果示意

显示效果

完整代码

MA5:MA(C,5);

MA13:MA(C,13);

MA30:MA(C,30);

TJ1330:=CONST(BARSLAST(CROSS(MA13,MA30)));

TJ513:=CONST(BARSLAST(REF(CROSS(MA5,MA13),TJ1330)))+TJ1330;

TH:IF(CURRBARSCOUNT<=TJ513+1,CONST(REF(HHV(H,IF(TJ513-TJ1330=1,2,TJ513-TJ1330)),TJ1330)),DRAWNULL);

DRAWNUMBER(ISLASTBAR,TH,TH);

DRAWICON(CURRBARSCOUNT=TJ1330+1,MA30,85);

DRAWICON(CURRBARSCOUNT=TJ513+1,MA13,85);

{选择的算法}

TJ:=CONST(BARSLAST(CROSS(MA(C,13),MA(C,30))));

CONST(LLVBARS(L,200))<=25 AND TJ=1 AND CONST(HHV(H,25))/CONST(MA(C,30))<=1.1;

{三角托颜色填充（不是最终的方案，待续）}

C5:=IF(RANGE(MA5,MA13,MA30),MA5,DRAWNULL);

C13:=IF(MA13<=MA30,MA13,DRAWNULL);

C30:IF(MA5>=MA30,MA30,DRAWNULL);

DRAWBAND(C13,RGB(0,224,224),C5,RGB(255,96,96));

DRAWBAND(C13,RGB(0,224,224),C30,RGB(255,96,96));

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

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

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