//MA21:MA(CLOSE,25),COLORLIGHTGREY;
//SD主图
A1:=(LOW+HIGH+CLOSE)/3;
B2:MA(A1,5),COLORWHITE;
YX1:HHV(B2,13),COLORGREEN;
YX2:HHV(B2,60),COLORCYAN,DASH;
ZX1:LLV(B2,13),COLORYELLOW;
ZX2:LLV(B2,60),COLORWHITE,DASH;
Q1:=VALUEWHEN(ISLASTBAR,YX2);
Q2:=VALUEWHEN(ISLASTBAR,ZX2);
DRAWNUMBER(LOW>0,Q1,Q1,4,COLORMAGENTA),ALIGN0,VALIGN1;
DRAWNUMBER(LOW>0,Q2,Q2,4,COLORCYAN),ALIGN0,VALIGN1;
//PBX
K:=(C+H+L)/3;
D:=EMA(K,8);
均线:D,COLORYELLOW,LINETHICK2;
DRAWCOLORLINE(C>=均线,均线,COLORRED,COLORGREEN),LINETHICK2;
阻力:HHV(D,30),COLORCYAN,LINETHICK2;
支撑:LLV(D,30),COLORBLUE,LINETHICK2;
Q3:=VALUEWHEN(ISLASTBAR,阻力);
Q4:=VALUEWHEN(ISLASTBAR,支撑);
DRAWNUMBER(LOW>0,Q3,Q3,4,COLORCYAN),ALIGN0,VALIGN1;
DRAWNUMBER(LOW>0,Q4,Q4,4,COLORBLUE),ALIGN0,VALIGN1;
PBN1:EMA(EMA(C,8),3),RGB(128,128,255);
IF(PBN1>=REF(PBN1,1),PBN1,NULL),COLORLIGHTRED;
IF(PBN1<=REF(PBN1,1),PBN1,NULL),COLORLIGHTGREEN;
PBN2:EMA(EMA(EMA(C,8),3),3),RGB(128,128,255);
IF(PBN2>=REF(PBN2,1),PBN2,NULL),COLORLIGHTRED;
IF(PBN2<=REF(PBN2,1),PBN2,NULL),COLORLIGHTGREEN;
PBN3:EMA(EMA(EMA(EMA(C,8),3),3),3),RGB(128,128,255);
IF(PBN3>=REF(PBN3,1),PBN3,NULL),COLORLIGHTRED;
IF(PBN3<=REF(PBN3,1),PBN3,NULL),COLORLIGHTGREEN;
PBN4:EMA(EMA(EMA(EMA(EMA(C,8),3),3),3),3),RGB(128,128,255);
IF(PBN4>=REF(PBN4,1),PBN4,NULL),COLORLIGHTRED;
IF(PBN4<=REF(PBN4,1),PBN4,NULL),COLORLIGHTGREEN;
PBN5:EMA(EMA(EMA(EMA(EMA(EMA(C,8),3),3),3),3),3),RGB(128,128,255);
IF(PBN5>=REF(PBN5,1),PBN5,NULL),COLORLIGHTRED;
IF(PBN5<=REF(PBN5,1),PBN5,NULL),COLORLIGHTGREEN;
PBN6:EMA(EMA(EMA(EMA(EMA(EMA(EMA(C,8),3),3),3),3),3),3),RGB(128,128,255);
IF(PBN6>=REF(PBN6,1),PBN6,NULL),COLORLIGHTRED;
IF(PBN6<=REF(PBN6,1),PBN6,NULL),COLORLIGHTGREEN;
//牛熊线
AMOUNT:=AVPRICE*V;
压力熊线:MA(REF(HHV(C,30),1),2),COLORGREEN,DASH;
/*
YXB1:=BACKSET(压力熊线<>REF(压力熊线,1),SUMBARS(压力熊线<>REF(压力熊线,1),2)/2);
YXB2:=BACKSET(ISLASTBAR,SUMBARS(压力熊线<>REF(压力熊线,1),1)/2);
DRAWNUMBER(CROSS(YXB1,0.5),压力熊线,压力熊线,4,COLORLIGHTBLUE);
DRAWNUMBER(CROSS(YXB2,0.5),压力熊线,压力熊线,4,COLORLIGHTBLUE);
*/
支撑牛线:MA(REF(LLV(C,30),1),2),COLORRED,DASH;
/*
ZNB1:=BACKSET(支撑牛线<>REF(支撑牛线,1),SUMBARS(支撑牛线<>REF(支撑牛线,1),2)/2);
ZNB2:=BACKSET(ISLASTBAR,SUMBARS(压力熊线<>REF(压力熊线,1),1)/2);
DRAWNUMBER(CROSS(ZNB1,0.5),支撑牛线,支撑牛线,4,RGB(128,0,64));
DRAWNUMBER(CROSS(ZNB2,0.5),支撑牛线,支撑牛线,4,RGB(128,0,64));
*/
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
//SAR变形
SARL:ABS(SAR(10,0.02,0.2)),COLORYELLOW,DOT,NODRAW;
//DRAWICON(CROSSDOWN(C,SARL),H,’ICO5′),COLORGREEN,FONTSIZE20;
//DRAWICON(CROSSUP(C,SARL),L,’ICO4′),COLORYELLOW,FONTSIZE20,VALIGN0;
//{波浪王}
/*
TY:=CLOSE;
HD:=FILTER(BACKSET(FILTER(REF(TY,10)=HHV(TY,2*10+1),10),10+1),10);
LD:=FILTER(BACKSET(FILTER(REF(TY,10)=LLV(TY,2*10+1),10),10+1),10);
A:=REF(CLOSE,BARSLAST(HD));
B:=REF(CLOSE,BARSLAST(LD));
T1:=BARSLAST(HD)<BARSLAST(LD) AND NOT(HD) ;
T2:=BARSLAST(HD)>BARSLAST(LD) AND NOT(LD);
浪顶:IF(T1,A,A),COLORLIGHTBLUE,DOT;
浪底:IF(T2,B,B),RGB(128,0,64),DOT;
CB1:=BACKSET(浪顶<>REF(浪顶,1),SUMBARS(浪顶<>REF(浪顶,1),2)/2);
CB2:=BACKSET(ISLASTBAR,SUMBARS(浪顶<>REF(浪顶,1),1)/2);
DRAWNUMBER(CROSS(CB1,0.5),浪顶,浪顶,4,COLORLIGHTBLUE);
DRAWNUMBER(CROSS(CB2,0.5),浪顶,浪顶,4,COLORLIGHTBLUE);
CB3:=BACKSET(浪底<>REF(浪底,1),SUMBARS(浪底<>REF(浪底,1),2)/2);
CB4:=BACKSET(ISLASTBAR,SUMBARS(浪底<>REF(浪底,1),1)/2);
DRAWNUMBER(CROSS(CB3,0.5),浪底,浪底,4,RGB(128,0,64)),VALIGN0;
DRAWNUMBER(CROSS(CB4,0.5),浪底,浪底,4,RGB(128,0,64)),VALIGN0;
*/
VAR3:=LLV(H,240);
VAR4:=100*(C-VAR3)/VAR3;
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
VAR7:=0;
VAR8:=MA(HHV(C-REF(C,1),0),34)/MA(ABS(C-REF(C,1)),7)*100;
VAR9:=MA(HHV(C-REF(C,1),0),13)/MA(ABS(C-REF(C,1)),13)*100;
VARA:=BARSCOUNT(C);
VARB:=VAR8<20 AND VAR9<23 AND VARA>35;
VARC:=VARB AND COUNT(VARB,1)=1;
VARD:=EMA(C,21)-EMA(C,8);
VARE:=EMA(VARD,5);
VARF:=(361)<4 AND CROSS(VARD,VARE);
VAR10:=IF((3161)=0 AND H>L+0.04,4,0);
N1:=0.5;
N2:=2.1;
N3:=5.4;
N4:=8.9;
VAR11:= ZIGZAG(C,N1,1)>REF(ZIGZAG(C,N1,1),1) AND REF(ZIGZAG(C,N1,1),1)<=REF(ZIGZAG(C,N1,1),2) AND REF(ZIGZAG(C,N1,1),2)<=REF(ZIGZAG(C,N1,1),3);
VAR12:= ZIGZAG(C,N1,1)<REF(ZIGZAG(C,N1,1),1) AND REF(ZIGZAG(C,N1,1),1)>=REF(ZIGZAG(C,N1,1),2) AND REF(ZIGZAG(C,N1,1),2)>=REF(ZIGZAG(C,N1,1),3);
VAR13:= ZIGZAG(C,N2,1)>REF(ZIGZAG(C,N2,1),1) AND REF(ZIGZAG(C,N2,1),1)<=REF(ZIGZAG(C,N2,1),2) AND REF(ZIGZAG(C,N2,1),2)<=REF(ZIGZAG(C,N2,1),3);
VAR14:=ZIGZAG(C,N2,1)<REF(ZIGZAG(C,N2,1),1) AND REF(ZIGZAG(C,N2,1),1)>=REF(ZIGZAG(C,N2,1),2) AND REF(ZIGZAG(C,N2,1),2)>=REF(ZIGZAG(C,N2,1),3);
VAR15:= ZIGZAG(C,N3,1)>REF(ZIGZAG(C,N3,1),1) AND REF(ZIGZAG(C,N3,1),1)<=REF(ZIGZAG(C,N3,1),2) AND REF(ZIGZAG(C,N3,1),2)<=REF(ZIGZAG(C,N3,1),3);
VAR16:= ZIGZAG(C,N3,1)<REF(ZIGZAG(C,N3,1),1) AND REF(ZIGZAG(C,N3,1),1)>=REF(ZIGZAG(C,N3,1),2) AND REF(ZIGZAG(C,N3,1),2)>=REF(ZIGZAG(C,N3,1),3);
VAR17:= ZIGZAG(C,N4,1)>REF(ZIGZAG(C,N4,1),1) AND REF(ZIGZAG(C,N4,1),1)<=REF(ZIGZAG(C,N4,1),2) AND REF(ZIGZAG(C,N4,1),2)<=REF(ZIGZAG(C,N4,1),3);
VAR18:= ZIGZAG(C,N4,1)<REF(ZIGZAG(C,N4,1),1) AND REF(ZIGZAG(C,N4,1),1)>=REF(ZIGZAG(C,N4,1),2) AND REF(ZIGZAG(C,N4,1),2)>=REF(ZIGZAG(C,N4,1),3);
VAR19:= EMA(C,2)-EMA(C,150);
VAR1A:= EMA(VAR19,100);
VAR1B:= 2*(VAR19-VAR1A);
VAR1C:= POW(VAR1B,3)*0.1+POW(VAR1B,1);
VAR1D:= SQRT(SQRT(L*H*O*C));
VAR1E:= EMA(VAR1D*0.97,3);
VAR1F:= (H+L+C)/3;
VAR20:= (VAR1F-MA(VAR1F,14))/(0.015*AVEDEV(VAR1F,14));
VAR21:= CROSS(VAR1E,L);
买点1:=VAR10;
买点2:=(VAR11+VAR13+VAR15+VAR17);
卖点1:=(VAR12+VAR14+VAR16+VAR18),LINETHICK2;
VAR22:=买点1 AND VARF AND VARC AND VAR21 AND VAR4<0 AND VAR5=0 AND VAR6=0 AND VAR20<(-110);
DRAWTEXT(买点1>0,LOW,’▲’),COLORYELLOW,ALIGN1,VALIGN0,FONTSIZE18;
DRAWTEXT(买点2>0,LOW,’▲’),COLORYELLOW,ALIGN1,VALIGN0,FONTSIZE18;
DRAWTEXT(卖点1>0,HIGH,’▼’),COLORGREEN,ALIGN1,VALIGN2,FONTSIZE18;
//DRAWICON(买点2,LOW,1),ALIGN1,VALIGN0;
//DRAWICON(卖点1,HIGH,2),ALIGN1,VALIGN2;
DRAWCOLORKLINE(卖点1>0,COLORGREEN,0);//波浪高点加亮
DRAWCOLORKLINE(买点2>0,COLORYELLOW,0);//波浪低点加亮
//{支撑压力}
HD1:=FILTER(BACKSET(FILTER(REF(H,10)=HHV(H,2*10+1),10),10+1),10);
LD1:=FILTER(BACKSET(FILTER(REF(L,10)=LLV(L,2*10+1),10),10+1),10);
支:REF(LOW,BARSLAST(LD1)),NODRAW;
压:REF(HIGH,BARSLAST(HD1)),NODRAW;
YL:IFELSE(压=REF(压,1),压,压),RGB(64,0,128),DOT;
/*
C1Y:=BACKSET(YL<>REF(YL,1),SUMBARS(YL<>REF(YL,1),2)/2);
C2Y:=BACKSET(ISLASTBAR,SUMBARS(YL<>REF(YL,1),1)/2);
DRAWNUMBER(CROSS(C1Y,0.5),YL,YL,4,COLORGREEN);
DRAWNUMBER(CROSS(C2Y,0.5),YL,YL,4,COLORGREEN);
*/
ZC:IFELSE(支=REF(支,1),支,支),RGB(64,0,64),DOT;
/*
C3Z:=BACKSET(ZC<>REF(ZC,1),SUMBARS(ZC<>REF(ZC,1),2)/2);
C4Z:=BACKSET(ISLASTBAR,SUMBARS(ZC<>REF(ZC,1),1)/2);
DRAWNUMBER(CROSS(C3Z,0.5),ZC,ZC,4,COLORYELLOW),VALIGN0;
DRAWNUMBER(CROSS(C4Z,0.5),ZC,ZC,4,COLORYELLOW),VALIGN0;
DRAWTEXT(HD1,H,’▼’),RGB(128,0,255),FONTSIZE20;
DRAWTEXT(LD1,L,’▲’),RGB(128,0,64),FONTSIZE20,VALIGN0;
*/
