请教！！！

dengwu

请问版主！！！
      RSI指标为什么只有一跟线啊？？
                                                       怎么改成向文华一样的，有2跟线啊？？？

tradeblazer

只是两条参数不一样的RSI。

1、先新建一个用户函数，假设命名为RSI,返回值为数值型，代码如下：

1. Params
   
2.         Numeric Length1(14) ;
   
3. Vars
   
4.         NumericSeries NetChgAvg( 0 );
   
5.         NumericSeries TotChgAvg( 0 );
   
6.         Numeric Change( 0 );
   
7.         Numeric SF( 0 );
   
8.         Numeric ChgRatio( 0 ) ;
   
9.         Numeric RSIValue;
   
10. Begin
    
11.         SF = 1/Length;
    
12.         If(CurrentBar < Length)
    
13.         {
    
14.                 RSIValue = InvalidNumeric;
    
15.         }Else
    
16.         {
    
17.                 If(CurrentBar == Length)
    
18.                 {
    
19.                         NetChgAvg = ( Close - Close[Length] ) / Length ;
    
20.                         TotChgAvg = AverageFC( Abs( Close - Close[1] ), Length ) ;
    
21.                 }
    
22.                
    
23.                 If(CurrentBar>length)
    
24.                 {
    
25.                         Change = Close - Close[1] ;
    
26.                         NetChgAvg = NetChgAvg[1] + SF * ( Change - NetChgAvg[1] ) ;
    
27.                         TotChgAvg = TotChgAvg[1] + SF * ( Abs( Change ) - TotChgAvg[1] ) ;
    
28.                 }
    
29.                
    
30.                 If( TotChgAvg <> 0 )
    
31.                 {
    
32.                         ChgRatio = NetChgAvg / TotChgAvg ;
    
33.                 }else
    
34.                 {
    
35.                         ChgRatio = 0 ;
    
36.                 }
    
37.                
    
38.                 RSIValue = 50 * ( ChgRatio + 1 ) ;
    
39.         }
    
40.         return RSIValue;
    
41. End

复制代码

2、再新建一个技术指标，假设命名为MyRSI，代码如下:

1. Params
   
2.         Numeric Length1(7) ;
   
3.         Numeric Length2(14) ;
   
4.         Numeric OverSold(30) ;
   
5.         Numeric OverBought(70) ;
   
6. Vars
   
7.         Numeric RSI1;
   
8.         Numeric RSI2;
   
9. Begin
   
10.         RSI1 = RSI(Length1);
    
11.         RSI2 = RSI(Length2);
    
12.         PlotNumeric("RSI1",RSI1);
    
13.         PlotNumeric("RSI2",RSI2);
    
14.         PlotNumeric("超买",OverBought);
    
15.         PlotNumeric("超卖",OverSold);
    
16. End

复制代码

dengwu

非常感谢！！！！
我发现tb真的功能太强大了！！