通达信 剔除“68”“ST”“8”“4”“*”开头的股票源码

以下是剔除“68”、“ST”、“8”、“4”、“*”开头的股票的通达信源码：

C1: STREND:=BARSLAST(CLOSE>REF(CLOSE,1));
C2: STFLAG:=STREND=0 AND REF(STREND,1)=1;
C3: STFILTER:=MA(VOL,5)/MA(VOL,20)>1.5 AND STFLAG=0;
C4: STFILTER:=STFILTER AND LEFT(DATE,1)<>'6' AND LEFT(DATE,1)<>'8' AND LEFT(DATE,1)<>'4' AND LEFT(DATE,1)<>'*' AND LEFT(CODE,2)<>'ST' AND LEFT(CODE,1)<>'8';
FILTER:=STFILTER;

这段源码中，首先定义了一个变量`STREND`，它表示收盘价大于昨日收盘价的天数；然后定义了一个变量`STFLAG`，它表示今天是收盘价小于等于昨日收盘价的第一天；接着定义了一个变量`STFILTER`，它表示成交量5日均线除以20日均线的比值大于1.5且`STFLAG`为0（即今天不是收盘价小于等于昨日收盘价的第一天）；最后通过判断股票代码和日期的前缀是否为“68”、“ST”、“8”、“4”、“*”来过滤掉不符合条件的股票。