MT4指标圈
加入本圈
收藏本贴

OsMA

楼主  收藏   举报   帖子创建时间:  2019-05-05 05:02 回复：0 关注量：706
EURGBPH1.png

  1. //+------------------------------------------------------------------+
  2. //|                                                         OsMA.mq4 |
  3. //|                      Copyright ?2004, metaQuotes Software Corp. |
  4. //|                                       http://www.metaquotes.net/ |
  5. //|                                    Copyright ?2006, Robert Hill |
  6. //|                                    Copyright ?2008, Linuxser    |
  7. //+------------------------------------------------------------------+
  8. #property  copyright "Copyright ?2006, Robert Hill"
  9. #property  copyright "Copyright ?2008, Linuxser and Forex-TSD"
  10. #property  link      "http://www.metaquotes.net/"
  11. //---- indicator settings
  12. #property  indicator_separate_window
  13. #property  indicator_buffers 2
  14. #property  indicator_color1  DarkSeaGreen
  15. #property  indicator_color2  Tomato

  17. //---- indicator parameters
  18. extern bool SoundON=true;
  19. extern bool EmailON=false;
  20. extern bool HistogramAlarm=false;
  21. extern bool ZeroLineAlarm=false;
  22. extern int FastEMA=12;
  23. extern int SlowEMA=26;
  24. extern int SignalSMA=9;

  26. //---- indicator buffers
  27. double     OsmaBuffer[];
  28. double     MacdBuffer[];
  29. double     SignalBuffer[];
  30. double HistogramBufferUp[];
  31. double HistogramBufferDown[];
  32. bool HistAboveZero = false;
  33. bool HistBelowZero = false;
  34. bool MACDAboveZero = false;
  35. bool MACDBelowZero = false;

  37. //+------------------------------------------------------------------+
  38. //| Custom indicator initialization function                         |
  39. //+------------------------------------------------------------------+
  40. int init()
  41.   {
  42. //---- 2 additional buffers are used for counting.
  43.    IndicatorBuffers(5);
  44. //---- drawing settings
  45.    SetIndexDrawBegin(0,SignalSMA);
  46.    SetIndexStyle(0,DRAW_HISTOGRAM,STYLE_SOLID);
  47.    SetIndexBuffer(0,HistogramBufferUp);
  48.    SetIndexStyle(1,DRAW_HISTOGRAM,STYLE_SOLID);
  49.    SetIndexBuffer(1,HistogramBufferDown);
  50.    IndicatorDigits(Digits+2);
  51. //---- 3 indicator buffers mapping
  52.    SetIndexBuffer(2,OsmaBuffer);
  53.    SetIndexBuffer(3,MacdBuffer);
  54.    SetIndexBuffer(4,SignalBuffer);
  55.    SetIndexBuffer(0,HistogramBufferUp);
  56.    SetIndexBuffer(1,HistogramBufferDown);
  57.    
  58. //---- name for DataWindow and indicator subwindow label
  59.    IndicatorShortName("OsMA("+FastEMA+","+SlowEMA+","+SignalSMA+")");
  60. //---- initialization done
  61.    return(0);
  62.   }
  63. //+------------------------------------------------------------------+
  64. //| Moving Average of Oscillator                                     |
  65. //+------------------------------------------------------------------+
  66. int start()
  67.   {

  69.    double current, prev;
  70.    int limit;
  71.    int counted_bars=IndicatorCounted();
  72. //---- last counted bar will be recounted
  73.    if(counted_bars>0) counted_bars--;
  74.    limit=Bars-counted_bars;
  75. //---- macd counted in the 1-st additional buffer
  76.    for(int i=0; i<limit; i++)
  77.       MacdBuffer[i]=iMA(NULL,0,FastEMA,0,MODE_EMA,PRICE_CLOSE,i)-iMA(NULL,0,SlowEMA,0,MODE_EMA,PRICE_CLOSE,i);
  78. //---- signal line counted in the 2-nd additional buffer
  79.    for(i=0; i<limit; i++)
  80.       SignalBuffer[i]=iMAonArray(MacdBuffer,Bars,SignalSMA,0,MODE_SMA,i);
  81. //---- main loop
  82.    for(i=0; i<limit; i++)
  83.       OsmaBuffer[i]=MacdBuffer[i]-SignalBuffer[i];

  85.    for(i=0; i<limit; i++)
  86.    {
  87.       HistogramBufferUp[i] = 0;
  88.       HistogramBufferDown[i] = 0;
  89.       current = MacdBuffer[i] - SignalBuffer[i];
  90.       prev = MacdBuffer[i+1] - SignalBuffer[i+1];
  91.       if (current > prev)
  92.       {
  93.         HistogramBufferUp[i] = current;
  94.         HistogramBufferDown[i] = 0.0;
  95.       }
  96.       else
  97.       {
  98.         HistogramBufferDown[i] = current;
  99.         HistogramBufferUp[i] = 0.0;
  100.       }
  101.       
  102.       if (MACDAboveZero) Comment ("nThe trend has changed to UP");
  103.       if (MACDBelowZero) Comment ("nThe trend has changed to DOWN");
  104.       
  105.       if (i == 1)
  106.       {
  107. // Check for Histogram Change Color
  108.         if  (HistogramAlarm==true)
  109.         {
  110.         if (HistogramBufferUp[i] > HistogramBufferDown[i + 1])
  111.         {
  112. // Cross up
  113.          if (HistAboveZero == false)
  114.          {
  115.            HistAboveZero=true;
  116.            HistBelowZero=false;
  117.            if (SoundON) alert("OSMA is Positive","n Time=",TimeToStr(CurTime(),TIME_DATE)," ",TimeHour(CurTime()),":",TimeMinute(CurTime()),"n Symbol=",Symbol()," Period=",Period());
  118.            if (EmailON) SendMail("OSMA is Positive", "MACD Crossed up, Date="+TimeToStr(CurTime(),TIME_DATE)+" "+TimeHour(CurTime())+":"+TimeMinute(CurTime())+" Symbol="+Symbol()+" Period="+Period());
  119.          }
  120.         }
  121.         else if (HistogramBufferDown[i] <  HistogramBufferUp[i + 1] > 0)
  122.         {
  123. // Cross down
  124.          if (HistBelowZero == false)
  125.          {
  126.           HistBelowZero=true;
  127.           HistAboveZero=false;
  128.           if (SoundON) alert("OSMA is Negative","n Date=",TimeToStr(CurTime(),TIME_DATE)," ",TimeHour(CurTime()),":",TimeMinute(CurTime()),"n Symbol=",Symbol()," Period=",Period());
  129.           if (EmailON) SendMail("OSMA is Negative","MACD Crossed Down, Date="+TimeToStr(CurTime(),TIME_DATE)+" "+TimeHour(CurTime())+":"+TimeMinute(CurTime())+" Symbol="+Symbol()+" Period="+Period());
  130.          }
  131.         }
  132.         }
  133. // Check for MACD Signal line crossing 0 line
  134.         if (ZeroLineAlarm==true)
  135.         {
  136.         if (OsmaBuffer[i] > 0 && OsmaBuffer[i + 1] < 0)
  137.         {
  138. // Cross up
  139.          if (MACDAboveZero == false)
  140.          {
  141.            MACDAboveZero=true;
  142.            MACDBelowZero=false;
  143.            if (SoundON) alert("Histogram is Above Zero Line","n Time=",TimeToStr(CurTime(),TIME_DATE)," ",TimeHour(CurTime()),":",TimeMinute(CurTime()),"n Symbol=",Symbol()," Period=",Period());
  144.            if (EmailON) SendMail("Histogram is Above Zero Line", "OSMA Crossed up, Date="+TimeToStr(CurTime(),TIME_DATE)+" "+TimeHour(CurTime())+":"+TimeMinute(CurTime())+" Symbol="+Symbol()+" Period="+Period());
  145.          }
  146.         }
  147.         else if (OsmaBuffer[i] < 0 && OsmaBuffer[i + 1] > 0)
  148.         {
  149. // Cross down
  150.          if (MACDBelowZero == false)
  151.          {
  152.           MACDBelowZero=true;
  153.           MACDAboveZero=false;
  154.           if (SoundON) alert("Histogram is Below Zero Line","n Date=",TimeToStr(CurTime(),TIME_DATE)," ",TimeHour(CurTime()),":",TimeMinute(CurTime()),"n Symbol=",Symbol()," Period=",Period());
  155.           if (EmailON) SendMail("Histogram is Below Zero Line","OSMA Crossed Down, Date="+TimeToStr(CurTime(),TIME_DATE)+" "+TimeHour(CurTime())+":"+TimeMinute(CurTime())+" Symbol="+Symbol()+" Period="+Period());
  156.          }
  157.         }
  158.       }
  159.     }  
  160.    }
  161.       
  162. //---- done
  163.    return(0);
  164.   }
打赏
分享到：

本文作者

Ta的圈贴

更多

最新创建圈子

最新话题

我要发帖