Что нового

[Процессы] Скрипт грузит процессор

greshnik77

Новичок
Сообщения
27
Репутация
0
В программировании не силён, кое как написал скрипт проверки процесса. С условием, если не запущено запустить процесс и после выполнить скрипт, но скрипт грузит процессор в чём может быть проблемма?

Код:
HotKeySet("{F5}", "Terminate")
Func Terminate()
MsgBox(4096, "", "Автозапуск остановлен")
Exit 0
EndFunc
While 1 
	If Not ProcessExists("AION.bin") Then 
Run("C:\Program Files\Aion\bin32\aion.bin bin32\AION.bin  -ip:91.214.69.42 -port:2106 -ng -cc:2 -lang:enu ")
# Проверяем запущен аион, если нет запускаем
Sleep (120000)
# ждём 2 минуты пока загрузится аион
WinExists("AION Client")
WinActivate("AION Client")

Send("123") 
# Логин

Send("{Tab}") 
# отправляем таб 

Send("123") 
# пароль 

Send("{ENTER}")

Sleep (3000)
# ждём 3 секунды

MouseMove( 233,721, 20 )
# перемещаем мышь

Sleep (3000)
# ждём 3 секунды 

MouseClick("left")
# выбираем персонажа

Sleep (3000)
# ждём 3 секунды 

Send("{ENTER}") 
# жмём ентер

Sleep (30000)
#ждем загрузки игры 30 сек

WinExists("bot")
WinActivate("bot")
Send("{ESC}") 
# Закрываем ошибку бота

Sleep (3000)
# ждём 3 секунды 

WinSetState("Бот", "", @SW_MAXIMIZE)
# разворачиваем окно бота

WinExists("Бот")
#Проверка наличия указанного окна. 

WinActivate("Бот")
#Активизировать окно, то есть отобразить его на переднем плане экрана.

WinWaitActive("Бот")
#Прервать выполнение скрипта до момента активизации указанного окна.

Sleep (3000)
# ждём 3 секунды 

MouseMove( 27,47, 20 )
# перемещаем мышь

Sleep (3000)
# ждём 3 секунды 

MouseClick("left")
# Запускаем бота

Sleep (3000)
# ждём 3 секунды 

;MouseMove( 61,49, 20 )
;# перемещаем мышь

;Sleep (3000)
;# ждём 3 секунды 

;MouseClick("left")
;# Запускаем режим боя бота

Sleep (3000)
# ждём 3 секунды
WinSetState("Бот", "", @SW_MINIMIZE)
EndIf
WEnd
 

VladUs

Скриптер
Сообщения
621
Репутация
181
В функции MouseMove () попробуйте установить третий параметр (скорость перемещения) в 0
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,320
greshnik77
В самом конце поменяйте
Код:
;...
	EndIf
	Sleep(50)
WEnd
 

Юрий

Новичок
Сообщения
82
Репутация
3
а есть ли вообще другие способы ограничения загрузки проца для скриптов кроме обычного слипа?
 

Spyhunter

Знающий
Сообщения
56
Репутация
13
а есть ли вообще другие способы ограничения загрузки проца для скриптов кроме обычного слипа?

Оптимизация кода или изменение того же Sleep'а в зависимости от нагрузки, я лично другим варантам не научен
 
Верх