Indicadores: JFATL
Hola,
¿Existe una versión MT4 de este?
Se lo agradezco .. gracias
Prueba este parche rápido y sucio.
/* * Coloca el archivo SmoothAlgorithms.mqh * en la carpeta terminal_data_folder\MQL5\Include */ //+------------------------------------------------------------------+ //|JFatl.mq4 //|Derechos de autor © 2010, Nikolay Kositsin || //|Khabarovsk, farria@mail.redcom.ru | //+------------------------------------------------------------------+ #property copyright "2010, Nikolay Kositsin" #property link "farria@mail.redcom.ru" #property version "1.00" //---- dibujar el indicador en la ventana principal #property indicator_chart_window //---- se utiliza un búfer para calcular y dibujar el indicador #property indicator_buffers 1 //---- sólo se utiliza una parcela #property indicator_plots 1 //---- dibujar el indicador como una línea #property indicator_type1 DRAW_LINE //---- se utiliza el color azul como color de la línea indicadora #property indicator_color1 Blue //---- la línea indicadora es una curva continua #property indicator_style1 STYLE_SOLID //---- La anchura de la línea indicadora es igual a 2 #property indicator_width1 2 //---- visualización de la etiqueta de la línea indicadora #property indicator_label1 "JFATL" #property strict //+-----------------------------------+ //| Parámetros de entrada del indicador | //+-----------------------------------+ enum Applied_price_ /Tipo de constante { PRICE_CLOSE_ = 1, /PRECIO_CIERRE PRICE_OPEN_, //PRECIO_ABIERTO PRICE_HIGH_, //PRECIO_ALTO PRICE_LOW_, //PRECIO_BAJO PRICE_MEDIAN_, //PRECIO_MEDIO PRICE_TYPICAL_, //PRECIO_TÍPICO PRICE_WEIGHTED_, //PRECIO_PONDERADO PRICE_SIMPLE, //PRECIO_SIMPLE PRICE_QUARTER_, //PRECIO_CUARTO_ PRICE_TRENDFOLLOW0_, //PRICE_TRENDFOLLOW0_ PRICE_TRENDFOLLOW1_ //PRICE_TRENDFOLLOW1_ }; input int JMALength_=5; // Profundidad del alisado JMA input int JMAPhase_=100; // Parámetro de suavizado JMA, //que cambia dentro del rango -100 ... +100 //impacta la calidad del proceso de transición; input Applied_price_ IPC=PRICE_CLOSE_; // Precio constante /* utilizado para el cálculo del indicador (1-CERRAR, 2-ABRIR, 3-ALTO, 4-BAJO, 5-MEDIANO, 6-TÍPICO, 7-PESADO, 8-SIMPLE, 9-CUARTO, 10-TRENDFOLLOW, 11-0,5 * TRENDFOLLOW.) */ input int FATLShift = 0; // Desplazamiento horizontal de FATL en barras input int PriceShift=0; // Desplazamiento vertical de FATL en puntos //---+ //---- declaración e inicialización de una variable para almacenar el número de compases calculados int FATLPeriod=39; //---- declaración de una matriz dinámica que //---- se utilizará como búfer indicador double ExtLineBuffer[]; int start,fstart,FATLSize; double dPriceShift; //+-----------------------------------------------------------+ //| Inicialización de los coeficientes del filtro digital. //+-----------------------------------------------------------+ double FATLTable[]= { +0.4360409450, +0.3658689069, +0.2460452079, +0.1104506886, -0.0054034585, -0.0760367731, -0.0933058722, -0.0670110374, -0.0190795053, +0.0259609206, +0.0502044896, +0.0477818607, +0.0249252327, -0.0047706151, -0.0272432537, -0.0338917071, -0.0244141482, -0.0055774838, +0.0128149838, +0.0226522218, +0.0208778257, +0.0100299086, -0.0036771622, -0.0136744850, -0.0160483392, -0.0108597376, -0.0016060704, +0.0069480557, +0.0110573605, +0.0095711419, +0.0040444064, -0.0023824623, -0.0067093714, -0.0072003400, -0.0047717710, +0.0005541115, +0.0007860160, +0.0130129076, +0.0040364019 }; //+------------------------------------------------------------------+ //| Descripción de la función iPriceSeries()| //| Descripción de la función iPriceSeriesAlert() | //| Descripción de la clase CJJMA| //+------------------------------------------------------------------+ #include <SmoothAlgorithms.mqh> //+------------------------------------------------------------------+ //| Función de inicialización del indicador personalizada | //+------------------------------------------------------------------+ void OnInit() { //---- establece el array dinámico ExtLineBuffer como buffer indicador SetIndexBuffer(0,ExtLineBuffer,INDICATOR_DATA); //---- desplazamiento horizontal del indicador mediante FATLShift PlotIndexSetInteger(0,PLOT_SHIFT,FATLShift); //---- inicialización de variables FATLSize=ArraySize(FATLTable); start=FATLSize+30; //---- realizando el desplazamiento de inicio de dibujo del indicador PlotIndexSetInteger(0,PLOT_DRAW_BEGIN,start); //---- inicialización de una variable para el indicador nombre corto string shortname; StringConcatenate(shortname,"JFATL(",JMALength_," ,",JMAPhase_,")"); //---- crear una etiqueta para mostrar en DataWindow PlotIndexSetString(0,PLOT_LABEL,shortname); //---- creación del nombre que se mostrará en una subventana separada y en un tooltip. IndicatorSetString(INDICATOR_SHORTNAME,shortname); //---- determinación de la precisión de la visualización de los valores de los indicadores IndicatorSetInteger(INDICATOR_DIGITS,_Digits+1); //---- restricción para dibujar valores vacíos para el indicador PlotIndexSetDouble(0,PLOT_EMPTY_VALUE,0.0); //---- inicialización del desplazamiento vertical dPriceShift=_Point*PriceShift; //---- declaración de la variable de la clase CJJMA del fichero SmoothAlgorithms.mqh CJJMA JMA; //---- configuración de alertas para valores inaceptables de variables externas JMA.JJMALengthCheck("Length_", JMALength_); JMA.JJMAPhaseCheck("Phase_", JMAPhase_); //---- } //+------------------------------------------------------------------+ //| Función personalizada de iteración del indicador| //+------------------------------------------------------------------+ int OnCalculate(const int rates_total, // cantidad de historia en barras en el tick actual const int prev_calculated,// número de barras calculado en la llamada anterior const datetime &time[], const double &open[], const double &high[], const double &low[], const double &close[], const long &tick_volume[], const long &volume[], const int &spread[]) { //---- comprobando que el número de barras es suficiente para el cálculo if(rates_total<start) return(0); ArraySetAsSeries(ExtLineBuffer, false); //---- declaraciones de variables locales int first,bar; double jfatl,FATL; //---- cálculo del "primer" índice inicial para el bucle de recálculo de barras if(prev_calculated>rates_total || prev_calculated<=0) // comprobación del primer inicio de cálculo de un indicador { first=FATLPeriod-1; // índice inicial para el cálculo de todas las barras fstart=first; } else first=prev_calculated-1; // índice inicial para el cálculo de nuevas barras //---- declaración de la variable de la clase CJJMA del fichero SmoothAlgorithms.mqh static CJJMA JMA; //---- bucle principal de cálculo del indicador for(bar=first; bar<rates_total; bar++) { //---- fórmula para el filtro FATL FATL=0.0; for(int iii=0; iii<FATLSize; iii++) FATL+=FATLTable[iii]*PriceSeries(IPC,rates_total-(bar-iii)-1,open,low,high,close); //---- una llamada de la función JJMASeries. //---- Los parámetros Fase y Longitud no se modifican en cada compás (Din = 0) jfatl=JMA.JJMASeries(fstart,prev_calculated,rates_total,0,JMAPhase_,JMALength_,FATL,bar,false); //---- inicialización de la celda del buffer indicador por el valor obtenido de FATL ExtLineBuffer[bar]=jfatl+dPriceShift; } //---- return(rates_total); } //+------------------------------------------------------------------+
Está perdiendo oportunidades comerciales:
- Aplicaciones de trading gratuitas
- 8 000+ señales para copiar
- Noticias económicas para analizar los mercados financieros
Registro
Entrada
Usted acepta la política del sitio web y las condiciones de uso
Si no tiene cuenta de usuario, regístrese
JFATL:
El indicador es una combinación del filtro digital FATL y del suavizado adaptable JMA analógico.
Autor: Nikolay Kositsin