Что нового

Помогите с автоматизацией Бота

lexaSF

Новичок
Сообщения
182
Репутация
3
Помогите автоматизировать бота!У самого что то мозги не доходят! :wacko:
Вот бот, помогите. http://rghost.ru/3693060
Нужно, чтобы включался бот, сама нажималась кнопочка старт, Потом нажималось меню File - Settings - Load там выбирались все файлы по очереди, сначала 1, потом 2, и тп.. И так до самого последнего!
сам пробовал, но что то ничего не вышло (
Файлы с настройками, которые надо запустить находятся в папке Settings
Код:
$ExeFile = 'C:\Users\Lexa\Desktop\UDOBot_v.4.0.0\UDOBot_v.4.0.0\UDOBot.exe'
$d = 'C:\Users\Lexa\Desktop\UDOBot_v.4.0.0\UDOBot_v.4.0.0'
Run($ExeFile, $d, @SW_MINIMIZE)
WinWait("UDOBot v.4.0.0","Start")
$GHandl = ControlGetHandle('UDOBot v.4.0.0','Start','WindowsForms10.BUTTON.app.0.33c0d9d')
ControlFocus('UDOBot v.4.0.0','Start',$GHandl)
ControlClick('UDOBot v.4.0.0','Start',$GHandl)
$Handl = ControlGetHandle('UDOBot v.4.0.0','File','WindowsForms10.Window.8.app.0.33c0d9d')
ControlFocus("UDOBot v.4.0.0","Settings",$Handl)
ControlClick("UDOBot v.4.0.0","Settings",$Handl)
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{DOWN 2}')
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{ENTER}')
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{DOWN 1}')
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{ENTER}')
WinWait("UDOBot v.4.0.0 - ~АмебА~","CAR:")
ControlClick("UDOBot v.4.0.0 - ~АмебА~","CAR:","WindowsForms10.Window.8.app.0.33c0d9d12")
WinWait("classname=WindowsForms10.Window.20808.app.0.33c0d9d","")
ControlClick("classname=WindowsForms10.Window.20808.app.0.33c0d9d","","WindowsForms10.Window.20808.app.0.33c0d9d0")
WinWait("Load Settings","Select the Setting you wish to")
ControlClick("Load Settings","Select the Setting you wish to","WindowsForms10.COMBOBOX.app.0.33c0d9d1")
ControlClick("Load Settings","Select the Setting you wish to","WindowsForms10.BUTTON.app.0.33c0d9d2")

Заранее спасибо, можете обраиться в скайп lexasf, если что
 
Верх