同花顺查查K线标示涨跌停源码副图 EA

用不同的颜色把涨跌停板用不同的颜色在K线上标识。

r

用法:在主图使用,自动添加均线5 10 20 30 60 120 240 360,后面3条均线不显示

r

提醒顶底分型 VERLI

r

r NE(HOUR<REF(HOUR,1),2),COLOR666666;

r

C2:=REF(C,1);

r

涨停:=IF((C-C2)*100/C2>=(10-0.01*100/C2),1,0);

r

STICKLINE(涨停,OPEN,CLOSE,10,0),coloryellow;

r

STICKLINE(涨停,H,L,0,0),coloryellow;

r

跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2),1,0);

r

STICKLINE(跌停,OPEN,CLOSE,10,0),colorgreen;

r

STICKLINE(跌停,H,L,10,0),colorgreen;

r

//MID : MA(CLOSE,26);

r

//UPPER: MID + 2*STD(CLOSE,26);

r

//LOWER: MID – 2*STD(CLOSE,26);

r

//STICKLINE(1,H,L,1,0),colorliblue;

r

//{笔底分型 选股 预警 确保向下笔成立后的底分型}

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

DRAWTEXT(FILTER(XG=1,5),L*0.998,’底分型’),coloryellow;

r

//{笔顶分型 选股 预警 确保向上笔成立后的顶分型}

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

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

r

DRAWTEXT(FILTER(HXG=1,3),H*1.01,’顶分型’),colorgreen;

r

IF (k<=0)

r

RETURN 0;

r

MA$1:MA(CLOSE, N1),colorwhite;

r

IF (k<=1)

r

RETURN 0;

r

MA$2:MA(CLOSE, N2),coloryellow;

r

IF (k<=2)

r

RETURN 0;

r

MA$3:MA(CLOSE, N3),colormagenta;

r

IF (k<=3)

r

RETURN 0;

r

MA$4:MA(CLOSE, N4),colorgreen;

r

IF (k<=4)

r

RETURN 0;

r

MA$5:MA(CLOSE, N5),colorcyan;

r

IF (k<=5)

r

RETURN 0;

r

MA$6:MA(CLOSE, N6),colorred;

r

IF (k<=6)

r

RETURN 0;

r

MA$7:MA(CLOSE, N7);

r

IF (k<=7)

r

RETURN 0;

r

MA$8:MA(CLOSE, N8);

r

//基于k线买卖提醒,5日线突破13日线且收盘大于5日线

r

购买点提醒:=IF(CROSS(REF(EMA(C,N1),1),REF(EMA(C,N2),1)) AND C>EMA(C,N1),1,0);

r

//DRAWICON(购买点提醒,MA$5*0.95,"buy");

r

DRAWTEXT(购买点提醒,L*0.998,’buy’),coloryellow;

r

 
r同花顺查查K线标示涨跌停源码副图

© 版权声明
THE END
喜欢就支持一下吧
点赞104 分享
评论 抢沙发

请登录后发表评论

    暂无评论内容