禪論中樞指標(biāo)（一）
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;
標(biāo)簽：
