Копирование строки, вставка в окно программы, нажатие кнопок с задержкой

$ReadFile = FileRead(ПУТЬ К ФАЙЛУ С IP) ;Считываем файл
$Ips = StringRegExp($ReadFile, '\d{2,3}\.\d{2,3}\.\d{1,3}\.\d{1,3}', 3) ;Отделяем IP от прочего текста

For $i = 1 to Ubound($Ips) -1
   $hWnd  = WinWait(НАЗВАНИЕ ОКНА) ;Ждем окно
   ControlSetText($hWnd, '', контрол, в который нужно вставлять IP-адрес, $IPs[$i]) ;Вписываем IP контрол
   ControlClick($hWnd, '', кнопка Search) ;Нажимаем кнопку Search
   Sleep(2000) ;Ждем 2 сек
Next

MouseMove()
MouseClick()
Send()

$ReadFile = FileRead("C:\Script\ip.txt")
$Ips = StringRegExp($ReadFile, '\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}', 3)

For $i = 1 to Ubound($Ips) -1
   $hWnd  = WinWait("CLASS:SunAwtDialog")
   MouseMove(460, 285)
   MouseClick("left")

   Send("$IPs[$i]{Enter}")

   Sleep(2000)

   MouseMove(810, 220, 0) ;move to Add button
   MouseClick("left") ;click on Add button

Next

$hWnd  = WinWait("[CLASS:SunAwtDialog]")
Send($IPs[$i] & "{Enter}")

For $i = 0 to Ubound($Ips) -1

$ReadFile = FileRead("C:\script\ip.txt")
$Ips = StringRegExp($ReadFile, '\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}', 3)
For $i = 0 to Ubound($Ips) -1
   $Wnd = WinWait("[CLASS:SunAwtDialog]")
   If Not $Wnd Then
	   MsgBox(4096, 'window is not found')
	   Exit
   EndIf
   MouseMove(480, 285)
   MouseClick("left")
   Send($IPs[$i] & "{Enter}")
   Sleep(2000)
   MouseMove(810, 255, 0) ;move to Add button
   MouseClick("left") ;click on Add button
Next

WinWait('[CLASS:SunAwtDialog]','',3)

MsgBox(4096,'', 'window is not found')

;...........
EndIf
WinActivate($hWnd);Активирует указанное окно (передаёт ему фокус)
MouseMove(480, 285)
;............