//+------------------------------------------------------------------+
//|                                                   events2file.mq5|
//|                             Copyright 2000-2026, MetaQuotes Ltd. |
//|                                                     www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2000-2026, MetaQuotes Ltd."
#property link      "https://www.mql5.com"
//---
#property script_show_inputs
//---
input string country = "EU";                      // news source
//+------------------------------------------------------------------+
//| location of the file in a shared folder \Terminal\Common\Files   |
//| WARNING! Check that there is no file with this name!             |
//+------------------------------------------------------------------+
input string path2file = "calendar";             // path to result file
input string file4list = "EU_events_list.txt";   // name for result file
//---
void OnStart()
  {
   MqlCalendarEvent events[];
   if(CalendarEventByCountry(country,events)<1)
     {Print("CalendarEventByCountry() error # ",GetLastError()); return;}
   PrintFormat("%d events for region %s",ArraySize(events),country);
   int f=FileOpen(path2file+"\\"+file4list, FILE_WRITE | FILE_TXT | FILE_COMMON);
   if(f==INVALID_HANDLE)
     {Print("FileOpen() error"); return;}
   for(int i=0;i<ArraySize(events);++i)
      FileWriteString(f,(string)events[i].id+" "+events[i].name+"\n");
   FileClose(f);
  }
//+------------------------------------------------------------------+