分享

20230929 通达信:30天前筹码占30%以上,获利比例50%以上的选股公式

 vfswjjx9wz3kz7 2023-09-29 发布于湖北

原创 欧欧 期权量化抓妖记 2023-09-29 08:15 


一、连续涨停包括2个涨停及以上,股价回调30日线的选股公式

编写条件:

连续涨停包括2个涨停及以上,股价回调30日线的选股公式!

编写方法:

{连续2板及以上涨停后,12天内存在股价回调30日均线,天数自己可以更改}
A1:=REF(C,1)/REF(C,2)>1.099 AND REF(C,2)/REF(C,3)>1.099;
A2:=REF(C,1)>MA(C,30) AND L<=MA(C,30) AND C>MA(C,30);
XG:COUNT(A1,12)=1 AND A2;

二、连续出现小阴小阳的选股公式

编写条件:

具体要求如下:1、连续小阳小阴,最高点与最低点上下总体涨跌幅小于5个点,连续持续5天以上;2、要求K线在20、60、120、240这些中长期均线之上,长趋势线整体多头向上,20日均线在60、120、250均线之上;3、要求MACD出现金叉;4、要求成交量缩小,但是5日均量线要大于135日均量线;

编写方法:

ZF:=h/l;
CF:=C/REF(C,1);
n:=HHVBARS(ZF*CF,20);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
(HHV(H,N-1)-LLV(L,N-1))/LLV(L,N-1)<0.2
AND
C>MAX(MA(C,20),MAX(MA(C,60),MAX(MA(C,120),MA(C,240))))
AND
n>=5
AND
MA(V,5)>=MA(V,135)
AND
MA(C,20)>MAX(MA(C,60),MAX(MA(C,120),MA(C,240)))
AND
EVERY(V<REF(V,N),5)
AND ((DIF-DEA)>0 OR EVERY((DIF-DEA)>=REF((DIF-DEA),1),2))
AND COUNT((C/REF(C,6))>1.5,60)=0;

三、六连阳两连阴一阳的选股公式

编写条件:

一阳是指当天的一阳 涨幅不超过 1个点.

编写方法:

六连阳:=count(c>o,6)=6;
二连阴:=count(c<o,2)=2;
一阳:=c>o and c/ref(c,1)<=1.01;
六连阳两连阴一阳: ref(六连阳,3) *ref(二连阴,1) * 一阳>0;

四、OBV突破最近一个高点的选股公式

编写条件:

OBV突破最近一个高点的选股公式.

编写方法:

{参数 M 自己设置}

VA:=IF(CLOSE>REF(CLOSE,1),vol,-VOL);
obv:=SUM(IF(CLOSE=REF(CLOSE,1),0,VA),0);
MaoBV:=MA(OBV,M);
HH:=FINDHIGH(OBV,1,10,1);{10是10天内的高点}
crOSS(OBV,HH);

五、成交量比昨日放大一倍以上,且换手率超过1%的选股公式  

编写条件:

成交量比昨日放大一倍以上,且换手率超过1%的选股公式。

编写方法:

TJ:V>REF(V,1)*2 AND V/CAPITAL*100>1;

六、MACD连续三次金叉选股公式

编写条件:

macd三次金叉的公式,要求每一次金叉时,DEA要大于等于前一次DEA,同时第三次金叉在0轴附近,

编写方法:

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
macd:=(DIFF-DEA)*2;
JCCOUNT:=COUNT(crOSS(DIFF,DEA),BArslAST(DEA>=0));
金叉:=CROSS(DIFF,DEA) AND DEA<0 AND COUNT(JCCOUNT=1,21)=1;
T1:=BARSLAST(金叉);
二金叉:=CROSS(DIFF,DEA) AND DEA<0 AND DEA>REF(DEA,T1) AND COUNT(JCCOUNT=2,21)=1;
T2:=BARSLAST(二金叉);
三金叉:CROSS(DIFF,DEA) AND BETWEEN(DEA,0,0.2) AND DEA>REF(DEA,T2) AND COUNT(JCCOUNT=3,28)=1;

七、30天前筹码占30%以上,获利比例50%以上的选股公式

编写条件:

30天前筹码占30%以上,获利比例50%以上的选股公式.

编写方法:

XG:PPART(30)*100>30 AND WINNER(C)>0.5;

八、涨停后首个kdj金叉选股公式

编写方法:

crOSS('kdj.K','kdJ.D') AND COUNT(CROSS('KDJ.K','KDJ.D'),BArslAST(C/REF(C,1)>1.095 AND C=H))=1;


公众号实用收藏源码打包每天源码文件更新点击链接下载

知识星球
END

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

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多