图片

SJ:=IF((DATE<210920),1,1);

N1:=40;

A:=(C+O+H+L)/4;

AA0:=MA(A,N1),LINETHICK3;//中

MA1:=MA(CLOSE,5), NODRAW;

MA2:=MA(CLOSE,10), NODRAW;

MA3:=MA(C,60), NODRAW,LINETHICK1;

转折线:MA3, NODRAW,COLORCYAN;

顺势线:MA(CLOSE,10), NODRAW;

MA20:=MA(C,20), NODRAW;

MA30:=MA(C,30), NODRAW;

神龙线:MA(C,120), NODRAW,COLORRED;

DRAWCOLORLINE(SJ&&MA3>REF(MA3,1),MA3,COLORRED,COLORGREEN),LINETHICK2;

ZD:=MA3>REF(MA3,1);//上行

ZK:=MA3<REF(MA3,1);//下行

ZD1:=MA2>REF(MA20,1);//上行

ZK1:=MA2<REF(MA20,1);//下行

DRAWICON(SJ&&ZD,MA3,'ICO10'),VALIGN0;

DRAWICON(SJ&&ZK,MA3,'ICO11'),VALIGN2;

KD:=CROSS             (MA2,MA20)  AND MA3>REF(MA3,1);

K0K:=CROSSDOWN(MA2,MA20)  AND MA3<REF(MA3,1);

DRAWICON(SJ&&KD,L*0.997,'ICO8'),VALIGN0;

DRAWICON(SJ&&K0K,H*1.003,'ICO9'),VALIGN0;

K1K:=CROSSDOWN(MA2,MA20)  AND C<MA3;

DRAWICON(SJ&&K1K,H*1.003,'ICO9'),VALIGN0;

K1D:=CROSS(MA2,MA20)  AND C>MA3;

DRAWICON(SJ&&K1D,L*0.997,'ICO8'),VALIGN0,FONTSIZE14,COLORYELLOW;

MA5:=MA(CLOSE,120), NODRAW;

AAS:=SMA(A,N1,1),LINETHICK2;//慢

AAE:=EMA(A,60),LINETHICK2;//快

VAR60:=(2*CLOSE+HIGH+LOW)/4;

VAR70:=LLV(LOW,13);

VAR80:=HHV(HIGH,13);

VAR90:=EMA((VAR60-VAR70)/(VAR80-VAR70)*100,13);

VARA1:=EMA(0.667*REF(VAR90,1)+0.333*VAR90,2);

FF:=ZIGZAG(VAR90,20,1),COLORWHITE,LINETHICK1;

AA:=CROSS(FF,REF(FF,1));//D

BB:=CROSS(REF(FF,1),FF);//K

DRAWTEXT(SJ&&AA,L*0.997,'D'),COLORYELLOW,FONTSIZE18,ALIGN2,VALIGN0; 

DRAWTEXT(SJ&&BB,H*1.003,'K'),COLORGREEN,FONTSIZE18,ALIGN2;

V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);

V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);

V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);

V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);

V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOW

AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);

V1:= COUNT(V00,6)>=3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 AND HHVBARS(HIGH,6) >= 5 AND V03;

V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND HHVBARS(HIGH,7) >= 6 AND V04;

V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND HHVBARS(HIGH,7) >= 6 AND V03;

V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 2 AND HHVBARS(HIGH,8) >= 7 AND V04;

V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 1 AND HHVBARS(HIGH,8) >= 7 AND V03;

V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 2 AND HHVBARS(HIGH,9) >= 8 AND V04;

V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 1 AND HHVBARS(HIGH,9) >= 8 AND V03;

V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 2 AND HHVBARS(HIGH,10) >= 9 AND V04;

V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 1 AND HHVBARS(HIGH,10) >= 9 AND V03;

V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 AND LLVBARS(LOW,11) = 2 AND HHVBARS(HIGH,11) >= 10 AND V04;

XG:= V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10;

HV00:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);

HV01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);

HV02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);

HV03:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);

HV04:= REF(HIGH,2) > HIGH AND REF(LOW,2) > LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);

HV1:= COUNT(HV00,6)>=3 AND COUNT(HV01 OR HV02,5)=0 AND HHVBARS(HIGH,6) = 1 AND LLVBARS(LOW,6) >= 5 AND HV03;

HV2:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 2 AND LLVBARS(LOW,7) >= 6 AND HV04;

HV3:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 1 AND LLVBARS(LOW,7) >= 6 AND HV03;

HV4:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 2 AND LLVBARS(LOW,8) >= 7 AND HV04;

HV5:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 1 AND LLVBARS(LOW,8) >= 7 AND HV03;

HV6:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 2 AND LLVBARS(LOW,9) >= 8 AND HV04;

HV7:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 1 AND LLVBARS(LOW,9) >= 8 AND HV03;

HV8:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 2 AND LLVBARS(LOW,10) >= 9 AND HV04;

HV9:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 1 AND LLVBARS(LOW,10) >= 9 AND HV03;

HV10:= COUNT(HV00,11)>=3 AND COUNT(HV01 OR HV02,10)<=5 AND HHVBARS(HIGH,11) = 2 AND LLVBARS(LOW,11) >= 10 AND HV04;

HXG:=HV1 OR HV2 OR HV3 OR HV4 OR HV5 OR HV6 OR HV7 OR HV8 OR HV9 OR HV10;

DIFF0:=EMA(CLOSE,12) - EMA(CLOSE,26);

DEA0:=EMA(DIFF0,9);

MACD0:=2*(DIFF0-DEA0),COLORSTICK;

JC0:=CROSS(DIFF0,DEA0);

SC0:=CROSSDOWN(DIFF0,DEA0);

N10:=BARSLAST(JC0)+1;

N20:=BARSLAST(SC0)+1;

MACDH:=BACKSET(CROSSDOWN(DIFF0,DEA0),HHVBARS(MACD0,N10)+1);

MACDL:=BACKSET(CROSS(DIFF0,DEA0),LLVBARS(MACD0,N20)+1);

DRAWCOLORKLINE(SJ&&C>转折线,COLORRED,1);//K线

DRAWCOLORKLINE(SJ&&C>转折线  AND C<O ,COLORRED,0);

DRAWCOLORKLINE(SJ&&C<转折线  AND C>O,COLORCYAN,1);

DRAWCOLORKLINE(SJ&&C<转折线  AND C<O    ,COLORCYAN,0);

DRAWNUMBER(SJ&&AA,L*0.997,OPEN,2,COLORYELLOW),ALIGN0,VALIGN0,FONTSIZE12;

DRAWNUMBER(SJ&&BB,H*1.003,OPEN,2,COLORGREEN),ALIGN0,FONTSIZE12;

高11:=REF(HHV(H,120),3);//可调参数

 低11:=REF(LLV(L,120),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;

HH:=(6*H+5*REF(H,1)+4*REF(H,2)+3*REF(H,3)+2*REF(H,4)+REF(H,5))/21;

LL:=(6*L+5*REF(L,1)+4*REF(L,2)+3*REF(L,3)+2*REF(L,4)+REF(L,5))/21;

A1:=IF(C>REF(HH,1),1,0);

A2:=IF(C<REF(LL,1),-1,0);

A3:=A1+A2;

A4:=IF(A3=0,REF(A3,BARSLAST(NOT(A3=0))),A3);

转折线0:=IF(A4=-1,MA(HIGH,6),MA(LOW,6)),LINETHICK2,COLORFFFFFF;

MA_5:=MA(C,5), NODRAW;

MA_10:=MA(C,10), NODRAW;

MA_60:=MA(C,60), NODRAW;

MA_120:=MA(CLOSE,120), NODRAW;

LONG:=(MA_5>MA_60 AND MA_5>MA_120 AND MA_10>MA_60 AND MA_10>MA_120), NODRAW;

SHORT:=(MA_5<MA_60 AND MA_5<MA_120 AND MA_10<MA_60 AND MA_10<MA_120), NODRAW;

S:=IFELSE(LONG, 1, IFELSE(SHORT, -1, 0));

DRAWBKBMP(S=1, 'LONG.BMP');

DRAWBKBMP(S=0, 'SHOCK.BMP');

DRAWBKBMP(S=-1, 'SHORT.BMP');

STICKLINE1(SJ=0&&C>=O,C,O,3,1),COLOR886666;

STICKLINE1(SJ=0,H,MAX(C,O),0,0),COLOR886666;

STICKLINE1(SJ=0,L,MIN(C,O),0,0),COLOR886666;

STICKLINE1(SJ=0&&C<O,C,O,3,0),COLOR886666;