mirror of
https://github.com/softwaredevelop/mql5.git
synced 2026-08-09 18:40:58 +00:00
162 lines
6.0 KiB
Plaintext
162 lines
6.0 KiB
Plaintext
//+------------------------------------------------------------------+
|
|
//| 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 <MyIncludes\MAMA_Calculator.mqh>
|
|
|
|
//--- 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);
|
|
}
|
|
//+------------------------------------------------------------------+
|
|
//+------------------------------------------------------------------+
|