通达信筹码峰抓妖选股指标 源码 贴图

{去ST,科创,北证}
去ST:=NAMELIKE('ST')=0 AND NAMELIKE('*ST')=0 AND NAMELIKE('SST')=0 AND NAMELIKE('S*ST')=0;
去科创板:=NOT(CODELIKE('688'));
{去创业板:=NOT(CODELIKE('3'));}
去北证:=NOT(CODELIKE('8'));
去北证A:=NOT(CODELIKE('4'));
{去新股:=IF(NAMELIKE('N'),0,1);}
PC:=去ST AND 去科创板 AND{ 去创业板 AND }去北证{ AND 去新股}AND 去北证A;
ZFF1:=C-O;{公式网WWW.GPXIAZAI.COM}
ZFF2:=ZFF1/O;
ZFF:=ZFF2*100;
ZTX01:=DATE-1000000;
ZTX02:=ZTX01<200823;
ZTX03:=IF(ZTX02,1.1,1.2);
ZNNX:=IF(CODELIKE('30')<>0,ZTX03,IF(CODELIKE('68')<>0,1.2,1.1));
ZTX1:=(H+0.01);
ZTX2:=REF(C,1);
ZTX3:=H=C;
ZTX4:=ZTX1/ZTX2>=ZNNX AND ZTX3;
ZTX4A:=ZTX1/ZTX2>=ZNNX;
VAR1:=REF(ZTX4,1) AND ZFF<-3;
PD1:=COUNT(ZTX4,15)>0;
PD2:=ZFF>=3 AND C>REF(C,1);
VAR5:=BARSSINCEN(VAR1,15);
VAR6:=IF(VAR5=DRAWNULL,0,VAR5);
PD4:=COUNT(ZTX4A,VAR6)>=1;
PD5:=COUNT(ZFF<-3,VAR6+1)>=2;
VAR7:=MAX(C,O);
VAR8:=HHV(VAR7,15);
PD6:=C<VAR8;
XG:PD1 AND PD2 AND PD4 AND VAR6>1 AND PD5 AND PD6 AND PC;