发表于2017/1/28 19:05:23
麻烦老师把有庄 改为选股预警
DIF:EMA(CLOSE,13)-EMA(CLOSE,26);
DEA:EMA(DIF,9);
MACD:(DIF-DEA)*2,COLORSTICK;
金叉:=CROSS(DIF,DEA) AND DEA<0;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=(3*K-2*D);
周DIF:="MACD.DIF#WEEK"(12,26,9);
周DEA:="MACD.DEA#WEEK"(12,26,9);
周MACD:="MACD.MACD#WEEK"(12,26,9);
DIF周金叉:=CROSS(周DIF,周DEA);
DRAWTEXT(DIF周金叉,0,'周叉'),COLORYELLOW;
DRAWTEXT(CROSS(周DEA,周DIF),0,'周死'),COLORGREEN;
MACD周金叉:=CROSS(周MACD,周DIF) AND 周MACD>=(0-0.05) AND 周MACD<=0.02;
VARR:=EMA(EMA(CLOSE,13),13);
控盘:=(VARR-REF(VARR,1))/REF(VARR,1)*1000;
A10:=CROSS(控盘,0);
控盘B:=FILTER(IF(A10,1,0),5);
JJ:=DYNAINFO(11);
P:=55;
S:=8;
M1:=3;
LL:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10;
MM:=EMA(LL,M1);
BTJ11:=(C-JJ)/JJ<-0.03;
BTJ2:=控盘>REF(控盘,1) AND 控盘<-0.2;
BTJ3:=CROSS(LL,MM) AND LL<-0.3;
BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);
庄:= BTJ11 AND BTJ2 AND BTJ3;
有庄:=FILTER(庄,55),COLORWHITE;
DRAWTEXT(BTJ811,-0.2,'★有庄'),COLORYELLOW;
DRAWTEXT(CROSS(J,-3),DIF,'出击'),COLORWHITE;