/////////////////////////////////////////////////////// // // SaherElm IT Center MQL5 Class Library // ---------------------------------------------- // Name: XADXTD // Description: provides Indicator implementation // requirements ... // // // 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 // // Imports ... #include "../Classes/x-saherelm.xhelper.class.mq5" // // Indicator Buffers ... enum ENUM_XADXTD_BUFFERS { XADXTD_STRENGTH_LINE = 0, // Strenght Buffer ... XADXTD_BULL_LINE = 1, // Bull Buffer ... XADXTD_BEAR_LINE = 2, // Bear Buffer ... }; // // XADXTD Indicator Inputs ... struct XADXTDInputs { // // Props ... int length; // Length // // Constructor ... XADXTDInputs() { Clean(); } // // Tools ... // // Cleanup ... void Clean() { length = 0; } // // Default ... void Default() { length = 21; } // // Validate ... bool IsValid() { // bool result = false; // result = // length > 0 // ; // return result; } // // Retrieve Max Length ... int Max() { // int result = 0; // int values[1] = { length // }; // result = GetMax(values); // return result; } }; // // Define Conditions ... struct XADXTDConditions { // // Common ... string symbol; ENUM_TIMEFRAMES period; datetime time; // // Buffers ... double strength[]; double bullp[]; double bearp[]; // // Conditions ... // bool isStrong; bool isBullish; bool isBearish; bool isSwitchedToBullish; bool isSwitchedToBearish; bool isStrongSwitchedToBullish; bool isStrongSwitchedToBearish; // void Clean() { // Clean(strength); Clean(bullp); Clean(bearp); // ArraySetAsSeries(strength, true); ArraySetAsSeries(bullp, true); ArraySetAsSeries(bearp, true); // isStrong = false; isBullish = false; isBearish = false; isSwitchedToBullish = false; isSwitchedToBearish = false; isStrongSwitchedToBullish = false; isStrongSwitchedToBearish = false; } // void GenerateScore( double &bullishScore, double &bearishScore // ) { // bullishScore = 0; bearishScore = 0; // if (isBullish) { // bullishScore++; if (isStrong) { bullishScore++; } } if (isBearish) { bearishScore++; if (isStrong) { bearishScore++; } } if (isSwitchedToBullish) { bullishScore++; if (isStrong) { bullishScore++; } } if (isSwitchedToBearish) { bearishScore++; if (isStrong) { bearishScore++; } } if (isStrongSwitchedToBullish) { bullishScore++; } if (isStrongSwitchedToBearish) { bearishScore++; } } // string GenerateSummary( bool onlyCommons = false, bool onlyConditions = false, bool includeScores = true, bool ignoreFalseConditions = true, string separator = "\n" // ) { // string result = NULL; // double bullishScore = 0; double bearishScore = 0; GenerateScore( bullishScore, bearishScore // ); // string scoresStr = // "Scores: " + separator + "---------------" + separator + "Bullish: " + ToString(bullishScore) + separator + "Bearish: " + ToString(bearishScore) + separator + "" // ; // string commonStr = GenerateSpecifiedCommonSummary( this, separator, includeScores // ); // string conditionsStr = // ToString("isStrong", isStrong, ignoreFalseConditions, separator) + ToString("isBullish", isBullish, ignoreFalseConditions, separator) + ToString("isBearish", isBearish, ignoreFalseConditions, separator) + ToString("isSwitchedToBullish", isSwitchedToBullish, ignoreFalseConditions, separator) + ToString("isSwitchedToBearish", isSwitchedToBearish, ignoreFalseConditions, separator) + ToString("isStrongSwitchedToBullish", isStrongSwitchedToBullish, ignoreFalseConditions, separator) + ToString("isStrongSwitchedToBearish", isStrongSwitchedToBearish, ignoreFalseConditions, separator) + "" // ; // result = // "[" + GetTag() + "]" + separator + (onlyConditions ? "" : commonStr) + (!includeScores ? "" : scoresStr) + " " + separator + (onlyCommons ? "" : conditionsStr) + "" // ; // return result; } // string GetTag() { return "XADXTD"; } }; // // Class ... class XSCXADXTDHelper : public XSCBaseHelper { // // Public ... public: // // Props ... // // Constructors ... XSCXADXTDHelper() : XSCBaseHelper(_Symbol, _Period) { } // // Deconstructor ... ~XSCXADXTDHelper() {} // // Tools ... bool Init( string symbol, // Trading Symbol ENUM_TIMEFRAMES period, // Trading Period XADXTDInputs &inputs // Inputs ) { // bool result = false; // mSymbol = symbol; mPeriod = period; // result = inputs.IsValid(); if (!result) { return result; } // mInputs = inputs; // ArraySetAsSeries(bullpBuffer, true); ArraySetAsSeries(bearpBuffer, true); ArraySetAsSeries(strengthBuffer, true); // mHandler = iCustom( mSymbol, mPeriod, "x-saherelm.xadxtd", // // Inputs ... mInputs.length // Length // ); result = mHandler != INVALID_HANDLE; if (!result) { return result; } // return result; } // // Inputs ... // XADXTDInputs GetInputs() { return mInputs; } // bool SetInputs( XADXTDInputs &inputs // Configs ) { // return Init( mSymbol, mPeriod, inputs // ); } // // Buffers ... // // Strength ... // double GetStrength( int barIndex // Bar Index ) { // if (barIndex < 0) { barIndex = 0; } // Calculate(); // int count = ArraySize(strengthBuffer); if (barIndex >= count) { barIndex = count - 1; } // return strengthBuffer[barIndex]; } // // Copy Required Items ... int CopyStrength( int start, // Start int count, // Number of Items for read double &buffer[], // Dest Buffer bool forceClean = true // Force To Clean buffer ) { // // Update Calculations ... Calculate(); // // Copy Items ... return Copy( start, count, strengthBuffer, buffer, forceClean // ); } // // BullP ... // double GetBullP( int barIndex // Bar Index ) { // if (barIndex < 0) { barIndex = 0; } // Calculate(); // int count = ArraySize(bullpBuffer); if (barIndex >= count) { barIndex = count - 1; } // return bullpBuffer[barIndex]; } // // Copy Required Items ... int CopyBullP( int start, // Start int count, // Number of Items for read double &buffer[], // Dest Buffer bool forceClean = true // Force To Clean buffer ) { // // Update Calculations ... Calculate(); // // Copy Items ... return Copy( start, count, bullpBuffer, buffer, forceClean // ); } // // BearP ... // double GetBearP( int barIndex // Bar Index ) { // if (barIndex < 0) { barIndex = 0; } // Calculate(); // int count = ArraySize(bearpBuffer); if (barIndex >= count) { barIndex = count - 1; } // return bearpBuffer[barIndex]; } // // Copy Required Items ... int CopyBearP( int start, // Start int count, // Number of Items for read double &buffer[], // Dest Buffer bool forceClean = true // Force To Clean buffer ) { // // Update Calculations ... Calculate(); // // Copy Items ... return Copy( start, count, bearpBuffer, buffer, forceClean // ); } // bool GetConditions( XADXTDConditions &conditions, // int barIndex = 0, // int loopback = 3 // ) { // bool result = true; // if (loopback < 3) { loopback = 3; } // conditions.Clean(); // conditions.symbol = mSymbol; conditions.period = mPeriod; conditions.time = TimeCurrent(); // int zIndex = barIndex; int cIndex = zIndex + 1; int pIndex = cIndex + 1; int ppIndex = pIndex + 1; // // Buffers ... // CopyStrength( zIndex, loopback, conditions.strength // ); // CopyBullP( zIndex, loopback, conditions.bullp // ); // CopyBearP( zIndex, loopback, conditions.bearp // ); // // Calculate Conditions ... // bool isStrong = conditions.strength[cIndex] >= 20; // bool isBullish = conditions.bullp[cIndex] > conditions.bearp[cIndex]; bool isBearish = conditions.bearp[cIndex] > conditions.bullp[cIndex]; // bool isBullishPrev = conditions.bullp[pIndex] > conditions.bearp[pIndex]; bool isBearishPrev = conditions.bearp[pIndex] > conditions.bullp[pIndex]; // bool isSwitchedToBullish = isBullish && !isBullishPrev; bool isSwitchedToBearish = isBearish && !isBearishPrev; // bool isStrongSwitchedToBullish = isStrong && isSwitchedToBullish; bool isStrongSwitchedToBearish = isStrong && isSwitchedToBearish; // conditions.isStrong = isStrong; conditions.isBullish = isBullish; conditions.isBearish = isBearish; conditions.isSwitchedToBullish = isSwitchedToBullish; conditions.isSwitchedToBearish = isSwitchedToBearish; conditions.isStrongSwitchedToBullish = isStrongSwitchedToBullish; conditions.isStrongSwitchedToBearish = isStrongSwitchedToBearish; // return result; } // // Protected ... protected: // // Private ... private: // // Props ... XADXTDInputs mInputs; // Inputs ... // // Buffers ... double bullpBuffer[]; double bearpBuffer[]; double strengthBuffer[]; // // Tools ... // // Calculate Values Until Now ... void Calculate() { // int totalBars = CountBars(); if (totalBars > 1000) { totalBars = 1000; } // // Strength Buffer ... CopyBuffer( mHandler, XADXTD_STRENGTH_LINE, 0, totalBars, strengthBuffer // ); // // BullP Buffer ... CopyBuffer( mHandler, XADXTD_BULL_LINE, 0, totalBars, bullpBuffer // ); // // BearP Buffer ... CopyBuffer( mHandler, XADXTD_BEAR_LINE, 0, totalBars, bearpBuffer // ); } }; //