我来公开,省的大家那么麻烦。。。。
牛熊三色(通达信副图)
EXPMA1:=EXPMA(CLOSE,7);
EXPMA2:=EXPMA(CLOSE,21);
N:=4;
S:=2;
M:=20;
高1:=REF(HHV(H,150),3);
低1:=REF(LLV(L,150),3);
H3:=高1-(高1-低1)*0.5;
中轴:=REFDATE(H3,DATE),LINETHICK1;
B1:=EMA(C,12);
B2:=EMA(C,26);
B3:=(B1-B2)*2;
WDIF:=中轴+B3;
WDEA:=EMA(WDIF,9);
MACD:=2*(WDIF-WDEA);
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
STICKLINE(MACD>0,0,1,0,1),COLORRED;
STICKLINE(MACD<0,0,1,0,1),COLORGREEN;
STICKLINE(EXPMA1>EXPMA2,1,2,0,1),COLORRED;
STICKLINE(EXPMA1<EXPMA2,1,2,0,1),COLORGREEN;
STICKLINE(CLOSE>SAR(N,S,M),2,3,0,1),COLORRED;
STICKLINE(CLOSE<SAR(N,S,M),2,3,0,1),COLORGREEN;
DRAWTEXT(ISLASTBAR,0.5,'MACD'),COLOR0089FF;
DRAWTEXT(ISLASTBAR,1.5,'EXPMA'),COLOR0089FF;
DRAWTEXT(ISLASTBAR,2.5,'SAR'),COLOR0089FF;
NXSS:=MACD>0 AND EXPMA1>EXPMA2 AND CLOSE>SAR(N,S,M);
选股:IF(NXSS AND REF(NXSS,1)=0,3,0),COLORYELLOW,LINETHICK1; |