Global Var
OnMessage(0xC, "GetText")
Loop
    ToolTip Var = %Var%   

GetText(wParam, lParam, msg, hwnd) {  
    RegExMatch(StrGet(lParam), "(.*?)#(.*)", Str), %Str1% := Str2
    Return True
}  

SetTitleMatchMode, 1
DetectHiddenWindows, On
Receiver = D:\AutoIt\=Test.ahk ahk_exe AutoHotkey.exe

Loop
{
    Random, Var 
    Params = Var#%Var%
    SendMessage, 0xC, 0, &Params,, %Receiver%
    Sleep 150
}

Menu, Tray, add, EditVar
Gui, EditVar: Add, Edit, w222 vVar gEdit
Var = qqqqq
Loop
{ 
    ToolTip Var = %Var%
    Sleep 150
}

EditVar:
    Gui EditVar: Show
    Return
    
Edit:
    GuiControlGet, Var
    return
    
EditVarGuiClose:
    Gui EditVar: Hide
    Return

Loop
{
    Random, Var 
    IniWrite, % Var, %A_ScriptFullPath%, Section, Key1
    IniWrite, % Var+22, %A_ScriptFullPath%, Section, Key2
    IniWrite, % Var+333, %A_ScriptFullPath%, Section, Key3
    IniWrite, % Var+4444, %A_ScriptFullPath%, Section, Key4
}
Return
/*
[Section] 
Key1=196439485
Key2=180312179
Key3=180312490
Key4=180316601
*/

Loop
{
    ;  D:\AutoIt\=Test.ahk - путь к 1 скрипту
    IniRead, Var1, D:\AutoIt\=Test.ahk, Section, Key1 
    IniRead, Var2, D:\AutoIt\=Test.ahk, Section, Key2 
    IniRead, Var3, D:\AutoIt\=Test.ahk, Section, Key3 
    IniRead, Var4, D:\AutoIt\=Test.ahk, Section, Key4 
    ToolTip %Var1%`n%Var2%`n%Var3%`n%Var4%
    Sleep 150
}

#Include C:\Users\ZZZ\Dropbox\Работа\Autohotkey\proverka.ahk
F1::
WinGetTitle, okno_acad, A
return

F6::
WinActivate , %okno_acad%
Return