软件名称:[B]同花顺九转[/B]
软件类型:国产软件
运行环境:Win9X/Win2000/WinXP/Win2003/Win7/
软件语言:简体中文
授权方式:免费版
软件大小:8.00 KB
官方主页:Home Page
更新时间:2017-12-14 01:31:35
软件简介:
//九转序列
//九转序列是基于狄马克TD序列思想为参考,进行的价咯连续同方向趋势排序。当数字出现"9"时,价咯容易出现转折,因此起名为九转序列。
// 九转系列特点:
// 1、当序列运行在6之前,数字并不显示,以过滤过于频繁的数字排序。
// 2、当市场容易出现"9"的概率大于50%的时候,踢进行数字序列提示,通常从"6"或"7"开始,如果确定不会出现"9",数字序列会在某个阶段消失。
// 3、当完成数字序列,"9"则变成绿色并锁定,请尽量与该周期收盘价咯为准。
A1 := IF(((REF(CLOSE,1) >= REF(CLOSE,5)) AND (CLOSE < REF(CLOSE,4))),1,0);
A2 := IF(((REFX(&CLOSE,1) < REF(CLOSE,3)) AND (A1 = 1)),2,0);
A3 := IF(((REFX(&CLOSE,2) < REF(CLOSE,2)) AND (A2 = 2)),3,0);
A4 := IF(((REFX(&CLOSE,3) < REF(CLOSE,1)) AND (A3 = 3)),4,0);
A5 := IF(((REFX(&CLOSE,4) < CLOSE) 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);
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.97),'1'),colormagenta;
DRAWTEXT((M1 = 2),(LOW * 0.97),'2'),colormagenta;
DRAWTEXT((M1 = 3),(LOW * 0.97),'3'),colormagenta;
DRAWTEXT((M1 = 4),(LOW * 0.97),'4'),colormagenta;
DRAWTEXT((M1 = 5),(LOW * 0.97),'5'),colormagenta;
DRAWTEXT((M1 = 6),(LOW * 0.97),'6'),colormagenta;
DRAWTEXT((M1 = 7),(LOW * 0.97),'7'),colormagenta;
DRAWTEXT((M1 = 8),(LOW * 0.97),'8'),colormagenta;
Aa1 := IF((CLOSE < REF(CLOSE,4)),1,0);
Aa2 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa1,1) = 1)),1,0);
Aa3 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa2,1) = 1)),1,0);
Aa4 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa3,1) = 1)),1,0);
Aa5 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa4,1) = 1)),1,0);
Aa6 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa5,1) = 1)),1,0);
Aa7 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa6,1) = 1)),1,0);
Aa8 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa7,1) = 1)),1,0);
Aa9 := IF(((CLOSE < REF(CLOSE,4)) AND (REF(Aa8,1) = 1)),1,0);
bb1 := IF(((Aa9 = 1) AND (REF(Aa9,1) = 0)),1,0);
DRAWTEXT((bb1 = 1),(LOW * 0.97),'9'),colorgreen;
A11 := IF(((REF(CLOSE,1) <= REF(CLOSE,5)) AND (CLOSE > REF(CLOSE,4))),1,0);
A21 := IF(((REFX(&CLOSE,1) > REF(CLOSE,3)) AND (A11 = 1)),2,0);
A31 := IF(((REFX(&CLOSE,2) > REF(CLOSE,2)) AND (A21 = 2)),3,0);
A41 := IF(((REFX(&CLOSE,3) > REF(CLOSE,1)) AND (A31 = 3)),4,0);
A51 := IF(((REFX(&CLOSE,4) > CLOSE) 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);//www.70822.com
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),(HIGH * 1.03),'1'),colormagenta;
DRAWTEXT((M11 = 2),(HIGH * 1.03),'2'),colormagenta;
DRAWTEXT((M11 = 3),(HIGH * 1.03),'3'),colormagenta;
DRAWTEXT((M11 = 4),(HIGH * 1.03),'4'),colormagenta;
DRAWTEXT((M11 = 5),(HIGH * 1.03),'5'),colormagenta;
DRAWTEXT((M11 = 6),(HIGH * 1.03),'6'),colormagenta;
DRAWTEXT((M11 = 7),(HIGH * 1.03),'7'),colormagenta;
DRAWTEXT((M11 = 8),(HIGH * 1.03),'8'),colormagenta;
Aa11 := IF((CLOSE > REF(CLOSE,4)),1,0);
Aa21 := IF(((CLOSE > REF(CLOSE,4)) AND (REF(Aa11,1) = 1)),1,0);
Aa31 := IF(((CLOSE > REF(CLOSE,4)) AND (REF(Aa21,1) = 1)),1,0);
Aa41 := IF(((CLOSE > REF(CLOSE,4)) AND (REF(Aa31,1) = 1)),1,0);
Aa51 := IF(((CLOSE > REF(CLOSE,4)) AND (REF(Aa41,1) = 1)),1,0);
Aa61 := IF(((CLOSE > REF(CLOSE,4)) AND (REF(Aa51,1) = 1)),1,0);
Aa71 := IF(((CLOSE > REF(CLOSE,4)) AND (REF(Aa61,1) = 1)),1,0);
Aa81 := IF(((CLOSE > REF(CLOSE,4)) AND (REF(Aa71,1) = 1)),1,0);
Aa91 := IF(((CLOSE > REF(CLOSE,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;
[url=http://www.70822.com/soft/sort013/sort036/down-119244.html]同花顺九转[/url]