calling scripts from indicator

Quoting Charlo

Disliked

Did you change all commands from A to W as it is written in one of the posts: Replace all PosMessageA with PostMessageW and RegisterWindowMessageA with RegisterWindowMessageW. This has been so since build 600+, when W (wide) or Unicode form of the functions was introduced.

Ignored

Quoting buju

Disliked

...if anyone reading this has experience with c/c++ coding windows .dll's and could help me out with this...

Ignored

//#property show_inputs         // no inputs dialog

// pseudo code (for documentation only)
 
#define MT4_LOAD_STANDARD_INDICATOR      13
#define MT4_LOAD_CUSTOM_INDICATOR        15
#define MT4_LOAD_EXPERT                  14
#define MT4_LOAD_SCRIPT                  16
 
int hWnd = WindowHandle();
string scriptName = "MyScript";
PostMessage(hWnd, WM_MT4(), MT4_LOAD_SCRIPT, GetStringAddress(scriptName));

Quoting buju

Disliked

emmzett thank you for the explanation , but I've used a hot key solution in the end. - set up a hot key in mt4 on the script , in this case ctrl-M - used this code to call it: ..... keybd_event(17, 0x9d, 0, 0); // Ctrl Press keybd_event(77, 0x9e, 0, 0); // ‘M’ Press keybd_event(77, 0x9e, KEYEVENTF_KEYUP, 0); // ‘M’ Release keybd_event(17, 0x9d, KEYEVENTF_KEYUP, 0); // Ctrl Release

Ignored

Quoting buju

Disliked

ideally my vision was to pass inputs to the script and the script would automatically execute, my implementation does not do this , I have thought of a workaround , and that is for the script to read global variables , but that could be problematic if the GV's are not updated or outdated.

Ignored

Quoting buju

Disliked

ideally my vision was to pass inputs to the script and the script would automatically execute, my implementation does not do this , I have thought of a workaround , and that is for the script to read global variables , but that could be problematic if the GV's are not updated or outdated.

Ignored

/* INDICATOR "manager" */
#property strict
#property indicator_chart_window
#define     EVENT_REQ_SAY_HELLO  3
#define     EVENT_RESP_SAY_HELLO 4
#define     XEVENT(EVENT) (CHARTEVENT_CUSTOM+EVENT)
ulong g_micro_timer = 0;
int OnInit()
{  
   Comment("WORKER_EXAMPLE_IND click chart for test");
   return(INIT_SUCCEEDED);
}
int start(){return 0;}
 
void OnChartEvent(const int id,
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
{
   /*Simple example:
      1. User clicks chart
      2. Indicator sends mssg to worker
      3. Worker sends response.
      4. Indicator receives response
      5. Alerts user with worker response mssg
   */
   if(id == CHARTEVENT_CLICK) {
      for(long c=ChartFirst(); c>=0; c=ChartNext(c))
         EventChartCustom(c, EVENT_REQ_SAY_HELLO, ChartID(), 0.0, "");
      g_micro_timer = GetMicrosecondCount();
      return;
   }
   if(id == XEVENT(EVENT_RESP_SAY_HELLO)) {
      ulong round_trip_time = GetMicrosecondCount() - g_micro_timer;
      Alert(StringFormat("Mssg('%s') | round trip micros: %d",
         sparam, round_trip_time
      ));
   }
}

/* EXPERT "Worker" */
#property   strict
#define     EVENT_REQ_SAY_HELLO  3
#define     EVENT_RESP_SAY_HELLO 4
#define     XEVENT(EVENT) (CHARTEVENT_CUSTOM+EVENT)
int OnInit()
{  
   Comment("WORKER_EXAMPLE_EXPERT");
   return(INIT_SUCCEEDED);
}
void OnTick(){}
//+------------------------------------------------------------------+
void OnChartEvent(const int id,
                  const long &lparam,
                  const double &dparam,
                  const string &sparam)
{
   if(id == XEVENT(EVENT_REQ_SAY_HELLO)) {//incoming event is custom user event
      EventChartCustom(                   //sending custom response via chart events
         lparam,                          //targeting the chart id that was sent in the lparam from request
         EVENT_RESP_SAY_HELLO,            //setting the event id for the receiving program
         ChartID(),                       //sending this chart id in the lparam
         0.0,                             //nothing to send in the dparam, but this could be anything
         say_hello()                      //sending string response, this has a limit in chars so large messages should be passed via file refs
      );
   }
}
//+------------------------------------------------------------------+
string say_hello()
{
   return "Hello from worker EA! :)";
}

Quoting Nicholishen

Disliked

Instead take advantage of custom chart events...

Ignored

Quoting robots4me

Disliked

{quote} Holy smokes -- are you saying you can use custom events to communicate between charts -- sort of like WM_COPY messages (if you are familiar with old Win32 programming)? That is way too cool. Thank you, Nicholishen.

Ignored

Quoting Nicholishen

Disliked

You can also run workers to place up to 8 concurrent asynchronous trade actions before you run into the trade context busy error (limit)

Ignored

Quoting emmzett

Disliked

Great to hear you got it working. In between I added the launcher functions for any MQL program to my DLL.

Ignored

Quoting robots4me

Disliked

{quote} ...Thanks very much -- your program launcher is a wonderful tool.

Ignored

Quoting emmzett

Disliked

{quote} Great to hear you got it working. In between I added the launcher functions for any MQL program to my DLL. Attached are two example scripts, an ANSI and a Unicode version. Both essentially do the same. Once you put the DLL in the library folder you can use the functions from anywhere you like and load programmatically scripts, experts or indicators. The source code for the launcher functions is here: LoadMqlProgramA(int hChart, int programType, string...

Ignored

Quoting Kos2009

Disliked

{quote} Hi emmezzett , i'm beginner. i have studied all post several times; and trying to compilate " { BOOL WINAPI LoadMqlProgramW(HWND hChart, ProgramType programType, const wchar* programName) { if ((uint)programName < MIN_VALID_POINTER) return(error(ERR_INVALID_PARAMETER, "invalid parameter programName: 0x%p (not a valid pointer)", programName)); size_t bufSize = wcslen(programName) + 1; char* ansiName = new char[bufSize]; WCharToAnsiStr(programName, ansiName, bufSize); BOOL result = LoadMqlProgramA(hChart, programType, ansiName); delete[] ansiName;...

Ignored

Quoting emmzett

Disliked

{quote} You try to compile a snippet from the DLL. That's C++ and cannot compile in MQL. Download "MQL-ProgramLauncher" (the ZIP file from post #7), extract the content, copy the DLL to your "libraries" folder and the scripts to your "scripts" folder. Play with the script "TestScript-Unicode" to understand what's going on. If you want to use the examples copy the script content to your EA or indicator, and compile that.

Ignored