KUO 发表于 2019-11-22 17:29:33

相对力度指数(RSI)及MQL4代码实现

       RSI是交易中非常常见的一个技术指标,去经典书籍《期货市场技术分析》中,约翰墨菲对相对力度指数(RSI)做了比较详细的介绍,也对该指标比较推崇。RSI是由传奇的投资大师韦尔斯.王尔德首创的,发表在他的《技术交易系统的新思路》一书中。韦尔斯.王尔德是投资者界的大神,他发现的技术指标除了这个RSI,还有抛物线系统(SAR),方向性运动指数(DMI),商晶选择指数(CSI)(大神请收下我的膝盖)。
今天我们来讲一下RSI指标的相关状况。
首先要计算:RS=×100%
公式中,A——N日内收盘涨幅之和B——N日内收盘跌幅之和(取正值)
然后求RSI=100-(100/(1+RS))公式中,当RSI超过70时,显示超买状态,当RSI低于30时,则是超卖状态。
下面我们用代码把这个指标完整演绎一下:


#property copyright   "2018-2019, geekquan number Corp."
#property link      "http://www.geekquant.com"
#property strict

#property indicator_separate_window//主图指标
#property indicator_minimum    0      //指标的下限
#property indicator_maximum    100    //指标的上限
#property indicator_buffers    1      //指标的数量为1
#property indicator_color1   DodgerBlue   //指标线的颜色
#property indicator_level1   30.0   //需进一步研究
#property indicator_level2   70.0       //需进一步研究
#property indicator_levelcolor clrSilver//需进一步研究
#property indicator_levelstyle STYLE_DOT//需进一步研究
//--- input parameters
input int InpRSIPeriod=14; // RSI Period设置一个输入变量
//--- buffers
double ExtRSIBuffer[];      //设置指标数组,
double ExtPosBuffer[];      //用于计算RSI的中间数组,用来计算上涨
double ExtNegBuffer[];      //用于计算RSI的中间数组,用来计算下跌
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int OnInit(void)
{
   string short_name;
//--- 初始化3个指标缓冲区   2 additional buffers are used for counting.
   IndicatorBuffers(3);
   SetIndexBuffer(1,ExtPosBuffer); //将过程数组与缓冲区联系起来
   SetIndexBuffer(2,ExtNegBuffer);//将过程数组与缓冲区联系起来
//--- indicator line
   SetIndexStyle(0,DRAW_LINE); //设置划线的类型
   SetIndexBuffer(0,ExtRSIBuffer);//将指标数组与指标缓冲区联系
//--- name for DataWindow and indicator subwindow label
   short_name="RSI("+string(InpRSIPeriod)+")";
   IndicatorShortName(short_name);
   SetIndexLabel(0,short_name);//设置RSI的label
//--- check for input
   if(InpRSIPeriod<2)
   {
      Print("Incorrect value for input variable InpRSIPeriod = ",InpRSIPeriod);
      return(INIT_FAILED);
   }
//---
   SetIndexDrawBegin(0,InpRSIPeriod);//设置一个可输入参数的变量,需进一步研究这个函数
//--- initialization done
   return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Relative Strength Index                                          |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
                const int prev_calculated,
                const datetime &time[],
                const double &open[],
                const double &high[],
                const double &low[],
                const double &close[],
                const long &tick_volume[],
                const long &volume[],
                const int &spread[])
{
   int    i,pos;
   double diff;
//Print(rates_total);
//Print(Bars);
//---做一些初始化的判断
   if(Bars<=InpRSIPeriod || InpRSIPeriod<2)
      return(0);
//--- counting from 0 to rates_total 设置数组索引的顺序
   ArraySetAsSeries(ExtRSIBuffer,false);
   ArraySetAsSeries(ExtPosBuffer,false);
   ArraySetAsSeries(ExtNegBuffer,false);
   ArraySetAsSeries(close,false);
//--- preliminary calculations
//   Print(prev_calculated);
   pos=prev_calculated-1;
//   Print(rates_total);
   if(pos<=InpRSIPeriod)//用于首次加载指标时计算
   {
      //--- first RSIPeriod values of the indicator are not calculated
      ExtRSIBuffer=0.0;
      ExtPosBuffer=0.0;
      ExtNegBuffer=0.0;
      double sump=0.0;
      double sumn=0.0;
      for(i=1; i<=InpRSIPeriod; i++)//注意i从1开始
      {
         ExtRSIBuffer=0.0;
         ExtPosBuffer=0.0;
         ExtNegBuffer=0.0;
         diff=close-close;
         if(diff>0)
            sump+=diff;
         else
            sumn-=diff;
      }
      //--- calculate first visible value
      ExtPosBuffer=sump/InpRSIPeriod;//计算上涨
      ExtNegBuffer=sumn/InpRSIPeriod;//计算下跌
      if(ExtNegBuffer!=0.0)//计算RS和RSI
         ExtRSIBuffer=100.0-(100.0/(1.0+ExtPosBuffer/ExtNegBuffer));
      else
      {
         if(ExtPosBuffer!=0.0)
            ExtRSIBuffer=100.0;
         else
            ExtRSIBuffer=50.0;
      }
      //--- prepare the position value for main calculation
      pos=InpRSIPeriod+1;
   }
//--- the main loop of calculations主循环
   for(i=pos; i<rates_total && !IsStopped(); i++)
   {
      diff=close-close;
      ExtPosBuffer=(ExtPosBuffer*(InpRSIPeriod-1)+(diff>0.0?diff:0.0))/InpRSIPeriod;
      ExtNegBuffer=(ExtNegBuffer*(InpRSIPeriod-1)+(diff<0.0?-diff:0.0))/InpRSIPeriod;
      if(ExtNegBuffer!=0.0)
         ExtRSIBuffer=100.0-100.0/(1+ExtPosBuffer/ExtNegBuffer);
      else
      {
         if(ExtPosBuffer!=0.0)
            ExtRSIBuffer=100.0;
         else
            ExtRSIBuffer=50.0;
      }
   }
//---
   return(rates_total);
}





页: [1]
查看完整版本: 相对力度指数(RSI)及MQL4代码实现