SJ:=IFELSE(DATE+20000000<20601018,1,1);//什么时间到期就写什么时间
//减3天,上面时间提前1天到期29号28号就提示
//自动画线有时间
生命线1:MA(C,90),LINETHICK1,COLORRED;
XCLOSE2:=EMA((OPEN+HIGH+LOW+CLOSE)/4,3);
PARTLINE1((生命线1>=XCLOSE2),生命线1),LINETHICK1,COLORGREEN;
PARTLINE1((生命线1<XCLOSE2),生命线1),LINETHICK1,COLORRED;
AA:=EMA(C,5)*SJ > EMA(C,19);
BB:=EMA(C,5) < EMA(C,19);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<=OPEN;
DD1:=CLOSE>OPEN;
//STICKLINE1(AA AND DD1,H,C,0,1),COLORRED;
//STICKLINE1(AA AND DD1,L,O,0,1),COLORRED;
//STICKLINE1(AA AND DD1,O,C,3,1),COLORRED;
//STICKLINE1(AA AND DD,O,C,3,0),COLORRED;
//STICKLINE1(AA AND DD,H,L,0,0),COLORRED;
DRAWICON(CROSS(EVERY(AA&&NOT(CC1),2)&&EVERY(ISDOWN,2),0.5),H,5);
DRAWICON(CROSS(EVERY(BB&&NOT(CC),2)&&EVERY(ISUP,2),0.5),H,4);
//DRAWCOLORKLINE(BB AND DD1,COLORCYAN,1);
//DRAWCOLORKLINE(BB AND DD,COLORCYAN,0);
//STICKLINE1(BB AND CC,H,L,0,0),COLORWHITE;
//STICKLINE1(BB AND CC,O,C,3,0),COLORWHITE;
//STICKLINE1(AA AND CC1,H,L,0,0),COLORWHITE;
//STICKLINE1(AA AND CC1,O,C,3,0),COLORWHITE;
//STICKLINE1(AA AND CC1 AND DD,O,C,3,0),COLORWHITE;
E:=EMA(EMA(C,10),10)*SJ,COLORRED,LINETHICK1;
PARTLINE(REF(E,1)>E,E,COLORGREEN),LINETHICK1;
PARTLINE(REF(E,1)<E,E,COLORRED),LINETHICK1;
高11:=REF(HHV(H,150),3);
低11:=REF(LLV(L,150),3);
H11:=高11-(高11-低11)*0.191;
H12:=高11-(高11-低11)*0.382;
H13:=高11-(高11-低11)*0.5;
H14:=高11-(高11-低11)*0.618;
H15:=高11-(高11-低11)*0.809;
MM:=REF(AA AND CC1,1) OR REF(BB AND CC,1) AND AA AND (AA AND CC1)=0 AND (BB AND CC)=0;
NN:=REF(AA AND CC1,1) OR REF(BB AND CC,1) AND BB AND (AA AND CC1)=0 AND (BB AND CC)=0;
NN1:=REF(AA,1) AND BB;
MM1:=REF(BB,1) AND AA;
CROSS(E,REF(E,1)),('');
CROSSDOWN(E,REF(E,1)),('');
DRAWTEXT(CROSS(E,REF(E,1)),REF(E,1),''),COLORRED,VALIGN0,FONTSIZE18;
DRAWTEXT(CROSSDOWN(E,REF(E,1)),E,''),COLORGREEN,VALIGN2,FONTSIZE18;
X1:=EMA(CLOSE,8)*SJ,COLORWHITE;
X3:=EMA(X1,16)*SJ,COLORRED;
B:=BARSLAST(DAY<>REF(DAY,1))+1;
VAR2:=(CLOSE+HIGH+LOW)/3;
VAR3:=EMA(VAR2,10);
VAR4:=REF(VAR3,1);
STICKLINE1(VAR3>VAR4,VAR3,VAR4,2 ,0),COLORYELLOW;
STICKLINE1(VAR3< VAR4,VAR3,VAR4,2,0),COLORBLUE;
W:=BARSLAST(DATE<>REF(DATE,1));
OO:=REF(OPEN,W);
HX99:=HHV(HIGH,3);
LX99:=LLV(LOW,3);
H1:=IFELSE(HX99*SJ<REF(HX99,1)&&HX99<REF(HX99,2)&&HX99<REF(HX99,4)&&LX99<REF(LX99,1)&&LX99<REF(LX99,3)&&LX99<REF(LX99,5)&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HX99,4),0);
L1:=IFELSE(LX99*SJ>REF(LX99,1)&&LX99>REF(LX99,3)&&LX99>REF(LX99,5)&&HX99>REF(HX99,1)&&HX99>REF(HX99,2)&&HX99>REF(HX99,4)&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LX99,4),0);
H2:=VALUEWHEN(H1>0,H1);
L2:=VALUEWHEN(L1>0,L1);
K111:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));
K222:=VALUEWHEN(K111<>0,K111);
TMP:=K222;
MA55:=MA(CLOSE,55);
KU1:=IF(HIGH=HHV(HIGH,14),1,0);
KD1:=IF(LOW=LLV(LOW,14),1,0);
UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0
AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1
AND REF(KU1,1)=0 AND KU1=0)));
DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0
AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1
AND REF(KD1,1)=0 AND KD1=0)));
HVX:=H>UL AND H>REF(H,1);
LVX:=L<DL AND L<REF(L,1);
GP:=BARSLAST(HVX);
DP:=BARSLAST(LVX);
IP:=IF(GP=0,DP,GP)>3;
HHV1:=HVX AND IP AND H>=HHV(H,BARSLAST(LVX));
LV1:=LVX AND IP AND L<=LLV(L,BARSLAST(HVX));
LLX:CROSS(BACKSET(HHV1,BARSLAST(LV1)+1),0.5),NODRAW;
HHX:CROSS(BACKSET(LV1,BARSLAST(HHV1)+1),0.5),NODRAW;
缠论线开关:=1;//笔中枢;
MA8:=IF(DATE<=0211015,1,0),NODRAW;//*MA8,,RGB(191,6,30)
展F:=26;
HH展BDD:=(H>HV(H,展F))*MA8;
NH展BDD:=(BARSLAST(HH展BDD)+1)*MA8;
LL展BDD:=(L<LV(L,展F))*MA8;
NL展BDD:=(BARSLAST(LL展BDD)+1)*MA8;
AH展BDD:=(BACKSET(COUNT(LL展BDD,NH展BDD)&&LL展BDD,NH展BDD))*MA8;
AL展BDD:=(BACKSET(COUNT(HH展BDD,NL展BDD)&&HH展BDD,NL展BDD))*MA8;
LX:=AL展BDD, NOTEXT;
HX:=AH展BDD, NOTEXT;
HH12:CROSS(AH展BDD=1,0.5), NOTEXT;
LL12:CROSS(AL展BDD=1,0.5), NOTEXT;
笔:=1;//1、本级别 (BOLL26)笔:
XZ:BACKSET(ISLASTBAR,SUMBARS(LLX||HHX,12)),NODRAW,NOTEXT;
X8:CROSS(BACKSET(ISLASTBAR,SUMBARS(LLX||HHX,8)),0.5),NODRAW,NOTEXT;
X9:CROSS(BACKSET(ISLASTBAR,SUMBARS(LLX||HHX,9)),0.5),NODRAW,NOTEXT;
X12:CROSS(BACKSET(ISLASTBAR,SUMBARS(LLX||HHX,12)),0.5),NODRAW,NOTEXT;
X13:CROSS(BACKSET(ISLASTBAR,SUMBARS(LLX||HHX,13)),0.5),NODRAW,NOTEXT;
AAAA:=CROSS(BACKSET(HHV1,BARSLAST(LV1)+1),0.5);
BBBB:=CROSS(BACKSET(LV1,BARSLAST(HHV1)+1),0.5);
DRAWNUMBER1(AAAA,L,VALUEWHEN(AAAA,L),2),VALIGN0,FONTSIZE24;
DRAWNUMBER1(BBBB,H,VALUEWHEN(BBBB,H),2),VALIGN2,FONTSIZE24;
//DRAWNUMBER1(笔*REFX(LLX,5),REFX(L,5),REFX((L-VALUEWHEN(HHX,H)),5),2),ALIGN2,VALIGN0,RGB(128,128,255);//向下笔(已完成)长度,保留2位小数;
//DRAWNUMBER1(笔*REFX(HHX,5),REFX(H,5),REFX((H-VALUEWHEN(LLX,L)),5),2),ALIGN2,VALIGN2,RGB(128,128,255);//向上笔(已完成)长度,保留2位小数;
//VAR1:=EMA(CLOSE,15)*SJ;
VAR2X:=EMA(CLOSE,120)*SJ;
//红多:(CLOSE*SJ-VAR1*SJ)*2/(15+1)+VAR1,LINETHICK1, COLORRED;
VAR3X:=(CLOSE*SJ-VAR2X*SJ)*2/(120+1)+VAR2X;
//绿空:IF(红多*SJ>VAR3,VAR3*SJ,红多*SJ),LINETHICK1, COLORGREEN;
MA3X:=MA(C,170);
//DRAWGBK(MA3>C,RGB(0,0,0),RGB(9,60,1),0);
//DRAWGBK(MA3<C,RGB(0,0,0),RGB(62,1,1),0);
//DRAWGBK(MA3=0,RGB(0,0,0),RGB(0,0,0),0);
HH1X:=IFELSE(H<REF(H,1)&&REF(H,1)<REF(H,2),REF(H,2),0);
LL1X:=IFELSE(L>REF(L,1)&&REF(L,1)>REF(L,2),REF(L,2),0);
HH2X:=VALUEWHEN(HH1X>0,HH1X);
LL2X:=VALUEWHEN(LL1X>0,LL1X);
HHX1:=HHV(HIGH,1)*SJ/10+HHV(HIGH,2)/10+HHV(HIGH,2)/10+HHV(HIGH,4)/10+HHV(HIGH,4)/10+HHV(HIGH,8)/10+HHV(HIGH,8)/10+HHV(HIGH,13)/10+HHV(HIGH,40)/10+HHV(HIGH,20)/10;
LLX1:=LLV(LOW,1)*SJ/10+LLV(LOW,2)/10+LLV(LOW,2)/10+LLV(LOW,4)/10+LLV(LOW,4)/10+LLV(LOW,8)/10+LLV(LOW,8)/10+LLV(LOW,13)/10+LLV(LOW,40)/10+LLV(LOW,20)/10;
H1X:=IFELSE(HHX1<REF(HHX1,1)&&LLX1<REF(LLX1,1)&&REF(OPEN,1)>CLOSE&&OPEN>CLOSE&&(HHV(OPEN,0)-CLOSE)>0,REF(HHX1,2),0);
L1X:=IFELSE(LLX1>REF(LLX1,1)&&HHX1>REF(HHX1,1)&&REF(OPEN,1)<CLOSE&&OPEN<CLOSE&&(CLOSE-LLV(OPEN,0))>0,REF(LLX1,2),0);
XX:=DATE;
X0X:=H1,LINETHICK2;
X00X:=L1;
XXX0X:=O,LINETHICK2;
XXX00X:=C;
XXX000X:=H;
XXX0000X:=L;
H2X:=VALUEWHEN(X0X>0,X0X),LINETHICK2;
L2X:=VALUEWHEN(X00X>0,X00X),LINETHICK2;
K1X:=IFELSE(CLOSE>H2X,-3,IFELSE(CLOSE<L2X,1,0));
K2X:=VALUEWHEN(K1X<>0,K1X);
GX:=IFELSE(K2X=1,H2X,L2X);
G1X:=VALUEWHEN(ISLASTBAR,GX);
//DRAWNUMBER(L>0,G1,G1,0,COLORCYAN),FONTSIZE30;
DRAWNUMBER(L>0,G1X,G1X,0,COLORCYAN);
//DRAWNUMBER(LL>0,G1,G1,0,COLORWHITE),ALIGN0,FONTSIZE30,VALIGN0;
X000X:=K2X,LINETHICK1;
TMPX:=K2X,LINETHICK1;
W1X:=X000X,LINETHICK1;
X0000X:=OPEN-CLOSE,LINETHICK1;
W2X:=X0000X,LINETHICK1;
HTX:=IFELSE(OPEN>CLOSE,OPEN,CLOSE),LINETHICK1;
LTX:=IFELSE(OPEN<CLOSE,OPEN,CLOSE),LINETHICK1;
DRAWLINE(TMPX=1&&REF(TMPX,1)=1,GX,TMPX=1&&REF(TMPX,1)=1,REF(GX,1),COLORCYAN),DOT;//青色折竖线
DRAWLINE(TMPX=-3&&REF(TMPX,1)=-3,GX,TMPX=-3&&REF(TMPX,1)=-3,REF(GX,1),COLORRED),DOT;//红色折竖线
DRAWSL(K2X=1,GX,0,1,0,COLORCYAN),DOT;//青色折横线
DRAWSL(K2X=-3,GX,0,1,0,COLORRED),DOT;//红色折横线