WY1001:=(2*CLOSE+HIGH+LOW)/4;{非常准}
WY1002:=EMA(WY1001,4);
 WY1003:=EMA(WY1002,4);
 WY1004:=EMA(WY1003,4);
 XYS0:(WY1004-REF(WY1004,1))/REF(WY1004,1)*100;
 STICKLINE(XYS0>=0,XYS0,0,2,0),COLOR0000ff;
 STICKLINE(XYS0<0,XYS0,0,2,0),COLOrffff00;
 PJGJ:=AMOUNT/VOL/100;
 SSRYDJX:=MA(PJGJ,13);
 SSRCJL:=EMA(VOL,13);
 SSRCJE:=EMA(AMOUNT,13);
 SSRCBJX:=SSRCJE/SSRCJL/100;
 CYS13:=(CLOSE-SSRCBJX)/SSRCBJX*100;
 XYSHSL:=EMA(VOL/CAPITAL*100,13);
 ZZX:0,COLORWHITE;
 STICKLINE(XYSHSL>6.1 AND CYS13>5 ,2 ,0 ,2 ,0 ),COLORGREEN;
 STICKLINE(XYSHSL>3.8 AND CYS13>5 ,1.5 ,0 ,2 ,0 ),COLORYELLOW;
 STICKLINE(XYSHSL>2.1 AND CYS13>5 ,1 ,0 ,2 ,0 ),COLORCYAN;
 STICKLINE(XYSHSL>1.8 AND CYS13>5 ,0.5 ,0 ,2 ,0 ),COLORBLUE;
 XYS1:MA(XYS0,2),COLOR00ff00;
 XYS2:MA(XYS0,1),COLOR00ffff;
 STICKLINE(cross(XYS2,XYS1) , 0.2 ,0 ,6,0 ),COLOR00ffff;
 STICKLINE(XYS2>XYS1 AND 0>XYS2 ,XYS2 ,0 ,4 ,0),COLORff00ff;
 STICKLINE(XYS2  STICKLINE(cross(XYS1,XYS2) and XYS2>0 ,XYS2 ,0 ,4 ,0),COLOR00ff00;
 DRAWTEXT(cross(XYS2,XYS1) ,0,'准'),COLOR00ffff,LINETHICK2;
 FILLRGN(XYS2,XYS1,XYS2>XYS1,RGB(250,200,50),XYS2  {庄家克星}
庄1:=(CLOSE*2+HIGH+LOW)*2;
庄2:= EMA(庄1,13)-EMA(庄1,21);
庄3:= EMA(庄2,2);
庄:=cross(庄2,庄3);
 FILLRGN(庄2,庄3,庄2>庄3,RGB(250,100,0),庄2<庄3,RGB(0,155,0));

{智勇出击}
F:=100*(C-REF(C,1))/REF(C,1);