艾略特波浪划线主图指标公式公式、源码[通达信公式]

相关标签:

原理解析：
X赋值:5 D赋值:10 输出M5:收盘价的X日简单移动平均 输出M10:收盘价的D日简单移动平均 T赋值:上次M5上穿M10距今天数 ST赋值:上次M10上穿M5距今天数 T1赋值:T=0累加至2的天数 T2赋值:T=0累加至3的天数 ST1赋值:ST=0累加至2的天数 ST2赋值:ST=0累加至3的天数 H1赋值:如果M5的最后一日取值设为常数>M10的最后一日取值设为常数,返回T+1日内最高价的最高值,否则返回ST日前的T+1日内最高价的最高值 L1赋值:如果M5的最后一日取值设为常数<M10的最后一日取值设为常数,返回ST+1日内最低价的最低值,否则返回T日前的ST+1日内最低价的最低值 H2赋值:如果M5的最后一日取值设为常数>M10的最后一日取值设为常数,返回ST日前的T+1日内最高价的最高值,否则返回ST1-1日前的T+1日内最高价的最高值 L2赋值:如果M5的最后一日取值设为常数<M10的最后一日取值设为常数,返回T日前的ST+1日内最低价的最低值,否则返回T1-1日前的ST+1日内最低价的最低值 H3赋值:如果M5的最后一日取值设为常数>M10的最后一日取值设为常数,返回ST1-1日前的T+1日内最高价的最高值,否则返回ST2-1日前的T+1日内最高价的最高值 L3赋值:如果M5的最后一日取值设为常数<M10的最后一日取值设为常数,返回T1-1日前的ST+1日内最低价的最低值,否则返回T2-1日前的ST+1日内最低价的最低值 TJ1赋值:M5的最后一日取值设为常数>M10的最后一日取值设为常数 AND 到最后交易的周期>=T2的最后一日取值设为常数 AND 到最后交易的周期<=ST2的最后一日取值设为常数 AND 最低价=L3的最后一日取值设为常数 TJ2赋值:M5的最后一日取值设为常数>M10的最后一日取值设为常数 AND 到最后交易的周期>=ST1的最后一日取值设为常数 AND 到最后交易的周期<=T2的最后一日取值设为常数 AND 最高价=H3的最后一日取值设为常数 TJ3赋值:M5的最后一日取值设为常数>M10的最后一日取值设为常数 AND 到最后交易的周期>=T1的最后一日取值设为常数 AND 到最后交易的周期<=ST1的最后一日取值设为常数 AND 最低价=L2的最后一日取值设为常数 TJ4赋值:M5的最后一日取值设为常数>M10的最后一日取值设为常数 AND 到最后交易的周期>=ST的最后一日取值设为常数 AND 到最后交易的周期<=T1的最后一日取值设为常数 AND 最高价=H2的最后一日取值设为常数 TJ5赋值:M5的最后一日取值设为常数>M10的最后一日取值设为常数 AND 到最后交易的周期>=T的最后一日取值设为常数+1 AND 到最后交易的周期<=ST的最后一日取值设为常数+1 AND 最低价=L1的最后一日取值设为常数 TJ6赋值:M5的最后一日取值设为常数>M10的最后一日取值设为常数 AND 最高价=H1的最后一日取值设为常数 AND 到最后交易的周期<=ST2的最后一日取值设为常数 TJ7赋值:M5的最后一日取值设为常数<M10的最后一日取值设为常数 AND 到最后交易的周期>=ST2的最后一日取值设为常数 AND 到最后交易的周期<=T2的最后一日取值设为常数 AND 最高价=H3的最后一日取值设为常数 TJ8赋值:M5的最后一日取值设为常数<M10的最后一日取值设为常数 AND 到最后交易的周期>=T1的最后一日取值设为常数 AND 到最后交易的周期<=ST2的最后一日取值设为常数 AND 最低价=L3的最后一日取值设为常数 TJ9赋值:M5的最后一日取值设为常数<M10的最后一日取值设为常数 AND 到最后交易的周期>=ST1的最后一日取值设为常数 AND 到最后交易的周期<=T1的最后一日取值设为常数 AND 最高价=H2的最后一日取值设为常数 TJ10赋值:M5的最后一日取值设为常数<M10的最后一日取值设为常数 AND 到最后交易的周期>=T的最后一日取值设为常数 AND 到最后交易的周期<=ST1的最后一日取值设为常数 AND 最低价=L2的最后一日取值设为常数 TJ11赋值:M5的最后一日取值设为常数<M10的最后一日取值设为常数 AND 到最后交易的周期>=ST的最后一日取值设为常数+1 AND 到最后交易的周期<=T的最后一日取值设为常数+1 AND 最高价=H1的最后一日取值设为常数 TJ12赋值:M5的最后一日取值设为常数<M10的最后一日取值设为常数 AND 最低价=L1的最后一日取值设为常数AND 到最后交易的周期<=T2的最后一日取值设为常数 当满足条件TJ1时,在最低价位置画直线起点，当满足条件TJ2时,在最高价位置画直线终点,0表示是否延长.,画洋红色 当满足条件TJ2时,在最高价位置画直线起点，当满足条件TJ3时,在最低价位置画直线终点,0表示是否延长.,画洋红色 当满足条件TJ3时,在最低价位置画直线起点，当满足条件TJ4时,在最高价位置画直线终点,0表示是否延长.,画洋红色 当满足条件TJ4时,在最高价位置画直线起点，当满足条件TJ5时,在最低价位置画直线终点,0表示是否延长.,画洋红色 当满足条件TJ5时,在最低价位置画直线起点，当满足条件TJ6时,在最高价位置画直线终点,0表示是否延长.,画洋红色 当满足条件TJ7时,在最高价位置画直线起点，当满足条件TJ8时,在最低价位置画直线终点,0表示是否延长.,画绿色 当满足条件TJ8时,在最低价位置画直线起点，当满足条件TJ9时,在最高价位置画直线终点,0表示是否延长.,画绿色 当满足条件TJ9时,在最高价位置画直线起点，当满足条件TJ10时,在最低价位置画直线终点,0表示是否延长.,画绿色 当满足条件TJ10时,在最低价位置画直线起点，当满足条件TJ11时,在最高价位置画直线终点,0表示是否延长.,画绿色 当满足条件TJ11时,在最高价位置画直线起点，当满足条件TJ12时,在最低价位置画直线终点,0表示是否延长.,画绿色 HH赋值:H1和H2的较大值和H3的较大值的最后一日取值设为常数 LL赋值:L1和L2的较小值和L3的较小值的最后一日取值设为常数 Z赋值:(HH-LL)/2+LL 当满足条件TJ7时,在Z位置画直线起点，当满足条件是否最后一个周期时,在Z位置画直线终点,0表示是否延长.,画绿色,DOTLINE 当满足条件TJ7时,在Z的最后一日取值设为常数*1.01位置书写文字,画绿色 HH1赋值:H1和H2和H3的较大值的较大值的最后一日取值设为常数 LL1赋值:L1和L2的较小值和L3的较小值的最后一日取值设为常数 Z1赋值:(HH1-LL1)/2+LL1 当满足条件TJ1时,在Z1位置画直线起点，当满足条件是否最后一个周期时,在Z1位置画直线终点,0表示是否延长.,画洋红色,DOTLINE 当满足条件TJ1时,在Z的最后一日取值设为常数*1.01位置书写文字,画洋红色 输出近高:H1,画洋红色,NODRAW 输出近低:L1,画绿色,NODRAW 输出中高:H2,画洋红色,NODRAW 输出中底:L2,画绿色,NODRAW 输出远高:H3,画洋红色,NODRAW 输出远底:L3,画绿色,NODRAW 当满足条件收阳线时,在横轴0.01纵轴0.9位置书写文字,画红色 当满足条件收阳线时,在横轴1纵轴1位置书写文字

 来源:程序化99（ WWW.CXH99.COM ）

源码：

艾略特波浪划线主图：艾略特波浪理论的五浪划线，方便看盘和技术分析X:=5;
D:=10;
M5:MA(C,X);
M10:MA(C,D);T:=BARSLAST(CROSS(M5,M10));
ST:=BARSLAST(CROSS(M10,M5));
T1:=SUMBARS(T=0,2);
T2:=SUMBARS(T=0,3);
ST1:=SUMBARS(ST=0,2);
ST2:=SUMBARS(ST=0,3);H1:=IF(CONST(M5)>CONST(M10),HHV(H,T+1),REF(HHV(H,T+1),ST));
L1:=IF(CONST(M5)<CONST(M10),LLV(L,ST+1),REF(LLV(L,ST+1),T));
H2:=IF(CONST(M5)>CONST(M10),REF(HHV(H,T+1),ST),REF(HHV(H,T+1),ST1-1));
L2:=IF(CONST(M5)<CONST(M10),REF(LLV(L,ST+1),T),REF(LLV(L,ST+1),T1-1));
H3:=IF(CONST(M5)>CONST(M10),REF(HHV(H,T+1),ST1-1),REF(HHV(H,T+1),ST2-1));
L3:=IF(CONST(M5)<CONST(M10),REF(LLV(L,ST+1),T1-1),REF(LLV(L,ST+1),T2-1));TJ1:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(T2) AND CURRBARSCOUNT<=CONST(ST2) AND L=CONST(L3);
TJ2:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(ST1) AND CURRBARSCOUNT<=CONST(T2) AND H=CONST(H3);
TJ3:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(T1) AND CURRBARSCOUNT<=CONST(ST1) AND L=CONST(L2);
TJ4:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(ST) AND CURRBARSCOUNT<=CONST(T1) AND H=CONST(H2);
TJ5:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(T)+1 AND CURRBARSCOUNT<=CONST(ST)+1 AND L=CONST(L1);
TJ6:=CONST(M5)>CONST(M10) AND H=CONST(H1) AND CURRBARSCOUNT<=CONST(ST2);
TJ7:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(ST2) AND CURRBARSCOUNT<=CONST(T2) AND H=CONST(H3);
TJ8:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(T1) AND CURRBARSCOUNT<=CONST(ST2) AND L=CONST(L3);
TJ9:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(ST1) AND CURRBARSCOUNT<=CONST(T1) AND H=CONST(H2);
TJ10:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(T) AND CURRBARSCOUNT<=CONST(ST1) AND L=CONST(L2);
TJ11:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(ST)+1 AND CURRBARSCOUNT<=CONST(T)+1 AND H=CONST(H1);
TJ12:=CONST(M5)<CONST(M10) AND L=CONST(L1)AND CURRBARSCOUNT<=CONST(T2);DRAWLINE(TJ1,L,TJ2,H,0),COLORMAGENTA;
DRAWLINE(TJ2,H,TJ3,L,0),COLORMAGENTA;
DRAWLINE(TJ3,L,TJ4,H,0),COLORMAGENTA;
DRAWLINE(TJ4,H,TJ5,L,0),COLORMAGENTA;
DRAWLINE(TJ5,L,TJ6,H,0),COLORMAGENTA;
DRAWLINE(TJ7,H,TJ8,L,0),COLORGREEN;
DRAWLINE(TJ8,L,TJ9,H,0),COLORGREEN;
DRAWLINE(TJ9,H,TJ10,L,0),COLORGREEN;
DRAWLINE(TJ10,L,TJ11,H,0),COLORGREEN;
DRAWLINE(TJ11,H,TJ12,L,0),COLORGREEN;HH:=CONST(MAX(MAX(H1,H2),H3));
LL:=CONST(MIN(MIN(L1,L2),L3));
Z:=(HH-LL)/2+LL;
DRAWLINE(TJ7,Z,ISLASTBAR,Z,0),COLORGREEN,DOTLINE;
DRAWTEXT(TJ7,CONST(Z)*1.01,VARCAT(VARCAT('中区价位：',VAR2STR(CONST(Z),2)),'元')),COLORGREEN;
HH1:=CONST(MAX(H1,MAX(H2,H3)));
LL1:=CONST(MIN(MIN(L1,L2),L3));
Z1:=(HH1-LL1)/2+LL1;
DRAWLINE(TJ1,Z1,ISLASTBAR,Z1,0),COLORMAGENTA,DOTLINE;
DRAWTEXT(TJ1,CONST(Z)*1.01,VARCAT(VARCAT('中区价位：',VAR2STR(CONST(Z1),2)),'元')),COLORMAGENTA;近高:H1,COLORMAGENTA,NODRAW;
近低:L1,COLORGREEN,NODRAW;
中高:H2,COLORMAGENTA,NODRAW;
中底:L2,COLORGREEN,NODRAW;
远高:H3,COLORMAGENTA,NODRAW;
远底:L3,COLORGREEN,NODRAW;DRAWTEXT_FIX(C>O,0.01,0.9,0,' WWW.CXH99.COM '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】