进来看看，出现中线粘时选出股来
本文来自：我牛股票论坛★www.winbbs.net★ 转载注明我牛股票！ 作者：
wu111111 您是第539个浏览者
EMA30:=EMA(CLOSE,30);
EMA60:=EMA(CLOSE,60);
EMA90:=EMA(CLOSE,90);
EMA120:=EMA(CLOSE,120);
AA:=(EMA30+EMA60+EMA90+EMA120)/(4);
SX:=(AA)*((1)/(100))+AA;
XX:=AA-(AA)*((1)/(100));
中粘A:=COUNT(BETWEEN(EMA60,EMA90,XX) AND BETWEEN(EMA90,AA,EMA60) AND BETWEEN(EMA120,EMA30,AA),5);
UA:=中粘A AND CROSS(CLOSE,EMA120) AND CROSS(CLOSE,EMA30);
中粘B:=COUNT(BETWEEN(EMA30,EMA60,XX) AND BETWEEN(EMA60,AA,EMA30) AND BETWEEN(EMA90,EMA120,AA) AND BETWEEN(EMA120,SX,EMA90),5);
UB:=中粘B AND CROSS(CLOSE,EMA120) AND CROSS(CLOSE,SX);
中粘C:=COUNT(BETWEEN(EMA120,AA,XX) AND BETWEEN(EMA90,EMA60,AA) AND BETWEEN(EMA30,EMA60,AA) AND BETWEEN(EMA60,SX,EMA30),5);
UC:=中粘C AND CROSS(CLOSE,EMA120) AND CROSS(CLOSE,EMA30) AND CROSS(CLOSE,EMA90) AND CROSS(CLOSE,EMA60);
中粘D:=COUNT(BETWEEN(EMA90,EMA120,XX) AND BETWEEN(EMA60,AA,EMA90) AND BETWEEN(EMA120,AA,EMA90) AND BETWEEN(SX,EMA30,AA),5);
UD:=中粘D AND CROSS(CLOSE,EMA60) AND CROSS(CLOSE,EMA120) AND CROSS(CLOSE,AA);
中粘E:=COUNT(BETWEEN(EMA30,EMA120,XX) AND BETWEEN(EMA120,EMA30,AA) AND BETWEEN(EMA90,EMA60,AA) AND BETWEEN(EMA60,SX,EMA90),5);
UE:=中粘E AND CROSS(CLOSE,EMA30) AND CROSS(CLOSE,EMA120) AND CROSS(CLOSE,EMA90);
中粘F:=COUNT(BETWEEN(EMA90,EMA60,XX) AND BETWEEN(EMA60,AA,EMA90) AND BETWEEN(EMA120,AA,EMA90) AND BETWEEN(EMA30,SX,AA),5);
UF:=中粘F AND CROSS(CLOSE,EMA60) AND CROSS(CLOSE,EMA120) AND CROSS(CLOSE,EMA30);
中粘G:=COUNT(BETWEEN(XX,AA,EMA30) AND BETWEEN(AA,EMA120,XX) AND BETWEEN(EMA120,EMA60,AA) AND BETWEEN(EMA60,EMA90,EMA120) AND BETWEEN(EMA90,SX,EMA60),5);
UG:=中粘G AND CROSS(CLOSE,EMA30) AND CROSS(CLOSE,EMA120);
中粘H:=COUNT(BETWEEN(EMA120,EMA30,XX) AND BETWEEN(EMA30,AA,EMA120) AND BETWEEN(EMA90,EMA60,AA) AND BETWEEN(EMA60,SX,EMA90),5);
UH:=中粘H AND CROSS(CLOSE,EMA30) AND CROSS(CLOSE,EMA90) AND CROSS(CLOSE,EMA60);
中粘Y:=COUNT(BETWEEN(EMA60,XX,EMA30) AND BETWEEN(XX,AA,EMA60) AND BETWEEN(AA,SX,XX) AND BETWEEN(SX,EMA90,AA) AND BETWEEN(EMA90,EMA120,SX),5);
UY:=中粘Y AND CROSS(CLOSE,EMA60) AND CROSS(CLOSE,EMA90);
中粘T:=COUNT(BETWEEN(XX,EMA90,EMA120) AND BETWEEN(EMA90,EMA30,XX) AND BETWEEN(EMA30,EMA60,EMA90) AND BETWEEN(EMA60,SX,EMA30),5);
UT:=中粘T AND CROSS(CLOSE,XX);
中粘R:=COUNT(BETWEEN(EMA60,SX,AA) AND BETWEEN(EMA90,SX,EMA60) AND BETWEEN(EMA120,SX,EMA60),5);
UR:=中粘R AND CROSS(CLOSE,EMA60) AND CROSS(CLOSE,EMA90) AND CROSS(CLOSE,EMA120);
中粘W:=COUNT(BETWEEN(EMA30,AA,XX) AND BETWEEN(EMA120,EMA60,EMA30) AND BETWEEN(EMA60,EMA90,EMA120) AND BETWEEN(EMA90,SX,EMA60),5);
UW:=中粘W AND CROSS(CLOSE,EMA120);
中粘J:=COUNT(BETWEEN(EMA90,SX,EMA120) AND BETWEEN(EMA60,SX,EMA120) AND BETWEEN(SX,EMA30,EMA60),5);
UJ:=中粘J AND CROSS(CLOSE,EMA60) AND CROSS(CLOSE,SX);
中线粘:((((((((((((UA OR UB) OR UC) OR UD) OR UE) OR UF) OR UG) OR UH) OR UY) OR UT) OR UR) OR UW) OR UJ);
