通达信艾略特波浪划线主图选股指标公式源码

通达信艾略特波浪划线主图选股指标公式源码

源码正文：

X:=5{XG51};
D:=10{XG51};
M5:ma(C,X){XG51};
M10:MA(C,D){XG51};
T:=BArslAst(crOSS(M5,M10)){XG51};
ST:=BARSLAST(CROSS(M10,M5)){XG51};
T1:=SUMBARS(T=0,2){XG51};
T2:=SUMBARS(T=0,3){XG51};
ST1:=SUMBARS(ST=0,2){XG51};
ST2:=SUMBARS(ST=0,3){XG51};
H1:=IF(CONST(M5)>CONST(M10),HHV(H,T+1),REF(HHV(H,T+1),ST)){XG51};
L1:=IF(CONST(M5)<CONST(M10),LLV(L,ST+1),REF(LLV(L,ST+1),T)){XG51};
H2:=IF(CONST(M5)>CONST(M10),REF(HHV(H,T+1),ST),REF(HHV(H,T+1),ST1-1)){XG51};
L2:=IF(CONST(M5)<CONST(M10),REF(LLV(L,ST+1),T),REF(LLV(L,ST+1),T1-1)){XG51};
H3:=IF(CONST(M5)>CONST(M10),REF(HHV(H,T+1),ST1-1),REF(HHV(H,T+1),ST2-1)){XG51};
L3:=IF(CONST(M5)<CONST(M10),REF(LLV(L,ST+1),T1-1),REF(LLV(L,ST+1),T2-1)){XG51};
TJ1:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(T2) AND CURRBARSCOUNT<=CONST(ST2) AND L=CONST(L3){XG51};
TJ2:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(ST1) AND CURRBARSCOUNT<=CONST(T2) AND H=CONST(H3){XG51};
TJ3:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(T1) AND CURRBARSCOUNT<=CONST(ST1) AND L=CONST(L2){XG51};
TJ4:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(ST) AND CURRBARSCOUNT<=CONST(T1) AND H=CONST(H2){XG51};
TJ5:=CONST(M5)>CONST(M10) AND CURRBARSCOUNT>=CONST(T)+1 AND CURRBARSCOUNT<=CONST(ST)+1 AND L=CONST(L1){XG51};
TJ6:=CONST(M5)>CONST(M10) AND H=CONST(H1) AND CURRBARSCOUNT<=CONST(ST2){XG51};
TJ7:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(ST2) AND CURRBARSCOUNT<=CONST(T2) AND H=CONST(H3){XG51};
TJ8:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(T1) AND CURRBARSCOUNT<=CONST(ST2) AND L=CONST(L3){XG51};
TJ9:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(ST1) AND CURRBARSCOUNT<=CONST(T1) AND H=CONST(H2){XG51};
TJ10:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(T) AND CURRBARSCOUNT<=CONST(ST1) AND L=CONST(L2){XG51};
TJ11:=CONST(M5)<CONST(M10) AND CURRBARSCOUNT>=CONST(ST)+1 AND CURRBARSCOUNT<=CONST(T)+1 AND H=CONST(H1){XG51};
TJ12:=CONST(M5)<CONST(M10) AND L=CONST(L1)AND CURRBARSCOUNT<=CONST(T2){XG51};
DRAWLINE(TJ1,L,TJ2,H,0),COLORLIMAGENTA{XG51};
DRAWLINE(TJ2,H,TJ3,L,0),COLORLIMAGENTA{XG51};
DRAWLINE(TJ3,L,TJ4,H,0),COLORLIMAGENTA{XG51};
DRAWLINE(TJ4,H,TJ5,L,0),COLORLIMAGENTA{XG51};
DRAWLINE(TJ5,L,TJ6,H,0),COLORLIMAGENTA{XG51};
DRAWLINE(TJ7,H,TJ8,L,0),COLORCYAN{XG51};
DRAWLINE(TJ8,L,TJ9,H,0),COLORCYAN{XG51};
DRAWLINE(TJ9,H,TJ10,L,0),COLORCYAN{XG51};
DRAWLINE(TJ10,L,TJ11,H,0),COLORCYAN{XG51};
DRAWLINE(TJ11,H,TJ12,L,0),COLORCYAN{XG51};
HH:=CONST(MAX(MAX(H1,H2),H3)){XG51};
LL:=CONST(MIN(MIN(L1,L2),L3)){XG51};
Z:=(HH-LL)/2+LL{XG51};
DRAWLINE(TJ7,Z,ISLASTBAR,Z,0),COLORCYAN,DOTLINE{XG51};
DRAWTEXT(TJ7,CONST(Z)*1.01,VARCAT(VARCAT('中区价位：',VAR2STR(CONST(Z),2)),'元')),COLORCYAN{XG51};
HH1:=CONST(MAX(H1,MAX(H2,H3))){XG51};
LL1:=CONST(MIN(MIN(L1,L2),L3)){XG51};
Z1:=(HH1-LL1)/2+LL1{XG51};
DRAWLINE(TJ1,Z1,ISLASTBAR,Z1,0),COLORLIMAGENTA,DOTLINE{XG51};
DRAWTEXT(TJ1,CONST(Z)*1.01,VARCAT(VARCAT('中区价位：',VAR2STR(CONST(Z1),2)),'元')),COLORLIMAGENTA{XG51};
近高:H1,COLORLIMAGENTA,NODRAW{XG51};
近低:L1,COLORCYAN,NODRAW{XG51};
中高:H2,COLORLIMAGENTA,NODRAW{XG51};
中底:L2,COLORCYAN,NODRAW{XG51};
远高:H3,COLORLIMAGENTA,NODRAW{XG51};
远底:L3,COLORCYAN,NODRAW{X!G*5?1!C!N!{};