Indicadores: AutoFibAutoTrend

Nuevo comentario
 

AutoFibAutoTrend:

El indicador construye el canal de precio y los niveles de Fibonacci en las últimas cimas de ZigZag.

Fig. 1. Indicador AutoFibAutoTrend

Autor: Nikolay Kositsin

 
Automated-Trading:

AutoFibAutoTrend:

Autor: Nikolay Kositsin

¿No existe tal cosa para MT4?
 
russcand:
¿No existe para MT4?
//+------------------------------------------------------------------+
//|AutoFibAutoTrend.mq4
//|zzuegg |
//|cuando-el-dinero-hace-dinero.com
//+------------------------------------------------------------------+
#property copyright "zzuegg"
#property link      "when-money-makes-money.com"

#property indicator_chart_window
extern int period=0;
extern bool ShowFib=true;
extern color FibColor=Red;
extern int   FibSize=1;

extern bool ShowFibFan=true;
extern color FibFanColor=Yellow;
extern int FibFanSize=1;

extern bool ShowTrend=true;
extern color TrendColor=Blue;
extern int TrendSize=5;

string fib1="";
string trend="";
string fibf1="";
//+------------------------------------------------------------------+
//| Función de inicialización del indicador personalizada |
//+------------------------------------------------------------------+
int init()
  {
//----
   fib1="fib1"+period;
   trend="trend1"+period;
   fibf1="fibf1"+period;
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Función personalizada de desinicialización del indicador ||
//+------------------------------------------------------------------+
int deinit()
  {
//----
   ObjectDelete(fib1);
   ObjectDelete(trend);
   ObjectDelete(fibf1);
//----
   return(0);
  }
//+------------------------------------------------------------------+
//| Función de iteración del indicador personalizada |
//+------------------------------------------------------------------+
int start()
  {
//----
   int    counted_bars=IndicatorCounted();
   static datetime curr=0;
   if(curr!=iTime(Symbol(),period,0))
     {
      curr=iTime(Symbol(),period,0);
      ObjectDelete(fib1);
      ObjectDelete(trend);
      double swing_value[4]={0,0,0,0};
      datetime swing_date[4]={0,0,0,0};
      int found=0;
      double tmp=0;
      int i=0;
      while(found<4)
        {
         if(iCustom(Symbol(),period,"ZigZag",12,5,3,0,i)!=0)
           {
            swing_value[found]=iCustom(Symbol(),period,"ZigZag",12,5,3,0,i);
            swing_date[found]=iTime(Symbol(),period,i);
            found++;
           }
         i++;
        }
      ObjectDelete(trend);
      if(ShowTrend)
        {
         ObjectCreate(trend,OBJ_CHANNEL,0,swing_date[3],swing_value[3],swing_date[1],swing_value[1],swing_date[2],swing_value[2]);
         ObjectSet(trend,OBJPROP_COLOR,TrendColor);
         ObjectSet(trend,OBJPROP_WIDTH,TrendSize);
        }
      ObjectDelete(fib1);
      if(ShowFib)
        {
         ObjectCreate(fib1,OBJ_FIBO,0,swing_date[2],swing_value[2],swing_date[1],swing_value[1]);
         ObjectSet(fib1,OBJPROP_LEVELCOLOR,FibColor);
         ObjectSet(trend,OBJPROP_LEVELWIDTH,FibSize);
        }
      ObjectDelete(fibf1);
      if(ShowFibFan)
        {
         ObjectCreate(fibf1,OBJ_FIBOFAN,0,swing_date[2],swing_value[2],swing_date[1],swing_value[1]);
         ObjectSet(fibf1,OBJPROP_LEVELCOLOR,FibFanColor);
         ObjectSet(fibf1,OBJPROP_LEVELWIDTH,FibFanSize);
        }
     }

   Comment("Support us, donate on this website: www.when-money-makes-money.com/download");
//----
   return(0);
  }
//+------------------------------------------------------------------+
 
Nikolay Kositsin:
Gracias. Le echaré un vistazo.
 
Y puede resaltar en color la línea que une los puntos ZigZag, a partir de la cual se construye el FIBO.
 
russcand:
Y puedes resaltar el color de la línea que conecta los puntos ZigZag, a partir de los cuales se construye el FIBO.

Puedes hacer cualquier cosa, pero yo no edito pequeños detalles, ¡sólo Freelance puede ayudar!

Nuevo comentario