[PEL] 复制代码 d1:=ref(c,todaybar);//昨日收盘价
isst:=strfind(stkname,'st',1);//是否st
iszb:=(strleft(stklabel,2)='60' or strleft(stklabel,2)='00');//区分是否主板
ztv:=if(isst,if(iszb,0.05,0.10),if(iszb,0.1,0.2));//创业板规则复杂,涨跌停数值不确定,最好不要应用在这上面。
//这里的处理是为了处理数学上计算的偏差
ztp:=round((ztv+1)*round(d1/0.01))/100;//涨停价
zt:ztp=rounds(c,2);//仅对主板a股以及科创,创业板有效。
con:any(time<=100000 and zt,todaybar);//当天10点之前涨停
result:con and ref(con,todaybar);//当天10点之前涨停+昨日10点之前涨停
选股周期选择1分钟+至少设置800+数据量,否则无法判断昨日的情况。
|