MA13:=MA(CLOSE,13);
 EMA30:EMA(CLOSE,30),COLORFFCCCC;
 EMA60:EMA(CLOSE,60),COLORFF00FF;
 EMA90:EMA(CLOSE,90),COLOR00FFFF;
 EMA120:EMA(CLOSE,120),COLORFFCC66;
 EMA250:EMA(CLOSE,250),COLORFF0000;
 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 B