通达信波浪趋势主图指标 缠论波浪 源码分享 附图

JX0:=IF(C>=MA(C,5),1,-1);

JX1:=IF(C>=MA(C,10),1,-1);

JX2:=IF(C>=MA(C,20),1,-1);

JX3:=IF(C>=MA(C,30),1,-1);

JX4:=IF(C>=MA(C,60),1,-1);

JX5:=IF(MA(C,5)>=REF(MA(C,5),1),1,-1);

JX6:=IF(MA(C,10)>=REF(MA(C,10),1),1,-1);

JX7:=IF(MA(C,20)>=REF(MA(C,20),1),1,-1);

JX8:=IF(MA(C,30)>=REF(MA(C,30),1),1,-1);

JX9:=IF(MA(C,60)>=REF(MA(C,60),1),1,-1);

JX10:=(JX0+JX1+JX2+JX5+JX6+JX7)/6*100;

JX11:=(JX0+JX1+JX2+JX3+JX4+JX5+JX6+JX7+JX8+JX9)/10*100;

STICKLINE(JX10=100,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0)COLOR404050;

STICKLINE(JX11=100,REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),0,0)COLOR001050;

{倍量阴}

BLY:=V/REF(V,1)>1.8 AND O>C;

BLYH:=REF(H,BARSLAST(BLY));

BLYL:=REF(L,BARSLAST(BLY));

STICKLINE(L,BLYH,BLYL,5,0)COLORLICYAN;

{涨停画线}

ZTB:=C/REF(C,1)>1.093 AND C=H;

ZTH:=REF(H,BARSLAST(ZTB));

ZTL:=REF(L,BARSLAST(ZTB));

NOTEXTA:ZTH,COLORMAGENTA,DOTLINE;

NOTEXTB:ZTL,COLORBLUE,DOTLINE;

{涨停均价}

DRAWTEXT(CURRBARSCOUNT<=10 AND C/REF(C,1)>1.093 AND C=H,AMOUNT/V/100

,'---------------------------------------------------------------------------------------------')COLORYELLOW;

DRAWKLINE(H,O,L,C);

DRAWTEXT_FIX(ISLASTBAR,0.35,0.15,0,CODE)COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.42,0.15,0,STKNAME)COLORRED;

DRAWTEXT_FIX(ISLASTBAR,0.53,0.15,0,HYBLOCK)COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.62,0.15,0,DYBLOCK)COLORB4EEB4;

DRAWTEXT_FIX(ISLASTBAR,0.35,0.25,0,GNBLOCK)COLORWHITE;

DRAWTEXT_FIX(ISLASTBAR,0.35,0.15,0,CODE)COLORYELLOW;

DRAWTEXT_FIX(ISLASTBAR,0.42,0.15,0,STKNAME)COLORRED;

DRAWTEXT_FIX(ISLASTBAR,0.53,0.15,0,HYBLOCK)COLORCYAN;

DRAWTEXT_FIX(ISLASTBAR,0.62,0.15,0,DYBLOCK)COLORB4EEB4;

DRAWTEXT_FIX(ISLASTBAR,0.35,0.25,0,GNBLOCK)COLORWHITE;

{缠论波浪}

PL5:=ZIG(3,5);

EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);

EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);

PL10:=ZIG(3,20);

EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);

EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);

PL20:=ZIG(3,30);

EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);

EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);

走强1:=BARSLAST(PL5<REF(PL5,1));

走弱1:=BARSLAST(PL5>REF(PL5,1));

走强2:=BARSLAST(PL10<REF(PL10,1));

走弱2:=BARSLAST(PL10>REF(PL10,1));

走强3:=BARSLAST(PL20<REF(PL20,1));

走弱3:=BARSLAST(PL20>REF(PL20,1));

ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);

ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);

DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);

DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);

ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);

ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);

DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);

DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);

DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'(A)')COLORFFFF00;

DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'(B)')COLORFFFF00;

DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'(C)')COLORFFFF00;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.03,'1')COLORWHITE;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'↖2')COLORWHITE;

DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.03,'3')COLORWHITE;

DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'↖4')COLORWHITE;

DRAWTEXT(EX2 AND (PL20>REF(PL20,1) OR REF(PL20>REF(PL20,1),1) OR ZTJD10=1),H*1.020,'5')COLORWHITE;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.05,'一')COLOR00FFFF,LINETHICK3;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,'二')COLOR00FFFF,LINETHICK3;

DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2,H*1.05,'三')COLOR00FFFF,LINETHICK3;

DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.94,'四')COLOR00FFFF,LINETHICK3;

XG1:=EX2;

XG2:=PL20>REF(PL20,1);

XG3:=ZTJZ10=3;

DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*1.06,'五')COLORWHITE,LINETHICK3;

DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*0.99,'●')COLOR0000FF,LINETHICK3;

DRAWTEXT(REF(XG2*XG3,1) AND XG1,H*0.97,'●')COLOR00FFFF,LINETHICK3;

{假阴真阳}

STICKLINE(C<O AND C>REF(C,1),H,L,0,0)COLORLIRED;

STICKLINE(C<O AND C>REF(C,1),C,O,3,1)COLORLIRED;

{真阴假阳}

STICKLINE(C>O AND C<REF(C,1),H,L,0,0)COLORAA00AA;

STICKLINE(C>O AND C<REF(C,1),C,O,3,1)COLORAA00AA;

{涨幅为零}

STICKLINE(C=REF(C,1),H,L,0.1,0)COLORWHITE;

STICKLINE(C=REF(C,1),C,O,3,0)COLORWHITE;

{蹲跳K}

DRAWICON(L>=REF(L,1) AND H<=REF(H,1) AND JX11=100,L*0.998,1);

DRAWICON(L>=REF(L,1) AND H<=REF(H,1) AND JX11=100,H*1.035,2);

{红三兵}

STICKLINE(EVERY(C>O,3) AND EVERY(C>REF(C,1),3) AND O<>H,O,C,1.5,0)COLORRED;

{黑三兵}

DRAWICON(EVERY(C<O,3) AND EVERY(C<REF(C,1),3) AND O<>L,L,28);

{涨停K}

STICKLINE(ZTB,O,C,0,0)COLORYELLOW;

STICKLINE(ZTB,O,(C+O)/2,0.1,0)COLORYELLOW;

{回踩关注}

DRAWICON(BARSLAST(ZTB)<=5 AND BARSLAST(ZTB)>1 AND L<=ZTL AND C>ZTL AND EVERY(C<ZTH,2) AND ZTB=0 AND O<>L,L,29);

原理解析：
JX0赋值:IF(C>=C的5日简单移动平均,1,-1)
JX1赋值:IF(C>=C的10日简单移动平均,1,-1)
JX2赋值:IF(C>=C的20日简单移动平均,1,-1)
JX3赋值:IF(C>=C的30日简单移动平均,1,-1)
JX4赋值:IF(C>=C的60日简单移动平均,1,-1)
JX5赋值:IF(C的5日简单移动平均>=REF(C的5日简单移动平均,1),1,-1)
JX6赋值:IF(C的10日简单移动平均>=REF(C的10日简单移动平均,1),1,-1)
JX7赋值:IF(C的20日简单移动平均>=REF(C的20日简单移动平均,1),1,-1)
JX8赋值:IF(C的30日简单移动平均>=REF(C的30日简单移动平均,1),1,-1)
JX9赋值:IF(C的60日简单移动平均>=REF(C的60日简单移动平均,1),1,-1)
JX10:=(JX0+JX1+JX2+JX5+JX6+JX7)/6*100
JX11:=(JX0+JX1+JX2+JX3+JX4+JX5+JX6+JX7+JX8+JX9)/10*100
STICKLINE(JX10=100,REFDATE(0日内H最高值,DATE),REFDATE(0日内L最低值,DATE),6,0)COLOR404050
STICKLINE(JX11=100,REFDATE(0日内H最高值,DATE),REFDATE(0日内L最低值,DATE),0,0)COLOR001050
{倍量阴}
BLY赋值:V/1日前的V>1.8 AND O>C
BLYH赋值:REF(H,上次BLY距今天数)
BLYL赋值:REF(L,上次BLY距今天数)
当满足条件L时,在BLYH和BLYL之间画柱状线
{涨停画线}
ZTB赋值:C/1日前的C>1.093 AND C=H
ZTH赋值:REF(H,上次ZTB距今天数)
ZTL赋值:REF(L,上次ZTB距今天数)
输出NOTEXTA:ZTH,画洋红色,DOTLINE
输出NOTEXTB:ZTL, 画蓝色,DOTLINE
{涨停均价}
DRAWTEXT( 到最后交易的周期<=10 AND C/1日前的C>1.093 AND C=H,成交额/V/100
,'---------------------------------------------------------------------------------------------')画黄色
DRAWKLINE(H,O,L,C)
当满足条件ISLASTBAR时,在横轴0.35纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.42纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.53纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.62纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.35纵轴0.25位置书写文字
当满足条件ISLASTBAR时,在横轴0.35纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.42纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.53纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.62纵轴0.15位置书写文字
当满足条件ISLASTBAR时,在横轴0.35纵轴0.25位置书写文字
{缠论波浪}
PL5赋值:ZIG(3,5)
EN1赋值:PL5>1日前的PL5 AND 1日前的PL5<=2日前的PL5 AND 2日前的PL5<=3日前的PL5
EX1赋值:PL5<1日前的PL5 AND 1日前的PL5>=2日前的PL5 AND 2日前的PL5>=3日前的PL5
PL10赋值:ZIG(3,20)
EN2赋值:PL10>1日前的PL10 AND 1日前的PL10<=2日前的PL10 AND 2日前的PL10<=3日前的PL10
EX2赋值:PL10<1日前的PL10 AND 1日前的PL10>=2日前的PL10 AND 2日前的PL10>=3日前的PL10
PL20赋值:ZIG(3,30)
EN3赋值:PL20>1日前的PL20 AND 1日前的PL20<=2日前的PL20 AND 2日前的PL20<=3日前的PL20
EX3赋值:PL20<1日前的PL20 AND 1日前的PL20>=2日前的PL20 AND 2日前的PL20>=3日前的PL20
走强1赋值:上次PL5<1日前的PL5距今天数
走弱1赋值:上次PL5>1日前的PL5距今天数
走强2赋值:上次PL10<1日前的PL10距今天数
走弱2赋值:上次PL10>1日前的PL10距今天数
走强3赋值:上次PL20<1日前的PL20距今天数
走弱3赋值:上次PL20>1日前的PL20距今天数
ZTJZ5赋值:IF(PL10>1日前的PL10,统计走强2日满足EN1的天数,0)
ZTJD5赋值:IF(PL10>1日前的PL10,统计走强2日满足EX1的天数,0)
DTJZ5赋值:IF(PL10<1日前的PL10,统计走弱2日满足EN1的天数,0)
DTJD5赋值:IF(PL10<1日前的PL10,统计走弱2日满足EX1的天数,0)
ZTJZ10赋值:IF(PL20>1日前的PL20,统计走强3日满足EN2的天数,0)
ZTJD10赋值:IF(PL20>1日前的PL20,统计走强3日满足EX2的天数,0)
DTJZ10赋值:IF(PL20<1日前的PL20,统计走弱3日满足EN2的天数,0)
DTJD10赋值:IF(PL20<1日前的PL20,统计走弱3日满足EX2的天数,0)
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'(A)')COLORFFFF00
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'(B)')COLORFFFF00
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'(C)')COLORFFFF00
DRAWTEXT(EX1 AND PL10>1日前的PL10 AND ZTJD5=1,H*1.03,'1')画白色
DRAWTEXT(EN1 AND PL10>1日前的PL10 AND ZTJZ5=2,L*0.98,'↖2')画白色
DRAWTEXT(EX1 AND PL10>1日前的PL10 AND ZTJZ5=2,H*1.03,'3')画白色
DRAWTEXT(EN1 AND PL10>1日前的PL10 AND ZTJZ5=3,L*0.98,'↖4')画白色
DRAWTEXT(EX2 AND (PL20>1日前的PL20 OR 1日前的PL20>1日前的PL20 OR ZTJD10=1),H*1.020,'5')画白色
DRAWTEXT(EX2 AND PL20>1日前的PL20 AND ZTJD10=1,H*1.05,'一')COLOR00FFFF, 线宽为3
DRAWTEXT(EN2 AND PL20>1日前的PL20 AND ZTJZ10=2,L*0.94,'二')COLOR00FFFF, 线宽为3
DRAWTEXT(EX2 AND PL20>1日前的PL20 AND ZTJD10=2,H*1.05,'三')COLOR00FFFF, 线宽为3
DRAWTEXT(EN2 AND PL20>1日前的PL20 AND ZTJZ10=3,L*0.94,'四')COLOR00FFFF, 线宽为3
XG1赋值:EX2
XG2赋值:PL20>1日前的PL20
XG3赋值:ZTJZ10=3
DRAWTEXT(1日前的XG2*XG3 AND XG1,H*1.06,'五')画白色, 线宽为3
DRAWTEXT(1日前的XG2*XG3 AND XG1,H*0.99,'●')COLOR0000FF, 线宽为3
DRAWTEXT(1日前的XG2*XG3 AND XG1,H*0.97,'●')COLOR00FFFF, 线宽为3
{假阴真阳}
STICKLINE(C1日前的C,H,L,0,0)COLORLIRED
STICKLINE(C1日前的C,C,O,3,1)COLORLIRED
{真阴假阳}
STICKLINE(C>O AND C<1日前的C,H,L,0,0)COLORAA00AA
STICKLINE(C>O AND C<1日前的C,C,O,3,1)COLORAA00AA
{涨幅为零}
STICKLINE(C=1日前的C,H,L,0.1,0)画白色
STICKLINE(C=1日前的C,C,O,3,0)画白色
{蹲跳K}
DRAWICON(L>=1日前的L AND H<=1日前的H AND JX11=100,L*0.998,1)
DRAWICON(L>=1日前的L AND H<=1日前的H AND JX11=100,H*1.035,2)
{红三兵}
STICKLINE(C>O最近3日一直存在 AND EVERY(C>1日前的C,3) AND O<>H,O,C,1.5,0)画红色
{黑三兵}
DRAWICON(CL,L,28)
当满足条件ZTB时,在O和C之间画柱状线
STICKLINE(ZTB,O,(C+O)/2,0.1,0)画黄色
{回踩关注}
DRAWICON(上次ZTB距今天数<=5 AND 上次ZTB距今天数>1 AND L<=ZTL AND C>ZTL AND CL,L,29)