通达信公式改预警公式:30分钟共振主图

Question

市场成本:DMA(AMOUNT/V/100,V/CAPITAL),COLORRED;
DRAWICON(CROSS(C,市场成本),L-0.20,1);{1号图标显示红脸}
{PARTLINE(市场成本,市场成本>REF(市场成本,1),RGB(255,0,0),NOT(市场成本<REF(市场成本,1)),RGB(0,0,255),1,RGB(0,0,255)),LINETHICK2;}
MA7:MA(C,7),COLORWHITE;
MA21:MA(C,21),COLORYELLOW;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));
B1:=REF(C,A1+1)>C AND REF(DIFF,A1+1)<DIFF AND CROSS(DIFF,DEA);
A2:=BARSLAST(REF(CROSS("KDJ.K"(5,6,6),"KDJ.D"(5,6,6)),1));
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(5,6,6),A2+1)<"KDJ.K"(5,6,6) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));
A3:=BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1));
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24));
B4:=CROSS(DIFF,DEA) AND CROSS("KDJ.K"(5,6,6),"KDJ.D"(5,6,6));
DRAWTEXT(B1,L-0.20,'▲'),COLORWHITE;
DRAWTEXT(B1,L-0.30,'MACD底背'),COLORWHITE;
DRAWTEXT(B2,L-0.20,'●'),COLORFF00FF;
DRAWTEXT(B2,L-0.30,'KDJ 底背'),COLORFF00FF;
DRAWTEXT(B3,L-0.20,'$'),COLORYELLOW;
DRAWTEXT(B3,L-0.30,'RSI底背'),COLORYELLOW;
DRAWTEXT(B4,L-0.20,'★'),COLOR0099FF;
DRAWTEXT(B4,L-0.30,'金叉共振'),COLOR0099FF;
金叉共振 设置预警 谢天谢地

Answer 1

通达信公式改预警公式:30分钟共振主图设置如下：
一字涨停:=C/REF(C,1)>1.0975 AND H=O;
去除ST股:=IF(NAMELIKE('S'),0,1);
去除星股:=IF(NAMELIKE('*'),0,1);
去除停牌:=DYNAINFO(8)>0;
停牌:=(DYNAINFO(4)=0);
MM:=NOT(停牌);
去除ST:=去除ST股 AND 去除星股 AND MM AND NOT(一字涨停);
换手率:=DYNAINFO(37)*100;
换手:=VOL/CAPITAL*100;
累计十日换手:=SUM(换手,10)>45;
BBI:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
高点:= DYNAINFO(14)*100>1.40 AND 去除ST
AND C>6 AND C<20.20 AND IF(CODELIKE('300'),0,1)
&& (CAPITAL/100)/10000<4.41 AND 累计十日换手
AND DYNAINFO(17)>=0.70 AND 换手率>2.82 AND DYNAINFO(7)>=BBI;
日内分钟高点:=CROSS(C,REF(HHV(H,30),1));
分钟突破牛股:=日内分钟高点#MIN30>=(HHV(日内分钟高点#DAY,0),1);
突破日内分钟:高点 AND 分钟突破牛股;

Answer 2

你给的条件还行，我写出来了，我现在正在想，要不要发给你那。嘿嘿嘿嘿 哈哈哈哈。
开个玩笑啊。
会设置预警不，我给你弄出公式来了 ，你会设置预警我就不说了
选股:CROSS("MACD.DIF","MACD.DEA") AND CROSS("KDJ.K"(5,6,6),"KDJ.D"(5,6,6));本回答被提问者采纳