一個主圖、四個副圖、三個選股公式

• 一、組成：
• ********************************************************
     1、主圖：主圖源碼：  
   
  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.  漲家數(shù):INDEXADV,NODRAW, ;   
  6.  跌家數(shù):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、副圖：(3個)
•      A、短線高手：
   

  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、底部吸籌：
   

  VAR2:=REF(LOW,1);
  VAR3:=SMA(ABS(LOW-VAR2),3,1)/SMA(MAX(LOW-VAR2,0),3,1)*100;
  VAR4:=EMA(IF(CLOSE*1.3,VAR3*10,VAR3/10),3);
  VAR5:=LLV(LOW,30);
  VAR6:=HHV(VAR4,30);
  VAR7:=IF(MA(CLOSE,58),1,0);
  VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7;
  VAR9:=IF(VAR8>100,100,VAR8);
  STICKLINE(VAR9>-150,0,VAR9,0.3,0),  COLORFF00FF;
  底部吸籌指標(biāo):(CLOSE-MA(CLOSE,40))/MA(CLOSE,40)*100,COLOR00FF00;
  STICKLINE(CROSS(底部吸籌指標(biāo),-24),100,0,1,0),  COLORFFFFFF;
  先知: (CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100, COLORFF00FF;
  可能放量拉升:IF(CROSS(底部吸籌指標(biāo),-24),1,0), COLORFFFFFF;
  短線獲利:STICKLINE(REF("KDJ.J",1)<0 AND "KDJ.J">0,60,0,2,0),COLOR0000FF;
  VARK1:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100;
  VARK2:=REVERSE(VARK1);
  VARK3:=SMA(VARK1,3,1);
  波段王:SMA(VARK3,3,1),  COLORRED,LINETHICK2;
  波段鬼:SMA(波段王,2.5,1),COLORYELLOW,LINETHICK2;
  趨勢線: 3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1),COLORFF6666,LINETHICK2;
  RSV9:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
  K1:SMA(RSV9,3,1);
  DK1:K1-REF(K1,1),COLORSTICK;
  出手就贏:IF(DK1>7 AND REF(DK1,1)<0 AND (DK1-REF(DK1,1))>9,50,0), STICK,COLORYELLOW;DRAWICON(出手就贏>0,50 ,1);
  STICKLINE( CROSS(趨勢線,10),0,73,3,0), COLOR3366FF;
  DRAWTEXT(IF(CROSS(趨勢線,10),100,0),68,'抄底'),COLORWHITE ;
  DRAWTEXT(IF(CROSS(10,趨勢線),1,0), 10,'$備錢'),COLOR33FFCC;
  DRAWTEXT(REF("KDJ.J",1)<0 AND "KDJ.J">0,50,'短買'),COLORRED ;
  DRAWTEXT(CROSS(底部吸籌指標(biāo),-24),80,'抄底'),COLORWHITE ;
  RSV:=(((CLOSE - LLV(LOW,9)) / (HHV(HIGH,9) - LLV(LOW,9))) * 100);
  短期底部:=LLV(OPEN,30);
  K:=SMA(RSV,3,1);
  D:=SMA(K,3,1);
  J:=((3 * K) - (2 * D));
  AA10:=MA(CLOSE,10);
  AA12:=MA(CLOSE,12);
  BB10:=((ATAN((AA10 - REF(AA10,1))) * 3.1416) * 10);
  BB12:=((ATAN((AA12 - REF(AA12,1))) * 3.1416) * 10);
  MA13:=MA(CLOSE,13);
  VARB:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
  VARC:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
  VARD:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
  VARE:=(((VARB + (2 * VARC)) + (3 * VARD)) / 6);
  VARF:=MA(VARE,3);
  STICKLINE((CROSS(J,0) AND (VARF <= (0 - 7))),0,88,2,0),COLORBLUE;
  DRAWICON((CROSS(J,0) AND (VARF <= (0 - 7))),88,9);
  VARO2:=(CLOSE-LLV(LOW,26))/(HHV(HIGH,26)-LLV(LOW,26))*100;
  VARO3:=SMA(SMA(VARO2,3,1),3,1);
  VARO4:=EMA(VARO3,5);
  VARO5:=LLV(LOW,26);
  VARO6:=HHV(HIGH,34);
  VARO7:=EMA((CLOSE-VARO5)/(VARO6-VARO5)*4,4)*25;
  STICKLINE(CROSS(VARO4,10) AND VARO4>10,25,0,1,0),COLORYELLOW;
  建倉區(qū): IF((VARO7<10),0,20),LINETHICK3 ,COLORRED;
  

  ------------------------------------------------------------------------------------

   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.       建倉區(qū): IF((VARO7<10),80,100) ,COLOR00CCFF,LINETHICK1;   
  18.       0,LINETHICK2 ,COLORFFCC00;   

  D、輔助指標(biāo)
        AWRSI公式作為輔助判斷公式，進(jìn)一步提高買點的成功率
   

  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);   

  ==================================================================================

•  
• 包括三個選股指標(biāo)
       --------------------------------------------------------------------------
• A、愛琴海：圖中顯示為出現(xiàn)信號K線的實體上半部，淡洋紅色；
             選股預(yù)警源碼：

           B、短線：圖中顯示為出現(xiàn)信號K線的實體下半部，黃色；
        選股預(yù)警源碼：
 

     C、紅十字：
         選股預(yù)警源碼：