//+------------------------------------------------------------------+ //| MAMA_MTF_Pro.mq5| //| Copyright 2025, xxxxxxxx| //| | //+------------------------------------------------------------------+ #property copyright "Copyright 2025, xxxxxxxx" #property version "2.00" // REFACTORED: Self-contained calculation, no iCustom dependency #property description "Multi-Timeframe (MTF) version of John Ehlers' MAMA and FAMA." #property description "Displays MAMA/FAMA from a higher timeframe on the current chart." #property indicator_chart_window #property indicator_buffers 2 #property indicator_plots 2 //--- Plot 1: MAMA #property indicator_label1 "MAMA MTF" #property indicator_type1 DRAW_LINE #property indicator_color1 clrRed #property indicator_style1 STYLE_SOLID #property indicator_width1 2 //--- Plot 2: FAMA #property indicator_label2 "FAMA MTF" #property indicator_type2 DRAW_LINE #property indicator_color2 clrBlue #property indicator_style2 STYLE_SOLID #property indicator_width2 2 #include //--- Input Parameters --- input ENUM_TIMEFRAMES InpUpperTimeframe = PERIOD_M30; // Timeframe for MAMA calculation input double InpFastLimit = 0.5; // Fast Limit for Alpha input double InpSlowLimit = 0.05; // Slow Limit for Alpha input ENUM_APPLIED_PRICE_HA_ALL InpSourcePrice = PRICE_CLOSE_STD; //--- Indicator Buffers --- double BufferMAMA_MTF[]; double BufferFAMA_MTF[]; //--- Global calculator object --- CMAMACalculator *g_calculator; //+------------------------------------------------------------------+ int OnInit() { //--- Ensure the selected timeframe is higher than the current one if(InpUpperTimeframe <= Period()) { Print("Error: The selected timeframe must be higher than the current chart timeframe."); return(INIT_FAILED); } SetIndexBuffer(0, BufferMAMA_MTF, INDICATOR_DATA); SetIndexBuffer(1, BufferFAMA_MTF, INDICATOR_DATA); ArraySetAsSeries(BufferMAMA_MTF, false); ArraySetAsSeries(BufferFAMA_MTF, false); PlotIndexSetDouble(0, PLOT_EMPTY_VALUE, EMPTY_VALUE); PlotIndexSetDouble(1, PLOT_EMPTY_VALUE, EMPTY_VALUE); // --- Create an instance of our own calculator --- if(InpSourcePrice <= PRICE_HA_CLOSE) { g_calculator = new CMAMACalculator_HA(); } else { g_calculator = new CMAMACalculator(); } if(CheckPointer(g_calculator) == POINTER_INVALID || !g_calculator.Init(InpFastLimit, InpSlowLimit)) { Print("Failed to create or initialize MAMA Calculator object."); return(INIT_FAILED); } IndicatorSetString(INDICATOR_SHORTNAME, StringFormat("MAMA MTF(%s)", EnumToString(InpUpperTimeframe))); PlotIndexSetInteger(0, PLOT_DRAW_BEGIN, 50); PlotIndexSetInteger(1, PLOT_DRAW_BEGIN, 50); IndicatorSetInteger(INDICATOR_DIGITS, _Digits); return(INIT_SUCCEEDED); } //+------------------------------------------------------------------+ void OnDeinit(const int reason) { if(CheckPointer(g_calculator) != POINTER_INVALID) delete g_calculator; } //+------------------------------------------------------------------+ int OnCalculate(const int rates_total, const int, 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[]) { if(rates_total < 2 || CheckPointer(g_calculator) == POINTER_INVALID) return 0; // 1. Get the number of bars on the higher timeframe int htf_rates_total = (int)SeriesInfoInteger(_Symbol, InpUpperTimeframe, SERIES_BARS_COUNT); if(htf_rates_total < 50) // MAMA warmup period { return 0; // Not enough data on HTF yet } // 2. Copy all necessary data from the higher timeframe datetime htf_time[]; double htf_open[], htf_high[], htf_low[], htf_close[]; if(CopyTime(_Symbol, InpUpperTimeframe, 0, htf_rates_total, htf_time) <= 0 || CopyOpen(_Symbol, InpUpperTimeframe, 0, htf_rates_total, htf_open) <= 0 || CopyHigh(_Symbol, InpUpperTimeframe, 0, htf_rates_total, htf_high) <= 0 || CopyLow(_Symbol, InpUpperTimeframe, 0, htf_rates_total, htf_low) <= 0 || CopyClose(_Symbol, InpUpperTimeframe, 0, htf_rates_total, htf_close) <= 0) { return 0; // Data not fully ready } // 3. Calculate MAMA/FAMA on the higher timeframe data double htf_mama_buffer[], htf_fama_buffer[]; ArrayResize(htf_mama_buffer, htf_rates_total); ArrayResize(htf_fama_buffer, htf_rates_total); ENUM_APPLIED_PRICE price_type; if(InpSourcePrice <= PRICE_HA_CLOSE) price_type = (ENUM_APPLIED_PRICE)(-(int)InpSourcePrice); else price_type = (ENUM_APPLIED_PRICE)InpSourcePrice; g_calculator.Calculate(htf_rates_total, price_type, htf_open, htf_high, htf_low, htf_close, htf_mama_buffer, htf_fama_buffer); // 4. Map the higher timeframe data to the current chart's bars ArraySetAsSeries(htf_mama_buffer, true); ArraySetAsSeries(htf_fama_buffer, true); ArraySetAsSeries(htf_time, true); ArraySetAsSeries(time, true); ArraySetAsSeries(BufferMAMA_MTF, true); ArraySetAsSeries(BufferFAMA_MTF, true); for(int i = 0; i < rates_total; i++) { int htf_bar_shift = iBarShift(_Symbol, InpUpperTimeframe, time[i]); if(htf_bar_shift < htf_rates_total && htf_bar_shift >= 0) { BufferMAMA_MTF[i] = htf_mama_buffer[htf_bar_shift]; BufferFAMA_MTF[i] = htf_fama_buffer[htf_bar_shift]; } else { BufferMAMA_MTF[i] = EMPTY_VALUE; BufferFAMA_MTF[i] = EMPTY_VALUE; } } // Restore arrays to non-timeseries for stability ArraySetAsSeries(BufferMAMA_MTF, false); ArraySetAsSeries(BufferFAMA_MTF, false); ArraySetAsSeries(time, false); return(rates_total); } //+------------------------------------------------------------------+ //+------------------------------------------------------------------+