看了“涨停分类修改版 （偷不到就抢） http://www.88gs.com/soft/sort013/sort05/down-65649.html
做了一个大智慧版的，别笑话，需要的下下
{涨停分类大智慧修改版---[偷不到就抢]源码如下:}
底:0,COLORRED;
顶:16.5,COLORGREEN;
DRAWTEXTREL(10,880,'回光返照'),Color0077FF,linethick1;
DRAWTEXTREL(10,780,'------ZT'),COLORF00FF0,linethick1;
DRAWTEXTREL(10,665,'超跌涨停'),COLORFF0099,linethick1;
DRAWTEXTREL(10,540,'拉升涨停'),COLOR0000FF,linethick1;
DRAWTEXTREL(10,415,'钝化涨停'),COLORFF00FF,linethick1;
DRAWTEXTREL(10,290,'钝化变种'),COLOR0055FF,linethick1;
DRAWTEXTREL(10,165,'新股首次'),Color0022FF,linethick1;
DRAWTEXTREL(10,40,'突破涨停'),COLORA0FFFF,linethick1;个线:=EMA(EMA(CLOSE,30),9);
大线:=EMA(EMA(INDEXC,45),9);
个股1:=CLOSE/个线*100;
大盘1:=INDEXC/大线*100;
GGQD:=(个股1-大盘1);
N1:=REF(BARSLAST((C-REF(C,1))/REF(C,1)*100>9.6 AND C=H),1)+1;
回光返照:=IF(COUNT(CROSS(MA(C,15),MA(C,5)),N1)=0 AND HHV(GGQD,20)>23 AND MA(C,5)>MA(C,30) AND GGQD<HHV(GGQD,30)
AND GGQD>5 AND (C-REF(C,1))/REF(C,1)*100>9.6 AND C=H,-9,0);
STICKLINE(回光返照,1,2,1.9,0);
ZT:=(C-REF(C,1))/REF(C,1)*100>8.5;
STICKLINE(ZT,3,4,1.9,0),COLORF00FF0;
开盘:=IF(REF(ZT,1)>0 ,(O-REF(C,1))/REF(C,1)*100,0);
BIAS1 :=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2 :=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;BIA:=(BIAS1-BIAS2);
BIS:=LLV(BIAS1,3);
超跌涨停:=IF(ZT>0 AND BIS<0 AND BIA>5 AND MA(C,5)<MA(C,60),-2,0);
STICKLINE(超跌涨停,5,6,1.9,0),COLORFF0099;MA5:=MA(C,5);
MA10:=MA(C,10);
MA20:=MA(C,20);
MA30:=MA(C,30);
MA60:=MA(C,34);
F1:=(MA5-MA10)/MA10*100;
F2:=(MA10-MA20)/MA10*100;
F3:=(MA20-MA60)/MA10*100;
拉升涨停:=IF(F1>1 AND F2>3 AND F3>0 AND ZT>0,6,0);
STICKLINE(拉升涨停,7,8,1.9,0),COLOR0000FF;TY:=C;
A1:=REF(TY,20)=HHV(TY,2*20+1);B1:=FILTER(A1,20);C1:=BACKSET(B1,20+1);HD:=FILTER(C1,20);
A:=REF(H,BARSLAST(HD));
LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),5,1)/SMA(ABS(CLOSE-LC),5,1)*100;
钝化涨停:=IF( ZT>0 AND RSI1=HHV(RSI1,5) AND RSI1>80,4,0);
STICKLINE(钝化涨停,9,10,1.9,0),COLORFF00FF;
钝化涨停1:=IF(GGQD>15 AND ZT>0 AND RSI1=HHV(RSI1,5) AND RSI1>80 AND REF(GGQD>15 AND ZT>0 AND RSI1=HHV(RSI1,5) AND RSI1>80,1)=0,4,0);
STICKLINE(钝化涨停1,11,12,1.9,0),COLOR0055FF;
新股首次:=IF(COUNT(ZT>0,BARSCOUNT(C))=1 AND ZT>0,8,0);
STICKLINE(新股首次,13,14,1.9,0),Color0022FF;
突破涨停:=IF(CROSS(C,A) AND ZT>0,-4,0);
STICKLINE(突破涨停,15,16,1.9,0),COLORA0FFFF; |
