/////////////////////////////////////////////////////// // // SaherElm IT Center XTest MQL5 Expert Advisor // ------------------------------------------------- // Name: XBackTester // Description: a Backtest Tools Strategy Tester // // Maintainer: // ------------ // Hadi Khazaee Asl (hadi_khazaee_asl@yahoo.com) // //////////////////////////////////////////////////////x // // Global Properties ... #property copyright "Copyright 2023, SaherElm IT Center" #property link "https://saherelm.ir" #property version "1.00" #property description "SaherElm XBackTester" #property icon "../Images/SaherElm_Logo_Color.ico" #property strict // #define ShortName "XBackTester" // // Imports ... #include "../Classes/x-saherelm.x-backtester.expert.class.mq5" #include "../Classes/x-saherelm.x-market.pattern.class.mq5" #include "../Classes/x-saherelm.x-poi.drawer.class.mq5" #include "../XFIMAEA/Classes/x-saherelm.xfima.signaller.class.mq5" // // Definitions ... // // Inputs ... // // Common ... input group "Common"; input long eaMagicNumber = 78692110; // Magic Number input int eaSlippage = 10; // Slippgae input string eaLogSuffix = ""; // Log Suffix // // Alert ... // Here we Provider All Requirements for // Configuring Alert Provider ... input group "Alert"; input bool eaEnableAlerts = true; // Enable Alerts input bool eaLogAlerts = true; // Log Alerts input bool eaMailAlerts = false; // Mail Alerts input bool eaPushAlerts = false; // Push Alerts input bool eaTerminalAlerts = false; // Terminal Alerts // input group "Configuration"; input bool eaProcessAllTicks = false; // Process All Ticks input double eaSignallerR2R = 2.0; // Risk To Reward Ratio input double eaSignallerVolume = 0.01; // Default Volume input double eaSignallerRiskInPoint = 50; // Default Risk In Point // // Indicator Inputs ... // input group "Calculation"; // // Short ... input ENUM_X_PERIOD_METHOD scMethod = X_PERIOD_AUTO; // How to Find Short Period input ENUM_TIMEFRAMES scPeriod = NULL; // Short Period // // Medium ... input ENUM_X_PERIOD_METHOD mcMethod = X_PERIOD_AUTO; // How to Find Medium Period input ENUM_TIMEFRAMES mcPeriod = NULL; // Medium Period // // Long ... input ENUM_X_PERIOD_METHOD lcMethod = X_PERIOD_AUTO; // How to Find Long Period input ENUM_TIMEFRAMES lcPeriod = NULL; // Long Period // // Hind ... input ENUM_X_PERIOD_METHOD hcMethod = X_PERIOD_AUTO; // How to Find Hind Period input ENUM_TIMEFRAMES hcPeriod = NULL; // Hind Period // // PV ... input ENUM_SERIESMODE upperMode = MODE_HIGH; // Peak Method input ENUM_SERIESMODE lowerMode = MODE_LOW; // Vale Method // // Others ... input ENUM_X_FIBO_LEVELS fiboUpperZoneLevel = X_FIBO_LEVEL_382; // Upper Zone Level input ENUM_X_FIBO_LEVELS fiboMiddleZoneLevel = X_FIBO_LEVEL_500; // Middle Zone Level input ENUM_X_FIBO_LEVELS fiboLowerZoneLevel = X_FIBO_LEVEL_618; // Lower Zone Level input double sarStep = 0.02; // SAR Step input double sarMax = 0.2; // SAR Maximum input ENUM_MA_METHOD maMethod = MODE_EMA; // MA Method input ENUM_APPLIED_PRICE maAppliedTo = PRICE_CLOSE; // MA Applied To input int maFastLength = 7; // Fast MA Length input int maSlowLength = 20; // Slow MA Length input int maBandLength = 7; // MA Band Length input int zigzagDepth = 12; // ZigZag Depth input int zigzagDeviation = 5; // ZigZag Deviation input int zigzagBackStep = 3; // ZigZag Back Step input ENUM_X_PRICE zigzagUppersMode = X_PRICE_HIGH; // ZigZag High Detect Mode input ENUM_X_PRICE zigzagLowersMode = X_PRICE_LOW; // ZigZag Low Detect Mode // input group "Bar Timer"; input int barTimeFontSize = 10; // Font Size input string barTimeFont = "Arial"; // Font input color barTimeColor = clrYellow; // Text Color input ENUM_BASE_CORNER barTimeCorner = CORNER_RIGHT_LOWER; // Text Position // // Presentation ... input group "Presentation"; input bool showPV = true; // Show PV input bool showSAR = true; // Show Sar input bool showMAFast = true; // Show MA Fast input bool showMASlow = true; // Show MA Slow input bool showMABand = true; // Show MA Band input bool showBarTime = true; // Show Bar Time input bool showZigZag = true; // Show ZigZag input bool showFiboZone = true; // Show Fibo Zone // input int startCalculationForLastBars = 1500; // Calculate Last n Bars // input int sarArrowCode = 159; // Parabolic Sar Arrow Code input int peakArrowCode = 159; // Peaks Arrow Code input int valeArrowCode = 159; // Vales Arrow Code // // Define Local Variables ... // // Requirements ... string eaLogTag; // EA Log Prefix ... XCBackTesterEA *eaExpert; // EA Expert ... XCXFIMAPOIDetector *fimaPOIDetector; // EA Fima POI Detector ... XCMarketPatternDetector *eaPatternDetector; // EA Pattern Detector ... // // Registered Signallers ... XCXFIMAStrategy1Signaller *fima1Signaller; // XFIMA1 Signaller ... XCXFIMAStrategy2Signaller *fima2Signaller; // XFIMA2 Signaller ... // // Drawer and Draws ... XCPOIDrawer *eaDrawer; // Ea POI Drawer ... CArrayObj draws; // Drawn Objects ... // XBarTracker eaBarTracker; // EA Bar Traker ... // // Registered Handlers ... int eaCTHandler = INVALID_HANDLE; // Candle Timer Handler ... // bool eaIsNewBar; // Check New Bar ... ENUM_X_DIRECTION trendDir = X_DIRECTION_NONE; // // Define Indicators Here ... // // Event Handlers ... // // Initialization ... int OnInit() { // // Preparing Tags ... string eaTag = (IsValid(eaLogSuffix) ? eaLogSuffix + "_" : "") + ShortName; // // Validate Inputs and Required Parameters // for EA to Works fine ... if (!ValidateInputs()) { return INIT_PARAMETERS_INCORRECT; } // // Initialize Timer ... if (!InitTimer()) { return INIT_FAILED; } // // Configure EA Expert Class ... eaExpert = new XCBackTesterEA(); // // Symbol / Period ... eaExpert.symbol = _Symbol; eaExpert.period = _Period; // // Common ... eaExpert.eaMagicNumber = eaMagicNumber; eaExpert.eaSlippage = eaSlippage; eaExpert.eaLogSuffix = eaTag; // // Alert ... eaExpert.eaEnableAlerts = eaEnableAlerts; eaExpert.eaLogAlerts = eaLogAlerts; eaExpert.eaMailAlerts = eaMailAlerts; eaExpert.eaPushAlerts = eaPushAlerts; eaExpert.eaTerminalAlerts = eaTerminalAlerts; // // Attach Event Handlers ... eaExpert.AddOnDealsChangedEventHandler(OnDealsChanged); eaExpert.AddOnStopLossEventHandler(OnStopLossTriggered); eaExpert.AddOnOrdersChangedEventHandler(OnOrdersChanged); eaExpert.AddOnTakeProfitEventHandler(OnTakeProfitTriggered); eaExpert.AddOnModifyPositionEventHandler(OnPositionModified); eaExpert.AddOnPositionsChangedEventHandler(OnPositionsChanged); eaExpert.AddOnTradeStateChangedEventHandler(OnTradeStateChanged); eaExpert.AddOnForceClosePositionEventHandler(OnPositionForceClosed); eaExpert.AddOnPartialClosePositionEventHandler(OnPositionPartialClosed); // // Configure Other Requirements ... eaExpert.allowedTPSLStep = 10; eaExpert.minAllowedRiskInPoint = 20; eaExpert.volume = eaSignallerVolume; eaExpert.riskToRewardRatio = eaSignallerR2R; eaExpert.riskInPoint = eaSignallerRiskInPoint; // // Try to Initialize eaExpert ... bool isInited = eaExpert.HandleOnInit(); if (!isInited) { // Print(ShortName, ": Initialization Failed ..."); return INIT_FAILED; } // // Here Instantiate Signaller Class ... // // Preparing Indicator Inputs ... XFIMAInputs fimaInputs; // // This is Default Configuration ... fimaInputs.Default(); fimaInputs.Hide(); fimaInputs.showZigZag = true; // // Here we Attach Inputs to Indicator ... fimaInputs.scMethod = scMethod; fimaInputs.scPeriod = scPeriod; fimaInputs.mcMethod = mcMethod; fimaInputs.mcPeriod = mcPeriod; fimaInputs.lcMethod = lcMethod; fimaInputs.lcPeriod = lcPeriod; fimaInputs.hcMethod = hcMethod; fimaInputs.hcPeriod = hcPeriod; fimaInputs.upperMode = upperMode; fimaInputs.lowerMode = lowerMode; fimaInputs.fiboUpperZoneLevel = fiboUpperZoneLevel; fimaInputs.fiboMiddleZoneLevel = fiboMiddleZoneLevel; fimaInputs.fiboLowerZoneLevel = fiboLowerZoneLevel; fimaInputs.sarStep = sarStep; fimaInputs.sarMax = sarMax; fimaInputs.maMethod = maMethod; fimaInputs.maAppliedTo = maAppliedTo; fimaInputs.maFastLength = maFastLength; fimaInputs.maSlowLength = maSlowLength; fimaInputs.maBandLength = maBandLength; fimaInputs.zigzagDepth = zigzagDepth; fimaInputs.zigzagDeviation = zigzagDeviation; fimaInputs.zigzagBackStep = zigzagBackStep; fimaInputs.zigzagUppersMode = zigzagUppersMode; fimaInputs.zigzagLowersMode = zigzagLowersMode; fimaInputs.showPV = showPV; fimaInputs.showSAR = showSAR; fimaInputs.showMAFast = showMAFast; fimaInputs.showMASlow = showMASlow; fimaInputs.showMABand = showMABand; fimaInputs.showZigZag = showZigZag; fimaInputs.showFiboZone = showFiboZone; fimaInputs.startCalculationForLastBars = startCalculationForLastBars; fimaInputs.sarArrowCode = sarArrowCode; fimaInputs.peakArrowCode = peakArrowCode; fimaInputs.valeArrowCode = valeArrowCode; // // Instantiate Signaller ... // // XFIMA1 Signaller ... fima1Signaller = new XCXFIMAStrategy1Signaller( _Symbol, _Period, fimaInputs, eaProcessAllTicks, // Process All Ticks ... eaSignallerR2R, // Signaller Risk to Reward Ratio ... eaSignallerRiskInPoint, // Default Risk In Points ... eaSignallerVolume // Defaul Volume ... ); fima1Signaller.AddOnSignalEventHandler(OnSignalTriggered); // // XFIMA2 Signaller ... fima2Signaller = new XCXFIMAStrategy2Signaller( _Symbol, _Period, fimaInputs, eaProcessAllTicks, // Process All Ticks ... eaSignallerR2R, // Signaller Risk to Reward Ratio ... eaSignallerRiskInPoint, // Default Risk In Points ... eaSignallerVolume // Defaul Volume ... ); fima2Signaller.AddOnSignalEventHandler(OnSignalTriggered); // isInited = fima1Signaller.IsValid() && fima2Signaller.IsValid(); if (!isInited) { // Print(ShortName, ": Initialization Failed ..."); return INIT_FAILED; } // // Initialize Candle Timer Handler ... eaCTHandler = iCustom( _Symbol, _Period, "x-saherelm.x121.xct", // // Inputs ... barTimeFontSize, // Font Size ... barTimeFont, // Font ... barTimeColor, // Text Color ... barTimeCorner, // Text Position ... // // Presentation ... "", showBarTime // Show Candle Time // ); isInited = eaCTHandler != INVALID_HANDLE; if (!isInited) { // Print(ShortName, ": Initialization Failed ..."); return INIT_FAILED; } // // Initialize Bar Tracker ... isInited = eaBarTracker.Init( _Symbol, _Period // ); if (!isInited) { // Print(ShortName, ": Initialization Failed ..."); return INIT_FAILED; } // // Instantiate Market Pattern Detector ... eaPatternDetector = new XCMarketPatternDetector(); // fimaPOIDetector = new XCXFIMAPOIDetector(); // // Instantiate POI Drawer ... eaDrawer = new XCPOIDrawer(); // Print(ShortName, ": Initialized Successfully ..."); return INIT_SUCCEEDED; } // // DeInitialization ... void OnDeinit(const int reason) { // // REASON_PROGRAM 0 The EA has stopped working calling the ExpertRemove() function // REASON_REMOVE 1 Program removed from a chart // REASON_RECOMPILE 2 Program recompiled // REASON_CHARTCHANGE 3 A symbol or a chart period is changed // REASON_CHARTCLOSE 4 Chart closed // REASON_PARAMETERS 5 Inputs changed by a user // REASON_ACCOUNT 6 Another account has been activated or reconnection to the trade server has occurred due to changes in the account settings // REASON_TEMPLATE 7 Another chart template applied // REASON_INITFAILED 8 The OnInit() handler returned a non-zero value // REASON_CLOSE 9 Terminal closed // // Destroy Timer ... eaExpert.HandleOnDeInit(); // // De Init Indicator ... IndicatorRelease(eaCTHandler); // eaBarTracker.Clean(); // delete eaDrawer; ZeroMemory(eaDrawer); // delete eaPatternDetector; ZeroMemory(eaPatternDetector); // delete fima1Signaller; ZeroMemory(fima1Signaller); // delete fima2Signaller; ZeroMemory(fima2Signaller); // delete fimaPOIDetector; ZeroMemory(fimaPOIDetector); // delete eaExpert; ZeroMemory(eaExpert); } // // On Tick Handler ... void OnTick() { // eaIsNewBar = eaBarTracker.IsNewBar(); bool canProcess = eaProcessAllTicks ? true : eaIsNewBar; // eaExpert.HandleOnTick(); // if (!canProcess) { return; } // DetectPatterns(); // // fima1Signaller.OnTick(); fima2Signaller.OnTick(); } // // Handle On Trade Event ... void OnTrade() { eaExpert.HandleOnTrade(); } // // On Timer ... void OnTimer() { eaExpert.HandleOnTimer(); } // // Chart Event Handler ... void OnChartEvent( const int id, const long &lparam, const double &dparam, const string &sparam // ) { eaExpert.HandleOnChartEvent(id, lparam, dparam, sparam); } // // Custom Functions ... /** * Validate all Inputs of Expert Adviser ... * * @return ( bool ) */ bool ValidateInputs() { // bool result = false; // string errMessage = ""; // bool isCommonValid = ( // eaSlippage > 0 && eaMagicNumber > 0 && // // Indicator Inputs ... // // MA ... maFastLength >= 2 && maSlowLength >= 2 && maSlowLength > maFastLength && // // SAR ... sarMax > 0 && sarStep > 0 && sarMax > sarStep && // // CYCLES ... (IsValid(scMethod, scPeriod) && IsValid(mcMethod, mcPeriod) && IsValid(lcMethod, lcPeriod) && IsValid(hcMethod, hcPeriod)) && // // ZIGZAG ... zigzagDepth > 0 && zigzagDeviation > 0 && zigzagBackStep > 0 && // // Validate Upper Mode Detection ... IsXValid(zigzagUppersMode) && // // Validate Lower Mode Detection ... IsXValid(zigzagLowersMode) // ); if (!isCommonValid) { // errMessage += "common configurations error;" + "\n"; } // result = // // Common ... isCommonValid && // // Otere ... true // ; // if (!result) { // // Since here Logger not Initiallized, we Use Raw Print Command ... Print(ShortName + " Errors: \n", errMessage); } // return result; } /** * Initialize Timer ... * * @return ( bool ) */ bool InitTimer() { // bool result = false; // // TODO: Initialize Timer if necessary ... // result = EventSetTimer(1); // result = EventSetMillisecondTimer(100); result = true; // return result; } /** * Destroy Timer ... */ void DestroyTimer() { // // TODO: Use This ... // EventKillTimer(); } /** * Trigger OnSignal Event ... * * @param signal: XSignal */ void OnSignalTriggered(XSignal &signal) { // // Validate Signal ... if (!signal.IsValid()) { return; } // // Draw Signal Vertical Line ... // CChartObjectVLine *iObj = new CChartObjectVLine(); // string iName = signal.GetTag(); color iColor = IsLong(signal.type) ? clrLime : clrRed; // bool has = iObj.Create( eaDrawer.ChartIdentification(), iName, eaDrawer.SubWindowIdentification(), signal.time // ); if (has) { // iObj.Width(2); iObj.Color(iColor); // draws.Add(iObj); } // // Alert Issued Signal ... string message = signal.GetMessage(); } // // Trade Event Handlers ... /** * Handle StopLoss Triggered Positions ... * * @param deal: XDeal instance ... */ void OnStopLossTriggered(const XDeal &deal) { eaExpert.HandleOnStopLossTriggered(deal); } /** * Handle Take Profit Triggered Positions ... * * @param deal: XDeal instance ... */ void OnTakeProfitTriggered(const XDeal &deal) { eaExpert.HandleOnTakeProfitTriggered(deal); } /** * Handle Force Close a Position ... * * @param ticket: ULONG ... * @param position: XPosition instance ... * @param comment: String ... */ void OnPositionForceClosed( const ulong ticket, const XPosition &position, const string comment // ) { // eaExpert.HandleOnPositionForceClosed( ticket, position, comment // ); } /** * Handle Deals Changes ... * * @param count: Integer, Number of Changes ... */ void OnDealsChanged(int count) { eaExpert.HandleOnDealsChanged(count); } /** * Handle Orders Changes ... * * @param count: Integer, Number of Changes ... */ void OnOrdersChanged(int count) { eaExpert.HandleOnOrdersChanged(count); } /** * Handle Positions Changes ... * * @param count: Integer, Number of Changes ... */ void OnPositionsChanged(int count) { eaExpert.HandleOnPositionsChanged(count); } /** * Handle Position Modified ... * * @param ticket: ulong, Position Ticket ... * @param profit: double, Position Profit ... * @param comment: string, Comment ... */ void OnPositionModified( const ulong ticket, const double profit, const string comment // ) { // eaExpert.HandleOnPositionModified( ticket, profit, comment // ); } /** * Handle Position Partial Closed ... * * @param ticket: ulong, Position Ticket ... * @param profit: double, Position Profit ... * @param comment: string, Comment ... */ void OnPositionPartialClosed( const ulong ticket, const double profit, const string comment // ) { // eaExpert.HandleOnPositionPartialClosed( ticket, profit, comment // ); } /** * Handle Trade State Changed ... * * @param state: XOnTradeHandlerState instance ... */ void OnTradeStateChanged(const XOnTradeHandlerState &state) { eaExpert.HandleOnTradeStateChanged(state); } /** * Check Market Conditions for Pattern Detection ... */ void DetectPatterns() { // if (!eaIsNewBar) { return; } // // Initialize 1 Indexed Bar ... XOHCL cBar; bool has = cBar.Init( _Symbol, _Period, 1 // ); if (!has) { return; } // // Do Analysis ... // ENUM_X_DIRECTION iDir = X_DIRECTION_NONE; // // Define Detection Flags ... // bool detectPinned = false; bool detectMomentum = false; bool detectEngulfed = false; bool detectTrueGaped = false; // bool detectStarPattern = false; bool detectFlagPattern = false; bool detectRisingPattern = false; bool detectPiercingPattern = false; bool detectSignalKeyBarPattern = false; // bool detectSwingTrend = false; bool detectSwingTrendBreakes = false; // bool detectSupports = true; bool detectResistance = true; // // XFIMA Patetrns ... bool detectFIMAPatterns = true; bool detectZIGZAGPatterns = true; // // Checking Momentum Bar ... if (detectMomentum) { // bool isMomentum = eaPatternDetector.IsMomentumBar( cBar, iDir // ); bool isBullishMomentum = isMomentum && IsSpecifiedBullish(iDir); bool isBearishMomentum = isMomentum && IsSpecifiedBearish(iDir); if (isMomentum) { Print(ToXString(iDir), " Momentum Bar: ", cBar.time); } } // // Checking Engulfed Bar ... if (detectEngulfed) { // bool isEngulfed = eaPatternDetector.IsEngulfedBar( cBar, iDir // ); bool isBullishEngulfed = isEngulfed && IsSpecifiedBullish(iDir); bool isBearishEngulfed = isEngulfed && IsSpecifiedBearish(iDir); if (isEngulfed) { Print(ToXString(iDir), " Engulfed Bar: ", cBar.time); } } // // Checking TruGaped Bar ... if (detectTrueGaped) { // bool isTrueGaped = eaPatternDetector.IsTrueGapedBar( cBar, iDir // ); bool isBullishTrueGaped = isTrueGaped && IsSpecifiedBullish(iDir); bool isBearishTrueGaped = isTrueGaped && IsSpecifiedBearish(iDir); if (isTrueGaped) { Print(ToXString(iDir), " TrueGapped Bar: ", cBar.time); } } // // Checking Pinned Bar ... if (detectPinned) { bool isPinned = eaPatternDetector.IsPinnedBar( cBar, iDir // ); bool isBullishPinned = isPinned && IsSpecifiedBullish(iDir); bool isBearishPinned = isPinned && IsSpecifiedBearish(iDir); if (isPinned) { Print(ToXString(iDir), " Pinned Bar: ", cBar.time); } } // // Checking Star Pattern ... if (detectStarPattern) { bool isStarPattern = eaPatternDetector.IsStartPattern( cBar, iDir // ); bool isBullishStarPattern = isStarPattern && IsSpecifiedBullish(iDir); bool isBearishStarPattern = isStarPattern && IsSpecifiedBearish(iDir); if (isStarPattern) { Print(ToXString(iDir), " Star Pattern: ", cBar.time); } } // // Checking Piercing Pattern ... if (detectPiercingPattern) { // bool isPiercingPattern = eaPatternDetector.IsPiercingPattern( cBar, iDir // ); bool isBullishPiercingPattern = isPiercingPattern && IsSpecifiedBullish(iDir); bool isBearishPiercingPattern = isPiercingPattern && IsSpecifiedBearish(iDir); if (isPiercingPattern) { Print(ToXString(iDir), " Piercing Pattern: ", cBar.time); } } // // Checking Rising Pattern ... if (detectRisingPattern) { // bool isRisingPattern = eaPatternDetector.IsRisingPattern( cBar, iDir // ); bool isBullishRisingPattern = isRisingPattern && IsSpecifiedBullish(iDir); bool isBearishRisingPattern = isRisingPattern && IsSpecifiedBearish(iDir); if (isRisingPattern) { Print(ToXString(iDir), " Rising Pattern: ", cBar.time); } } // // Checking Flag Pattern ... if (detectFlagPattern) { // XOHCL swingBar; bool isFlagPattern = eaPatternDetector.IsFlagPattern( cBar, iDir, swingBar // ); bool isBullishFlagPattern = isFlagPattern && IsSpecifiedBullish(iDir); bool isBearishFlagPattern = isFlagPattern && IsSpecifiedBearish(iDir); if (isFlagPattern) { Print(ToXString(iDir), " Flag Pattern: ", cBar.time, ", Swing: ", swingBar.time); } swingBar.Clean(); } // // Detect SignalKey Bar Pattern ... if (detectSignalKeyBarPattern) { // bool isSignalKeyBar = eaPatternDetector.IsSignalKeyBarPattern( cBar, iDir // ); bool isBullishSignalKeyBar = isSignalKeyBar && IsSpecifiedBullish(iDir); bool isBearishSignalKeyBar = isSignalKeyBar && IsSpecifiedBearish(iDir); if (isSignalKeyBar) { Print(ToXString(iDir), " SignalKey Bar Pattern: ", cBar.time); } } // // Detect Swing Trend ... if (detectSwingTrend) { // XOHCL swings[]; bool hasSwingTrend = eaPatternDetector.HasSwingTrend( cBar, iDir, swings // ); bool hasBullishSwingTrend = hasSwingTrend && IsSpecifiedBullish(iDir); bool hasBearishSwingTrend = hasSwingTrend && IsSpecifiedBearish(iDir); if (hasSwingTrend) { // Print(ToXString(iDir), " Swing Trend: ", cBar.time); // CChartObjectTrend *iObj; has = eaDrawer.DrawSwingTrend( swings, iDir, iObj, true // Ray Right ... ); if (has) { draws.Add(iObj); } } SpecifiedClean(swings); } // // Swing Trend Breakes ... if (detectSwingTrendBreakes) { // XOHCL swings[]; bool hasSwingTrend = eaPatternDetector.HasSwingTrend( cBar, iDir, swings // ); bool hasBullishSwingTrend = hasSwingTrend && IsSpecifiedBullish(iDir); bool hasBearishSwingTrend = hasSwingTrend && IsSpecifiedBearish(iDir); if (hasSwingTrend) { // if (!HasDirection(trendDir)) { trendDir = iDir; } } // // Breaked Detection ... if (trendDir != iDir) { // Print("Trend Dir Breaked to: ", ToXString(iDir)); trendDir = iDir; } // SpecifiedClean(swings); } // // Detect Supports ... if (detectSupports) { // XOHCL support; bool hasSupport = eaPatternDetector.HasSupport( cBar, support // ); if (hasSupport) { // XBoxZone supportBox; has = ToSupportBox(support, supportBox); if (has) { // // Draw Box ... XCBoxObject *iObj; has = eaDrawer.DrawBox( supportBox, iObj // ); if (has) { // // Apply Style ... eaDrawer.ApplyStyle( iObj, eaDrawer.boxBullishStyle // ); // draws.Add(iObj); } // ZeroMemory(iObj); } // supportBox.Clean(); } support.Clean(); } // // Detect Resistance ... if (detectResistance) { // XOHCL resistance; bool hasResistance = eaPatternDetector.HasResistance( cBar, resistance // ); if (hasResistance) { // XBoxZone resistanceBox; has = ToResistanceBox(resistance, resistanceBox); if (has) { // // Draw Box ... XCBoxObject *iObj; has = eaDrawer.DrawBox( resistanceBox, iObj // ); if (has) { // // Apply Style ... eaDrawer.ApplyStyle( iObj, eaDrawer.boxBearishStyle // ); // draws.Add(iObj); } // ZeroMemory(iObj); } // resistanceBox.Clean(); } resistance.Clean(); } // // Detecting FIMA Patterns ... if (detectFIMAPatterns) { // // ZIGZAG Pattern ... if (detectZIGZAGPatterns) { // XZigZagPoint zigzags[]; int zigzagsCount = fimaPOIDetector.GetZigZagPoint( cBar, fima2Signaller.fimaHelper, zigzags, 3 // ); has = IsValidSize(zigzagsCount); if (has) { // Print("Detected ZigZags Points: ", zigzagsCount); } } } // cBar.Clean(); } //