请教代码替代

pxr019225

CODELIKE'30'金字塔替代代码

admin

请提供codelike的函数说明

技术009

strleft(stklabel,2)='30'

pxr019225

admin 发表于 2023-12-20 08:42
请提供codelike的函数说明

CODELIKE('30')就可以查找出以30开头的股票代码，即创业板股票。科创板以68开头，CODELIKE('68')可以找出以68开头的股票代码。

技术006

见3楼的代码

pxr019225

技术006 发表于 2023-12-20 11:06
见3楼的代码

编译通不过。
可否帮忙改一下
DIF4:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA4:=EMA(DIF4,9);
//ZTB:=C>INTPART(REF(C,1)*(1+(IF(CODELIKE('30')))));strleft(stklabel,2)='30'
ZTB:=C>INTPART(REF(C,1)*(1+(IF(strleft(stklabel,2)='30'),000001,600000)));

启动版:=DIF4>-0.2 AND DIF4<0.35 AND ZTB AND REF(ZTB,1)<1 AND COUNT(DIF4>=-0.01,5)=5;
LS:=C/REF(C,1)>1.03 AND C=H AND BETWEEN(FORCAST(V, 4), 0.2*FORCAST(V, 12),2.1*FORCAST(V, 12));
YZB:=C/REF(C,1)>1.0991 AND 0=H AND C=H;
XG9:= FILTER(LS,28) AND NOT(YZB) ;
启动版8:=启动版 AND XG9;

技术006

ZTB:=C>INTPART(REF(C,1)*(1+(IF(strleft(stklabel,2)='30'),000001,600000)));
这句话本质上是想达到什么样的效果？

pxr019225

技术006 发表于 2023-12-20 12:18
ZTB:=C>INTPART(REF(C,1)*(1+(IF(strleft(stklabel,2)='30'),000001,600000)));
这句话本质上是想达到什么 ...

就是除去涨幅20%的创业板和688的股票

技术009

ZTB:=C>INTPART(REF(C,1);
这种你直接把板块判断放到 条件里去就行了。

iscyb:=strleft(stklabel,2)='30';
iskcb:s=trleft(stklabel,2)='68';
con:not((iscyb or iskcb));//创业或者科创板返回 0
启动版:=con and DIF4>-0.2 AND DIF4<0.35 AND ZTB AND REF(ZTB,1)<1 AND COUNT(DIF4>=-0.01,5)=5;

pxr019225

技术009 发表于 2023-12-20 15:38
ZTB:=C>INTPART(REF(C,1);
这种你直接把板块判断放到 条件里去就行了。

Thanks
评测效果不错