/////////////////////////////////////////////////////////////////////////////
//
// SaherElm IT Center MQL5 XAMA Indicator Helper for Signal Providers
// --------------------------------------------------------------------------
//
// Maintainer:
// ------------
// Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com)
//
/////////////////////////////////////////////////////////////////////////////
//
// Global Properties ...
#property library
#property copyright "Copyright 2023, SaherElm IT Center"
#property link "https://www.saherelm.ir"
#property version "1.00"
#property strict

//
// Includes ...
#include "..\Libraries\x-saherelm.log.lib.mq5"
#include "..\Libraries\x-saherelm.common.lib.mq5"

//
// START Enum Definitions ...
//

//
// END Enum Definitions ...
//

//
// START Inputs ...
//

input group "XAMA Indicator";

//
input int xAMALength = 18;                            // Market Length
input int xAMAFastEMA = 2;                            // Fast EMA Period
input int xAMASlowEMA = 30;                           // Slow EMA Period
input int xAMAShift = 0;                              // Shift
input ENUM_APPLIED_PRICE xAMAAppliedTo = PRICE_CLOSE; // Applied To

//
// END Inputs ...
//

//
// START Definitions ...
//

int xAMAHandler = INVALID_HANDLE;
double xAMABuffer[];

//
// END Definitions ...
//

//
// START Handler Functions ...
//

//
// Validate Inputs ...
bool XAMAValidateInputs()
{
    //
    bool result = false;

    //
    result =
        xAMALength > 2 &&
        xAMAFastEMA < xAMALength &&
        xAMAFastEMA < xAMASlowEMA &&
        xAMAShift >= 0;

    //
    if (!result)
    {
        //
        LogMessage("XAMA Indicator Inputs Validation Failed ...");
    }

    //
    return result;
}

//
// Init Indicators ...
bool XAMAInitHandlers()
{
    //
    bool result = false;

    //
    // Initialize Indicator/Indicator Handlers ...
    ResetLastError();

    //
    // XAMA Handler ...
    ArraySetAsSeries(xAMABuffer, true);
    xAMAHandler = iCustom(
        _Symbol,
        _Period,
        "x-saherelm.xama.indicator",
        //
        // Inputs ...
        xAMALength,
        xAMAFastEMA,
        xAMASlowEMA,
        xAMAShift,
        xAMAAppliedTo
        //
    );
    if (xAMAHandler == INVALID_HANDLE)
    {
        //
        LogMessage("failed to Initialize XAMA Indicator: " + (string)GetLastError());
        return result;
    }

    //
    result = true;

    //
    return result;
}

//
// Release Indicators ...
void XAMAReleaseHandlers()
{
    IndicatorRelease(xAMAHandler);
}

//
// Handle Reading Buffers ...
void XAMAReadBuffers(
    int xAMAItemsPerTick // Number Of Reading Buffer Items Per Tick
)
{
    //
    // XAMA Signal ...
    CopyBuffer(
        xAMAHandler,
        0,
        0,
        xAMAItemsPerTick,
        xAMABuffer);
}

//
// END Handler Funcions ...
//

//
// START XAMA Custom Functions ...
//

//
// Check SC is Peak ...
bool XAMAIsPeak(
    int bar_index,  // Specified Index ...
    int length = 10 // Specified Length ...
)
{
    //
    bool result = false;

    //
    if (
        length <= 0 ||
        bar_index <= 0 ||
        !XAMAIsValidBuffersSize(bar_index + length + 1))
    {
        return result;
    }

    //
    // Must Decreasing ...
    bool isIncreasing = IsIncreasing(
        bar_index + length,
        bar_index,
        xAMABuffer
        //
    );

    //
    return result;
}

//
// Check SC is Vale ...
bool XAMAIsVale(
    int bar_index,  // Specified Index ...
    int length = 10 // Specified Length ...
)
{
    //
    bool result = false;

    //
    if (
        length <= 0 ||
        bar_index <= 0 ||
        !XAMAIsValidBuffersSize(bar_index + length + 1))
    {
        return result;
    }

    //
    result = IsDecreasing(
        bar_index + length,
        bar_index,
        xAMABuffer
        //
    );

    //
    return result;
}

//
// Check all Buffers has valid Size ...
bool XAMAIsValidBuffersSize(
    int size // the size of buffers which min size for requirements
)
{
    //
    bool result = false;

    //
    if (
        size <= 0 ||
        //
        ArraySize(xAMABuffer) < size
        //
    )
    {
        result = false;
    }
    else
    {
        result = true;
    }

    //
    return result;
}

//
// END XAMA Custom Functions ...
//