返回
黄金
MTF Candles
回复:0  浏览:972
  • 楼主admin 圈主
  • 2019-05-05 05:15
mtf-candles-forex.png

  1. //+------------------------------------------------------------------+
  2. //|                                                 #MTF Candles.mq4 |
  3. //|                                      Copyright ?2006, Eli Hayun |
  4. //|                                          http://www.elihayun.com |
  5. //+------------------------------------------------------------------+
  6. #property copyright "Copyright ?2006, Eli Hayun"
  7. #property link      "http://www.elihayun.com"

  9. #property indicator_chart_window
  10. //---- input parameters
  11. extern int       CandlesTF=240;
  12. extern color     UpCandleColor = LightBlue;
  13. extern color     DownCandleColor = Red;
  14. //+------------------------------------------------------------------+
  15. //| Custom indicator initialization function                         |
  16. //+------------------------------------------------------------------+
  17. int init()
  18.   {
  19. //---- indicators
  20. //----
  21.    return(0);
  22.   }
  23. //+------------------------------------------------------------------+
  24. //| Custom indicator deinitialization function                       |
  25. //+------------------------------------------------------------------+
  26. int deinit()
  27.   {
  28. //----
  29.    
  30. //----
  31.    return(0);
  32.   }
  33. //+------------------------------------------------------------------+
  34. //| Custom indicator iteration function                              |
  35. //+------------------------------------------------------------------+
  36. int start()
  37.   {
  38.    int    counted_bars=IndicatorCounted();
  39. //----
  40.    double dif = MathAbs(Time[1] - Time[2]);
  41.    
  42.    int ix = 0;
  43.    datetime dtStart = dif * 8 + Time[0];
  44.    for (int ii=0; ii<8; ii+=2)
  45.    {
  46.       ObjectDelete("rect"+ii); ObjectDelete("OTrnd"+ii); ObjectDelete("CTrnd"+ii);
  47.       ObjectCreate("rect"+ii,OBJ_TREND, 0, dtStart, iLow(NULL, CandlesTF,ix), dtStart, iHigh(NULL,CandlesTF,ix));
  48.       color clr = DownCandleColor; if (iOpen(NULL, CandlesTF,ix) < iClose(NULL, CandlesTF,ix)) clr = UpCandleColor;
  49.       ObjectSet("rect"+ii, OBJPROP_COLOR, clr);
  50.        ObjectSet("rect"+ii, OBJPROP_WIDTH, 3);
  51.       
  52.       ObjectSet("rect"+ii, OBJPROP_RAY, False);
  53.       
  54.      
  55.       ObjectCreate("OTrnd"+ii, OBJ_TREND, 0, dtStart, iOpen(NULL, CandlesTF,ix), dtStart-dif, iOpen(NULL,CandlesTF,ix));
  56.        ObjectSet("OTrnd"+ii, OBJPROP_WIDTH, 2);
  57.       ObjectSet("OTrnd"+ii, OBJPROP_RAY, False);
  58.       
  59.       ObjectSet("CTrnd"+ii, OBJPROP_WIDTH, 2);  
  60.       ObjectCreate("CTrnd"+ii, OBJ_TREND, 0, dtStart, iClose(NULL, CandlesTF,ix), dtStart+dif, iClose(NULL,CandlesTF,ix));
  61.       ObjectSet("CTrnd"+ii, OBJPROP_WIDTH, 2);  
  62.       ObjectSet("CTrnd"+ii, OBJPROP_RAY, False);
  63.       
  64.       dtStart -= dif * 2;
  65.       ix++;
  66.     }
  67.    
  68. //----
  69.    return(0);
  70.   }
  71. //+------------------------------------------------------------------+
打赏