AutoHotkey Community

InputVar(Var)
{
 global
 ErrorLevel := %Var%
 return ErrorLevel
}

OutputVar(Var, Value)
{
 global
 %Var% := Value
 return Var
}

fx("test|done", "StringCheck")
ListVars
MsgBox

fx(s, d, l = "|", m = "") {
   global
   StringSplit, %d%, s, %l%, %m%
}

WindowEditCheck(Var = "TextCheck", StrLen0 = "300", StrLen1 = "3000")
{
 WinGet, WindowCheck, List
 Loop %WindowCheck%
 {
  WindowID := WindowCheck%A_Index%
  WinGetTitle, WindowName, ahk_id %WindowID%
  WinGetClass, WindowClass, ahk_id %WindowID%
  StringReplace, WindowClass, WindowClass, :\, #, 1
  WindowClass := RegExReplace(WindowClass, "\s|&|,|\.|-|:|\\", "_")
  StringReplace, WindowName, WindowName, :\, #, 1
  WindowName := RegExReplace(WindowName, "\s|&|,|\.|-|:|\\", "_")
  WinGet, ControlCheck, ControlList, ahk_id %WindowID%
  Loop, Parse, ControlCheck, `n, `r
   If RegExMatch(A_LoopField, "^Edit\d*$")
   {
    ControlGetText, TextCheck, %A_LoopField%, ahk_id %WindowID%
    If TextCheck
    {
     StringReplace, TextCheck, TextCheck, `r`n, |, 1
     Loop
      If (TextCheck = Edit%A_Index%)
       break
      Else if Edit%A_Index% =
      {
       Edit%A_Index% := TextCheck
       Var%A_Index% := "[" Var "]" "[" WindowID "]" A_LoopField "[" WindowName "]"
       ANum := A_Index
       break
      }
    }
   }
 }
 Loop %ANum%
 {
  If (StrLen(Edit%A_Index%) > StrLen0)
   If (StrLen(Edit%A_Index%) < StrLen1)
   {
    OutputVar(Var%A_Index%, Edit%A_Index%)
    VarCheck := Var%A_Index%
    Rec%VarCheck% := Edit%A_Index%
   }
 }
listvars
pause
}

TimeCheck := A_TickCount
Test()

Test()
{
 Test := InputVar("TimeCheck")
 listvars
 pause
}

InputVar(Var)
{
 global
 ValueCheck := %Var%
 return ValueCheck
}

NumTest = 4
TestS()
listvars
pause
Test()
listvars
return

Test()
{
 OutputVar("NumTest0", "")
 OutputVar("NumTest1", "")
 OutputVar("NumTestS", "")
listvars
pause
 OutputVar("NumTestS", InputVar(OutputVar("NumTest1", InputVar(OutputVar("NumTest0", InputVar("NumTest") + 1)) - 6)) + 4)
}

TestS()
{
 Msgbox, % "NumTest" " " InputVar("NumTest") "`n" "NumTest0" " " InputVar(OutputVar("NumTest0", InputVar("NumTest") + 1)) "`n" "NumTest1" " " InputVar(OutputVar("NumTest1", InputVar("NumTest0") - 6)) "`n" "NumTestS" " " InputVar(OutputVar("NumTestS", InputVar("NumTest1") + 4))
}

InputVar(Var)
{
 global
 ErrorLevel := %Var%
 return ErrorLevel
}

OutputVar(Var, Value)
{
 global
 %Var% := Value
 return Var
}