2024年2月23日，习近平总书记主持召开中央财经委员会第四次会议时强调，加快产品更新换代是推动高质量发展的重要举措，要鼓励引导新一轮大规模设备更新和消费品以旧换新。3月8日，国务院印发了《推动大规模设备更新和消费品以旧换新行动方案》（国发〔2024〕7号）。近期，国家相关部委和各地方政府正在密集推出具体实施方案、行动计划和配套措施。

本文根据网友的思路，进行简单算法的完成，请看网友留言截图：

图片

网友的留言

网友留言的思路需求是：在同顺软件中完成“最后一次板高点向右划水平线段。”

（一）、思路步骤：

1.本文对网友思路的实现是在同花顺行情软件中建立完成的；

2.引入涨停板的逻辑条件；

3.输出板的位置；

4.限定板的位置在一定时间范围之内；

5.输出板位置的最高值并标识数值；

6.进行数据筛选，完成思路实现。

（二）、算法的建立流程：

1.引入涨停板的逻辑条件---最近一次以涨停收盘的位置

TJ:=(FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3));

ZTJ:=IF(TJ,ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1));

2.输出板的位置

WZ:=CONST(BARSLAST(CLOSE>=ZTJ));

3.限定板的位置在一定时间范围之内

CONST(BARSLAST(CLOSE>=ZTJ))<=T;

4.输出板位置的最高值并标识数值

REF(H,WZ)

DRAWNUMBER(ISLASTBAR,ZBH,ZBH)

5.进行数据筛选，完成思路实现

BARSLAST(CLOSE>=ZTJ)<=T;

（三）、完整的算法代码：

A.数据筛选算法

图片

代码流程1

TJ:=(FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3));

ZTJ:=IF(TJ,REF(CLOSE,1)*1.2,REF(CLOSE,1)*1.1);

WZ:CONST(BARSLAST(CLOSE>=ZTJ))<=涨停距今;

B.主图标注算法

图片

代码流程2

TJ:=(FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3));

ZTJ:=IF(TJ,REF(CLOSE,1)*1.2,REF(CLOSE,1)*1.1);

WZ:=CONST(BARSLAST(CLOSE>=ZTJ));

ZBH:IF(CURRBARSCOUNT<=WZ+1,CONST(REF(H,WZ)),DRAWNULL),colorwhite;

DRAWNUMBER(ISLASTBAR,ZBH,ZBH),colorwhite;

（四）、本文网友思路的通达信实现：

A.数据筛选算法

图片

代码流程3

TJ:=(FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3));

ZTJ:=IF(TJ,ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1));

WZ:CONST(BARSLAST(CLOSE>=ZTJ))<=涨停距今; { 最近一次以涨停收盘的位置 }

B.主图标注算法

图片

代码流程4

TJ:=(FINANCE(3)=4 OR (DATE>1200822 AND FINANCE(3)=3));

ZTJ:=IF(TJ,ZTPRICE(REF(CLOSE,1),0.2),ZTPRICE(REF(CLOSE,1),0.1));

WZ:=CONST(BARSLAST(CLOSE>=ZTJ)); { 最近一次以涨停收盘的位置 }

ZBH:IF(CURRBARSCOUNT<=WZ+1,CONST(REF(H,WZ)),DRAWNULL),COLORWHITE;{涨停板日的最高价的最高值线}

DRAWNUMBER(ISLASTBAR,ZBH,ZBH),COLORWHITE;{涨停板日的最高价}

（五）、最后的筛选效果示意图：

图片

效果示意图1

图片

效果示意图2

图片

效果示意图3按月杠杆炒股

• 时间
• 按月杠杆炒股
• 位置
• 一句
• 趣致