|
以下是通达信财神送财副图/选股预警 源码（无源码的请下载附件导入）
TYP:=(HIGH+LOW+CLOSE)/3,;
牛线:=(TYP-MA(TYP,N))*1000/(15*AVEDEV(TYP,N)),LINETHICK2,COLORRED;
青色1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
跌势1:=SMA(ABS(LOW-青色1),15,1)/SMA(MAX(LOW-青色1,0),10,1),LINETHICK3,COLORGREEN;
跌势2:=EMA(跌势1,10),LINETHICK3,COLORFF00FF;
大跌:=CROSS(跌势1,牛线) AND 跌势1>跌势2 AND 跌势1>REF(跌势1,1);
{DRAWTEXT(大跌,跌势1+4,'★防大跌'),COLORGREEN;}
看涨:=CROSS(牛线,跌势2) AND CROSS(跌势2,跌势1) AND 跌势1<REF(跌势1,1);
{DRAWTEXT(看涨,跌势1-4,'★看涨'),COLORRED;}
上拐:=CROSS(跌势2,跌势1) AND 跌势1<REF(跌势1,1) AND 跌势2<REF(跌势2,1);
{DRAWTEXT(上拐,跌势2-4,'★上拐'),COLORRED;}
去除ST:=EXIST((C/REF(C,1)-1)*100>5.6,60);
去除停牌:=DYNAINFO(4)>0; {通达信:今开大于零}
去除高价:=DYNAINFO(7)<40; {最新价小于40元}
去除大盘股:=CAPITAL/1000000<100; {流通盘为10亿以下}
{去掉ST}
SS2T:=IF(NAMELIKE('S'),0,1);
SS3T:=IF(NAMELIKE('*'),0,1);
{去掉停牌}
SS4T:=DYNAINFO(17)>0;
{去掉亏损与连续亏损}
SS5T:=FINDSTR(FGBLOCK,'连续亏损');
SS6T:=FINDSTR(FGBLOCK,'亏损股');
XGG:=SS2T AND SS3T AND SS4T AND SS5T<1 AND SS6T<1;
AAAA:=去除ST AND 去除停牌 AND 去除高价 AND 去除大盘股 AND XGG;
龙线:=100-100*(HHV(HIGH,5*8)-CLOSE)/(HHV(HIGH,5*8)-LLV(LOW,5*8)),COLORFF0080,LINETHICK3;
{DRAWICON(CROSS(跌势1,跌势2) OR CROSS(MIN(跌势1,跌势2),龙线),跌势1,2);}
主升浪:=CROSS(龙线,跌势2) AND 跌势2<REF(跌势2,1) AND 跌势2>跌势1 ;
{DRAWTEXT(主升浪,跌势2-2,'★主升浪'),COLORRED;}
起飞:=CROSS(龙线,80) AND 跌势1<REF(跌势1,1) AND 跌势2<REF(跌势2,1);
{DRAWTEXT(起飞,78,'★起飞'),COLORRED;
DRAWTEXT(CROSS(80,龙线),80,'★回调'),COLORGREEN;
DRAWTEXT(CROSS(龙线,80),82,'★上涨'),COLORRED;}
送财1:=CROSS(龙线,80) AND 起飞 AND 上拐;
送财2:=CROSS(龙线,80) AND 起飞;
财神1:=送财1 OR 送财2;
财神送财:主升浪 AND AAAA;
DRAWTEXT(财神送财,0.5,' ☆财神送财');
958533529.png
95933921.png
959177061.png
|
