大盘顶底(通达信)

DIFF:=EMA(CLOSE,12)-EMA(CLOSE,27);
DEA:=EMA(DIFF,9);
macd:=(2)*(DIFF-DEA);
A1:=BArslAST(REF(crOSS(DIFF,DEA),1));
接近大盘底:=(REF(CLOSE,A1+1)>CLOSE) AND (DIFF>REF(DIFF,A1+1)) AND CROSS(DIFF,DEA);
STICKLINE(接近大盘底,0,0.1,10,0),COLOR0000FF;
DRAWTEXT(接近大盘底,0.01,'接近大盘底'),COLORWHITE;
A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));
大盘顶:=(REF(CLOSE,A2+1)<CLOSE) AND (REF(DIFF,A2+1)>DIFF) AND CROSS(DEA,DIFF);
STICKLINE(大盘顶,0,0.1,10,0),COLOR00FF00;
DRAWTEXT(大盘顶,0.01,'大盘顶'),COLORYELLOW;