优化组合主图,可预测明天 (无未来 源码)

 2023-06-09 21:03:26    通达信指标网  

 {优化组合主图}   

      EMA13:EMA(C,13),COLORWHITE,LINETHICK2;EMA34:EMA(C,34),COLORYELLOW;   

      EMA55:EMA(C,55),COLORFF00FF;EMA120:EMA(C,120),COLORFFCC66;   

      AR1:=EMA55>EMA34    

      AND    

      EMA34>EMA13;AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);   

      AR3:=EMA13>=REF(EMA13,2);AR4:=COUNT(CROSS(C,EMA13),AR2)=1;   

      AR5:=AR1    

      AND AR2 AND AR3 AND AR4;AR6:=AR5 AND    

      FILTER(AR5,10);   

      DRAWTEXT(AR6,L-0.09,'红杏出墙'),COLORYELLOW;   

      BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5)    

      ,5)=5;   

      BR2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C<0.2;   

      BR3:=C>EMA55 AND    

      (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR    

      REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR    

      REF   

      (C,5)<REF(EMA55,5));BR4:=BR1 AND BR2 AND BR3;   

      DRAWTEXT(BR4 AND    

      FILTER(BR4,10),L-0.09,'蚂蚁上树'),COLOR00C5FF;   

      STICKLINE(BR4 AND    

      FILTER(BR4,10),H,L,0.5,1),COLOR00C5FF;   

      CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;CR2:=V>MA(V,5)*0.6;   

      CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;CR4:=ABS(EMA34-EMA55)/EMA55<0.03;   

      CR5:=EMA55<=EMA120    

      AND EMA55>=REF(EMA55,1);   

      CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND    

      CR5,2);   

      DRAWTEXT(CR6,L-0.09,'红衣侠女'),COLORF00FF0;   

      DR1:=EMA13>EMA34 AND    

      EMA34<EMA55;DR2:=BARSLAST(CROSS(C,EMA55)    

      );DR3:=H=HHV(H,DR2);   

      DR4:=BARSLAST(DR3);   

      DR5:=COUNT(O>C AND    

      C<REF(C,1) AND C>EMA55 AND    

      BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1;   

      DR6:=C>REF(C,1) ;DR7:= DR1 AND DR5    

      AND DR6 ;DR8:=DR7 AND FILTER(DR7    

      ,10);   

      DRAWTEXT(DR8,L-0.09,'黑客点击'),COLORD6BA63;   

      STICKLINE(DR8,O,C,6,1),LINETHICK2,COLORD6BA63;   

      ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1))    

      AND    

      CROSS(EMA34,EMA55);   

      DRAWTEXT(ER,L-0.09,'均线互换'),COLOR0099FF;   

      FR:=BARSLAST(REF(CROSS(EMA34,EMA13),1))    

      AND    

      CROSS(EMA13,EMA34);   

      DRAWTEXT(FR,L-0.09,'梅开二度'),COLORWHITE;STICKLINE(FR,H,L,0.5,1),COLORWHITE;   

      GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5)    

      );   

      GR2:=EMA13>EMA34 AND EMA34>EMA55 AND    

      EMA13>REF(EMA13,1);   

      GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND    

      H=HHV(H,GR1),GR1);GR4:=H=HHV(H,GR1);   

      GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1);   

      GR6:=GR2    

      AND GR3 AND GR4;GR7:=GR2 AND GR3 AND GR4 AND GR5;   

      DRAWTEXT(GR6 AND    

      GR7,H+0.13,'见好就收!'),COLOR00FF00;   

      STICKLINE(GR6 AND    

      GR7,H,H+0.09,4,0),COLOR00FF00;   

      HR2:=EMA13>=REF(EMA13,3) AND    

      EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND    

      CROSS(C,EMA34) AND CROSS   

      (C,EMA55) AND CROSS(C,EMA120);   

      DRAWTEXT(HR2 AND    

      FILTER(HR2,10),L-0.09,'三线推进'),COLORFFC8FF;    

P1:=5;   

P2:=10;   

P3:=20;   

P4:=30;   

P5:=60;   

P6:=120;   

P7:=240;   

P8:=340;   

N:=4;   

WX:=MA(CLOSE,0);   

M1:=MA(CLOSE,P1);   

M2:=(MA(CLOSE,P2) * IF((N < 2),WX,1));   

M3:=(MA(CLOSE,P3) * IF((N < 3),WX,1));   

M4:=(MA(CLOSE,P4) * IF((N < 4),WX,1));   

M5:=(MA(CLOSE,P5) * IF((N < 5),WX,1));   

M6:=(MA(CLOSE,P6) * IF((N < 6),WX,1));   

M7:=(MA(CLOSE,P7) * IF((N < 7),WX,1));   

M8:=(MA(CLOSE,P8) * IF((N < 8),WX,1));   

C1:=REF(CLOSE,1);   

C2:=HHV(C1,2);   

C3:=LLV(C1,1);   

ET:=HHV(C1,2);   

ET1:=REF(ET,1);   

XB:=LLV(C1,1);   

XB1:=REF(XB,1);   

M:=BARSLAST(((CLOSE < XB) AND (C1 >= XB1)));   

M11:=REF(M,1);   

N9:=BARSLAST(((CLOSE > ET) AND (C1 <= ET1)));   

N1:=REF(N9,1);   

M21:=(BARSLAST((((M - N9) > 0) AND (M11 <= N1))) + 1);   

N2:=(BARSLAST((((N9 - M) > 0) AND (N1 <= M11))) + 1);   

ET2:=HHV(ET,M21);   

XB2:=LLV(XB,N2);   

A:=IF((((M - N9) > 0) AND (M11 <= N1)),1,IF((((N9 - M) > 0) AND (N1 <= M11)),0,2));   

H1:=IF(((M - N9) > 0),CLOSE,ET2);   

H2:=IF((A = 1),CLOSE,C2);   

H3:=IF(((M - N9) < 0),CLOSE,XB2);   

H4:=IF((A = 1),CLOSE,XB2);   

H5:=IF((((M - N9) > 0) OR (A = 1)),CLOSE,H3);   

H6:=REF(H5,1);   

H7:=REF(H5,2);   

H8:=(H5 > H6);   

H9:=(((H4 = REF(H4,1)) AND (REF(H4,1) < REF(H4,2))) AND (H5 > REF(H5,2)));   

H10:=(((H2 = REF(H2,1)) AND (H4 = REF(H4,1))) AND (H5 = REF(H5,2)));   

W:=((H8 OR H9) OR H10);   

T9:=((H5 < H6) AND (H5 < REF(H5,2)));   

T10:=((H4 = REF(H4,1)) AND (H5 < REF(H5,2)));   

T11:=((H3 > REF(H3,1)) AND (H5 < REF(H5,1)));   

T12:=((H5 = REF(H5,1)) AND (H3 = H4));   

T13:=((H2 = REF(H2,1)) AND (H2 = H5));   

TW:=((((T9 OR T10) OR T11) OR T12) OR T13);   

PK:=((AMOUNT * (((OPEN + CLOSE) + HIGH) + LOW)) / 4);   

PK1:=IF((VOL > 0),(PK / AMOUNT),((((OPEN + CLOSE) + HIGH) + LOW) / 4));   

BBP:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);   

  

  

DRAWTEXT((ISLASTBAR AND (BBP >= 96.5)),(H5 * 1.022),'明见\N  短高\N  龙头\N  除外'),COLORRED;   

DRAWTEXT((ISLASTBAR AND (BBP < 1)),((H5 + H4) / 1.96),'明见\N  短低\N  跌停\N  除外'),COLORGREEN;   

DRAWTEXT(((ISLASTBAR AND W) AND (BBP < 96.5)),(H5 * 1.022),'明日\N  看涨'),COLORYELLOW;   

DRAWTEXT(((ISLASTBAR AND TW) AND (BBP > 1)),((H5 + H4) / 2),'明日\N  看跌'),COLORGREEN;   

  

高:=MA(REF(HIGH,1)/REF(CLOSE,2),27)*REF(CLOSE,1),LINETHICK2;    

低:=MA(REF(LOW,1)/REF(CLOSE,2),27)*REF(CLOSE,1),LINETHICK2;    

预测高点:高,COLORRED;    

预测低点:低,COLORGREEN;   

  •  标签:  

原文链接:https://www.tdxzb.com/?id=1389

本文版权:如无特别标注,本站文章均为原创。

相关文章

服务热线

18020657357

微信客服

微信客服