以下是通达信趋势预警选股公式选股源码(无源码的请下载附件导入)
角度3:=ATAN((EMA(C,35)/REF(EMA(C,35),1)-1)*100)*57.3;
MA1:=EMA(CLOSE,5);
角度1:=ATAN((MA1/REF(MA1,1)-1)*100)*180/3.1416;
MA05:=MA(C,5);
MA10:=MA(C,10);
MA30:=MA(C,30);
五日乖离率:=(C-MA05)/MA05*100;
BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3);
三拾日乖离率:=(C-MA30)/MA30*100;
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA05>REF(MA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA10>REF(MA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1),10);
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA05>REF(MA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<MA30;
买入:=FILTER(MR,10);
{通达信{选股去掉ST、停盘}
S1:=IF(CODELIKE('300'),0,1);
{通达信去掉*、S、ST}
S2:=IF(NAMELIKE('S'),0,1);
S3:=IF(NAMELIKE('*'),0,1);
{通达信去掉停牌}
S4:=DYNAINFO(17)>0;
Q300:=IF(CODELIKE('300'),0,1);
去掉: S2 AND S3 AND Q300 AND S4 AND 角度1>30 AND 角度3>1 AND C<45 AND C>REF(C,1) AND CAPITAL<8000000 AND 加仓 OR 买入;
|