{一字形横盘选股(利用扩展数据)}
{1. 获取存储的11个竞价价格}
K915:=EXTDATA_USER(1,0);
K916:=EXTDATA_USER(2,0);
K917:=EXTDATA_USER(3,0);
K918:=EXTDATA_USER(4,0);
K919:=EXTDATA_USER(5,0);
K920:=EXTDATA_USER(6,0);
K921:=EXTDATA_USER(7,0);
K922:=EXTDATA_USER(8,0);
K923:=EXTDATA_USER(9,0);
K924:=EXTDATA_USER(10,0);
K925:=EXTDATA_USER(11,0);
K1:=BETWEEN(K915/REF(C,1),0.995,1.005);
K2:=BETWEEN(K916/K915,0.995,1.005);
K3:=BETWEEN(K917/K916,0.995,1.005);
K4:=BETWEEN(K918/K917,0.995,1.005);
K5:=BETWEEN(K919/K918,0.995,1.005);
K6:=BETWEEN(K920/K919,0.995,1.005);
K7:=BETWEEN(K921/K920,0.995,1.005);
K8:=BETWEEN(K922/K921,0.995,1.005);
K9:=BETWEEN(K923/K922,0.995,1.005);
K10:=BETWEEN(K924/K923,0.995,1.005);
K11:=BETWEEN(K925/K924,0.995,1.005);
一字:=K1 AND K2 AND K3 AND K4 AND K5 AND K6 AND K7 AND K8 AND K9 AND K10 AND K11;
{2. 计算竞价期间的最高价和最低价}
最高价:= MAX6(MAX6(K915,K916,K917,K918,K919,K920),K921,K922,K923,K924,K925);
最低价:= MIN6(MIN6(K915,K916,K917,K918,K919,K920),K921,K922,K923,K924,K925);
{3. 一字横盘判断:最高与最低价波动小于0.5%}
一字横盘:= (最高价 - 最低价) / 最低价 * 100;
{5. 基础筛选(剔除ST、次新等)}
基础条件:= NOT(NAMELIKE('ST') OR NAMELIKE('*ST')) AND FINANCE(42) > 60 AND FINANCE(3)=1;
开盘涨幅:=(DYNAINFO(4)/REF(C,1)-1)*100;
涨幅:=(C/REF(C,1)-1)*100;
HS:=VOL/CAPITAL*100;
换手:=(DYNAINFO(15)/O)/FINANCE(46)*100;
昨日涨幅:=BETWEEN((REF(C,1)/REF(C,2)-1)*100,0,5);
竞昨比:=DYNAINFO(15)/REF(AMOUNT,1)*100;
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIF,9);
MACDS:=IF(DIF>DEA,BARSLAST(CROSS(DIF,DEA))+1,IF(DEA>DIF,-(BARSLAST(CROSS(DEA,DIF))+1),DRAWNULL));
{6. 输出选股信号}
一字竞价: IF(C<10 AND REF(HS,1)>2.36 AND BETWEEN(开盘涨幅,0,3.82) AND 昨日涨幅 AND 竞昨比 >0.28 AND 一字,一字横盘,DRAWNULL);
开盘%:IF(ISVALID(一字竞价),开盘涨幅,DRAWNULL);
涨幅%:IF(ISVALID(一字竞价),涨幅,DRAWNULL);
量比:IF(ISVALID(一字竞价),DYNAINFO(48),DRAWNULL);
换手率:IF(ISVALID(一字竞价),换手,DRAWNULL);
竞昨比率:IF(ISVALID(一字竞价),竞昨比,DRAWNULL);
MACD数:IF(ISVALID(一字竞价),MACDS,DRAWNULL); |