返回
外汇指标
TDI Red Green
回复:0  浏览:950
  • 楼主admin 圈主
  • 2019-05-05 05:02
EURGBPH1.png

  1. //+------------------------------------------------------------------+
  2. //|                                    Traders Dynamic Index.mq4     |
  3. //|                                    Copyright ?2006, Dean Malone |
  4. //|                                    www.compassfx.com             |
  5. //+------------------------------------------------------------------+


  8. #property indicator_buffers 6
  9. #property indicator_color1 Black
  10. #property indicator_color2 0xFFFFFFFF  // MediumBlue
  11. #property indicator_color3 0xFFFFFFFF  // Yellow
  12. #property indicator_color4 0xFFFFFFFF  // MediumBlue
  13. #property indicator_color5 Green
  14. #property indicator_color6 Red
  15. #property indicator_separate_window

  17. extern int RSI_Period = 13;         //8-25
  18. extern int RSI_Price = 0;           //0-6
  19. extern int Volatility_Band = 34;    //20-40
  20. extern int RSI_Price_Line = 2;      
  21. extern int RSI_Price_Type = 0;      //0-3
  22. extern int Trade_Signal_Line = 7;   
  23. extern int Trade_Signal_Type = 0;   //0-3

  25. double RSIBuf[],UpZone[],MdZone[],DnZone[],MaBuf[],MbBuf[];

  27. int init()
  28.   {
  29.    IndicatorShortName("TDI");
  30.    SetIndexBuffer(0,RSIBuf);
  31.    SetIndexBuffer(1,UpZone);
  32.    SetIndexBuffer(2,MdZone);
  33.    SetIndexBuffer(3,DnZone);
  34.    SetIndexBuffer(4,MaBuf);
  35.    SetIndexBuffer(5,MbBuf);
  36.    
  37.    SetIndexStyle(0,DRAW_NONE);
  38.    SetIndexStyle(1,DRAW_LINE);
  39.    SetIndexStyle(2,DRAW_LINE);   //,0,2
  40.    SetIndexStyle(3,DRAW_LINE);
  41.    SetIndexStyle(4,DRAW_LINE);   //,0,2
  42.    SetIndexStyle(5,DRAW_LINE);   //,0,2
  43.    
  44.    SetIndexLabel(0,NULL);
  45.    SetIndexLabel(1,"VB High");
  46.    SetIndexLabel(2,"Market base Line");
  47.    SetIndexLabel(3,"VB Low");
  48.    SetIndexLabel(4,"RSI Price Line");
  49.    SetIndexLabel(5,"Trade Signal Line");

  51.    SetLevelValue(0,50);
  52.    SetLevelValue(1,68);
  53.    SetLevelValue(2,32);
  54.    SetLevelStyle(STYLE_DOT,1,DimGray);
  55.    
  56.    return(0);
  57.   }

  59. int start()
  60.   {
  61.    double MA,RSI[];
  62.    ArrayResize(RSI,Volatility_Band);
  63.    int counted_bars=IndicatorCounted();
  64.    int limit = Bars-counted_bars-1;
  65.    for(int i=limit; i>=0; i--)
  66.    {
  67.       RSIBuf[i] = (iRSI(NULL,0,RSI_Period,RSI_Price,i));
  68.       MA = 0;
  69.       for(int x=i; x<i+Volatility_Band; x++) {
  70.          RSI[x-i] = RSIBuf[x];
  71.          MA += RSIBuf[x]/Volatility_Band;
  72.       }
  73.       UpZone[i] = (MA + (1.6185 * StDev(RSI,Volatility_Band)));
  74.       DnZone[i] = (MA - (1.6185 * StDev(RSI,Volatility_Band)));  
  75.       MdZone[i] = ((UpZone[i] + DnZone[i])/2);
  76.       }
  77.    for (i=limit-1;i>=0;i--)  
  78.       {
  79.        MaBuf[i] = (iMAonArray(RSIBuf,0,RSI_Price_Line,0,RSI_Price_Type,i));
  80.        MbBuf[i] = (iMAonArray(RSIBuf,0,Trade_Signal_Line,0,Trade_Signal_Type,i));   
  81.       }
  82. //----
  83.    return(0);
  84.   }
  85.   
  86. double StDev(double& Data[], int Per)
  87. {return(MathSqrt(Variance(Data,Per)));
  88. }
  89. double Variance(double& Data[], int Per)
  90. {double sum, ssum;
  91.   for (int i=0; i<Per; i++)
  92.   {sum += Data[i];
  93.    ssum += MathPow(Data[i],2);
  94.   }
  95.   return((ssum*Per - sum*sum)/(Per*(Per-1)));
  96. }
  97. //+------------------------------------------------------------------+
打赏