注意:本指标源码用于文华财经赢顺wh6、睿期wh7软件。

01

指标源码

//友情提示,缠论指标含有未来函数


KAIGUAN:=1;//开关,设为0,指标不显示

MA8:=1;

ZHANF:=10;

HHZHANBDD:=(H>HV(H,ZHANF))*KAIGUAN*MA8;

NHZHANBDD:=(BARSLAST(HHZHANBDD)+1)*KAIGUAN*MA8;

LLZHANBDD:=(L<LV(L,ZHANF))*KAIGUAN*MA8;

NLZHANBDD:=(BARSLAST(LLZHANBDD)+1)*KAIGUAN*MA8;

AHZHANBDD:=(BACKSET(COUNT(LLZHANBDD,NHZHANBDD)&&LLZHANBDD,NHZHANBDD))*KAIGUAN*MA8;

ALZHANBDD:=(BACKSET(COUNT(HHZHANBDD,NLZHANBDD)&&HHZHANBDD,NLZHANBDD))*KAIGUAN*MA8;

LX:=ALZHANBDD, NOTEXT;

HX:=AHZHANBDD, NOTEXT;

BI2022:=1;

DRAWLINE1(BI2022*CROSS(LX=1,0.5),L,CROSS(HX=1,0.5),H,0),RGB(168,168,168),DOT;

DRAWLINE1(BI2022*CROSS(HX=1,0.5),H,CROSS(LX=1,0.5),L,0),RGB(168,168,168),DOT;

HH:=CROSS(AHZHANBDD=1,0.5), NOTEXT;

LL:=CROSS(ALZHANBDD=1,0.5), NOTEXT;

DRAWLINE3(BI2022*ISLASTBAR&&BARSLAST(HH)<BARSLAST(LL),BI2022*VALUEWHEN(HH,H),BI2022*BARSLAST(HH),1,LLV(L,BARSLAST(HH)),LLVBARS(L,BARSLAST(HH)),0),RGB(200,200,0);

DRAWLINE3(BI2022*ISLASTBAR&&BARSLAST(HH)>BARSLAST(LL),BI2022*VALUEWHEN(LL,L),BI2022*BARSLAST(LL),1,HHV(H,BARSLAST(LL)),HHVBARS(H,BARSLAST(LL)),0),RGB(200,200,0);

BADS4:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),4));

BBDS4:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),5));

DRAWLINE1(BI2022*CROSS(LX=1,0.5)&&BBDS4=1&&BADS4=0,L,CROSS(HX=1,0.5),H,0),RGB(200,200,0);

DRAWLINE1(BI2022*CROSS(HX=1,0.5)&&BBDS4=1&&BADS4=0,H,CROSS(LX=1,0.5),L,0),RGB(200,200,0);

BADS2:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),2));

BBDS2:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),3));

DRAWLINE1(BI2022*CROSS(LX=1,0.5)&&BBDS2=1&&BADS2=0,L,CROSS(HX=1,0.5),H,0),RGB(128,128,255);

DRAWLINE1(BI2022*CROSS(HX=1,0.5)&&BBDS2=1&&BADS2=0,H,CROSS(LX=1,0.5),L,0),RGB(128,128,255);

BADS3:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),3));

BBDS3:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),4));

DRAWLINE1(BI2022*CROSS(LX=1,0.5)&&BBDS3=1&&BADS3=0,L,CROSS(HX=1,0.5),H,0),RGB(128,128,255);

DRAWLINE1(BI2022*CROSS(HX=1,0.5)&&BBDS3=1&&BADS3=0,H,CROSS(LX=1,0.5),L,0),RGB(128,128,255);

BADS1:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),1));

BBDS1:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),2));

DRAWLINE1(BI2022*CROSS(LX=1,0.5)&&BBDS1=1&&BADS1=0,L,CROSS(HX=1,0.5),H,0),RGB(128,128,255);

DRAWLINE1(BI2022*CROSS(HX=1,0.5)&&BBDS1=1&&BADS1=0,H,CROSS(LX=1,0.5),L,0),RGB(128,128,255);

DRAWNUMBER1(BI2022*REFX(CROSS(LX=1,0.5),5),REFX(L,5),REFX((L-VALUEWHEN(CROSS(HX=1,0.5),H)),5),2),ALIGN2,VALIGN0,RGB(0,67,100);

DRAWNUMBER1(BI2022*REFX(CROSS(HX=1,0.5),5),REFX(H,5),REFX((H-VALUEWHEN(CROSS(LX=1,0.5),L)),5),2),ALIGN2,VALIGN2,RGB(0,67,100);

BX1:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HH)<BARSLAST(LL),LLVBARS(L,BARSLAST(HH))+1),0.5);

BX2:=CROSS(BACKSET(ISLASTBAR&&BARSLAST(HH)>BARSLAST(LL),HHVBARS(H,BARSLAST(LL))+1),0.5);

DRAWNUMBER1(BI2022*REFX(BX1,5),REFX(L,5),REFX((L-VALUEWHEN(CROSS(HX=1,0.5),H)),5),2),ALIGN2,VALIGN0,RGB(0,67,100);

DRAWNUMBER1(BI2022*REFX(BX2,5),REFX(H,5),REFX((H-VALUEWHEN(CROSS(LX=1,0.5),L)),5),2),ALIGN2,VALIGN0,RGB(0,67,100);

BAA:=IF(CROSS(LX=1,0.5),L,H);

BBB:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),4));

DRAWTEXT(BI2022*BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=1,H,’H2      ‘),ALIGN2,FONTSIZE18,RGB(128,128,255);

DRAWTEXT(BI2022*BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=2,H,’H1      ‘),ALIGN2,FONTSIZE18,RGB(128,128,255);

DRAWTEXT(BI2022*BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=1,L,’L2      ‘),ALIGN2,VALIGN0,FONTSIZE18,RGB(128,128,255);

DRAWTEXT(BI2022*BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=2,L,’L1      ‘),ALIGN2,VALIGN0,FONTSIZE18,RGB(128,128,255);

DRAWTEXT(BI2022*BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=2&&H<REF(H,BARSLAST(BI2022*BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=1)),H*1.0025,’顶背      ‘),ALIGN2,FONTSIZE18,COLORGREEN;

DRAWTEXT(BI2022*BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=2&&L>REF(L,BARSLAST(BI2022*BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=1)),L*0.9985,’底背      ‘),ALIGN2,VALIGN0,FONTSIZE18,COLORRED; 

BAA0:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),5));

DRAWTEXT(BI2022*CROSS(BAA0>=1,0.5) && CROSS(LX=1,0.5),L,’L3      ‘),ALIGN2,VALIGN0,FONTSIZE18,RGB(155,155,155);

DRAWTEXT(BI2022*CROSS(BAA0>=1,0.5) && CROSS(HX=1,0.5),H,’H3      ‘),ALIGN2,FONTSIZE18,RGB(155,155,155);

BAA1:=BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5)||CROSS(HX=1,0.5),6));

DRAWTEXT(BI2022*CROSS(BAA1>=1,0.5) && CROSS(LX=1,0.5),L,’L4      ‘),ALIGN2,VALIGN0,FONTSIZE18,RGB(155,155,155);

DRAWTEXT(BI2022*CROSS(BAA1>=1,0.5) && CROSS(HX=1,0.5),H,’H4      ‘),ALIGN2,FONTSIZE18,RGB(155,155,155);

AM26:=BACKSET(ISLASTBAR&&BARSLAST(HH)>BARSLAST(LL),HHVBARS(H,BARSLAST(LL))+1);

BM26:=BACKSET(ISLASTBAR&&BARSLAST(HH)<BARSLAST(LL),LLVBARS(L,BARSLAST(HH))+1);

DRAWTEXT(BI2022*CROSS(AM26,0.5),H,’ H0  ?      ‘),FONTSIZE18,RGB(200,200,0);

DRAWTEXT(BI2022*CROSS(BM26,0.5),L,’ L0 ?      ‘),VALIGN0,FONTSIZE18,RGB(200,200,0);

BI2022中枢:=1;

HH2:=VALUEWHEN(BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=1,H),DOT;

HH1:=VALUEWHEN(BBB&&CROSS(HX=1,0.5)&&COUNT(CROSS(HX=1,0.5),BARSLASTCOUNT(BBB))=2,H),DOT;

LL2:=VALUEWHEN(BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=1,L),DOT;

LL1:=VALUEWHEN(BBB&&CROSS(LX=1,0.5)&&COUNT(CROSS(LX=1,0.5),BARSLASTCOUNT(BBB))=2,L),DOT;

NG:=BARSLASTCOUNT(HH2>0 || HH1>0 || LL2>0 || LL1>0)=1,DOT;

NGG:=BARSLASTCOUNT(HH2>0 && HH1>0 && LL2>0 && LL1>0)=1,DOT;

DRAWSL(BI2022中枢*NGG,MIN(HH2,HH1),0,-SUMBARS(NG,1)+1,0,RGB(128,128,255)),DOT;

DRAWSL(BI2022中枢*NGG,MAX(LL2,LL1),0,-SUMBARS(NG,1)+1,0,RGB(128,128,255)),DOT;

DRAWLINE(BI2022中枢*NGG,MIN(HH2,HH1),NGG,MAX(LL2,LL1),RGB(128,128,255)),DOT;

DRAWLINE3(BI2022中枢*NGG,MIN(HH2,HH1),SUMBARS(NG,1)-1,NGG,MAX(LL2,LL1),SUMBARS(NG,1)-1,0),RGB(128,128,255),DOT;

L1CHAN0409:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(LX=1,0.5))+1),0.5);

L2CHAN0409:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5),2)),0.5);

L3CHAN0409:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5),3)),0.5);

L4CHAN0409:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(LX=1,0.5),4)),0.5);

H1CHAN0409:=CROSS(BACKSET(ISLASTBAR,BARSLAST(CROSS(HX=1,0.5))+1),0.5);

H2CHAN0409:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(HX=1,0.5),2)),0.5);

H3CHAN0409:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(HX=1,0.5),3)),0.5);

H4CHAN0409:=CROSS(BACKSET(ISLASTBAR,SUMBARS(CROSS(HX=1,0.5),4)),0.5);

ZHOUQI2004:=BARSLAST(CROSS(BBB,0.5)),RGB(255,0,255);

VERTLINE(ZHOUQI2004=1,COLORMAGENTA);

DRAWLINE3(ISLASTBAR&&VALUEWHEN(L1CHAN0409,L)>=VALUEWHEN(L2CHAN0409,L),VALUEWHEN(L1CHAN0409,L),0,1,VALUEWHEN(L1CHAN0409,L),BARSLAST(CROSS(BBB,0.5)),0),RGB(128,128,255),LINETHICK1,DOT;

DRAWLINE3(ISLASTBAR&&VALUEWHEN(L1CHAN0409,L)<=VALUEWHEN(L2CHAN0409,L),VALUEWHEN(L2CHAN0409,L),0,1,VALUEWHEN(L2CHAN0409,L),BARSLAST(CROSS(BBB,0.5)),0),RGB(128,128,255),LINETHICK1,DOT;

DRAWTEXT(ZHOUQI2004=1&&REFX1(ISLASTBAR&&VALUEWHEN(L1CHAN0409,L)>=VALUEWHEN(L2CHAN0409,L),10000),REFX1(VALUEWHEN(L1CHAN0409,L),10000),’ BI2022枢下沿’),RGB(128,128,255),ALIGN2;

DRAWTEXT(ZHOUQI2004=1&&REFX1(ISLASTBAR&&VALUEWHEN(L1CHAN0409,L)<=VALUEWHEN(L2CHAN0409,L),10000),REFX1(VALUEWHEN(L2CHAN0409,L),10000),’BI2022枢下沿’),RGB(128,128,255),ALIGN2;

DRAWSL(ISLASTBAR,(MIN(VALUEWHEN(H2CHAN0409,H),VALUEWHEN(H1CHAN0409,H))+MAX(VALUEWHEN(L1CHAN0409,L),VALUEWHEN(L2CHAN0409,L)) )/2 ,0,-ZHOUQI2004,0,COLORYELLOW  );

DRAWNUMBER(ZHOUQI2004=1&&REFX1(VALUEWHEN(L1CHAN0409,L)>=VALUEWHEN(L2CHAN0409,L),10000),REFX1(VALUEWHEN(L1CHAN0409,L),10000),REFX1(VALUEWHEN(L1CHAN0409,L)*(-1),10000),2,RGB(128,128,255)),ALIGN0;

DRAWNUMBER(ZHOUQI2004=1&&REFX1(VALUEWHEN(L1CHAN0409,L)<=VALUEWHEN(L2CHAN0409,L),10000),REFX1(VALUEWHEN(L2CHAN0409,L),10000),REFX1(VALUEWHEN(L2CHAN0409,L)*(-1),10000),2,RGB(128,128,255)),ALIGN0;

DRAWLINE3(ISLASTBAR&&VALUEWHEN(H1CHAN0409,H)>=VALUEWHEN(H2CHAN0409,H),VALUEWHEN(H2CHAN0409,H),0,1,VALUEWHEN(H2CHAN0409,H),BARSLAST(CROSS(BBB,0.5)),0),RGB(128,128,255),DOT;

DRAWLINE3(ISLASTBAR&&VALUEWHEN(H1CHAN0409,H)<=VALUEWHEN(H2CHAN0409,H),VALUEWHEN(H1CHAN0409,H),0,1,VALUEWHEN(H1CHAN0409,H),BARSLAST(CROSS(BBB,0.5)),0),RGB(128,128,255),DOT;

DRAWNUMBER(ZHOUQI2004=1&&REFX1(VALUEWHEN(H1CHAN0409,H)>=VALUEWHEN(H2CHAN0409,H),10000),REFX1(VALUEWHEN(H2CHAN0409,H),10000),REFX1(VALUEWHEN(H2CHAN0409,H)*(-1),10000),2,RGB(128,128,255)),ALIGN0;

DRAWNUMBER(ZHOUQI2004=1&&REFX1(VALUEWHEN(H1CHAN0409,H)<=VALUEWHEN(H2CHAN0409,H),10000),REFX1(VALUEWHEN(H1CHAN0409,H),10000),REFX1(VALUEWHEN(H1CHAN0409,H)*(-1),10000),2,RGB(128,128,255)),ALIGN0;

DRAWTEXT(ZHOUQI2004=1&&REFX1(ISLASTBAR&&VALUEWHEN(H1CHAN0409,H)>=VALUEWHEN(H2CHAN0409,H),10000),REFX1(VALUEWHEN(H2CHAN0409,H),10000),’ BI2022枢上沿 ‘),RGB(128,128,255),ALIGN2;

DRAWTEXT(ZHOUQI2004=1&&REFX1(ISLASTBAR&&VALUEWHEN(H1CHAN0409,H)<=VALUEWHEN(H2CHAN0409,H),10000),REFX1(VALUEWHEN(H1CHAN0409,H),10000),’  BI2022枢上沿 ‘),RGB(128,128,255),ALIGN2;

02

图片示例

友情提示:本指标公式仅作为知识分享,供交流学习使用,不构成任何投资建议,不作为投资依据。
声明:本站所有文章,如无特殊说明或标注,均为本站原创发布。任何个人或组织,在未征得本站同意时,禁止复制、盗用、采集、发布本站内容到任何网站、书籍等各类媒体平台。如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。