通达信一个主图四个副图

[复制链接]
查看537 | 回复0 | 2022-7-24 09:06:39 | 显示全部楼层 |阅读模式

通达信一个主图四个副图

一、组成:
   1、主图:包括三个选股指标
     A、爱琴海:图中显示为出现信号K线的实体上半部,淡洋红色;
        选股预警源码:
 {牛牛指标网提供:www.tdx001.com}

复制内容到剪贴板
  1. F:=100*(C-REF(C,1))/REF(C,1);   
  2.        今小昨:=IF(C<REF(O,1) AND F<0,1,0);   
  3.        P1:=今小昨;   
  4.        今小前:=IF(C<REF(O,2) AND F<0,1,0);   
  5.        P2:=今小前;   
  6.        XG:P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1;   

   B、短线:图中显示为出现信号K线的实体下半部,黄色;
        选股预警源码:
 

复制内容到剪贴板
  1. VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);   
  2.        VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  3.        VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  4.        VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  5.        VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  6.        VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  7.        VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  8.        VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  9.        VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  10.        VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  11.        VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  12.        VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  13.        VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);   
  14.        VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  15.        VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  16.        VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  17.        VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  18.        VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  19.        VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  20.        VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  21.        VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  22.        VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  23.        VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  24.        VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  25.        A:=INDEXC>MA(INDEXC,4);   
  26.        VAR19:REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1 AND A;   

     C、红十字:
         选股预警源码:
 

复制内容到剪贴板
  1. K:=(C+H+L)/3;   
  2.         D:=MA(K,4);   
  3.         REF(C,1)<D AND C>D AND D<REF(D,1);   

  D、主图源码:  
 

  1. A1:=MA(H,6);   
  2.        A2:=MA(L,6);   
  3.        A3:IF(C>REF(A1,1),A2,IF(C<REF(A2,1),A1,A2)),COLORGRAY,LINETHICK1;   
  4.   
  5.       涨家数:INDEXADV,NODRAW, ;   
  6.       跌家数:INDEXDEC,NODRAW,COLORGREEN;   
  7.       C3:=REF(C,1);   
  8.       涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);   
  9.       STICKLINE(涨停,OPEN,CLOSE,1,0),COLORRED;   
  10.       跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);   
  11.       STICKLINE(跌停,OPEN,CLOSE,1,0),COLORGREEN;   
  12.   
  13.       VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);   
  14.       VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  15.       VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  16.       VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  17.       VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  18.       VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  19.       VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  20.       VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  21.       VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  22.       VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  23.       VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  24.       VARC:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  25.       VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);   
  26.       VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  27.       VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  28.       VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  29.       VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  30.       VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  31.       VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  32.       VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  33.       VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  34.       VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  35.       VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);   
  36.       VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);   
  37.       短线:REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND     VAR1,COLORYELLOW,NODRAW;   
  38.       STICKLINE(短线,O,(C+O)/2,1.5,0),COLORYELLOW;   
  39.   
  40.       F:=100*(C-REF(C,1))/REF(C,1);   
  41.       今小昨:=IF(C<REF(O,1) AND F<0,1,0);   
  42.       P1:=今小昨;   
  43.       今小前:=IF(C<REF(O,2) AND F<0,1,0);   
  44.       P2:=今小前;   
  45.       爱琴海:P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,COLORMAGENTA,NODRAW;   
  46.       STICKLINE(爱琴海,C,(C+O)/2,1.5,0),COLORMAGENTA;   
  47.   
  48.       {自动分割画线}   
  49.       E1P:DRAWLINE(C=LLV(C,30),LOW,C=LLV(C,10) AND C>LLV(C,22),LLV(LOW,3),1),   
  50.       LINETHICK2,COLORYELLOW;   
  51.       E1PP:DRAWLINE(C=LLV(C,10),LOW,C=LLV(C,5) AND C>LLV(C,10),LLV(LOW,3),1),   
  52.       LINETHICK2,COLORRED;   
  53.   
  54.       K:=(C+H+L)/3;   
  55.       D:=MA(K,4);   
  56.       B:REF(C,1)<D AND C>D AND D<REF(D,1),NODRAW,COLORRED;   
  57.       DRAWICON(REF(C,1)>D AND C<D AND D>REF(D,1),H*1.002, 2);   
  58.       DRAWICON(REF(C,1)<D AND C>D AND D<REF(D,1),E1PP*0.965 ,23);   

  2、副图:三个选股指标和一个辅助指标
     A、短线高手:
 

C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
  1. VR2:=(2*CLOSE+HIGH+LOW)/4;    
  2.       VR4:=LLV(LOW,5);    
  3.       VR5:=HHV(HIGH,4);    
  4.       散户:=EMA((VR2-VR4)/(VR5-VR4)*100,4);    
  5.       庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2);    
  6.       短线高手:IF(CROSS(散户,庄家) AND 散户<50 AND 29<散户 AND C>O,40,0),COLORRED,LINETHICK2;   

 B、底部吸筹:
 

C/C++ www.zegu.cn 择股网提供 Code复制内容到剪贴板
  1. RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;    
  2.        K1:=SMA(RSV9,3,1);   
  3.        DK1:=K1-REF(K1,1),COLORSTICK;   
  4.        出手就赢:DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,COLORRED,LINETHICK2;   

 C、黄金浪:
 

复制内容到剪贴板
  1. RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;   
  2.       K:SMA(RSV,3,1),COLORWHITE;   
  3.       D:SMA(K,3,1),COLORYELLOW ;   
  4.       BIAS1:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;   
  5.       A1:=CROSS(K,D) AND CROSS(K,D)<16 AND BIAS1<-6;   
  6.       黄金浪:IF(A1,40,0),COLORFF00FF;   
  7.       N:=5;   
  8.       VAR1:4*SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1)-   
  9.       3*SMA(SMA((CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100,5,1),3.2,1),COLORYELLOW,LINETHICK0;   
  10.       VAR2:8,COLORGREEN,LINETHICK0;   
  11.       买: IF(CROSS(VAR1,VAR2),80,0),STICK,COLOR0000CC,LINETHICK2;   
  12.       盯庄: IF(VAR1<=8,25,0),STICK,COLORWHITE,LINETHICK2;   
  13.       DRAWTEXT(CROSS(VAR1,VAR2),80,'买﹩'),COLOR00FFFF;   
  14.       VARO5:=LLV(LOW,27);   
  15.       VARO6:=HHV(HIGH,34);   
  16.       VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;   
  17.       建仓区: IF((VARO7<10),80,100) ,COLOR00CCFF,LINETHICK1;   
  18.       0,LINETHICK2 ,COLORFFCC00;   

D、AWRSI公式作为辅助判断公式,进一步提高买点的成功率
 

复制内容到剪贴板
  1. N1:=7;   
  2.       N2:=14;   
  3.       N3:=21;    
  4.   
  5.       LC:=REF(CLOSE,1);    
  6.       RSI1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N1,1)*100,COLORRED,LINETHICK2;    
  7.       RSI2:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N2,1)*100,COLORGRAY,LINETHICK2;    
  8.       RSI3:=SMA(MAX(CLOSE-LC,0),N1,1)/SMA(ABS(CLOSE-LC),N3,1)*100,COLORLIBLUE,LINETHICK2;    
  9.       RSI4:SMA(RSI3,7,1),LINETHICK2,COLOR00CD00;    
  10.       趋势F:=EMA(((CLOSE-LLV(LOW,48))/(HHV(HIGH,48)-LLV(LOW,48))*50),17)+9,COLORFFFFFF;    
  11.       趋势8:=EMA(((CLOSE-LLV(LOW,53))/(HHV(HIGH,53)-LLV(LOW,53))*50),17)+9,COLOR3377DD;    
  12.       趋势:=EMA(((CLOSE-LLV(LOW,38))/(HHV(HIGH,38)-LLV(LOW,38))*50),17)+18,COLOR6F4242    
  13. ,LINETHICK2;    
  14.       WR1:=EMA(趋势F,7)*1.372,COLORRED,LINETHICK2;    
  15.       WR2:=WR1*1.0887;    
  16.       WRF:(1.5*(趋势8+RSI4)-(WR2+WR1))+12,COLOR3377FF,COLORBLUE,LINETHICK2;    
  17.       上:IF(WRF>REF(WRF,1),WRF,DRAWNULL),COLORBLUE;   
  18.       下:IF(WRF<REF(WRF,1),WRF,DRAWNULL),COLORYELLOW,LINETHICK2;   
  19.       界:38,COLORLICYAN;    
  20.       加仓线:51,COLORLIMAGENTA;    
  21.       强:70,COLORGREEN;   
  22.       BUY:IF((CROSS(WR1,趋势) OR CROSS(WR1,WRF) AND WRF<界 AND RSI2<加仓线),48,38),COLORRED,NODRAW;    
  23.       XG:IF((CROSS(RSI2,RSI4) OR CROSS(RSI2,WRF) AND WRF<界 AND RSI1<加仓线),48,38),COLORYELLOW,NODRAW;    
  24.       STICKLINE((CROSS(WR1,趋势) OR CROSS(WR1,WRF))AND WRF<界 AND RSI2<加仓线,39,42,3,0),COLORRED;   
  25.       STICKLINE((CROSS(RSI2,RSI4) OR CROSS(RSI2,WRF))AND WRF<界 AND RSI1<加仓线,39,42,2.5,0),COLORYELLOW;   
  26.       DRAWICON(FILTER(WRF>REF(WRF,1) AND REF(WRF,1)<REF(WRF,2) AND WRF<38,5),WRF*0.965,9);   

二、方法:
    用以上选股公式选出三个指标以上共振的股票后,再利用主图的两条趋势线(买点K线离趋势线越近越好)和AWRSI(买点当日RSI上穿阻力线---自己手工画)来判断!

150411188.jpg

150411188.jpg

 

150599875.jpg

150599875.jpg

 

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则