here is my version of communicating between scripts.
Simple and easy
Send function:
Code: Select all
SendToAHK(String)
{
Prev_DetectHiddenWindows := A_DetectHiddenWindows
DetectHiddenWindows On
StringLen := StrLen(String)
Loop, %StringLen%
{
AscNum := Asc(SubStr(String, A_Index, 1))
if (A_Index = StringLen)
LastChar := 1
PostMessage, 0x5555, AscNum,LastChar,,AHK
}
DetectHiddenWindows %Prev_DetectHiddenWindows%
}
Code: Select all
gui, new,, AHK
OnMessage(0x5555, "Func")
SetTimer, MyTimer, 100
MyTimer:
if receivedVar
{
Received_String := receivedVar, receivedVar := ""
Msgbox "%Received_String%"
}
return
func(wParam, lParam, Msg){
global tempVar
global receivedVar
if (Msg = 0x5555)
{
tempVar .= Chr(wParam)
if lParam
receivedVar := tempVar, tempVar := ""
}
}
Send string example:
Code: Select all
SendToAHK("Hello World!")