帮助改下 显示重复定义 谢谢 (文华财经WH6赢顺V6.7)

投资者咨询:帮助改下 显示重复定义 谢谢 (文华财经WH6赢顺V6.7)
来源:文华财经  日期:2018-8-3 14:28
  MA5:MA(C,5),COLORFFFFFF,LINETHICK1;

MA13:MA(C,13),COLOR4080FF,LINETHICK1;

MA21:MA(C,21),COLORFF80FF,LINETHICK2;

//MA55:IF(PERIODNAME=='月线' OR PERIODNAME=='季线' OR PERIODNAME=='年线' OR BARPOS<55,MA21,MA(C,55)),COLORCYAN,LINETHICK2;

MA233:=MA(C,233),COLORGREEN,LINETHICK2;

角5:ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW,COLORWHITE;

TYP:=(HIGH+LOW+CLOSE)/3;

CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));

//布林

MID:=MA21;

上:MID+2*STD(CLOSE,21),COLORGREEN,DOT;

下:MID-2*STD(CLOSE,21),COLORRED,DOT;

今差:=上-下;

昨差:=REF(上,1)-REF(下,1);

开口:(今差-昨差)/昨差*100,NODRAW,COLORWHITE;

宽度:(上-下)/MID*100,NODRAW,COLORGREEN;


 G:=MA(C,5);
D:=MA(C,10);

NNH:=BARSLAST(H=HHV(H,7)) ,NODRAW;

NNL:=BARSLAST(L=LLV(L,7)) ,NODRAW;
//PD:=REF(G,NNH)>REF(D,NNH) ,NODRAW;
NN:=IF(REF(G,NNH)>REF(D,NNH) AND NNH<=4,NNH,IF(REF(G,NNL)<REF(D,NNL) AND NNL<=4,NNL,5)) ,NODRAW;
N:=IF(ISLASTBAR AND NN>0,NN,5) ,NODRAW;
HH:=REF(H,N)=HHV(H,6);
LL:=REF(L,N)=LLV(L,6);
FG01:BACKSET(HH,N+1)>BACKSET(HH,N),NODRAW;//只设置前面第6个
FD01:BACKSET(LL,N+1)>BACKSET(LL,N) ,NODRAW;
FG02:=FG01=FD01 AND G>D,NODRAW;
FD02:FG01=FD01 AND G<D,NODRAW;
//FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,//高底是同一K看均线位置
//        IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0)),NODRAW;//高点处BARLAST(FG01)=0
//FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,
//IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0)),NODRAW;
TTTT:BARSLAST(FD01),NODRAW;
//FG0:=FG01 AND H=HHV(H,IF(FG02=1,BARSLAST(REF(FD01,1))+1,BARSLAST(FD01))) AND FD02=0 ,NODRAW;
//FD0:=FD01 AND L=LLV(L,IF(FD02=1,BARSLAST(REF(FG01,1))+1,BARSLAST(FG01))) AND FG02=0 ,NODRAW;

FG0:=FG01 AND IF(FG02=1,H=HHV(H,BARSLAST(REF(FD01,1))+1),H=HHV(H,IF(BARSLAST(L=LLV(L,7))>=5,5,BARSLAST(FD01)))) AND FD02=0 ,NODRAW;
FD0:=FD01 AND IF(FD02=1,L=LLV(L,BARSLAST(REF(FG01,1))+1),L=LLV(L,IF(BARSLAST(H=HHV(L,7))>=5,5,BARSLAST(FG01))))  AND FG02=0 ,NODRAW;
//高低点间周期


//高低点间周期
GT:BARSLAST(FG0),NODRAW;
DT:BARSLAST(FD0),NODRAW;
//第一次处理高低点间多余的点

LLLL:DT=0 AND REF(DT,1)<GT AND L>REF(L,REF(DT,1)+1),NODRAW;
FG1:BACKSET(REFX(GT,1)=0 AND GT<DT AND REFX(H,1)>=REF(H,GT),GT+1),NODRAW;
FD1:BACKSET(REFX(DT,1)=0 AND DT<GT AND REFX(L,1)<=REF(L,DT),DT+1),NODRAW;
FG11:IF(GT=0 AND REF(GT,1)<DT AND IF(REF(G,BARSLAST(L=LLV(L,7)))>REF(D,BARSLAST(L=LLV(L,7))),BARSLAST(L=LLV(L,7))<5,1) AND  H<REF(H,REF(GT,1)+1),1,0),NODRAW;
FD11:IF(DT=0 AND REF(DT,1)<GT AND IF(REF(G,BARSLAST(H=HHV(H,7)))<REF(D,BARSLAST(H=HHV(H,7))),BARSLAST(H=HHV(H,7))<5,1) AND L>REF(L,REF(DT,1)+1),1,0),NODRAW;
//再次周期
GT1:BARSLAST(FG11<>1 AND FG1<>1 AND FG0),NODRAW;
DT1:BARSLAST(FD11<>1 AND FD1<>1 AND FD0),NODRAW;
//GGT1:=REF(GT1,1),NODRAW;
//处理两边都少于3根的笔
//HHHH:REF(H,GT1),NODRAW;
//HHHHH:HHV(H,GT1+5),NODRAW;
FD2:BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)>LLV(L,GT1+5),DT1+1),NODRAW;
//加两句,低是最低,去两边;
//NL:GT1=0 AND DT1<4 AND REF(GT1,1)-DT1<4 ,NODRAW;
//LLLLLLLL:LLV(L,GT1+5),NODRAW;
FG2A:BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)<=LLV(L,GT1+5) AND REF(H,GT1)>HHV(H,GT1+5),GT1+1),NODRAW;
FG2B:IF(GT1=0 AND DT1<4 AND REF(GT1,1)-DT1<4 AND REF(L,DT1)<=LLV(L,REF(GT1,1)+6) AND H>HHV(H,REF(GT1,1)+6),1,0),NODRAW;
FG2:BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)<HHV(H,DT1+5),GT1+1),NODRAW;

FD2A:BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)>=HHV(L,DT1+5) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW;
FD2B:IF(DT1=0 AND GT1<4 AND REF(DT1,1)-GT1<4 AND REF(H,GT1)>=HHV(H,REF(DT1,1)+6) AND L>LLV(L,REF(DT1,1)+6),1,0),NODRAW;
//

//HHV(H,GT1+1)<HHV(H,GT1+15)
//GGG:HHV(H,GT1+1),NODRAW;
//DDD:HHV(H,GT1+15),NODRAW;
//处理单边都少于3根的笔
//GT11:=BARSLAST(GT1=0 AND FG2<>1),NODRAW;
//DT11:=BARSLAST(DT1=0 AND FD2<>1  AND FD20<>1),NODRAW;
//FG21:IF(GT1=0 AND DT1<4 AND H<HHV(H,REF(GT1,1)+3),1,0),NODRAW;
//FD21:IF(DT1=0 AND GT1<4  AND L>LLV(L,REF(DT1,1)+3) ,1,0),NODRAW;

//FD22:BACKSET(REFX(GT1,1)=0 AND DT1<3 AND REFX(H,1)>REF(H,GT1) AND REF(L,DT1)>LLV(L,GT1+5),DT1+1),NODRAW;
//FG22:BACKSET(REFX(DT1,1)=0 AND GT1<3 AND REFX(L,1)<REF(L,DT1) AND REF(H,GT1)<HHV(H,DT1+5),GT1+1),NODRAW;
TTTTTT: H<REF(H,REF(GT1,1)+1) AND DT1<4,NODRAW;
HHHHHH:REF(LLV(L,10),DT1),NODRAW;
//前长后短;
FG21:IF(GT1=0 AND DT1<4 AND H<=REF(H,REF(GT1,1)+1)  ,1,0),NODRAW;
FD21:IF(DT1=0 AND GT1<4  AND L>=REF(L,REF(DT1,1)+1) ,1,0),NODRAW;

//前短后长,前低后高(去低);
FD231:BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND REF(L,DT1)>REF(LLV(L,10),DT1),DT1+1),NODRAW;
FG23:BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND  GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND (REF(H,GT1)<REF(HHV(H,13),GT1) OR REF(FD231,DT1)=0),GT1+1),NODRAW;

//前短后长,前高后低(去高);

//NNN:REF(H,GT1)>=REF(HHV(H,8),GT1),NODRAW;
//前短后长,去2;
FG231:BACKSET(REFX(DT1,1)=0 AND GT1>3  AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND REF(H,GT1)<REF(HHV(H,10),GT1) ,GT1+1),NODRAW;
FD23:BACKSET(REFX(DT1,1)=0 AND GT1>3  AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND ( REF(L,DT1)>REF(LLV(L,13),DT1) OR REF(FG231,GT1)=0),DT1+1),NODRAW;
///前短后长,去3;

FDD23:REF(H,GT1)<REF(HHV(H,10),GT1) OR REF(FD23,DT1)=0,NODRAW;


FD24:BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)<HHV(H,GT1+3) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW;
FG24:BACKSET(REFX(DT1,1)=0 AND GT1>3  AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)>LLV(L,DT1+3) AND REF(H,GT1)<HHV(H,GT1+5),GT1+1),NODRAW;
//FG241:IF(GT1=0 AND DT1>4 AND  REF(GT1,1)-DT1<3  AND H<HHV(H,REF(GT1,1)+3)   AND REF(FD24,DT1+2)<>1,1,0),NODRAW;
//FD241:IF(DT1=0 AND GT1>4  AND REF(DT1,1)-GT1<3   AND L>LLV(L,REF(DT1,1)+3)  AND REF(FG24,GT1+2)<>1,1,0),NODRAW;
//FGE:BACKSET(ISLASTBAR AND DT1-GT1<3 AND DT1>GT1, GT1+1),NODRAW;
//FDE:BACKSET(ISLASTBAR AND GT1-DT1<3  AND GT1>DT1, DT1+1),NODRAW;
//FG21:IF(GT1=0 AND DT1<4 AND REF(GT1,1)<4,1,0),NODRAW;
//FD21:IF(DT1=0 AND GT1<4  AND REF(DT1,1)<4 ,1,0),NODRAW;
//做两次高低点间多余的点
GT2:BARSLAST(FG21<>1 AND FG23<>1 AND FG231<>1 AND FG24<>1   AND FG2<>1 AND FG2A<>1 AND FG2B<>1 AND GT1=0),NODRAW;
DT2:BARSLAST(FD21<>1 AND FD23<>1 AND FD231<>1 AND FD24<>1  AND FD2<>1 AND FD2A<>1 AND FD2B<>1 AND DT1=0),NODRAW;
FG3:BACKSET(REFX(GT2,1)=0 AND GT2<DT2 AND REFX(H,1)>=REF(H,GT2),GT2+1),NODRAW;
//HHX:REF(H,GT2),NODRAW;
FD3:BACKSET(REFX(DT2,1)=0 AND DT2<GT2 AND REFX(L,1)<=REF(L,DT2),DT2+1),NODRAW;
FG31:IF(GT2=0 AND REF(GT2,1)<DT2 AND H<REF(H,REF(GT2,1)+1),1,0),NODRAW;
FD31:IF(DT2=0 AND REF(DT2,1)<GT2 AND L>REF(L,REF(DT2,1)+1),1,0),NODRAW;
GT3:BARSLAST(GT2=0 AND FG3<>1 AND FG31<>1 ),NODRAW;
DT3:BARSLAST(DT2=0 AND  FD3<>1 AND FD31<>1),NODRAW;
FG4:BACKSET(REFX(GT3,1)=0 AND GT3<DT3 AND REFX(H,1)>=REF(H,GT3),GT3+1),NODRAW;
FD4:BACKSET(REFX(DT3,1)=0 AND DT3<GT3 AND REFX(L,1)<=REF(L,DT3),DT3+1),NODRAW;
FG41:IF(GT3=0 AND REF(GT3,1)<DT3 AND H<REF(H,REF(GT3,1)+1),1,0),NODRAW;
FD41:IF(DT3=0 AND REF(DT3,1)<GT3 AND L>REF(L,REF(DT3,1)+1),1,0),NODRAW;


//FD31:IF(DT2=0 AND REF(DT2,1)<REF(GT2,1) AND L>REF(L,DT2+1),1,0),NODRAW;
//HHH:=GT3=0,NODRAW;
//LLL:=DT3=0,NODRAW;
HHH:=GT3=0 AND FG31<>1 AND  FG3<>1,NODRAW;
LLL:=DT3=0 AND FD31<>1 AND  FD3<>1,NODRAW;
//HHH:=FG0 AND FG11<>1 AND FG1<>1 AND  FG2<>1 AND FG21<>1 AND   FG31<>1 AND  FG3<>1;
//LLL:=FD0 AND FD11<>1 AND FD1<>1 AND  FD2<>1 AND FD21<>1 AND FD31<>1 AND  FD3<>1;
DRAWLINE1(HHH ,H,LLL,L,0),COLORWHITE,DOT;
DRAWLINE1(LLL,L,HHH ,H,0),COLORWHITE,DOT;

//DRAWLINE(,H,UU, L,COLORGREEN);
//PARTLINE(FG0 AND FG41<>1 AND  FG4<>1 AND   FG31<>1 AND  FG3<>1 AND  FG2<>1 AND FG11<>1 AND FG1<>1,H,COLORYELLOW),CIRCLEDOT,LINETHICK5;
//PARTLINE(FD0 AND  FD41<>1 AND  FD4<>1 AND  FD31<>1 AND  FD3<>1 AND  FD2<>1 AND FD11<>1 AND FD1<>1,L,COLORCYAN),CIRCLEDOT,LINETHICK5;
//PARTLINE(FD01  ,L,COLORRED),CIRCLEDOT,LINETHICK2;
PARTLINE(FG0  ,H,COLORYELLOW),POINTDOT,LINETHICK2;
PARTLINE(FD0  ,L,COLORCYAN),CIRCLEDOT,LINETHICK2;
DYNAINFO3:=REFX1(REF(C,1),10000);
DYNAINFO5:=REFX1(H,10000);
DYNAINFO6:=REFX1(L,10000);
DYNAINFO8:=REFX1(VOL,10000);
DYNAINFO10:=REFX1(AVPRICE*V,10000);


JJJ:=IF(DYNAINFO8>0.01,0.01*DYNAINFO10/DYNAINFO8,DYNAINFO3);
DDD:=(DYNAINFO5<0.01 || DYNAINFO6<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO5+0.01) && JJJ>(DYNAINFO6-0.01)));
A1:=C>=REF(C,4);
A2:=C<REF(C,4);
A3:=C<REF(C,4) AND REF(A1,1);
T:=BARSLAST(A3),NODRAW;
M0:=(T=0 AND REFX(T=1 AND NOT(A2),1)) OR (REFX(T=2 AND NOT(A2),2)) OR (REFX(T=3 AND NOT(A2),3)) OR (REFX(T=4 AND NOT(A2),4)) OR (REFX(T=5 AND NOT(A2),5)) OR (REFX(T=6 AND NOT(A2),6)) OR (REFX(T=7 AND NOT(A2),7)) OR (REFX(T=8 AND NOT(A2),8));
M1:=T=1 AND REFX(T=2 AND NOT(A2),1) OR (REFX(T=3 AND NOT(A2),2)) OR (REFX(T=4 AND NOT(A2),3)) OR (REFX(T=5 AND NOT(A2),4)) OR (REFX(T=6 AND NOT(A2),5)) OR (REFX(T=7 AND NOT(A2),6)) OR (REFX(T=8 AND NOT(A2),7));
M2:=T=2 AND REFX(T=3 AND NOT(A2),1) OR (REFX(T=4 AND NOT(A2),2)) OR (REFX(T=5 AND NOT(A2),3)) OR (REFX(T=6 AND NOT(A2),4)) OR (REFX(T=7 AND NOT(A2),5)) OR (REFX(T=8 AND NOT(A2),6));
M3:=T=3 AND REFX(T=4 AND NOT(A2),1) OR (REFX(T=5 AND NOT(A2),2)) OR (REFX(T=6 AND NOT(A2),3)) OR (REFX(T=7 AND NOT(A2),4))  OR (REFX(T=8 AND NOT(A2),5));
M4:=T=4 AND REFX(T=5 AND NOT(A2),1) OR (REFX(T=6 AND NOT(A2),2)) OR (REFX(T=7 AND NOT(A2),3)) OR (REFX(T=8 AND NOT(A2),4));
M5:=T=5 AND  REFX(T=6 AND NOT(A2),1) OR (REFX(T=7 AND NOT(A2),2)) OR (REFX(T=8 AND NOT(A2),3));
M6:=T=6  AND  REFX(T=7 AND NOT(A2),1) OR (REFX(T=8 AND NOT(A2),2));
M7:=T=7  AND  REFX(T=8 AND NOT(A2),1);
N0:=T=1 AND REF(T=0 AND A3,1) AND A2;
N1:=T=2 AND REF(N0,1) AND A2;
N2:=T=3 AND REF(N1,1) AND A2;
N3:=T=4 AND REF(N2,1) AND A2;
N4:=T=5 AND REF(N3,1) AND A2;
N5:=T=6 AND REF(N4,1) AND A2;
N6:=T=7 AND REF(N5,1) AND A2;
N7:=T=8 AND REF(N6,1) AND A2;
WZD:=L*0.985;
WZG:=H*1.011;
//DRAWTEXT(T=0 AND NOT(M0),WZD,'?'),COLORGREEN;
//DRAWTEXT(N0 AND NOT(M1),WZD,'?'),COLORGREEN;
//DRAWTEXT(N1 AND NOT(M2),WZD,'?'),COLORGREEN;
//DRAWTEXT(N2 AND NOT(M3),WZD,'?'),COLORGREEN;
//DRAWTEXT(N3 AND NOT(M4),WZD,'?'),COLORGREEN;
//DRAWTEXT(N4 AND NOT(M5),WZD,'?'),COLORGREEN;
//DRAWTEXT(N5 AND NOT(M6),WZD,'?'),COLORGREEN;
//DRAWTEXT(N6 AND NOT(M7),WZD,'?'),COLORGREEN;
//DRAWTEXT(N7,WZG,'?'),COLORMAGENTA;
B1:=C<=REF(C,4);
B2:=C>REF(C,4);
B3:=C>REF(C,4) AND REF(B1,1);
T1:=BARSLAST(B3),NODRAW;
M8:=(T1=0 AND REFX(T1=1 AND NOT(B2),1)) OR (REFX(T1=2 AND NOT(B2),2)) OR (REFX(T1=3 AND NOT(B2),3)) OR (REFX(T1=4 AND NOT(B2),4)) OR (REFX(T1=5 AND NOT(B2),5)) OR (REFX(T1=6 AND NOT(B2),6)) OR (REFX(T1=7 AND NOT(B2),7)) OR (REFX(T1=8 AND NOT(B2),8));
M9:=T1=1 AND REFX(T1=2 AND NOT(B2),1) OR (REFX(T1=3 AND NOT(B2),2)) OR (REFX(T1=4 AND NOT(B2),3)) OR (REFX(T1=5 AND NOT(B2),4)) OR (REFX(T1=6 AND NOT(B2),5)) OR (REFX(T1=7 AND NOT(B2),6)) OR (REFX(T1=8 AND NOT(B2),7));
M10:=T1=2 AND REFX(T1=3 AND NOT(B2),1) OR (REFX(T1=4 AND NOT(B2),2)) OR (REFX(T1=5 AND NOT(B2),3)) OR (REFX(T1=6 AND NOT(B2),4)) OR (REFX(T1=7 AND NOT(B2),5)) OR (REFX(T1=8 AND NOT(B2),6));
M11:=T1=3 AND REFX(T1=4 AND NOT(B2),1) OR (REFX(T1=5 AND NOT(B2),2)) OR (REFX(T1=6 AND NOT(B2),3)) OR (REFX(T1=7 AND NOT(B2),4))  OR (REFX(T1=8 AND NOT(B2),5));
M12:=T1=4 AND REFX(T1=5 AND NOT(B2),1) OR (REFX(T1=6 AND NOT(B2),2)) OR (REFX(T1=7 AND NOT(B2),7)) OR (REFX(T1=8 AND NOT(B2),4));
M13:=T1=5 AND  REFX(T1=6 AND NOT(B2),1) OR (REFX(T1=7 AND NOT(B2),2)) OR (REFX(T1=8 AND NOT(B2),3));
M14:=T1=6  AND  REFX(T1=7 AND NOT(B2),1) OR (REFX(T1=8 AND NOT(B2),2));
M15:=T1=7  AND  REFX(T1=8 AND NOT(B2),1);
N8:=T1=1 AND REF(T1=0 AND B3,1) AND B2;
N9:=T1=2 AND REF(N8,1) AND B2;
N10:=T1=3 AND REF(N9,1) AND B2;
N11:=T1=4 AND REF(N10,1) AND B2;
N12:=T1=5 AND REF(N11,1) AND B2;
N13:=T1=6 AND REF(N12,1) AND B2;
N14:=T1=7 AND REF(N13,1) AND B2;
N15:=T1=8 AND REF(N14,1) AND B2;
//DRAWTEXT(T1=0 AND NOT(M8),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N8 AND NOT(M9),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N9 AND NOT(M10),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N10 AND NOT(M11),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N11 AND NOT(M12),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N12 AND NOT(M13),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N13 AND NOT(M14),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N14 AND NOT(M15),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N15 ,WZD,'?'),COLORGREEN;

 


N1111:=10;
N22:=10;
DISP:=2;
K:=IF(PERIOD=5,1,{日}
IF(PERIOD=6,1,{周}
IF(PERIOD=7,1,{月}
IF(PERIOD=8,1,{多分钟}
IF(PERIOD=9,1,{多日}
IF(PERIOD=10,1,{季}
IF(PERIOD=11,2,{年}
IF(PERIOD=4,1,{60F}
IF(PERIOD=3,1,{30F}
IF(PERIOD=2,1,{15F}
IF(PERIOD=1,1{5F},1{1F})))))))))))/10;
P1:=PEAK(H,N1111,1,1);
P2:=PEAK(H,N1111,2,1);
WP1:=PEAKBARS(H,N1111,1,1);
WP2:=PEAKBARS(H,N1111,2,1);
T111:=TROUGH(L,N22,1,1);
T2:=TROUGH(L,N22,2,1);
WT111:=TROUGHBARS(L,N22,1,1);
WT2:=TROUGHBARS(L,N22,2,1);
TJ1:=P1>T111 AND P2>T2 ;
ZD:=MAX(T111,T2);
ZG:=MIN(P1,P2);

TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,NULL);
ZSG:=IF(TJ8,ZG,NULL);
ZSH:=IF(TJ8,HH,NULL);
ZSL:=IF(TJ8,LL,NULL);
STICKLINE1(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE1(TJ8&&DISP=1,ZSD,ZSG,3,1),COLORMAGENTA;
STICKLINE1(TJ8&&DISP<>1,ZSD,ZSG,0,1),COLORMAGENTA;
DRAWTEXT(DISP=2,ZSH,'中枢'),COLORRED;
POLYLINE1(DISP=2,REF(ZSD,BARSLAST(TJ8))),CROSSDOT,COLORLIGHTRED;
POLYLINE1(DISP=2,REF(ZSG,BARSLAST(TJ8))),CROSSDOT,COLORLIGHTGREEN;
POLYLINE1(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;
POLYLINE1(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;
POLYLINE1(DISP=3,ZIGZAG(H,N1111,1)),COLORLIGHTBLUE;
POLYLINE1(DISP=3,ZIGZAG(L,N22,1)),COLORLIGHTBLUE;


局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高点预选C=1);
距前低天:=BARSLAST(局部低点预选C=-1);
小值周期:=LLVBARS(L,20);
大值周期:=HHVBARS(H,20);
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)<>1) OR REF(低保留S,距前低天)=0,1,0);
判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);
高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);
高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);
预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)<>1) OR REF(高保留,距前高天)=0,1,0);
判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);
低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);
距前高天A:=BARSLAST(高保留=1);
距前低天A:=BARSLAST(低保留=-1);
预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)<>1) OR REF(低保留,距前低天A)=0,1,0);
判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);
高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);
高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);
预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)<>1) OR REF(高保留XA,距前高天A)=0,1,0);
判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);
低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);
低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);
距前高天YA:=BARSLAST(高保留X=1);
距前低天YA:=BARSLAST(低保留X=-1);
预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)<>1) OR REF(低保留X,距前低天YA)=0,1,0);
判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);
高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);
高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);
预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)<>1) OR REF(高保留YXA,距前高天YA)=0,1,0);
判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);
低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);
低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部极点:=IF(极点保留=-1,L,IF(极点保留=1,H,NULL)), CIRCLEDOT ,COLORYELLOW;
//DRAWLINE1(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORLIGHTRED;
//DRAWLINE1(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORGREEN;
DD1:=BARSLAST(ABS(极点保留)<>1);
DRAWTEXT(极点保留=1,局部极点,'卖'),COLORGREEN,FONTSIZE15;
DRAWTEXT(极点保留=-1,局部极点,'买'),COLORRED,FONTSIZE15;











N1:=20;
N2:=10;
N3:=5;
CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
AA:=REF(H,N1)=HHV(H,2*N1+1);
QY:=BACKSET(AA,N1+1);
CC:=FILTER(QY,N1) AND H=HHV(H,N1+1);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=REFX1(DINGBUTS,10000);


DINGBUTS1:=REF(DINGBUTS,DDD+1);


GDCS2:=REFX1(DINGBUTS,100001);


DINGBU2:=REF(DINGBU1,DDD+1);


MM:=IF(CURRBARSCOUNT>GDCS2,0,1);


DRAWLINE1(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORRED;


DRAWLINE1(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT,LINETHICK2;


DRAWLINE1(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT,LINETHICK2;


AA1:=REF(L,N1)=LLV(L,2*N1+1);


QY1:=BACKSET(AA1,N1+1);


CC1:=FILTER(QY1,N1) AND L=LLV(L,N1+1);


DD1:=BARSLAST(CC1);


DDTS:=IF(CC1,CURRBARSCOUNT,0);


YDB:=IF(DD1,REF(L,DD1),L);


DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);


DDCS1:=REFX1(DDTS1,10000);


ZDB:=REF(YDB,DD1+1);


DDTS2:=REF(DDTS1,DD1+1);


DDCS2:=REFX1(DDTS2,10000);
//支撑:TRENDLINES(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L) ,COLORRED;
DRAWLINE1(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORFF5500,POINTDOT,LINETHICK2;


DRAWLINE1(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORYELLOW,POINTDOT,LINETHICK2;


LAA:=REF(H,N2)=HHV(H,2*N2+1);
LQY:=BACKSET(LAA,N2+1);
LCC:=FILTER(LQY,N2) AND H=HHV(H,N2+1);
LDDD:=BARSLAST(LCC);
LGDTS:=IF(LCC,CURRBARSCOUNT,0);
LDINGBU:=IF(LDDD,REF(H,LDDD),H);
LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS);
LDINGBU1:=REF(LDINGBU,LDDD+1);
LGDCS1:=REFX1(LDINGBUTS,10000);
LDINGBUTS1:=REF(LDINGBUTS,LDDD+1);
LGDCS2:=REFX1(LDINGBUTS1,10000);


LDINGBU2:=REF(LDINGBU1,LDDD+1);


LMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);


压力:TRENDLINES(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDCS1,H),COLORWHITE;
DRAWLINE1(CURRBARSCOUNT=LGDCS2,H,ISLASTBAR,REF(H,LGDCS2-1),1),COLOR0055FF,POINTDOT;
DRAWLINE1(CURRBARSCOUNT=LGDCS1,H,ISLASTBAR,REF(H,LGDCS1-1),1),COLORYELLOW,POINTDOT;


LAA1:=REF(L,N2)=LLV(L,2*N2+1);


LQY1:=BACKSET(LAA1,N2+1);


LCC1:=FILTER(LQY1,N2) AND L=LLV(L,N2+1);


LDD1:=BARSLAST(LCC1);


LDDTS:=IF(LCC1,CURRBARSCOUNT,0);


LYDB:=IF(LDD1,REF(L,LDD1),L);


LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS);


LDDCS1:=REFX1(LDDTS1,10000);


LZDB:=REF(LYDB,LDD1+1);


LDDTS2:=REF(LDDTS1,DD1+1);


LDDCS2:=REFX1(LDDTS2,10000);


支撑:TRENDLINES(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDCS1,L),COLORWHITE;
ZGSTAR:=(压力+支撑)/2;
ZGEND:=REFX1((压力+支撑)/2,10000);
LLAA:=REF(H,N3)=HHV(H,2*N3+1);


LLQY:=BACKSET(LLAA,N3+1);


LLCC:=FILTER(LLQY,N3) AND H=HHV(H,N3+1);


LLDDD:=BARSLAST(LLCC);
LLGDTS:=IF(LLCC,CURRBARSCOUNT,0);
LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H);
LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS);
LLDINGBU1:=REF(LLDINGBU,LLDDD+1);
LLGDCS1:=REFX1(LLDINGBUTS,10000);
LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD+1);


LLGDCS2:=REFX1(LLDINGBUTS1,10000);


LLDINGBU2:=REF(LLDINGBU1,LLDDD+1);


LLMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);


L压力:TRENDLINES(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLGDCS1,H) ,COLORYELLOW;


DRAWLINE1(CURRBARSCOUNT=LLGDCS2,H,ISLASTBAR,REF(H,LLGDCS2-1),1),COLOR0055FF,POINTDOT;


DRAWLINE1(CURRBARSCOUNT=LLGDCS1,H,ISLASTBAR,REF(H,LLGDCS1-1),1),COLORYELLOW,POINTDOT;


LLAA1:=REF(L,N3)=LLV(L,2*N3+1);


LLQY1:=BACKSET(LLAA1,N3+1);


LLCC1:=FILTER(LLQY1,N3) AND L=LLV(L,N3+1);


LLDD1:=BARSLAST(LCC1);


LLDDTS:=IF(LLCC1,CURRBARSCOUNT,0);


LLYDB:=IF(LLDD1,REF(L,LLDD1),L);
LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS);
LLDDCS1:=REFX1(LLDDTS1,10000);
LLZDB:=REF(LLYDB,LLDD1+1);
LLDDTS2:=REF(LLDDTS1,DD1+1);
LLDDCS2:=REFX1(LLDDTS2,10000);
L支撑:TRENDLINES(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDDCS1,L) ,COLORYELLOW;
LZGSTAR:=(L压力+L支撑)/2;
LZGEND:=REFX1((L压力+L支撑)/2,10000);
LSTARDAY:=5;
STARDAY:=5;

 






技术人员回复
日期:2018-8-3 14:33
这是几个指标整合在一起的,参考:

MA5:MA(C,5),COLORFFFFFF,LINETHICK1;

MA13:MA(C,13),COLOR4080FF,LINETHICK1;

MA21:MA(C,21),COLORFF80FF,LINETHICK2;

//MA55:IF(PERIODNAME=='月线' OR PERIODNAME=='季线' OR PERIODNAME=='年线' OR BARPOS<55,MA21,MA(C,55)),COLORCYAN,LINETHICK2;

MA233:=MA(C,233),COLORGREEN,LINETHICK2;

角5:ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW,COLORWHITE;

TYP:=(HIGH+LOW+CLOSE)/3;

CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));

//布林

MID:=MA21;

上:MID+2*STD(CLOSE,21),COLORGREEN,DOT;

下:MID-2*STD(CLOSE,21),COLORRED,DOT;

今差:=上-下;

昨差:=REF(上,1)-REF(下,1);

开口:(今差-昨差)/昨差*100,NODRAW,COLORWHITE;

宽度:(上-下)/MID*100,NODRAW,COLORGREEN;


 G:=MA(C,5);
D:=MA(C,10);

NNH:=BARSLAST(H=HHV(H,7)) ,NODRAW;

NNL:=BARSLAST(L=LLV(L,7)) ,NODRAW;
//PD:=REF(G,NNH)>REF(D,NNH) ,NODRAW;
NN:=IF(REF(G,NNH)>REF(D,NNH) AND NNH<=4,NNH,IF(REF(G,NNL)<REF(D,NNL) AND NNL<=4,NNL,5)) ,NODRAW;
N:=IF(ISLASTBAR AND NN>0,NN,5) ,NODRAW;
HH:=REF(H,N)=HHV(H,6);
LL:=REF(L,N)=LLV(L,6);
FG01:BACKSET(HH,N+1)>BACKSET(HH,N),NODRAW;//只设置前面第6个
FD01:BACKSET(LL,N+1)>BACKSET(LL,N) ,NODRAW;
FG02:=FG01=FD01 AND G>D,NODRAW;
FD02:FG01=FD01 AND G<D,NODRAW;
//FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,//高底是同一K看均线位置
//        IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0)),NODRAW;//高点处BARLAST(FG01)=0
//FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,
//IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0)),NODRAW;
TTTT:BARSLAST(FD01),NODRAW;
//FG0:=FG01 AND H=HHV(H,IF(FG02=1,BARSLAST(REF(FD01,1))+1,BARSLAST(FD01))) AND FD02=0 ,NODRAW;
//FD0:=FD01 AND L=LLV(L,IF(FD02=1,BARSLAST(REF(FG01,1))+1,BARSLAST(FG01))) AND FG02=0 ,NODRAW;

FG0:=FG01 AND IF(FG02=1,H=HHV(H,BARSLAST(REF(FD01,1))+1),H=HHV(H,IF(BARSLAST(L=LLV(L,7))>=5,5,BARSLAST(FD01)))) AND FD02=0 ,NODRAW;
FD0:=FD01 AND IF(FD02=1,L=LLV(L,BARSLAST(REF(FG01,1))+1),L=LLV(L,IF(BARSLAST(H=HHV(L,7))>=5,5,BARSLAST(FG01))))  AND FG02=0 ,NODRAW;
//高低点间周期


//高低点间周期
GT:BARSLAST(FG0),NODRAW;
DT:BARSLAST(FD0),NODRAW;
//第一次处理高低点间多余的点

LLLL:DT=0 AND REF(DT,1)<GT AND L>REF(L,REF(DT,1)+1),NODRAW;
FG1:BACKSET(REFX(GT,1)=0 AND GT<DT AND REFX(H,1)>=REF(H,GT),GT+1),NODRAW;
FD1:BACKSET(REFX(DT,1)=0 AND DT<GT AND REFX(L,1)<=REF(L,DT),DT+1),NODRAW;
FG11:IF(GT=0 AND REF(GT,1)<DT AND IF(REF(G,BARSLAST(L=LLV(L,7)))>REF(D,BARSLAST(L=LLV(L,7))),BARSLAST(L=LLV(L,7))<5,1) AND  H<REF(H,REF(GT,1)+1),1,0),NODRAW;
FD11:IF(DT=0 AND REF(DT,1)<GT AND IF(REF(G,BARSLAST(H=HHV(H,7)))<REF(D,BARSLAST(H=HHV(H,7))),BARSLAST(H=HHV(H,7))<5,1) AND L>REF(L,REF(DT,1)+1),1,0),NODRAW;
//再次周期
GT1:BARSLAST(FG11<>1 AND FG1<>1 AND FG0),NODRAW;
DT1:BARSLAST(FD11<>1 AND FD1<>1 AND FD0),NODRAW;
//GGT1:=REF(GT1,1),NODRAW;
//处理两边都少于3根的笔
//HHHH:REF(H,GT1),NODRAW;
//HHHHH:HHV(H,GT1+5),NODRAW;
FD2:BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)>LLV(L,GT1+5),DT1+1),NODRAW;
//加两句,低是最低,去两边;
//NL:GT1=0 AND DT1<4 AND REF(GT1,1)-DT1<4 ,NODRAW;
//LLLLLLLL:LLV(L,GT1+5),NODRAW;
FG2A:BACKSET(REFX(GT1,1)=0 AND DT1<3 AND GT1-DT1<4 AND REF(L,DT1)<=LLV(L,GT1+5) AND REF(H,GT1)>HHV(H,GT1+5),GT1+1),NODRAW;
FG2B:IF(GT1=0 AND DT1<4 AND REF(GT1,1)-DT1<4 AND REF(L,DT1)<=LLV(L,REF(GT1,1)+6) AND H>HHV(H,REF(GT1,1)+6),1,0),NODRAW;
FG2:BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)<HHV(H,DT1+5),GT1+1),NODRAW;

FD2A:BACKSET(REFX(DT1,1)=0 AND GT1<3 AND DT1-GT1<4 AND REF(H,GT1)>=HHV(L,DT1+5) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW;
FD2B:IF(DT1=0 AND GT1<4 AND REF(DT1,1)-GT1<4 AND REF(H,GT1)>=HHV(H,REF(DT1,1)+6) AND L>LLV(L,REF(DT1,1)+6),1,0),NODRAW;
//

//HHV(H,GT1+1)<HHV(H,GT1+15)
//GGG:HHV(H,GT1+1),NODRAW;
//DDD:HHV(H,GT1+15),NODRAW;
//处理单边都少于3根的笔
//GT11:=BARSLAST(GT1=0 AND FG2<>1),NODRAW;
//DT11:=BARSLAST(DT1=0 AND FD2<>1  AND FD20<>1),NODRAW;
//FG21:IF(GT1=0 AND DT1<4 AND H<HHV(H,REF(GT1,1)+3),1,0),NODRAW;
//FD21:IF(DT1=0 AND GT1<4  AND L>LLV(L,REF(DT1,1)+3) ,1,0),NODRAW;

//FD22:BACKSET(REFX(GT1,1)=0 AND DT1<3 AND REFX(H,1)>REF(H,GT1) AND REF(L,DT1)>LLV(L,GT1+5),DT1+1),NODRAW;
//FG22:BACKSET(REFX(DT1,1)=0 AND GT1<3 AND REFX(L,1)<REF(L,DT1) AND REF(H,GT1)<HHV(H,DT1+5),GT1+1),NODRAW;
TTTTTT: H<REF(H,REF(GT1,1)+1) AND DT1<4,NODRAW;
HHHHHH:REF(LLV(L,10),DT1),NODRAW;
//前长后短;
FG21:IF(GT1=0 AND DT1<4 AND H<=REF(H,REF(GT1,1)+1)  ,1,0),NODRAW;
FD21:IF(DT1=0 AND GT1<4  AND L>=REF(L,REF(DT1,1)+1) ,1,0),NODRAW;

//前短后长,前低后高(去低);
FD231:BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND REF(L,DT1)>REF(LLV(L,10),DT1),DT1+1),NODRAW;
FG23:BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND  GT1-DT1<4 AND REFX(H,1)>REF(H,GT1) AND (REF(H,GT1)<REF(HHV(H,13),GT1) OR REF(FD231,DT1)=0),GT1+1),NODRAW;

//前短后长,前高后低(去高);

//NNN:REF(H,GT1)>=REF(HHV(H,8),GT1),NODRAW;
//前短后长,去2;
FG231:BACKSET(REFX(DT1,1)=0 AND GT1>3  AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND REF(H,GT1)<REF(HHV(H,10),GT1) ,GT1+1),NODRAW;
FD23:BACKSET(REFX(DT1,1)=0 AND GT1>3  AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)<REF(L,DT1) AND ( REF(L,DT1)>REF(LLV(L,13),DT1) OR REF(FG231,GT1)=0),DT1+1),NODRAW;
///前短后长,去3;

FDD23:REF(H,GT1)<REF(HHV(H,10),GT1) OR REF(FD23,DT1)=0,NODRAW;


FD24:BACKSET(REFX(GT1,1)=0 AND DT1>3 AND GT1>DT1 AND GT1-DT1<4 AND REFX(H,1)<HHV(H,GT1+3) AND REF(L,DT1)>LLV(L,DT1+5),DT1+1),NODRAW;
FG24:BACKSET(REFX(DT1,1)=0 AND GT1>3  AND DT1>GT1 AND DT1-GT1<4 AND REFX(L,1)>LLV(L,DT1+3) AND REF(H,GT1)<HHV(H,GT1+5),GT1+1),NODRAW;
//FG241:IF(GT1=0 AND DT1>4 AND  REF(GT1,1)-DT1<3  AND H<HHV(H,REF(GT1,1)+3)   AND REF(FD24,DT1+2)<>1,1,0),NODRAW;
//FD241:IF(DT1=0 AND GT1>4  AND REF(DT1,1)-GT1<3   AND L>LLV(L,REF(DT1,1)+3)  AND REF(FG24,GT1+2)<>1,1,0),NODRAW;
//FGE:BACKSET(ISLASTBAR AND DT1-GT1<3 AND DT1>GT1, GT1+1),NODRAW;
//FDE:BACKSET(ISLASTBAR AND GT1-DT1<3  AND GT1>DT1, DT1+1),NODRAW;
//FG21:IF(GT1=0 AND DT1<4 AND REF(GT1,1)<4,1,0),NODRAW;
//FD21:IF(DT1=0 AND GT1<4  AND REF(DT1,1)<4 ,1,0),NODRAW;
//做两次高低点间多余的点
GT2:BARSLAST(FG21<>1 AND FG23<>1 AND FG231<>1 AND FG24<>1   AND FG2<>1 AND FG2A<>1 AND FG2B<>1 AND GT1=0),NODRAW;
DT2:BARSLAST(FD21<>1 AND FD23<>1 AND FD231<>1 AND FD24<>1  AND FD2<>1 AND FD2A<>1 AND FD2B<>1 AND DT1=0),NODRAW;
FG3:BACKSET(REFX(GT2,1)=0 AND GT2<DT2 AND REFX(H,1)>=REF(H,GT2),GT2+1),NODRAW;
//HHX:REF(H,GT2),NODRAW;
FD3:BACKSET(REFX(DT2,1)=0 AND DT2<GT2 AND REFX(L,1)<=REF(L,DT2),DT2+1),NODRAW;
FG31:IF(GT2=0 AND REF(GT2,1)<DT2 AND H<REF(H,REF(GT2,1)+1),1,0),NODRAW;
FD31:IF(DT2=0 AND REF(DT2,1)<GT2 AND L>REF(L,REF(DT2,1)+1),1,0),NODRAW;
GT3:BARSLAST(GT2=0 AND FG3<>1 AND FG31<>1 ),NODRAW;
DT3:BARSLAST(DT2=0 AND  FD3<>1 AND FD31<>1),NODRAW;
FG4:BACKSET(REFX(GT3,1)=0 AND GT3<DT3 AND REFX(H,1)>=REF(H,GT3),GT3+1),NODRAW;
FD4:BACKSET(REFX(DT3,1)=0 AND DT3<GT3 AND REFX(L,1)<=REF(L,DT3),DT3+1),NODRAW;
FG41:IF(GT3=0 AND REF(GT3,1)<DT3 AND H<REF(H,REF(GT3,1)+1),1,0),NODRAW;
FD41:IF(DT3=0 AND REF(DT3,1)<GT3 AND L>REF(L,REF(DT3,1)+1),1,0),NODRAW;


//FD31:IF(DT2=0 AND REF(DT2,1)<REF(GT2,1) AND L>REF(L,DT2+1),1,0),NODRAW;
//HHH:=GT3=0,NODRAW;
//LLL:=DT3=0,NODRAW;
HHH:=GT3=0 AND FG31<>1 AND  FG3<>1,NODRAW;
LLL:=DT3=0 AND FD31<>1 AND  FD3<>1,NODRAW;
//HHH:=FG0 AND FG11<>1 AND FG1<>1 AND  FG2<>1 AND FG21<>1 AND   FG31<>1 AND  FG3<>1;
//LLL:=FD0 AND FD11<>1 AND FD1<>1 AND  FD2<>1 AND FD21<>1 AND FD31<>1 AND  FD3<>1;
DRAWLINE1(HHH ,H,LLL,L,0),COLORWHITE,DOT;
DRAWLINE1(LLL,L,HHH ,H,0),COLORWHITE,DOT;

//DRAWLINE(,H,UU, L,COLORGREEN);
//PARTLINE(FG0 AND FG41<>1 AND  FG4<>1 AND   FG31<>1 AND  FG3<>1 AND  FG2<>1 AND FG11<>1 AND FG1<>1,H,COLORYELLOW),CIRCLEDOT,LINETHICK5;
//PARTLINE(FD0 AND  FD41<>1 AND  FD4<>1 AND  FD31<>1 AND  FD3<>1 AND  FD2<>1 AND FD11<>1 AND FD1<>1,L,COLORCYAN),CIRCLEDOT,LINETHICK5;
//PARTLINE(FD01  ,L,COLORRED),CIRCLEDOT,LINETHICK2;
PARTLINE(FG0  ,H,COLORYELLOW),POINTDOT,LINETHICK2;
PARTLINE(FD0  ,L,COLORCYAN),CIRCLEDOT,LINETHICK2;
DYNAINFO3:=REFX1(REF(C,1),10000);
DYNAINFO5:=REFX1(H,10000);
DYNAINFO6:=REFX1(L,10000);
DYNAINFO8:=REFX1(VOL,10000);
DYNAINFO10:=REFX1(AVPRICE*V,10000);


JJJ:=IF(DYNAINFO8>0.01,0.01*DYNAINFO10/DYNAINFO8,DYNAINFO3);
DDD:=(DYNAINFO5<0.01 || DYNAINFO6<0.01);
JJJT:=IF(DDD,1,(JJJ<(DYNAINFO5+0.01) && JJJ>(DYNAINFO6-0.01)));
A1:=C>=REF(C,4);
A2:=C<REF(C,4);
A3:=C<REF(C,4) AND REF(A1,1);
T:=BARSLAST(A3),NODRAW;
M0:=(T=0 AND REFX(T=1 AND NOT(A2),1)) OR (REFX(T=2 AND NOT(A2),2)) OR (REFX(T=3 AND NOT(A2),3)) OR (REFX(T=4 AND NOT(A2),4)) OR (REFX(T=5 AND NOT(A2),5)) OR (REFX(T=6 AND NOT(A2),6)) OR (REFX(T=7 AND NOT(A2),7)) OR (REFX(T=8 AND NOT(A2),8));
M1:=T=1 AND REFX(T=2 AND NOT(A2),1) OR (REFX(T=3 AND NOT(A2),2)) OR (REFX(T=4 AND NOT(A2),3)) OR (REFX(T=5 AND NOT(A2),4)) OR (REFX(T=6 AND NOT(A2),5)) OR (REFX(T=7 AND NOT(A2),6)) OR (REFX(T=8 AND NOT(A2),7));
M2:=T=2 AND REFX(T=3 AND NOT(A2),1) OR (REFX(T=4 AND NOT(A2),2)) OR (REFX(T=5 AND NOT(A2),3)) OR (REFX(T=6 AND NOT(A2),4)) OR (REFX(T=7 AND NOT(A2),5)) OR (REFX(T=8 AND NOT(A2),6));
M3:=T=3 AND REFX(T=4 AND NOT(A2),1) OR (REFX(T=5 AND NOT(A2),2)) OR (REFX(T=6 AND NOT(A2),3)) OR (REFX(T=7 AND NOT(A2),4))  OR (REFX(T=8 AND NOT(A2),5));
M4:=T=4 AND REFX(T=5 AND NOT(A2),1) OR (REFX(T=6 AND NOT(A2),2)) OR (REFX(T=7 AND NOT(A2),3)) OR (REFX(T=8 AND NOT(A2),4));
M5:=T=5 AND  REFX(T=6 AND NOT(A2),1) OR (REFX(T=7 AND NOT(A2),2)) OR (REFX(T=8 AND NOT(A2),3));
M6:=T=6  AND  REFX(T=7 AND NOT(A2),1) OR (REFX(T=8 AND NOT(A2),2));
M7:=T=7  AND  REFX(T=8 AND NOT(A2),1);
N0:=T=1 AND REF(T=0 AND A3,1) AND A2;
N1:=T=2 AND REF(N0,1) AND A2;
N2:=T=3 AND REF(N1,1) AND A2;
N3:=T=4 AND REF(N2,1) AND A2;
N4:=T=5 AND REF(N3,1) AND A2;
N5:=T=6 AND REF(N4,1) AND A2;
N6:=T=7 AND REF(N5,1) AND A2;
N7:=T=8 AND REF(N6,1) AND A2;
WZD:=L*0.985;
WZG:=H*1.011;
//DRAWTEXT(T=0 AND NOT(M0),WZD,'?'),COLORGREEN;
//DRAWTEXT(N0 AND NOT(M1),WZD,'?'),COLORGREEN;
//DRAWTEXT(N1 AND NOT(M2),WZD,'?'),COLORGREEN;
//DRAWTEXT(N2 AND NOT(M3),WZD,'?'),COLORGREEN;
//DRAWTEXT(N3 AND NOT(M4),WZD,'?'),COLORGREEN;
//DRAWTEXT(N4 AND NOT(M5),WZD,'?'),COLORGREEN;
//DRAWTEXT(N5 AND NOT(M6),WZD,'?'),COLORGREEN;
//DRAWTEXT(N6 AND NOT(M7),WZD,'?'),COLORGREEN;
//DRAWTEXT(N7,WZG,'?'),COLORMAGENTA;
B1:=C<=REF(C,4);
B2:=C>REF(C,4);
B3:=C>REF(C,4) AND REF(B1,1);
T1:=BARSLAST(B3),NODRAW;
M8:=(T1=0 AND REFX(T1=1 AND NOT(B2),1)) OR (REFX(T1=2 AND NOT(B2),2)) OR (REFX(T1=3 AND NOT(B2),3)) OR (REFX(T1=4 AND NOT(B2),4)) OR (REFX(T1=5 AND NOT(B2),5)) OR (REFX(T1=6 AND NOT(B2),6)) OR (REFX(T1=7 AND NOT(B2),7)) OR (REFX(T1=8 AND NOT(B2),8));
M9:=T1=1 AND REFX(T1=2 AND NOT(B2),1) OR (REFX(T1=3 AND NOT(B2),2)) OR (REFX(T1=4 AND NOT(B2),3)) OR (REFX(T1=5 AND NOT(B2),4)) OR (REFX(T1=6 AND NOT(B2),5)) OR (REFX(T1=7 AND NOT(B2),6)) OR (REFX(T1=8 AND NOT(B2),7));
M10:=T1=2 AND REFX(T1=3 AND NOT(B2),1) OR (REFX(T1=4 AND NOT(B2),2)) OR (REFX(T1=5 AND NOT(B2),3)) OR (REFX(T1=6 AND NOT(B2),4)) OR (REFX(T1=7 AND NOT(B2),5)) OR (REFX(T1=8 AND NOT(B2),6));
M11:=T1=3 AND REFX(T1=4 AND NOT(B2),1) OR (REFX(T1=5 AND NOT(B2),2)) OR (REFX(T1=6 AND NOT(B2),3)) OR (REFX(T1=7 AND NOT(B2),4))  OR (REFX(T1=8 AND NOT(B2),5));
M12:=T1=4 AND REFX(T1=5 AND NOT(B2),1) OR (REFX(T1=6 AND NOT(B2),2)) OR (REFX(T1=7 AND NOT(B2),7)) OR (REFX(T1=8 AND NOT(B2),4));
M13:=T1=5 AND  REFX(T1=6 AND NOT(B2),1) OR (REFX(T1=7 AND NOT(B2),2)) OR (REFX(T1=8 AND NOT(B2),3));
M14:=T1=6  AND  REFX(T1=7 AND NOT(B2),1) OR (REFX(T1=8 AND NOT(B2),2));
M15:=T1=7  AND  REFX(T1=8 AND NOT(B2),1);
N8:=T1=1 AND REF(T1=0 AND B3,1) AND B2;
N9:=T1=2 AND REF(N8,1) AND B2;
N10:=T1=3 AND REF(N9,1) AND B2;
N11:=T1=4 AND REF(N10,1) AND B2;
N12:=T1=5 AND REF(N11,1) AND B2;
N13:=T1=6 AND REF(N12,1) AND B2;
N14:=T1=7 AND REF(N13,1) AND B2;
N15:=T1=8 AND REF(N14,1) AND B2;
//DRAWTEXT(T1=0 AND NOT(M8),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N8 AND NOT(M9),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N9 AND NOT(M10),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N10 AND NOT(M11),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N11 AND NOT(M12),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N12 AND NOT(M13),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N13 AND NOT(M14),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N14 AND NOT(M15),WZG,'?'),COLOR9900CC;
//DRAWTEXT(N15 ,WZD,'?'),COLORGREEN;

 


N1111:=10;
N22:=10;
DISP:=2;
K:=IF(PERIOD=5,1,{日}
IF(PERIOD=6,1,{周}
IF(PERIOD=7,1,{月}
IF(PERIOD=8,1,{多分钟}
IF(PERIOD=9,1,{多日}
IF(PERIOD=10,1,{季}
IF(PERIOD=11,2,{年}
IF(PERIOD=4,1,{60F}
IF(PERIOD=3,1,{30F}
IF(PERIOD=2,1,{15F}
IF(PERIOD=1,1{5F},1{1F})))))))))))/10;
P1:=PEAK(H,N1111,1,1);
P2:=PEAK(H,N1111,2,1);
WP1:=PEAKBARS(H,N1111,1,1);
WP2:=PEAKBARS(H,N1111,2,1);
T111:=TROUGH(L,N22,1,1);
T2:=TROUGH(L,N22,2,1);
WT111:=TROUGHBARS(L,N22,1,1);
WT2:=TROUGHBARS(L,N22,2,1);
TJ1:=P1>T111 AND P2>T2 ;
ZD:=MAX(T111,T2);
ZG:=MIN(P1,P2);

TJ2:=FILTER(ZG>ZD,2);
TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));
TJ4:=TJ1&&TJ2&&NOT(TJ3);
TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));
TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1));
TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);
ZSD:=IF(TJ8,ZD,NULL);
ZSG:=IF(TJ8,ZG,NULL);
ZSH:=IF(TJ8,HH,NULL);
ZSL:=IF(TJ8,LL,NULL);
STICKLINE1(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;
STICKLINE1(TJ8&&DISP=1,ZSD,ZSG,3,1),COLORMAGENTA;
STICKLINE1(TJ8&&DISP<>1,ZSD,ZSG,0,1),COLORMAGENTA;
DRAWTEXT(DISP=2,ZSH,'中枢'),COLORRED;
POLYLINE1(DISP=2,REF(ZSD,BARSLAST(TJ8))),CROSSDOT,COLORLIGHTRED;
POLYLINE1(DISP=2,REF(ZSG,BARSLAST(TJ8))),CROSSDOT,COLORLIGHTGREEN;
POLYLINE1(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;
POLYLINE1(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;
POLYLINE1(DISP=3,ZIGZAG(H,N1111,1)),COLORLIGHTBLUE;
POLYLINE1(DISP=3,ZIGZAG(L,N22,1)),COLORLIGHTBLUE;


局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);
局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);
局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);
局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);
局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);
局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);
缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));
距前高天:=BARSLAST(局部高点预选C=1);
距前低天:=BARSLAST(局部低点预选C=-1);
小值周期:=LLVBARS(L,20);
大值周期:=HHVBARS(H,20);
低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);
低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);
预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)<>1) OR REF(低保留S,距前低天)=0,1,0);
判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);
高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);
高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);
高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);
预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)<>1) OR REF(高保留,距前高天)=0,1,0);
判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);
低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);
低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);
低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);
距前高天A:=BARSLAST(高保留=1);
距前低天A:=BARSLAST(低保留=-1);
预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)<>1) OR REF(低保留,距前低天A)=0,1,0);
判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);
高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);
高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);
高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);
预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)<>1) OR REF(高保留XA,距前高天A)=0,1,0);
判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);
低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);
低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);
低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);
距前高天YA:=BARSLAST(高保留X=1);
距前低天YA:=BARSLAST(低保留X=-1);
预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)<>1) OR REF(低保留X,距前低天YA)=0,1,0);
判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);
高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);
高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);
高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);
预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)<>1) OR REF(高保留YXA,距前高天YA)=0,1,0);
判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);
低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);
低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);
低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);
AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部极点:=IF(极点保留=-1,L,IF(极点保留=1,H,NULL)), CIRCLEDOT ,COLORYELLOW;
//DRAWLINE1(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORLIGHTRED;
//DRAWLINE1(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORGREEN;
DD1:=BARSLAST(ABS(极点保留)<>1);
DRAWTEXT(极点保留=1,局部极点,'卖'),COLORGREEN,FONTSIZE15;
DRAWTEXT(极点保留=-1,局部极点,'买'),COLORRED,FONTSIZE15;












CURRBARSCOUNT:=REFX1(BARPOS,10000)-BARPOS+1;
AA:=REF(H,N1)=HHV(H,2*N1+1);
QY:=BACKSET(AA,N1+1);
CC:=FILTER(QY,1) AND H=HHV(H,1+1);

GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=REFX1(DINGBUTS,10000);


DINGBUTS1:=REF(DINGBUTS,DDD+1);


GDCS2:=REFX1(DINGBUTS,100001);


DINGBU2:=REF(DINGBU1,DDD+1);


MM:=IF(CURRBARSCOUNT>GDCS2,0,1);


DRAWLINE1(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1),COLORRED;


DRAWLINE1(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT,LINETHICK2;


DRAWLINE1(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT,LINETHICK2;


AA1:=REF(L,N1)=LLV(L,2*N1+1);


QY1:=BACKSET(AA1,1+1);


CC1:=FILTER(QY1,1) AND L=LLV(L,1+1);





DDTS:=IF(CC1,CURRBARSCOUNT,0);


YDB:=IF(DD1,REF(L,DD1),L);


DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);


DDCS1:=REFX1(DDTS1,10000);


ZDB:=REF(YDB,DD1+1);


DDTS2:=REF(DDTS1,DD1+1);


DDCS2:=REFX1(DDTS2,10000);
//支撑:TRENDLINES(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L) ,COLORRED;
DRAWLINE1(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORFF5500,POINTDOT,LINETHICK2;


DRAWLINE1(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORYELLOW,POINTDOT,LINETHICK2;


LAA:=REF(H,1)=HHV(H,2*1+1);
LQY:=BACKSET(LAA,1+1);
LCC:=FILTER(LQY,1) AND H=HHV(H,1+1);
LDDD:=BARSLAST(LCC);
LGDTS:=IF(LCC,CURRBARSCOUNT,0);
LDINGBU:=IF(LDDD,REF(H,LDDD),H);
LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS);
LDINGBU1:=REF(LDINGBU,LDDD+1);
LGDCS1:=REFX1(LDINGBUTS,10000);
LDINGBUTS1:=REF(LDINGBUTS,LDDD+1);
LGDCS2:=REFX1(LDINGBUTS1,10000);


LDINGBU2:=REF(LDINGBU1,LDDD+1);


LMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);


压力:TRENDLINES(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDCS1,H),COLORWHITE;
DRAWLINE1(CURRBARSCOUNT=LGDCS2,H,ISLASTBAR,REF(H,LGDCS2-1),1),COLOR0055FF,POINTDOT;
DRAWLINE1(CURRBARSCOUNT=LGDCS1,H,ISLASTBAR,REF(H,LGDCS1-1),1),COLORYELLOW,POINTDOT;


LAA1:=REF(L,1)=LLV(L,2*1+1);


LQY1:=BACKSET(LAA1,1+1);


LCC1:=FILTER(LQY1,1) AND L=LLV(L,1+1);


LDD1:=BARSLAST(LCC1);


LDDTS:=IF(LCC1,CURRBARSCOUNT,0);


LYDB:=IF(LDD1,REF(L,LDD1),L);


LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS);


LDDCS1:=REFX1(LDDTS1,10000);


LZDB:=REF(LYDB,LDD1+1);


LDDTS2:=REF(LDDTS1,DD1+1);


LDDCS2:=REFX1(LDDTS2,10000);


支撑:TRENDLINES(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDCS1,L),COLORWHITE;
ZGSTAR:=(压力+支撑)/2;
ZGEND:=REFX1((压力+支撑)/2,10000);
LLAA:=REF(H,1)=HHV(H,2*1+1);


LLQY:=BACKSET(LLAA,1+1);


LLCC:=FILTER(LLQY,1) AND H=HHV(H,1+1);


LLDDD:=BARSLAST(LLCC);
LLGDTS:=IF(LLCC,CURRBARSCOUNT,0);
LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H);
LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS);
LLDINGBU1:=REF(LLDINGBU,LLDDD+1);
LLGDCS1:=REFX1(LLDINGBUTS,10000);
LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD+1);


LLGDCS2:=REFX1(LLDINGBUTS1,10000);


LLDINGBU2:=REF(LLDINGBU1,LLDDD+1);


LLMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);


L压力:TRENDLINES(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLGDCS1,H) ,COLORYELLOW;


DRAWLINE1(CURRBARSCOUNT=LLGDCS2,H,ISLASTBAR,REF(H,LLGDCS2-1),1),COLOR0055FF,POINTDOT;


DRAWLINE1(CURRBARSCOUNT=LLGDCS1,H,ISLASTBAR,REF(H,LLGDCS1-1),1),COLORYELLOW,POINTDOT;


LLAA1:=REF(L,1)=LLV(L,2*1+1);


LLQY1:=BACKSET(LLAA1,1+1);


LLCC1:=FILTER(LLQY1,1) AND L=LLV(L,1+1);


LLDD1:=BARSLAST(LCC1);


LLDDTS:=IF(LLCC1,CURRBARSCOUNT,0);


LLYDB:=IF(LLDD1,REF(L,LLDD1),L);
LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS);
LLDDCS1:=REFX1(LLDDTS1,10000);
LLZDB:=REF(LLYDB,LLDD1+1);
LLDDTS2:=REF(LLDDTS1,DD1+1);
LLDDCS2:=REFX1(LLDDTS2,10000);
L支撑:TRENDLINES(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDDCS1,L) ,COLORYELLOW;
LZGSTAR:=(L压力+L支撑)/2;
LZGEND:=REFX1((L压力+L支撑)/2,10000);
LSTARDAY:=5;
STARDAY:=5;