Хорошие индикаторы по теории Демарка - страница 2

Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий
Forex Trader
114499
Forex Trader  
Работайте тем, что я выложил - он работает правильно. Да, если не срабатывают квалификаторы пробоя, то при пересечении линии ценой у Вас не появится значок пробоя (кружок с точкой внутри) и не будут проецироваться цели. Если это не удобно - вполне можно поправить код, чтобы цели рисовались всегда - просто в исходнике перенесите расчет и отрисовку целей за соответствующий иф.


Кстати про отрисовку пробоя: в коде, для отрисовки "Break_Sig_Up" есть условие:
     if((Qw1!=0 && Close[1]<Close[0] )
          || (Qw2!=0 && Open[0] < iP )
          || (Qw3!=0 && (Close[0]+(Close[0]-MathMax(High[0],Close[1])))>iP) ) {


действительно ли Close и High берем для 0-го и 1-го бара, а не для StepBack или i ?

Forex Trader
114499
Forex Trader  
Работайте тем, что я выложил - он работает правильно. Да, если не срабатывают квалификаторы пробоя, то при пересечении линии ценой у Вас не появится значок пробоя (кружок с точкой внутри) и не будут проецироваться цели. Если это не удобно - вполне можно поправить код, чтобы цели рисовались всегда - просто в исходнике перенесите расчет и отрисовку целей за соответствующий иф.


Кстати про отрисовку пробоя: в коде, для отрисовки "Break_Sig_Up" есть условие:
     if((Qw1!=0 && Close[1]<Close[0] )
          || (Qw2!=0 && Open[0] < iP )
          || (Qw3!=0 && (Close[0]+(Close[0]-MathMax(High[0],Close[1])))>iP) ) {


действительно ли Close и High берем для 0-го и 1-го бара, а не для StepBack или i ?



Скорее всего ошибка. Давно код писал проверю - отвечу завтра - сегодня уже собрались праздновать.

Удачи.

Удачи.
Forex Trader
114499
Forex Trader  
В том, что Вы выложили неверный отбор ТД точек - верхняя линия может идти только сверху вниз, а нижняя снизу вверх. Так, что просто переписать будет неправильно, а искать ошибку в том алгоритме - желания не очень много, хотя примерно представляю где она может находиться. Работайте тем, что я выложил - он работает правильно. Да, если не срабатывают квалификаторы пробоя, то при пересечении линии ценой у Вас не появится значок пробоя (кружок с точкой внутри) и не будут проецироваться цели. Если это не удобно - вполне можно поправить код, чтобы цели рисовались всегда - просто в исходнике перенесите расчет и отрисовку целей за соответствующий иф.

Удачи. [/quote]


Насчет отбора точек не соглашусь. Привожу цитату из Демарка: "При прорыве нисходящей TD-линии, цены обычно продолжают двигаться вверх......... "
В любом случае, если даже неправильно, перепишите, пожалуйста, хотя бы один из индикаторов. Второй я попробую переписать по аналогии и выложу здесь. Индикаторы маленькие, а Вы я смотрю в программировании спец.
Forex Trader
114499
Forex Trader  

Насчет отбора точек не соглашусь. Привожу цитату из Демарка: "При прорыве нисходящей TD-линии, цены обычно продолжают двигаться вверх......... "
В любом случае, если даже неправильно, перепишите, пожалуйста, хотя бы один из индикаторов. Второй я попробую переписать по аналогии и выложу здесь. Индикаторы маленькие, а Вы я смотрю в программировании спец.



Можете соглашаться или нет - дело конечно же Ваше. Вы вырвали часть текста - в данном случае речь идет о линии предложения (верхняя) - алгоритм отбора ТД точек таков, что верхняя линия мождет идти ТОЛЬКО СВЕРХУ ВНИЗ - точки не удовлетворяющие этому условию ТД точками не являются. Тот индикатор, что Вы выложили допускает проведение верхней линии и снизу вверх и сверху вниз. то есть Вы иногда просто неверно строите линию тренда и пропускаете сигналы на вход или работаете по неверным сигналам.
Ваш индюк перепишу (только займусь на выходные - не раньше) - проблема небольшая, только работать по нему не советую, но это дело Ваше конечно же. И еще одна просьба - выложите пожалуйста коды индикаторов, обрамленными тегами для публикации мкл кода - при написании постов есть пояснения - или скиньте на мыло (указано в коде индикатора) - просто не хочется еще и форматированием заниматься, а так будет лучше видна структура программного кода.

2 All
В предыдущей версии (выложена выше по ветке) - я ее делал давно и просто переводил свой же индикатор с МТ3, как оказалось не очень внимательно - немного по разному работают некоторые функции и это приводило к тому, что если в реал тайме индюк работал правильно, то по истории проверить это не получалось - бывает. Вот исправленая версия - сегодня проверял - вроде работает : я ее выложу и на пауке - так что все обсуждения по работоспособности и пожелания - туда. Сам индюк :

//+------------------------------------------------------------------+
//|                                        TD_Points&Lines_mgtd1.mq4 |
//|                                           Vladislav Goshkov (VG) |
//|                                                      4vg@mail.ru |
//+------------------------------------------------------------------+
#property copyright "Vladislav Goshkov (VG)"
#property link      "4vg@mail.ru"

#property indicator_chart_window

extern int StepBack=0;
extern bool Qw1=True;
extern bool Qw2=True;
extern bool Qw3=True;
extern color UpLineColor = Blue;
extern int   UpLnWidth = 1;
extern color DnLineColor = Red;
extern int   DnLnWidth = 1;
extern color MarkColor   = Blue;
extern int   MarkNumber  = 217;

int i=1,NP=0,D=0,
    iB_Up=0,iB_Dn=0,
    S1=0,
    S2=0,
    UpLev=0,
    DownLev=0,
    iP_Up=0,
    iP_Dn=0,
    value=0,
    CurPeriod=0,
    shift=0;

datetime  nTime=0;

double UpV=0,
       DownV=0,
       iP=0,
       target = 0,
       UpP[2]={0,0},
       DownP[2]={0,0},
       PP1=0,PP2=0,PP3=0;

int    DownBT[2]={0,0}, // Bar Time
       UpBT[2]={0,0},
       UpB[2]={0,0},    // Bar Num
       DownB[2]={0,0};
string buff_str = "";
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()
  {
//---- indicators
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//---- TODO: add your code here
Comment(" ");   
ObjectsDeleteAll();
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
int Target_Style[4] = {STYLE_DASH,STYLE_DASH,STYLE_DASH,STYLE_SOLID},
    Target_Color[4] = {DimGray,MediumSpringGreen,SeaGreen,Blue},
    Target_LW[4]    = { 1, 1, 1, 2 };
double target[4];
//---- TODO: add your code here
if ( (nTime!=Time[0]) || (CurPeriod!=Period()) ) {
   UpP[0] = 0;
   UpP[1] = 0;

//=================================================
//******** Поиск опорных точек предложения ********
//=================================================
   for(i=2+StepBack,D=2,NP=0; (NP<D)&&(i<Bars); i++) {//Begin
       if (High[i]!= High[i+1]) { 
          if( (High[i]>High[i+1] && High[i]>High[i-1] && High[i]>Close[i+2] ) 
              && High[i]> UpP[0] ) {
	     	 UpB[NP]  = i;
		    UpBT[NP] = Time[i];
		    UpP[NP]  = High[i];
		    NP++;
		    }
		  }

    if (High[i]== High[i+1])  { 
       if ( (High[i]>High[i+2] && High[i]>High[i-1] && High[i]>Close[i+3] ) && High[i]> UpP[0] ) {
	     	 UpB[NP]  = i;
		    UpBT[NP] = Time[i];
		    UpP[NP]  = High[i];
		    NP++;
		    }
		  }
     if(i == (Bars-2) ) {
	     	 UpB[NP]  = i;
		    UpBT[NP] = Time[i];
		    UpP[NP]  = High[i];
		    break;
		    }
     }//for(i=2+StepBack,D=2,NP=0; NP<D; ) {//End;

//=================================================
//********** Поиск опорных точек спроса ***********
//=================================================
   DownP[0] = 1000000000;
   DownP[1] = 1000000000;
   for(i=2+StepBack,D=2,NP=0; (NP<D)&&(i<Bars); i++) {//Begin
    if (Low[i]!= Low[i+1])  { 
       if ( (Low[i]<Low[i+1] && Low[i]<Low[i-1] && Low[i]<Close[i+2] ) && Low[i]< DownP[0] ){
	  	    DownB[NP] = i;
		    DownBT[NP]= Time[i];
		    DownP[NP] = Low[i];
		    NP++;
		    }
		  //i++;
		  };
    if (Low[i]== Low[i+1])  { 
       if ( (Low[i]<Low[i+2] && Low[i]<Low[i-1] && Low[i]<Close[i+3] ) && Low[i]< DownP[0] ){
	  	    DownB[NP] = i;
		    DownBT[NP]= Time[i];
		    DownP[NP] = Low[i];
		    NP++;
		    }
		  //i++;
		  };
     if (i == (Bars-2) ) { 
	  	    DownB[NP] = i;
		    DownBT[NP]= Time[i];
		    DownP[NP] = Low[i];
		    break;
		    };
     }//End;
     

UpV = (UpP[1]-UpP[0])/(UpB[0]-UpB[1]);
DownV = (DownP[1]-DownP[0])/(DownB[0]-DownB[1]);

//=================================================
//****       Рисуем  TD-линии                  ****
//=================================================
   buff_str = "TD_Up";
   if(ObjectFind(buff_str) == -1) {
      ObjectCreate(buff_str, OBJ_TREND, 0, UpBT[1], UpP[1],UpBT[0], UpP[0]);
      ObjectSet(buff_str, OBJPROP_STYLE, STYLE_SOLID);
      ObjectSet(buff_str, OBJPROP_COLOR, UpLineColor);
      ObjectSet(buff_str, OBJPROP_WIDTH, UpLnWidth);
      }
   else {
      ObjectMove(buff_str, 1, UpBT[0], UpP[0]);
      ObjectMove(buff_str, 2, UpBT[1], UpP[1]);
      }

   buff_str = "TD_Dn";
   if(ObjectFind(buff_str) == -1) {
      ObjectCreate(buff_str, OBJ_TREND, 0, DownBT[1], DownP[1],DownBT[0], DownP[0]);
      ObjectSet(buff_str, OBJPROP_STYLE, STYLE_SOLID);
      ObjectSet(buff_str, OBJPROP_COLOR, DnLineColor);
      ObjectSet(buff_str, OBJPROP_WIDTH, DnLnWidth);
      }
   else {
      ObjectMove(buff_str, 1, DownBT[0], DownP[0]);
      ObjectMove(buff_str, 2, DownBT[1], DownP[1]);
      }

   CurPeriod = Period();
   nTime = Time[0];
   }//if (nTime <> Time[0]) {
//----
   for(i=0;i<4;i++) target[i] = 0;
	for( i=UpB[0]; i>=StepBack; i--){
	   if( (Close[i]>UpP[0]+UpV*(UpB[0]-i)) && (Close[i+1]<=UpP[0]+UpV*(UpB[0]-(i+1))) ) {
		    iB_Up=i; 
		    iP=UpP[0]+UpV*(UpB[0]-i);
		    iP_Up = iP; 
		    S1=Lowest(NULL,0,MODE_LOW,UpB[1]-i,i);
		    S2=Lowest(NULL,0,MODE_CLOSE,UpB[1]-i,i);

	       PP1=iP+((UpP[1]+UpV*(UpB[1]-S1))-Low[S1]);
	       PP2=iP+((UpP[1]+UpV*(UpB[1]-S2))-Low[S2]);
          PP3=iP+((UpP[1]+UpV*(UpB[1]-S1))-Close[S1]);
		    if((Qw1 && Close[i+2]>Close[i+1])
          || (Qw2 && Open[i]> iP)
          || (Qw3 && (Close[i+1]+(Close[i+1]-MathMin(Low[i+1],Close[i+2])))<iP) ) {
             target[0] = PP1;
             target[1] = PP2;
             target[2] = PP3;
             target[3] = (PP1+PP2+PP3)/3;
             buff_str = "Break_Sig_Up";
             if(ObjectFind(buff_str) == -1) {
                ObjectCreate(buff_str, OBJ_ARROW,0, Time[iB_Up], iP+2*Point );
                ObjectSet(buff_str, OBJPROP_ARROWCODE, 164);
                ObjectSet(buff_str, OBJPROP_COLOR, Red);
                }
             else {
                ObjectMove(buff_str, 0, Time[iB_Up], iP+2*Point );
                }
             }
		    }
	   }

   for( i=DownB[0]; i>=StepBack;i--) {
	   if( (Close[i]<DownP[0]+DownV*(DownB[0]-i)) && (Close[i+1]>=DownP[0]+DownV*(DownB[0]-(i+1))) ) {
	       iB_Dn=i; 
		    iP=DownP[0]+DownV*(DownB[0]-i);
		    iP_Dn = iP;
		    S1=Highest(NULL,0,MODE_HIGH,DownB[1]-i,i);
		    S2=Highest(NULL,0,MODE_CLOSE,DownB[1]-i,i);

          PP1=iP-(High[S1]-(DownP[1]+DownV*(DownB[1]-S1)));
	       PP2=iP-(High[S2]-(DownP[1]+DownV*(DownB[1]-S2)));
	       PP3=iP-(Close[S1]-(DownP[1]+DownV*(DownB[1]-S1)));
    		 if((Qw1 && Close[i+2]<Close[i+1] )
          || (Qw2 && Open[i] < iP )
		    || (Qw3 && (Close[i+1]+(Close[i+1]-MathMax(High[i+1],Close[i+2])))>iP) ) {
             target[0] = PP1;
             target[1] = PP2;
             target[2] = PP3;
             target[3] = (PP1+PP2+PP3)/3;
             buff_str = "Break_Sig_Dn";
             if(ObjectFind(buff_str) == -1) {
                ObjectCreate(buff_str, OBJ_ARROW,0, Time[iB_Dn], iP+2*Point );
                ObjectSet(buff_str, OBJPROP_ARROWCODE, 164);
                ObjectSet(buff_str, OBJPROP_COLOR, Blue);
                }
             else {
                ObjectMove(buff_str, 0, Time[iB_Dn], iP+2*Point );
                }
             }
 		    }
		}//for( i=DownB[1]; i>=StepBack;i--) {

   for(i=3;i>=0;i--) {
      buff_str = "Target"+i;
      if(ObjectFind(buff_str) == -1) {
         ObjectCreate(buff_str, OBJ_HLINE,0, Time[0], target[i] );
         ObjectSet(buff_str, OBJPROP_STYLE, Target_Style[i]);
         ObjectSet(buff_str, OBJPROP_COLOR, Target_Color[i]);
         ObjectSet(buff_str, OBJPROP_WIDTH, Target_LW[i]);
         }
      else {
         ObjectMove(buff_str, 0, Time[0], target[i] );
         }
      }


//----
string buff_str = "TD_LatestCulcBar";
   if(ObjectFind(buff_str) == -1) {
      ObjectCreate(buff_str, OBJ_ARROW,0, Time[StepBack], Low[StepBack]-2*Point );
      ObjectSet(buff_str, OBJPROP_ARROWCODE, MarkNumber);
      ObjectSet(buff_str, OBJPROP_COLOR, MarkColor);
      }
   else {
      ObjectMove(buff_str, 0, Time[StepBack], Low[StepBack]-2*Point );
      }
   return(0);
  }
//+------------------------------------------------------------------+
Forex Trader
114499
Forex Trader  
Вам повезло - нам на пару часов рубанули интернет - какая-то авария на линии - так что неожиданно появилось время :). Вот один из Ваших индикаторов :

//+------------------------------------------------------------------+
//|                                                        TD_Up.mq4 |
//|                                                            MaXiM |
//+------------------------------------------------------------------+
#property copyright "MaXiM"
#property link      ""
#property indicator_color1 Aqua

#property indicator_chart_window

double TD_UpLn[];
int shift=0;
//Variable : KUp(0), BUp(0), n(0),(0),(0);
double   TrendPriceUp[2][1],// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
         KUp = 0.0, 
         BUp = 0.0, 
         MinPrice = 0.0,
         TargetPriceUp = 0.0,
         Maximum[2][1],// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
         MaxMinPriceimum[2][1];// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
int      n = 0,
         shiftofMaximum[2][1];// ???????? зачем объявлять реально одномерный массив как 2-мерный ?

datetime TimeofMaximum[2][1];// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
string   buff_str="";
//+------------------------------------------------------------------+
//| Custom indicator initialization function                         |
//+------------------------------------------------------------------+
int init()  {
  int i=0,j=0;
//---- indicators
   IndicatorBuffers(1);
   SetIndexStyle(0,DRAW_LINE);
   SetIndexBuffer(0,TD_UpLn);
//----
   for( i=0; i<2; i++){
      for( j=0; j<1; j++){
          TrendPriceUp[i][j]= 0;
          Maximum[i][j]     = 0;
          MaxMinPriceimum[i][j]= 0;
          shiftofMaximum[i][j] = 0;
          TimeofMaximum[i][j]  = 0;
         }
      }
   return(0);
  }
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function                       |
//+------------------------------------------------------------------+
int deinit()
  {
//---- 
Comment(" ");   
ObjectsDeleteAll();
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Custom indicator iteration function                              |
//+------------------------------------------------------------------+
int start()
  {
   //int    counted_bars=IndicatorCounted();
//---- 

for( shift = Bars-1; shift>= 1;shift--) {

   TrendPriceUp[0][0] = TrendPriceUp[1][0];

   TrendPriceUp[1][0] = KUp*(shift) + BUp;
   TD_UpLn[shift]     = TrendPriceUp[1][0];//SetIndexValue(shift, TrendPriceUp[2,1]);

   if( (High[shift] >  High[shift-1]) 
    && (High[shift] >= High[shift+1]) 
       ) {
      Maximum[0][0] = Maximum[1][0]; 

      TimeofMaximum[0][0]  = TimeofMaximum[1][0];
      shiftofMaximum[0][0] = shiftofMaximum[1][0];
      shiftofMaximum[1][0] = shift;
      Maximum[1][0]        = High[shift];
      TimeofMaximum[1][0]  = Time[shift];

      KUp = (Maximum[1][0]-Maximum[0][0])/(shiftofMaximum[1][0]-shiftofMaximum[0][0]);
      BUp = Maximum[0][0] - KUp*shiftofMaximum[0][0];

      TrendPriceUp[1][0] = KUp*(shift) + BUp;

      if( Maximum[0][0] >= Maximum[1][0]) {

         for( n=shiftofMaximum[0][0];n<= shiftofMaximum[1][0];n--){
             TrendPriceUp[1][0] = KUp*(n) + BUp;
             TD_UpLn[n] = TrendPriceUp[1][0];//SetIndexValue(n, TrendPriceUp[2,1]);
             }

         //MoveObject("UpTrend", OBJ_TRENDLINE, TimeofMaximum[1,1], Maximum[1,1], TimeofMaximum[2,1], Maximum[2,1], Blue, 1, STYLE_SOLID);
         buff_str = "UpTrend";
         if(ObjectFind(buff_str) == -1) {
            ObjectCreate(buff_str, OBJ_TREND, 0, TimeofMaximum[0][0], Maximum[0][0],TimeofMaximum[1][0], Maximum[1][0]);
            ObjectSet(buff_str, OBJPROP_STYLE, STYLE_SOLID);
            ObjectSet(buff_str, OBJPROP_COLOR, Blue);
            ObjectSet(buff_str, OBJPROP_WIDTH, 1);
            }
         else {
            ObjectMove(buff_str, 1, TimeofMaximum[0][0], Maximum[0][0]);
            ObjectMove(buff_str, 2, TimeofMaximum[1][0], Maximum[1][0]);
            }

         }//If Maximum[1,1] >= Maximum[2,1]

      }// if High[shift] > High[shift - 1] AND High[shift] >= High[shift + 1]

   if( (Close[shift]>TrendPriceUp[1][0]) 
    && (Close[shift+1] <= TrendPriceUp[0][0]) 
    && (TrendPriceUp[0][0] >= TrendPriceUp[1][0])
      ) {
       MinPrice = Low[Lowest(MODE_LOW, shiftofMaximum[0][0] - shift, shiftofMaximum[0][0])];
       TargetPriceUp = (TrendPriceUp[1][0] - MinPrice) + TrendPriceUp[1][0];

       //MoveObject("TargetPriceUp"+Mod(shift,1), OBJ_HLINE, TimeofMaximum[1,1], TargetPriceUp, TimeofMaximum[2,1], TargetPriceUp, Blue, 1, STYLE_DOT);
         buff_str = "TargetPriceUp"+DoubleToStr(MathMod(shift,1),5);
         if(ObjectFind(buff_str) == -1) {
            ObjectCreate(buff_str, OBJ_HLINE, 0, TimeofMaximum[0][0], TargetPriceUp,TimeofMaximum[1][0], TargetPriceUp);
            ObjectSet(buff_str, OBJPROP_STYLE, STYLE_DOT);
            ObjectSet(buff_str, OBJPROP_COLOR, Blue);
            ObjectSet(buff_str, OBJPROP_WIDTH, 1);
            }
         else {
            ObjectMove(buff_str, 1, TimeofMaximum[0][0], TargetPriceUp);
            ObjectMove(buff_str, 2, TimeofMaximum[1][0], TargetPriceUp);
            }

       }//If Close[shift] > TrendPriceUp[2,1] AND Close[shift+1] <= TrendPriceUp[1,1]

   }//For shift = Bars-1 Downto 1 Begin
//----

   return(0);
  }
//+------------------------------------------------------------------+



Forex Trader
114499
Forex Trader  

Можете соглашаться или нет - дело конечно же Ваше. Вы вырвали часть текста - в данном случае речь идет о линии предложения (верхняя) - алгоритм отбора ТД точек таков, что верхняя линия мождет идти ТОЛЬКО СВЕРХУ ВНИЗ - точки не удовлетворяющие этому условию ТД точками не являются. Тот индикатор, что Вы выложили допускает проведение верхней линии и снизу вверх и сверху вниз. то есть Вы иногда просто неверно строите линию тренда и пропускаете сигналы на вход или работаете по неверным сигналам.
Ваш индюк перепишу (только займусь на выходные - не раньше) - проблема небольшая, только работать по нему не советую, но это дело Ваше конечно же. И еще одна просьба - выложите пожалуйста коды индикаторов, обрамленными тегами для публикации мкл кода - при написании постов есть пояснения - или скиньте на мыло (указано в коде индикатора) - просто не хочется еще и форматированием заниматься, а так будет лучше видна структура программного кода.



Похоже я понял, Владислав, о чем ты говоришь. В выложенном мной индикаторе верхняя (нижняя) линия рисуются и вверх и вниз, но только правильная линия прочерчивается через TD-точки (это соответствует тому, о чем ты говоришь). На ненужную часть линии я не обращаю внимания.
Я выложу здесь свою попытку переписать индикатор. Ты можешь просто подкорректировать мои ошибки. Тебя такое устроит?

//+------------------------------------------------------------------+
//| DMTrendLines&PricesUp.mq4 |
//| Copyright © 2003, Company |
//| |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2003, Company"
#property link "http://www.company.com/"

#property indicator_chart_window
#property indicator_buffers 1
#property indicator_color1 Blue
double ExtMapBuffer1[];
//---- input parameters
double shift, KUp, BUp, n, MinPrice, TargetPriceUp;
double TrendPriceUp[3,2];
double Maximum[3,2];
double TimeofMaximum[3,2];
double shiftofMaximum[3,2];

//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{
//---- indicators
SetIndexStyle(0,DRAW_ARROW);
SetIndexArrow(0,217);
SetIndexBuffer(0,ExtMapBuffer1);
SetIndexEmptyValue(0,0.0);
//----


return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----

//----
return(0);
}

void DelObj()
{
ObjectDelete("UpTrend");
ObjectDelete("TargetPriceUp");

}



//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
int counted_bars=IndicatorCounted();
//----

shift=(Bars-counted_bars)+ Bars-1;
while(shift>=1)
{
TrendPriceUp[1,1] = TrendPriceUp[2,1];
TrendPriceUp[2,1] = KUp*(shift) + BUp;

ExtMapBuffer1[shift]=TrendPriceUp[2,1];

if (High[shift] > High[shift - 1] && High[shift] >= High[shift + 1] //Если точка - максимум, запоминаются
{Maximum[1,1] = Maximum[2,1]; TimeofMaximum[1,1] = TimeofMaximum[2,1]; //его координаты
shiftofMaximum[1,1] = shiftofMaximum[2,1];
shiftofMaximum[2,1] = shift;
Maximum[2,1] = High[shift];
TimeofMaximum[2,1] = Time[shift];

KUp = (Maximum[2,1]-Maximum[1,1])/(shiftofMaximum[2,1]-shiftofMaximum[1,1]); //Вычисляется новый тренд
BUp = Maximum[1,1] - KUp*shiftofMaximum[1,1];

TrendPriceUp[2,1] = KUp*(shift) + BUp;

if (Maximum[1,1] >= Maximum[2,1] //Если тренд вниз,
{for n = shiftofMaximum[1,1];
while(n>=shiftofMaximum[2,1]) //вычисляется цена по новому тренду,
{ //начиная с его начала
TrendPriceUp[2,1] = KUp*(n) + BUp;
ExtMapBuffer1[n]=TrendPriceUp[2,1];
};
};
DelObj();
ObjectCreate("UpTrend",OBJ_TREND,0,TimeofMaximum[1,1], Maximum[1,1], TimeofMaximum[2,1], Maximum[2,1]);
ObjectSet("UpTrend",OBJPROP_COLOR,Blue);
ObjectSet("UpTrend",OBJPROP_WIDTH,1);
ObjectSet("UpTrend",OBJPROP_STYLE,STYLE_SOLID);
//Новый тренд вниз
//прорисовывается
};
};

if (Close[shift] > TrendPriceUp[2,1] && Close[shift+1] <= TrendPriceUp[1,1] //и тренд направлен вниз,
&& TrendPriceUp[1,1] >= TrendPriceUp[2,1] //рассчитывается цена прорыва.
{MinPrice = Low[Lowest(MODE_LOW, shiftofMaximum[1,1], shiftofMaximum[1,1] - shift)]; //Рассчитывается цена прорыва
TargetPriceUp = (TrendPriceUp[2,1] - MinPrice) + TrendPriceUp[2,1];
DelObj();

ObjectCreate("TargetPriceUp"+Mod(shift,1),OBJ_HLINE,0,TimeofMaximum[1,1], TargetPriceUp, TimeofMaximum[2,1], TargetPriceUp);
ObjectSet("TargetPriceUp"+Mod(shift,1),OBJPROP_COLOR,Blue);
ObjectSet("TargetPriceUp"+Mod(shift,1),OBJPROP_WIDTH,1);
ObjectSet("TargetPriceUp"+Mod(shift,1),OBJPROP_STYLE,STYLE_DOT);

};

//----
return(0);
}
//+------------------------------------------------------------------+
Forex Trader
114499
Forex Trader  
Вам повезло - нам на пару часов рубанули интернет - какая-то авария на линии - так что неожиданно появилось время :). Вот один из Ваших индикаторов :




Честно, это не я. :)

Спасибо, сейчас посмотрю..
Forex Trader
114499
Forex Trader  
Так я ведь и говорю в тот момент, когда Вы не обращаете внимания на неправильные точки - Вы одновременно с этим пропускаете правильные. Пример для максимума
1. находим 1-ю локальный экстремум один бар до и один после - считаем первой ТД точкой
2. находим предыдущую сравниваем - предыдущая ниже - то есть не является ТД точкой

что Вы делаете ? - правильно пропускаете.
А что нужно делать - правильно - продолжать поиск до тех пор, пока не найдете ближайший локальный экстремум, удовлетворяющий условиям один до и один после, но имеющий значение БОЛЬШЕ уже выбраного и это и будет новая ТД точка.

Разница по результатам - мы таким образом строим ТД линию, которую Вы просто пропускаете. - Рекомендую посмотрите внимательно коды выложенного мной индикатора.

Удачи.
Forex Trader
114499
Forex Trader  
Вообще, логично. Значит я и прорывы пропускаю, на какое-то время теряю контроль. Так?
Я коды с трудом читаю, далеко не все понимаю, в лучшем случае смысл улавливаю.
С TD-линиями вроде понятно, но я не понимаю как в моем случае считаются прорывы и как в Вашем? В чем разница?


Я подкорректировал перевод, но почему -то линии возможного прорыва не прорисовываются.
Отвечаю на вопрос: "Зачем объявлять реально одномерный массив как 2-мерный ?" Не знаю, но если этого не сделать, то линии не прорисовываются. Встречный вопрос: "Что такое массив физически?"

//+------------------------------------------------------------------+
//| DMTrendLines&PricesUp.mq4 |
//| Copyright © 2003, Company |
//| |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2003, Company"
#property link "http://www.company.com/"

#property indicator_chart_window
#property indicator_buffers 1
#property indicator_color1 Blue
double ExtMapBuffer1[];
//---- input parameters
//Variable : shift(0);
//Variable : KUp(0), BUp(0), n(0),MinPrice(0),TargetPriceUp(0);
//Array : TrendPriceUp[2,1](0);
//Arrays : Maximum[2,1](0), TimeofMaximum[2,1](0), shiftofMaximum[2,1](0);
int shift=0;
double TrendPriceUp[2][1],// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
KUp = 0.0,
BUp = 0.0,
MinPrice = 0.0,
TargetPriceUp = 0.0,
Maximum[2][1];// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
//MaxMinPriceimum[2][1];// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
int n = 0,
shiftofMaximum[2][1];// ???????? зачем объявлять реально одномерный массив как 2-мерный ?

datetime TimeofMaximum[2][1];// ???????? зачем объявлять реально одномерный массив как 2-мерный ?
//string buff_str="";

//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int init()
{int i=0,j=0;
//---- indicators

SetIndexStyle(0,DRAW_LINE);
SetIndexArrow(0,217);
SetIndexBuffer(0,ExtMapBuffer1);
SetIndexEmptyValue(0,0.0);
//----
for( i=0; i<2; i++){
for( j=0; j<1; j++){
TrendPriceUp[i][j]= 0;
Maximum[i][j] = 0;
//MaxMinPriceimum[i][j]= 0;
shiftofMaximum[i][j] = 0;
TimeofMaximum[i][j] = 0;
}
}

return(0);
}
//+------------------------------------------------------------------+
//| Custor indicator deinitialization function |
//+------------------------------------------------------------------+
int deinit()
{
//----
Comment(" ");
ObjectsDeleteAll();
//----
return(0);
}

//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int start()
{
// int counted_bars=IndicatorCounted();
//----
for( shift = Bars-1; shift>= 1;shift--) { //For shift = Bars-1 Downto 1 Begin

TrendPriceUp[0][0] = TrendPriceUp[1][0];

TrendPriceUp[1][0] = KUp*(shift) + BUp;
ExtMapBuffer1[shift] = TrendPriceUp[1][0];//SetIndexValue(shift, TrendPriceUp[2,1]);

if( (High[shift] > High[shift-1]) //Если точка - максимум, запоминаются ее координаты
&& (High[shift] >= High[shift+1])
) {
Maximum[0][0] = Maximum[1][0];

TimeofMaximum[0][0] = TimeofMaximum[1][0];
shiftofMaximum[0][0] = shiftofMaximum[1][0];
shiftofMaximum[1][0] = shift;
Maximum[1][0] = High[shift];
TimeofMaximum[1][0] = Time[shift];


KUp = (Maximum[1][0]-Maximum[0][0])/(shiftofMaximum[1][0]-shiftofMaximum[0][0]);
BUp = Maximum[0][0] - KUp*shiftofMaximum[0][0];

TrendPriceUp[1][0] = KUp*(shift) + BUp;

if( Maximum[0][0] >= Maximum[1][0]) { //Если тренд вниз,

for( n=shiftofMaximum[0][0];n>= shiftofMaximum[1][0];n--){ //Then {For n = shiftofMaximum[1,1] DownTo shiftofMaximum[2,1] Begin вычисляется цена по новому тренду, начиная с его начала
TrendPriceUp[1][0] = KUp*(n) + BUp;
ExtMapBuffer1[n] = TrendPriceUp[1][0];//SetIndexValue(n, TrendPriceUp[2,1]);
}


//MoveObject("UpTrend", OBJ_TRENDLINE, TimeofMaximum[1,1], Maximum[1,1], TimeofMaximum[2,1], Maximum[2,1], Blue, 1, STYLE_SOLID);
//buff_str = "UpTrend";
ObjectCreate("UpTrend", OBJ_TREND, 0, TimeofMaximum[0][0], Maximum[0][0],TimeofMaximum[1][0], Maximum[1][0]);
ObjectSet("UpTrend", OBJPROP_STYLE, STYLE_SOLID);
ObjectSet("UpTrend", OBJPROP_COLOR, Blue);
ObjectSet("UpTrend", OBJPROP_WIDTH, 1); //Новый тренд вниз прорисовывается

}//If Maximum[1,1] >= Maximum[2,1]

}// if High[shift] > High[shift - 1] AND High[shift] >= High[shift + 1]

if( (Close[shift]>TrendPriceUp[1][0])
&& (Close[shift+1] <= TrendPriceUp[0][0])
&& (TrendPriceUp[0][0] >= TrendPriceUp[1][0]) //и тренд направлен вниз, рассчитывается цена прорыва.
) {
MinPrice = Low[Lowest(MODE_LOW, shiftofMaximum[0][0],shiftofMaximum[0][0] - shift)];
TargetPriceUp = (TrendPriceUp[1][0] - MinPrice) + TrendPriceUp[1][0];



//MoveObject("TargetPriceUp"+Mod(shift,1), OBJ_HLINE, TimeofMaximum[1,1], TargetPriceUp, TimeofMaximum[2,1], TargetPriceUp, Blue, 1, STYLE_DOT);
//buff_str = "TargetPriceUp"+DoubleToStr(MathMod(shift,1),5);
ObjectCreate("TargetPriceUp"+DoubleToStr(MathMod(shift,1),5), OBJ_HLINE, 0, TimeofMaximum[0][0], TargetPriceUp,TimeofMaximum[1][0], TargetPriceUp);
ObjectSet("TargetPriceUp"+DoubleToStr(MathMod(shift,1),5), OBJPROP_STYLE, STYLE_DOT);
ObjectSet("TargetPriceUp"+DoubleToStr(MathMod(shift,1),5), OBJPROP_COLOR, Blue);
ObjectSet("TargetPriceUp"+DoubleToStr(MathMod(shift,1),5), OBJPROP_WIDTH, 1);

}//If Close[shift] > TrendPriceUp[2,1] AND Close[shift+1] <= TrendPriceUp[1,1]

}//For shift = Bars-1 Downto 1 Begin



//----
return(0);
}
//+------------------------------------------------------------------+
Forex Trader
114499
Forex Trader  
Я вот тут подумал, а может и не надо искать точку так далеко. Может это уже другая опера. Может большую силу имеют только две последнии вершины, а все остальное история?...
Так я сыграл свое, подождал когда рынок чуть устаканится и вновь за дело...?
Т.е. меня это несколько смущает, хотя кто его знает, только на практике будет видно. Владислав, а ты сам используешь Демарка в своей работе?
Авторизуйтесь или зарегистрируйтесь, чтобы добавить комментарий