1.03

1. Added an option to load a text file with a long-term schedule.
2. Added some helpful tooltips to the panel's controls.
3. Added a switch between Enabled schedule and Disabled schedule.
4. Changed how non-enforced schedule works. It will now also attempt to toggle AutoTrading either off or on when the Scheduler is launched inside a period.
5. Fixed an off-screen position of the panel after a chart resizing event.
6. Fixed a crash that could occur if the panel is loaded without enabling DLL imports.
7. Fixed a bug that prevented the schedule from resetting when the ScheduleFile input parameter was cleared or changed.

Author: EarnForex

MQL4/Experts/AutoTrading Scheduler/AutoTrading Scheduler.mq4

@@ -1,7 +1,7 @@
 #property copyright "EarnForex.com"
 #property link      "https://www.earnforex.com/metatrader-expert-advisors/AutoTrading-Scheduler/"
-#property version   "1.02"
-string    Version = "1.02";
+#property version   "1.03"
+string    Version = "1.03";
 #property strict
 
 #property description "Creates a weekly schedule when AutoTrading is enabled."
@@ -28,6 +28,7 @@ input string DefaultSaturday = ""; // Default enabled Saturday periods
 input string DefaultSunday = ""; // Default enabled Sunday periods
 input bool DefaultClosePos = false; // Close all positions before turning AutoTrading OFF?
 input bool DefaultEnforce = true; // Always enforce schedule?
+input ENUM_ALLOWDENY DefaultAllowDeny = ALLOWDENY_ALLOW; // Schedule for allowing or denying AutoTrading?
 input string ____Miscellaneous = "================";
 input int Slippage = 2; // Slippage
 input string ScheduleFile = ""; // ScheduleFile (optional)
@@ -58,13 +59,16 @@ int OnInit()
             sets.Sunday = DefaultSunday;
             sets.Enforce = DefaultEnforce;
             sets.ClosePos = DefaultClosePos;
+            sets.LastToggleTime = 0;
+            sets.AllowDeny = DefaultAllowDeny;
+            sets.LongTermSchedule = "";
         }
 
         if (!Panel.Create(0, "AutoTrading Scheduler (ver. " + Version + ")", 0, 20, 20)) return(-1);
         Panel.Run();
         Panel.IniFileLoad();
 
-        if (ScheduleFile != "") Panel.LoadScheduleFile();
+        if (ScheduleFile != "") Panel.LoadScheduleFile(); // Load schedule from file.
 
         // Brings panel on top of other objects without actual maximization of the panel.
         Panel.HideShowMaximize();
@@ -122,6 +126,23 @@ void OnChartEvent(const int id,
     // Call Panel's event handler only if it is not a CHARTEVENT_CHART_CHANGE - workaround for minimization bug on chart switch.
     if (id != CHARTEVENT_CHART_CHANGE) Panel.OnEvent(id, lparam, dparam, sparam);
 
+    // Handle a potential panel-out-of-view situation.
+    if ((id == CHARTEVENT_CLICK) || (id == CHARTEVENT_CHART_CHANGE))
+    {
+        static bool prev_chart_on_top = false;
+        // If this is an active chart, make sure the panel is visible (not behind the chart's borders). For inactive chart, this will work poorly, because inactive charts get minimized by MetaTrader.
+        if (ChartGetInteger(ChartID(), CHART_BRING_TO_TOP))
+        {
+            if (Panel.Top() < 0) Panel.Move(Panel.Left(), 0);
+            int chart_height = (int)ChartGetInteger(0, CHART_HEIGHT_IN_PIXELS);
+            if (Panel.Top() > chart_height) Panel.Move(Panel.Left(), chart_height - Panel.Height());
+            int chart_width = (int)ChartGetInteger(0, CHART_WIDTH_IN_PIXELS);
+            if (Panel.Left() > chart_width) Panel.Move(chart_width - Panel.Width(), Panel.Top());
+        }
+        // Remember if the chart is on top or is minimized.
+        prev_chart_on_top = ChartGetInteger(ChartID(), CHART_BRING_TO_TOP);
+    }
+
     if (Panel.Top() < 0) Panel.Move(Panel.Left(), 0);
 }
 

MQL4/Experts/AutoTrading Scheduler/AutoTrading Scheduler.mqh

@@ -3,6 +3,7 @@
 #include <Controls\CheckBox.mqh>
 #include <Controls\Label.mqh>
 #include <Controls\RadioGroup.mqh>
+#include <Arrays\List.mqh>
 
 color CONTROLS_EDIT_COLOR_DISABLE = C'221,221,211';
 
@@ -12,13 +13,48 @@ enum ENUM_TIME_TYPE
     Server
 };
 
+// Used for the schedule's setting - whether it's showing allowed periods or forbidden ones.
+enum ENUM_ALLOWDENY
+{
+    ALLOWDENY_ALLOW, // Allow
+    ALLOWDENY_DENY // Deny
+};
+
 enum ENUM_TOGGLE
 {
-    ENUM_TOGGLE_DONT_TOGGLE, // Don't toggle
-    ENUM_TOGGLE_TOGGLE_ON,   // Toggle ON
-    ENUM_TOGGLE_TOGGLE_OFF   // Toggle OFF
+    TOGGLE_DONT_TOGGLE, // Don't toggle
+    TOGGLE_TOGGLE_ON,   // Toggle ON
+    TOGGLE_TOGGLE_OFF   // Toggle OFF
+};
+
+// An object class for storing timestamp + enable/disable state.
+class CTimeStamp : public CObject
+{
+    public:
+        datetime    time;
+        bool        enable;
+        CTimeStamp(datetime t, bool e) {time = t; enable = e;}
+        virtual int Compare(const CObject *node, const int mode = 0) override const;
 };
 
+int CTimeStamp::Compare(const CObject *node, const int mode = 0) override const
+{
+    CTimeStamp *ts = (CTimeStamp*)node; // Cast the generic object pointer to the timestamp object pointer.
+    
+    if (mode == 0) // Ascending:
+    {
+        if (time > ts.time) return 1;
+        else if (time < ts.time) return -1;
+        return 0;
+    }
+    else // Descending:
+    {
+        if (time < ts.time) return 1;
+        else if (time > ts.time) return -1;
+        return 0;
+    }
+}
+
 struct Settings
 {
     ENUM_TIME_TYPE TimeType;
@@ -32,5 +68,8 @@ struct Settings
     string         Saturday;
     string         Sunday;
     bool           Enforce;
+    datetime       LastToggleTime; // For Enforce = false.
+    ENUM_ALLOWDENY AllowDeny;
+    string         LongTermSchedule;
 } sets;
 //+------------------------------------------------------------------+

MQL4/Experts/AutoTrading Scheduler/Defines.mqh

@@ -1,7 +1,7 @@
 #property copyright "EarnForex.com"
 #property link      "https://www.earnforex.com/metatrader-expert-advisors/AutoTrading-Scheduler/"
-#property version   "1.02"
-string    Version = "1.02";
+#property version   "1.03"
+string    Version = "1.03";
 #property strict
 
 #property description "Creates a weekly schedule when AutoTrading is enabled."
@@ -29,6 +29,7 @@ input string DefaultSaturday = ""; // Default enabled Saturday periods
 input string DefaultSunday = ""; // Default enabled Sunday periods
 input bool DefaultClosePos = false; // Close all positions before turning AutoTrading OFF?
 input bool DefaultEnforce = true; // Always enforce schedule?
+input ENUM_ALLOWDENY DefaultAllowDeny = ALLOWDENY_ALLOW; // Schedule for allowing or denying AutoTrading?
 input group "Miscellaneous"
 input int Slippage = 2; // Slippage
 input string ScheduleFile = ""; // ScheduleFile (optional)
@@ -59,6 +60,9 @@ int OnInit()
             sets.Sunday = DefaultSunday;
             sets.Enforce = DefaultEnforce;
             sets.ClosePos = DefaultClosePos;
+            sets.LastToggleTime = 0;
+            sets.AllowDeny = DefaultAllowDeny;
+            sets.LongTermSchedule = "";
         }
 
         if (!Panel.Create(0, "AutoTrading Scheduler (ver. " + Version + ")", 0, 20, 20)) return(-1);
@@ -123,6 +127,23 @@ void OnChartEvent(const int id,
     // Call Panel's event handler only if it is not a CHARTEVENT_CHART_CHANGE - workaround for minimization bug on chart switch.
     if (id != CHARTEVENT_CHART_CHANGE) Panel.OnEvent(id, lparam, dparam, sparam);
 
+    // Handle a potential panel-out-of-view situation.
+    if ((id == CHARTEVENT_CLICK) || (id == CHARTEVENT_CHART_CHANGE))
+    {
+        static bool prev_chart_on_top = false;
+        // If this is an active chart, make sure the panel is visible (not behind the chart's borders). For inactive chart, this will work poorly, because inactive charts get minimized by MetaTrader.
+        if (ChartGetInteger(ChartID(), CHART_BRING_TO_TOP))
+        {
+            if (Panel.Top() < 0) Panel.Move(Panel.Left(), 0);
+            int chart_height = (int)ChartGetInteger(0, CHART_HEIGHT_IN_PIXELS);
+            if (Panel.Top() > chart_height) Panel.Move(Panel.Left(), chart_height - Panel.Height());
+            int chart_width = (int)ChartGetInteger(0, CHART_WIDTH_IN_PIXELS);
+            if (Panel.Left() > chart_width) Panel.Move(chart_width - Panel.Width(), Panel.Top());
+        }
+        // Remember if the chart is on top or is minimized.
+        prev_chart_on_top = ChartGetInteger(ChartID(), CHART_BRING_TO_TOP);
+    }
+
     if (Panel.Top() < 0) Panel.Move(Panel.Left(), 0);
     ChartRedraw();
 }