这是翻箱底找到的,感觉还可以。 涨家数:INDEXADV,NODRAW,COLORLIMAGENTA ; 跌家数:INDEXDEC,NODRAW,COLORGREEN; C3:=REF(C,1); 涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0); STICKLINE(涨停,OPEN,CLOSE,2.5,0),COLORRED; 跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0); STICKLINE(跌停,OPEN,CLOSE,2.5,0),COLORGREEN;VAR0:=IF((DATE<=1381006),1,0); 多:=(EMA(CLOSE,3))*(VAR0); 空:=(EMA(CLOSE,5))*(VAR0); 买线:=(EMA(CLOSE,2))*(VAR0); 卖线:=(EMA((SLOPE(CLOSE,21))*(20)+CLOSE,42))*(VAR0); 穿越红线才能牛:(HHV(MA(HIGH,13),13))*(VAR0),LINETHICK2,COLOR0000FF; 跌破受阻上支撑:(LLV(MA(HIGH,13),1))*(VAR0),LINETHICK1,COLOR00FF00; 主力线:=(EMA(CLOSE,2))*(VAR0); 散户线:=(EMA(CLOSE,4))*(VAR0); DRAWTEXT(CROSS(多,空) AND (买线>=卖线) AND (跌破受阻上支撑=穿越红线才能牛),LOW,'追 击'),COLOR00FFFF; 出现▲是大牛:(买线>=卖线) AND (跌破受阻上支撑=穿越红线才能牛) AND (主力线>散户线),COLORFF00FF,NODRAW; DRAWTEXT(出现▲是大牛,LOW,'▲'),COLORFF00FF; 大牛:=(买线>=卖线) AND (跌破受阻上支撑=穿越红线才能牛) AND (主力线>散户线) AND (REF(跌破受阻上支撑,1)<REF(穿越红线才能牛,1)); DRAWTEXT(大牛,LOW,'大▲牛'),COLORFF00FF; VAR1:=((HIGH+LOW+OPEN+(2)*(CLOSE))/(5))*(VAR0); VAR2:=(REF(VAR1,1))*(VAR0); VAR3:=((SMA(MAX(VAR1-VAR2,0),10,1))/(SMA(ABS(VAR1-VAR2),10,1)))*(100); HY3:=IF((COUNT((VAR3<20),5)>=1) AND (COUNT((VAR1=LLV(VAR1,10)),10)>=1) AND (CLOSE>=(OPEN)*(1.038)) AND (VOL>(MA(VOL,5))*(1.2)),1,0); DRAWTEXT(HY3,LOW,'超跌关注'),COLOR0000FF;N:=10; |
