同花顺狄马克TD九转序列主图指标公式源码[同花顺公式]
//九转序列
//九转序列是基于狄马克TD序列思想为参考，进行的价咯连续同方向趋势排序。当数字出现"9"时，价咯容易出现转折，因此起名为九转序列。
// 九转系列特点：
// 1、当序列运行在6之前，数字并不显示，以过滤过于频繁的数字排序。
// 2、当市场容易出现"9"的概率大于50%的时候，踢进行数字序列提示，通常从"6"或"7"开始，如果确定不会出现"9"，数字序列会在某个阶段消失。
// 3、当完成数字序列，"9"则变成绿色并锁定，请尽量与该周期收盘价咯为准。
STICKLINE(CLOSE>1.095*REF(C,1),CLOSE,OPEN,6,0),coloryellow;
STICKLINE(CLOSE<0.905*REF(C,1),CLOSE,OPEN,6,0),colorblue;
MA1:MA(C, 5),colorwhite;
MA2:MA(C, 10),coloryellow;
MA3:MA(C, 20),colormagenta;
MA4:MA(C, 60),colorligreen;
UR:=CURRBARSCOUNT+1;
A1 := IF(((REF(CLOSE,1) >= REF(C,5)) AND (C< REF(C,4))),1,0);
A2 := IF(((REFX(&CLOSE,1) < REF(C,3)) AND (A1 = 1)),2,0);
A3 := IF(((REFX(&CLOSE,2) < REF(C,2)) AND (A2 = 2)),3,0);
A4 := IF(((REFX(&CLOSE,3) < REF(C,1)) AND (A3 = 3)),4,0);
A5 := IF(((REFX(&CLOSE,4) < C) AND (A4 = 4)),5,0);
A6 := IF(((REFX(&CLOSE,5) < REFX(&CLOSE,1)) AND (A5 = 5)),6,0);
A7 := IF(((REFX(&CLOSE,6) < REFX(&CLOSE,2)) AND (A6 = 6)),7,0);
A8 := IF(((REFX(&CLOSE,7) < REFX(&CLOSE,3)) AND (A7 = 7)),8,0);
A9 := IF(((REFX(&CLOSE,8) < REFX(&CLOSE,4)) AND (A8 = 8)),9,0);
B1 := IF((A9 = 9),1,0);//www.cxh99.com
B2 := IF((REF(A9,1) = 9),2,0);
B3 := IF((REF(A9,2) = 9),3,0);
B4 := IF((REF(A9,3) = 9),4,0);
B5 := IF((REF(A9,4) = 9),5,0);
B6 := IF((REF(A9,5) = 9),6,0);
B7 := IF((REF(A9,6) = 9),7,0);
B8 := IF((REF(A9,7) = 9),8,0);
B9 := IF((REF(A9,8) = 9),9,0);
M1 := ((((((((B1 + B2) + B3) + B4) + B5) + B6) + B7) + B8) + B9);
DRAWTEXT((M1 = 1),(LOW * 0.98),'1'),colormagenta;
DRAWTEXT((M1 = 2),(LOW * 0.98),'2'),colormagenta;
DRAWTEXT((M1 = 3),(LOW * 0.98),'3'),colormagenta;
DRAWTEXT((M1 = 4),(LOW * 0.98),'4'),colormagenta;
DRAWTEXT((M1 = 5),(LOW * 0.98),'5'),colormagenta;
DRAWTEXT((M1 = 6),(LOW * 0.98),'6'),colormagenta;
DRAWTEXT((M1 = 7),(LOW * 0.98),'7'),colormagenta;
DRAWTEXT((M1 = 8),(LOW * 0.98),'8'),colormagenta;
Aa1 := IF((C< REF(C,4)),1,0);//www.cxh99.com
Aa2 := IF(((C< REF(C,4)) AND (REF(Aa1,1) = 1)),1,0);
Aa3 := IF(((C< REF(C,4)) AND (REF(Aa2,1) = 1)),1,0);
Aa4 := IF(((C< REF(C,4)) AND (REF(Aa3,1) = 1)),1,0);
Aa5 := IF(((C< REF(C,4)) AND (REF(Aa4,1) = 1)),1,0);
Aa6 := IF(((C< REF(C,4)) AND (REF(Aa5,1) = 1)),1,0);
Aa7 := IF(((C< REF(C,4)) AND (REF(Aa6,1) = 1)),1,0);
Aa8 := IF(((C< REF(C,4)) AND (REF(Aa7,1) = 1)),1,0);
Aa9 := IF(((C< REF(C,4)) AND (REF(Aa8,1) = 1)),1,0);
bb1 := IF(((Aa9 = 1) AND (REF(Aa9,1) = 0)),1,0);
DRAWTEXT((bb1 = 1),(LOW * 0.98),'9'),colorgreen;//http://www.cxh99.com
A11 := IF(((REF(CLOSE,1) <= REF(C,5)) AND (C> REF(C,4))),1,0);
A21 := IF(((REFX(&CLOSE,1) > REF(C,3)) AND (A11 = 1)),2,0);
A31 := IF(((REFX(&CLOSE,2) > REF(C,2)) AND (A21 = 2)),3,0);
A41 := IF(((REFX(&CLOSE,3) > REF(C,1)) AND (A31 = 3)),4,0);
A51 := IF(((REFX(&CLOSE,4) > C) AND (A41 = 4)),5,0);
A61 := IF(((REFX(&CLOSE,5) > REFX(&CLOSE,1)) AND (A51 = 5)),6,0);
A71 := IF(((REFX(&CLOSE,6) > REFX(&CLOSE,2)) AND (A61 = 6)),7,0);
A81 := IF(((REFX(&CLOSE,7) > REFX(&CLOSE,3)) AND (A71 = 7)),8,0);
A91 := IF(((REFX(&CLOSE,8) > REFX(&CLOSE,4)) AND (A81 = 8)),9,0);
B11 := IF((A91 = 9),1,0);
B21 := IF((REF(A91,1) = 9),2,0);
B31 := IF((REF(A91,2) = 9),3,0);
B41 := IF((REF(A91,3) = 9),4,0);
B51 := IF((REF(A91,4) = 9),5,0);
B61 := IF((REF(A91,5) = 9),6,0);
B71 := IF((REF(A91,6) = 9),7,0);
B81 := IF((REF(A91,7) = 9),8,0);
B91 := IF((REF(A91,8) = 9),9,0);
M11 := ((((((((B11 + B21) + B31) + B41) + B51) + B61) + B71) + B81) + B91);
DRAWTEXT((M11 = 1),(H* 1.02),'1'),colormagenta;
DRAWTEXT((M11 = 2),(H* 1.02),'2'),colormagenta;
DRAWTEXT((M11 = 3),(H* 1.02),'3'),colormagenta;
DRAWTEXT((M11 = 4),(H* 1.02),'4'),colormagenta;
DRAWTEXT((M11 = 5),(H* 1.02),'5'),colormagenta;
DRAWTEXT((M11 = 6),(H* 1.02),'6'),colormagenta;
DRAWTEXT((M11 = 7),(H* 1.02),'7'),colormagenta;
DRAWTEXT((M11 = 8),(H* 1.02),'8'),colormagenta;
Aa11 := IF((C> REF(C,4)),1,0);
Aa21 := IF(((C> REF(C,4)) AND (REF(Aa11,1) = 1)),1,0);
Aa31 := IF(((C> REF(C,4)) AND (REF(Aa21,1) = 1)),1,0);
Aa41 := IF(((C> REF(C,4)) AND (REF(Aa31,1) = 1)),1,0);
Aa51 := IF(((C> REF(C,4)) AND (REF(Aa41,1) = 1)),1,0);
Aa61 := IF(((C> REF(C,4)) AND (REF(Aa51,1) = 1)),1,0);
Aa71 := IF(((C> REF(C,4)) AND (REF(Aa61,1) = 1)),1,0);
Aa81 := IF(((C> REF(C,4)) AND (REF(Aa71,1) = 1)),1,0);
Aa91 := IF(((C> REF(C,4)) AND (REF(Aa81,1) = 1)),1,0);
bb11 := IF(((Aa91 = 1) AND (REF(Aa91,1) = 0)),1,0);
DRAWTEXT((bb11 = 1),(HIGH * 1.02),'9'),colorgreen;//http://www.cxh99.com
DRAWTEXT_FIX(CURRBARSCOUNT<1,0.01,0.03,0,"起于阴极阳生，止于阳极阴生，一个月只要几次机会即可 www.cxh99.com"),coloryellow;
公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】
有思路，想编写各种指标公式，交易模型，选股公式，还原公式的朋友
可联系技术人员 QQ: 262069696 或微信：cxhjy888 进行 有偿收费 编写！(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)
(注：由于人数限制，QQ或微信请选择方便的一个联系我们就行，加好友时请简单备注下您的需求，否则无法通过。谢谢您！)
相关文章
-
没有相关内容