通达信〖波段雷达〗主图精准捕捉买卖点的全能工具源码

泡股

ZBGS31:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
ZBGS32:=SMA(ZBGS31,3,1);
ZBGS33:=SMA(ZBGS32,3,1);
ZBGS34:=3*ZBGS32-2*ZBGS33;
ZBGS35:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
ZBGS36:=SMA(ZBGS35,3,1);
ZBGS37:=SMA(ZBGS36,3,1);
ZBGS38:=3*ZBGS36-2*ZBGS37;
ZBGS39:IF(CROSS(ZBGS38,ZBGS34),H,REF(H,BARSLAST(CROSS(ZBGS38,ZBGS34)))),COLOR00FF33,LINETHICK1;
ZBGS310:IF(CROSS(ZBGS34,ZBGS38),L,REF(L,BARSLAST(CROSS(ZBGS34,ZBGS38)))),COLORCC33CC,LINETHICK1;
ZBGS311:LLV(LOW,23) ,COLOR7FFF00,LINETHICK2;
ZBGS312:HHV(HIGH,23),COLORFF9900, LINETHICK2;
ZBGS313:=BARSLAST(REF(CROSS("MACD.DIF","MACD.DEA"),1));
DRAWTEXT(REF(C,ZBGS313+1)>C AND REF("MACD.DIF",ZBGS313+1)< "MACD.DIF" AND CROSS("MACD.DIF","MACD.DEA")>0,L-0.02,'M底背离'),COLOR00FFFF;
ZBGS314:=BARSLAST(REF(CROSS("KDJ.K","KDJ.D"),1));
DRAWTEXT(REF(C,ZBGS314+1)>C AND REF("KDJ.K",ZBGS314+1)< "KDJ.K" AND CROSS("KDJ.K","KDJ.D"),L-0.10,'K底背离'),COLORFF00FF;
ZBGS315:=BARSLAST(REF(CROSS("RSI.RSI1","RSI.RSI2"),1));
DRAWTEXT(REF(C,ZBGS315+1)>C AND REF("RSI.RSI1",ZBGS315+1)< "RSI.RSI1" AND CROSS("RSI.RSI1","RSI.RSI2")>0,L-0.18,'R底背离'),COLOR0000FF;
ZBGS316:=BARSLAST(REF(CROSS("MACD.DEA","MACD.DIF"),1));
DRAWTEXT(REF(C,ZBGS316+1)< C AND REF("MACD.DIF",ZBGS316+1)>"MACD.DIF" AND CROSS("MACD.DEA","MACD.DIF")>0,H+0.16,'★M顶背离'),COLOR00FF00;
ZBGS317:=BARSLAST(REF(CROSS("KDJ.D","KDJ.K"),1));
DRAWTEXT(REF(C,ZBGS317+1)< C AND REF("KDJ.K",ZBGS317+1)>"KDJ.K" AND CROSS("KDJ.D","KDJ.K")>0,H+0.08,'★K顶背离'),COLORFFFFCC;
ZBGS318:=BARSLAST(REF(CROSS("RSI.RSI2","RSI.RSI1"),1));
DRAWTEXT(REF(C,ZBGS318+1)< C AND REF("RSI.RSI1",ZBGS318+1)>"RSI.RSI1" AND CROSS("RSI.RSI2","RSI.RSI1")>0,H+0.04,'★R顶背离'),COLORFF9900;
ZBGS319:=(C+0.618*REF(C,1)+0.382*REF(C,1)+0.236*REF(C,3)+0.146*REF(C,4))/2.382;
ZBGS323:EMA(CLOSE,5),LINETHICK1,COLORYELLOW;
ZBGS324:IF(ZBGS323>REF(ZBGS323,1),ZBGS323,DRAWNULL),COLORRED,LINETHICK1;
ZBGS325:IF(ZBGS323< REF(ZBGS323,1),ZBGS323,DRAWNULL),COLORGREEN,LINETHICK1;
DRAWTEXT(ISLASTBAR,ZBGS323,'雷达线'),COLORRED;
STICKLINE(REF(COUNT(C< MA(REF(HHV((C+L+O+H)/4,40),1),3),5)=5,1) AND C>MA(REF(HHV((C+L+O+H)/4,40),1),3) AND C>O,C,O,1.3,0),COLORYELLOW;
ZBGS326:=MA(REF(HHV((C+L+O+H)/4,10),1),3);
STICKLINE(REF(COUNT(C< ZBGS326,5)=5,1) AND C>ZBGS326 AND C>O,C,O,1.3,0),COLORBLUE;
ZBGS327:=HIGH>REF(HIGH,1) AND REF(HIGH,2)>REF(HIGH,1) AND LOW>REF(LOW,1) AND REF(LOW,2)>REF(LOW,1) AND MA(CLOSE,5)< MA(CLOSE,10);
ZBGS328:=LOW< REF(LOW,1) AND REF(LOW,2)< REF(LOW,1) AND HIGH< REF(HIGH,1) AND REF(HIGH,2)< REF(HIGH,1) AND MA(CLOSE,5)>MA(CLOSE,10);
DRAWTEXT(ZBGS327,L-0.4,'底方买进'),COLORMAGENTA;
DRAWTEXT(ZBGS328,H+0.4,'高方卖出'),COLORGREEN;