通达信〖红星回马〗识别主板创业板回调形态选股指标公式源码

CY板:=CODELIKE('30');
KC板:=CODELIKE('68');
北证:=CODELIKE('4') OR CODELIKE('8') OR CODELIKE('9');
风险:=(NAMELIKE('ST') OR NAMELIKE('*ST'));
主板:=CODELIKE('60') OR CODELIKE('00');
VAR130:=北证 AND (C>=ZTPRICE(REF(CLOSE,1),0.3) AND C=H);
VAR120:=CY板 AND (C>=ZTPRICE(REF(CLOSE,1),0.2) AND C=H);
VAR110:=主板 AND (C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H);
VAR105:=风险 AND (C>=ZTPRICE(REF(CLOSE,1),0.05) AND C=H);
VAR1:=VAR130 OR VAR120 OR VAR110 OR VAR105;
A1:=REF(VAR1,4)=1 AND REF(O,4)>REF(MA(C,120),4);
A2:=REF(H,2)< REF(H,3) AND REF(V,2)< REF(V,3);
A3:=REF(H,1)< REF(H,2) AND REF(V,1)< REF(V,2);
A4:=REF(C,1)>=REF(O,4);
AAA:=A1 AND A2 AND A3 AND A4;
低价:=LLV(MIN(C,O),4);
ZT开盘价:=REF(O,4);
XG条件:=AAA AND 北证=0 AND 低价>ZT开盘价;
满足条件周期:=BARSLAST(XG条件);
低点:=LLV(MIN(C,O),满足条件周期);
ZT开盘价1:=REF(O,4+满足条件周期);
VAR1TJ:=COUNT(VAR1,满足条件周期+4);
条件2:=FILTER((XG条件 AND V>REF(V,1) AND C>O) OR (满足条件周期<=4 AND V>REF(V,1) AND C>O AND 低点>ZT开盘价1 AND VAR1TJ< 1),5);
XG:条件2;