分享

经典形态选股器(附源码),喜欢的直接复制。

 pharl 2019-03-16

经典形态选股器(附源码),喜欢的直接复制。

锤子线升级版

T1:=

IF(FINANCE(40)>=100000000000,40,{流通市值大于1000亿的,要求下跌40天}

IF(FINANCE(40)>=50000000000,45,{流通市值大于500亿的,要求下跌45天}

IF(FINANCE(40)>=30000000000,50,{流通市值大于300亿的,要求下跌50天}

IF(FINANCE(40)>=20000000000,50,{流通市值大于200亿的,要求下跌50天}

IF(FINANCE(40)>=10000000000,55,{流通市值大于100亿的,要求下跌55天}

IF(FINANCE(40)>=5000000000,60,{流通市值大于50亿的,要求下跌60天}

65{流通市值小于50亿的,要求下跌65天}

))))));

N1:=

IF(FINANCE(40)>=100000000000,15,{流通市值大于1000亿的,下跌幅度N1赋值15}

IF(FINANCE(40)>=50000000000,18,{流通市值大于500亿的,下跌幅度N1赋值18}

IF(FINANCE(40)>=30000000000,18,{流通市值大于300亿的,下跌幅度N1赋值18}

IF(FINANCE(40)>=20000000000,25,{流通市值大于200亿的,下跌幅度N1赋值25}

IF(FINANCE(40)>=10000000000,25,{流通市值大于100亿的,下跌幅度N1赋值25}

IF(FINANCE(40)>=5000000000,25,{流通市值大于50亿的,下跌幅度N1赋值25}

30 {流通市值小于50亿的,下跌幅度N1赋值30}

))))));

DOWN_20P:=100*(HHV(C,T1)/REF(C,1)-1) > N1; {寻找60天内下跌超过N %的个股}

锤子形态:=(MIN(REF(CLOSE,1),REF(OPEN,1))-REF(LOW,1))/(REF(HIGH,1)-REF(LOW,1))>0.5{下影线超过2/3}

AND (REF(HIGH,1)-MAX(REF(CLOSE,1),REF(OPEN,1))) < ABS(REF(O,1)-REF(C,1))/4 {有少量上影线}

AND LLV(LOW,T1)=REF(LOW,1);{锤子当天收60天以内的最低价}

OUT:锤子形态

AND DOWN_20P

AND C>REF(H,1);{今天K线过昨天高点,确认锤子形态};

定海神针

VAR1:=IF(DATE>=1221230,1,1);

VAR2:=IF(DATETODAY(DATE)<11700,1,DRAWNULL);

VAR3:=CLOSE/MA(CLOSE,40)*100<78;

VAR4:=CLOSE/MA(CLOSE,60)*100<74;

VAR5:=HIGH>LOW*1.051;

VAR6:=VAR5 AND COUNT(VAR5,5)>1;

VAR7:=IF(VAR6 AND (VAR3 OR VAR4),2,0);

VAR8:=CLOSE/REF(CLOSE,25)<=1.1;

VAR9:=SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,2)),7,1)*100<15;

VAR10:=(CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100;

VAR11:=SMA(VAR10,2,1)*VAR2;

VAR12:=SMA(VAR11,2,1)*VAR2;

VAR13:=IF(VAR11>REF(VAR11,1) AND REF(VAR11,1)<REF(VAR11,2) AND VAR11<23,1.5,0);

VAR14:=LLV(LOW,4)=LLV(LOW,120);

VAR15:=(CLOSE-MA(CLOSE,58))/MA(CLOSE,58)<(-0.07)*VAR2;

VAR16:=(INDEXC-HHV(INDEXC,8))/HHV(INDEXC,8)<(-0.05) AND MA(INDEXA,125)/MA(INDEXV,125)/(MA(INDEXA,5)/MA(INDEXV,5))>1.12;

VAR17:=BARSLAST(VAR16)<10;

VAR18:=MA(CLOSE,27);

VAR19:=(CLOSE-VAR18)/VAR18*100;

VAR20:=MA(VAR19,2)*VAR1;

VAR21:=BARSLAST(CROSS((-10),VAR20)=1)*VAR2;

VAR22:=VAR20<(-10) AND VAR21>3;

VAR23:=ABS(IF(VAR22,VAR20,0))*VAR2;

VAR24:=VAR23>0;

VAR25:=MA(CLOSE,80)-MA(CLOSE,13)/3;

VAR26:=MA((CLOSE-VAR25)/VAR25,1)*VAR2;

VAR27:=EMA(VAR26,12)*0.5;

VAR28:=EMA(VAR26,3)*VAR1;

VAR29:=ABS(IF(LLV(VAR28-VAR27,12)>0,0,1));

VAR30:=CLOSE/(EMA(EMA((CLOSE+LOW+HIGH)/3,3),26)*0.9)<0.95;

VAR31:=MA((CLOSE-MA(CLOSE,21))/MA(CLOSE,21),3)*100;

VAR32:=VAR31<(-15)*VAR2;

VAR33:=(CLOSE-MA(CLOSE,28))/MA(CLOSE,28)*100<(-23)*VAR2;

VAR34:=VAR8 AND VAR7 AND VAR9 AND VAR13;

VAR35:=VAR32>0 AND VAR30>0 AND VAR29>0 AND VAR24>0 AND VAR15>0 AND VAR17>0 AND VAR33>0 AND CLOSE>REF(CLOSE,1);

VAR36:=VAR35*VAR2 AND VAR34*VAR2;

VAR37:=(CLOSE/MA(CLOSE,40)*100<78)*VAR1;

VAR38:=(CLOSE/MA(CLOSE,60)*100<74)*VAR1;

VAR39:=HIGH>LOW*1.051;

VAR40:=VAR39 AND COUNT(VAR39,5)>1;

VAR41:=IF(VAR40 AND (VAR37 OR VAR38),2,0);

VAR42:=CLOSE/REF(CLOSE,25)<=1.1;

VAR43:=SMA(MAX(CLOSE-REF(CLOSE,2),0),7,1)/SMA(ABS(CLOSE-REF(CLOSE,2)),7,1)*100<15;

VAR44:=SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1)*VAR2;

VAR45:=SMA(VAR44,2,1)*VAR2;

VAR46:=VAR44>REF(VAR44,1) AND REF(VAR44,1)<REF(VAR44,2) AND VAR44<23;

VAR47:=VAR41 AND VAR42 AND VAR43 AND VAR46;

VAR48:=3*SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100,5,1)-2*SMA((CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60)*VAR1)*100,5,1)*VAR2;

VAR49:=EMA(VAR48,5)*VAR2;

VAR50:=(VAR49-REF(VAR49,1))/REF(VAR49,1)*100+10;

VAR51:=EMA(CLOSE,5);

VAR52:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)*VAR1-LLV(LOW,20))*100;

VAR53:=SMA(VAR52,6,1)*VAR2;

VAR54:=IF(LLV(VAR53,5)<10 AND (CLOSE=LLV(CLOSE,10) OR LOW=LLV(LOW,10)) AND CLOSE>REF(CLOSE,1)*0.905,40,0)*VAR2;

VAR55:=IF(VAR50<(-3) OR LLV(VAR53,5)*VAR1<10 AND (CLOSE=LLV(CLOSE,10) OR LOW=LLV(LOW,10)) AND CLOSE>REF(CLOSE,1)*0.905,1,0)*VAR2;

神针:VAR36 AND VAR47 AND VAR55,COLORRED;

仙人指路

YSESXA:=H/C>1.03;

YSESXB:=V/REF(V,1)<=2 AND V/REF(V,1)>=0.8;

YSESXC:=H=HHV(H,3);

YSESXD:= YSESXA AND YSESXB AND YSESXC;

YSESXE:=EMA(EMA(CLOSE,9),9);

YSESXF:=( YSESXE -REF(YSESXE,1))/REF(YSESXE,1)*1000;

YSESXG:=IF(YSESXF >REF(YSESXF,1) AND YSESXF >0, YSESXF,0);

YSESXH:=100*WINNER(CLOSE*0.95);

YSESXI:=IF(YSESXH >50 AND COST(85)<CLOSE AND YSESXF >0, YSESXF,0);

渝仙人指路:REF(YSESXD,1) AND O<MA(C,5) AND (YSESXI OR YSESXG);

东方红大阳升

HSL:=V/CAPITAL*100;

YB:=HSL>4 AND C>REF(C,1);

A1:=COUNT(YB,13)>=3;

A2:=C/REF(C,1)>1.049 AND HSL>5;

A3:=REF(SUMBARS(V,CAPITAL),13)>89;

A4:=HIGH/C<1.021;

A5:=COUNT(C/REF(C,1)>1.04,10)<5;

A6:=IF(COUNT(HSL>4,5)>=3,0,1);

ZTJ:=A1 AND A2 AND A3 AND A4 {AND A5 AND A6};

ZTJ AND (REF(BARSLAST(ZTJ),1)>20 OR BARSSINCE( ZTJ)=0);

老鸭头

MA5:=MA(C,5);

MA10:=MA(C,10);

MA20:=MA(C,20);

MA30:=MA(C,30);

MA120:=SMA(C,120,1);

ZH:=ABS(MA5-MA20)/MA20*100<=10;

GG:=ABS(MA5-MA30)/MA30*100<=10;

HH:=MA5>REF(MA5,1);QS:=MA20>REF(MA20,1);

ZZ:=MA30>REF(MA30,1);

DTPL:=MA20>MA30 AND MA30>MA120;

QQ:=DTPL AND QS AND ZZ AND COUNT(HH,4)<=1;

HS:=C>MA5 AND ((HH AND NOT(REF(HH,1))) OR C>REF(C,3));

TT:=HS AND (ZH OR GG) AND QQ;RR:=CAPITAL>1000000 ;

WW:=TT AND NOT(REF(TT,1));

WW1:=CROSS(MACD.MACD,0) AND C>MA(C,5);

老鸭头爆点:WW AND COUNT((MA10>MA20),5)=5 AND WW1 AND RR;

倒挂老鸭头

MA5 := MA(CLOSE,5);

MA10 := MA(CLOSE,10);

MA60 := MA(CLOSE,60);

PDAY1 := BARSLAST(CROSS(MA60,MA5));{5日均线下穿60日均线}

PDAY2 := BARSLAST(CROSS(MA60,MA10));{10日均线下穿60日均线,至此形成鸭颈部}

PDAY3 := BARSLAST(LOW=LLV(LOW,PDAY2));{形成头部,要反弹}

PDAY4 := BARSLAST(CROSS(MA5,MA10));{反弹后,5日均线和10日均线金叉}

PDAY5 := BARSLAST(CROSS(MA10,MA5));{反弹不久,5日均线和10日均线形成死叉,形成嘴部}

A1:= PDAY1>PDAY2 AND PDAY2>PDAY3 AND PDAY3>PDAY4 AND PDAY4>PDAY5 AND PDAY5<5;

A2:= COUNT(CROSS(MA10,MA5),PDAY2)=1;

A1 AND A2;

蚂蚁上树

EMA13:=EMA(C,13);

EMA34:=EMA(C,34);

EMA55:=EMA(C,55);

BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;

BR2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C<0.2;

BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR REF(C,5)<REF(EMA55,5));

BR4:=BR1 AND BR2 AND BR3;蚂蚁上树:(BR4 AND FILTER(BR4,10));

金蜘蛛

N1:=5;N2:=10;N3:=20;

MA1:=MA(CLOSE,N1);

MA2:=MA(CLOSE,N2);

MA3:=MA(CLOSE,N3);

A1:=COUNT(CROSS(MA2,MA3),2)=1;

A2:=COUNT(CROSS(MA1,MA3),2)=1;

A1 AND A2;过滤ST:=EXIST((C/REF(C,1)-1)*100>5.6,60);

过滤停牌:=DYNAINFO(8)>0; 过滤高价:=DYNAINFO(7)

超准确

MA250:=MA(CLOSE,250),COLORMAGENTA,LINETHICK3;

{N(3,30,5);}

【箱顶】:PEAK(3,N,1)*0.999;

【箱底】:TROUGH(3,N,1)*0.999;

【箱高】:=1*(【箱顶】-【箱底】)/【箱底】;

K线运行的升幅:=(MA(H,3)-REF(MA(H,3),1))*100/REF(MA(H,3),1);{NODRAW;}

{ML:=EMA(L,7),COLORMAGENTA;

MH:=MA(H,7),COLORGRAY;

趋势线:MA((MH+ML)/2,3),LINETHICK1,COLORGREEN;

趋势线1:IF(趋势线>REF(趋势线,1),趋势线,DRAWNULL),LINETHICK2,COLORMAGENTA;}

{八周均线}

VAR1:MA(C,7),COLORGREEN;

VAR1A:IF(VAR1>REF(VAR1,1),VAR1,DRAWNULL),COLORRED;

DRAWICON(CROSS(C,VAR1),L*0.99,1);

DRAWICON(CROSS(VAR1,C),H*1.00,2);

XDU:=IF(EMA(EMA(EMA(C,2),2),2)>REF(EMA(EMA(EMA(C,2),2),2),1),【箱底】,【箱顶】);

今天就更新到这里,后期持续更新干货技术。

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约