惊喜！首创新算法---九转算法之初步（一）

很没有面子吧？

是的！

自诩做时序算法的我，竟然对“九转”思想毫无所知，在太多次的听闻之后、在网友的提问之下，急忙补课、列流程、做代码，整整一天的时间，有了一个可入门槛的算法，如若不弃，还请笑纳。

不要太惊喜哟~

思路步骤：

1. 进行4日周期的自定义；
2. 在日K线周期环境下，画出4日K线；
3. 只要是连续向上，就给4日K线的每根数据进行排序；
4. 只要是有一个向下，不作序数输出；
5. 若真，开始数9。

算法建立：

1. 4日周期基本数据定义

KX:=
TOTALBARSCOUNT-CURRBARSCOUNT+1;{KX K线的序号}

C4:=IF(MOD(KX,4)=1,REFX(C,3),IF(MOD(KX,4)=2,REFX(C,2),IF(MOD(KX,4)=3,REFX(C,1),IF(MOD(KX,4)=0,C,DRAWNULL))));{C4 收盘价的模4计算}

MW:=MOD(KX,4)=0;{MW 模位}

KH4:=IF(MW,HHV(H,4),DRAWNULL);{KH4 K线的最高价 模4（下同）}

KO4:=IF(MW,REF(O,3),DRAWNULL);

KL4:=IF(MW,LLV(L,4),DRAWNULL);

KC4:=IF(MW,C,DRAWNULL);

1. 4日自定义周期的数据可视化实现，副图

DRAWKLINE(KH4,KO4,KL4,KC4);

3.向上方向的排序

QD:=CONST(LLVBARS(L,40));{QD 起点}

ZXH:= QD-CURRBARSCOUNT;{ZXH 涨序号}

KC4Z0:=IF(CURRBARSCOUNT<=QD AND QD>=9*4,CONST(REF(KC4,9*4)),DRAWNULL);

KC4Z1:=IF(CURRBARSCOUNT<=QD AND QD>=8*4,CONST(REF(KC4,8*4)),DRAWNULL);

KC4Z2:=IF(CURRBARSCOUNT<=QD AND QD>=7*4,CONST(REF(KC4,7*4)),DRAWNULL);

KC4Z3:=IF(CURRBARSCOUNT<=QD AND QD>=6*4,CONST(REF(KC4,6*4)),DRAWNULL);

KC4Z4:=IF(CURRBARSCOUNT<=QD AND QD>=5*4,CONST(REF(KC4,5*4)),DRAWNULL);

KC4Z5:=IF(CURRBARSCOUNT<=QD AND QD>=4*4,CONST(REF(KC4,4*4)),DRAWNULL);

KC4Z6:=IF(CURRBARSCOUNT<=QD AND QD>=3*4,CONST(REF(KC4,3*4)),DRAWNULL);

KC4Z7:=IF(CURRBARSCOUNT<=QD AND QD>=2*4,CONST(REF(KC4,2*4)),DRAWNULL);

KC4Z8:=IF(CURRBARSCOUNT<=QD AND QD>=1*4,CONST(REF(KC4,1*4)),DRAWNULL);

KC4Z9:=IF(CURRBARSCOUNT<=QD AND QD>=0*4,CONST(REF(KC4,0*4)),DRAWNULL);

4.排除法逻辑条件

ZS:=IF(KC4Z9<KC4Z8 OR KC4Z8<KC4Z7 OR KC4Z7<KC4Z6 OR KC4Z6<KC4Z5 OR KC4Z5<KC4Z4 OR KC4Z4<KC4Z3 OR KC4Z3<KC4Z2 OR KC4Z2<KC4Z1 OR KC4Z1<KC4Z0,0,1);

5.若真，开始数9

ZXH0:=IF(MOD (INTPART(ZXH/4) ,9)=0,9, MOD (INTPART(ZXH/4) ,9));

DRAWNUMBER(ZS=1,KC4, ZXH0);

代码流程：

代码流程

效果示意：

效果示意

写在结尾：江丰鱼的文章在今日头条首发，文中代码均已运行通过。