Скачать MetaTrader 5
Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий
Интересует активность в Сигналах? Заходи и отслеживай!
AT-2000
66
AT-2000 2013.08.28 08:22 

Здравствуйте!!!

решил добавить еще линии в стахастик, код взял тут

не пойму в чем проблема, линии иногда появляются, в примере функции iMAOnArray указанно также как и у меня.

может что-то упускаю

вод код

//+------------------------------------------------------------------+
//|                                                   Stochastic.mq4 |
//|                      Copyright © 2004, MetaQuotes Software Corp. |
//|                                       http://www.metaquotes.net/ |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2004, MetaQuotes Software Corp."
#property link      "http://www.metaquotes.net/"

#property indicator_separate_window
#property indicator_minimum 0
#property indicator_maximum 100
#property indicator_buffers 5
#property indicator_color1 DarkBlue
#property indicator_color2 Red
#property indicator_color3 Green
#property indicator_color4 MediumVioletRed
#property indicator_color5 Gray

//---- input parameters
extern double indMax=75;
extern double indMin=25;
extern int KPeriod=5;
extern int DPeriod=3;
extern int Slowing=3;
//---- buffers
double MainBuffer[];
double SignalBuffer[];
double EmaBuffer[];
double SmmaBuffer[];
double LwmaBuffer[];
double HighesBuffer[];
double LowesBuffer[];
//----
int draw_begin1=0;
int draw_begin2=0;
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
   string short_name;
//---- 2 additional buffers are used for counting.
   IndicatorBuffers(7);
   SetIndexBuffer(5, HighesBuffer);
   SetIndexBuffer(6, LowesBuffer);
//---- indicator lines
   SetIndexStyle(0,DRAW_LINE, STYLE_SOLID, 2, DarkBlue);
   SetIndexBuffer(0, MainBuffer);
   SetIndexStyle(1,DRAW_LINE, STYLE_SOLID, 2, Red);
   SetIndexBuffer(1, SignalBuffer);
   SetIndexStyle(2,DRAW_LINE, STYLE_SOLID, 2, Green);
   SetIndexBuffer(2, EmaBuffer);
   SetIndexStyle(3,DRAW_LINE, STYLE_SOLID, 2, MediumVioletRed);
   SetIndexBuffer(3, SmmaBuffer);
   SetIndexStyle(4,DRAW_LINE, STYLE_SOLID, 2, Gray);
   SetIndexBuffer(4, LwmaBuffer);
//---- name for DataWindow and indicator subwindow label
   short_name="Sto("+KPeriod+","+DPeriod+","+Slowing+")";
   IndicatorShortName(short_name);
   SetIndexLabel(0,"Line K");
   SetIndexLabel(1,"SMA");
   SetIndexLabel(2,"EMA");
   SetIndexLabel(3,"SMMA");
   SetIndexLabel(4,"LWMA");
//----
   draw_begin1=KPeriod+Slowing;
   draw_begin2=draw_begin1+DPeriod;
   SetIndexDrawBegin(0,draw_begin1);
   SetIndexDrawBegin(1,draw_begin2);
   SetIndexDrawBegin(2,draw_begin2);
   SetIndexDrawBegin(3,draw_begin2);
   SetIndexDrawBegin(4,draw_begin2);
   SetLevelValue(0,indMin);
   SetLevelValue(1,indMax);
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Stochastic oscillator                                            |
//+------------------------------------------------------------------+
int start()
  {
   int    i,k;
   int    counted_bars=IndicatorCounted();
   double price;
//----
   if(Bars<=draw_begin2) return(0);
//---- initial zero
   if(counted_bars<1)
     {
      for(i=1;i<=draw_begin1;i++) MainBuffer[Bars-i]=0;
      for(i=1;i<=draw_begin2;i++)
      { 
      SignalBuffer[Bars-i]=0;
      EmaBuffer[Bars-i]=0;
      SmmaBuffer[Bars-i]=0;
      LwmaBuffer[Bars-i]=0;
      }
     }
//---- minimums counting
   i=Bars-KPeriod;
   if(counted_bars>KPeriod) i=Bars-counted_bars-1;
   while(i>=0)
     {
      double min=1000000;
      k=i+KPeriod-1;
      while(k>=i)
        {
         price=Low[k];
         if(min>price) min=price;
         k--;
        }
      LowesBuffer[i]=min;
      i--;
     }
//---- maximums counting
   i=Bars-KPeriod;
   if(counted_bars>KPeriod) i=Bars-counted_bars-1;
   while(i>=0)
     {
      double max=-1000000;
      k=i+KPeriod-1;
      while(k>=i)
        {
         price=High[k];
         if(max<price) max=price;
         k--;
        }
      HighesBuffer[i]=max;
      i--;
     }
//---- %K line
   i=Bars-draw_begin1;
   if(counted_bars>draw_begin1) i=Bars-counted_bars-1;
   while(i>=0)
     {
      double sumlow=0.0;
      double sumhigh=0.0;
      for(k=(i+Slowing-1);k>=i;k--)
        {
         sumlow+=Close[k]-LowesBuffer[k];
         sumhigh+=HighesBuffer[k]-LowesBuffer[k];
        }
      if(sumhigh==0.0) MainBuffer[i]=100.0;
      else MainBuffer[i]=sumlow/sumhigh*100;
      i--;
     }
//---- last counted bar will be recounted
   if(counted_bars>0) counted_bars--;
   int limit=Bars-counted_bars;
//---- signal line is simple movimg average
   for(i=0; i<limit; i++)
      SignalBuffer[i]=iMAOnArray(MainBuffer,Bars,DPeriod,0,MODE_SMA,i);
      EmaBuffer[i]=iMAOnArray(MainBuffer,Bars,DPeriod,0,MODE_SMMA,i);
      SmmaBuffer[i]=iMAOnArray(MainBuffer,Bars,DPeriod,0,MODE_EMA,i);
      LwmaBuffer[i]=iMAOnArray(MainBuffer,Bars,DPeriod,0,MODE_LWMA,i);
//----
   return(0);
  }
//+------------------------------------------------------------------+
ktest0
631
ktest0 2013.08.28 08:40  

Начнем с этого:

#property indicator_buffers 5
#property indicator_color1 DarkBlue
#property indicator_color2 Red
#property indicator_color3 Green
#property indicator_color4 MediumVioletRed
#property indicator_color5 Gray

Пять буферов указано, а используется семь....

Будут баги дальше - будем смотреть дальше, а пока лень...

AT-2000
66
AT-2000 2013.08.28 08:51  
ktest0:

Начнем с этого:

Пять буферов указано, а используется семь....

Будут баги дальше - будем смотреть дальше, а пока лень...


Я ставил 7 просто появляются буферы расчета, в исходнике стоят два, поэтому вернул 7 как в исходниках, скорее всего при функции iMAOnArray обновляется исходный массив
AT-2000
66
AT-2000 2013.08.28 08:58  

вот как выходит

я обвел

/
Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий