Код скрипта - https://blast.hk/threads/25424/
Так вот пытаюсь баг устранить, скрипт не сразу выключается и приходится долго и упорно клацать numpad2
попытался с помощью многопотока но при запуске скрипта почему то ругается на код в " close ". Почему?
Так вот пытаюсь баг устранить, скрипт не сразу выключается и приходится долго и упорно клацать numpad2
Code
Код:
#NoEnv
#Include samp.ahk
#Include AhkDllThread.ahk
AhkThread1 := AhkDllThread("AutoHotkey.dll")
close =
(
#Include samp.ahk
lovla = Debil
:?:/blast::
showDialog(1, "Бот ловля самолёта blast.hk","1.Shamal`n2.Nevada`n3.Andromada`n4.AT-400.", "close", button2, 1337)
Input, samolet, V,{Enter}
if samolet = 1
lovla = Shamal
else if samolet = 2
lovla = Nevada
else if samolet = 3
lovla = Andromada
else if samolet = 4
lovla = AT400
return
Main:
num = 1
Numpad1::
Max := getDialogLineCount() ; Кол-во строк в диалоге
lpp:
Loop
{
SendInput, {LAlt Down}
Sleep, 10
SendInput, {LAlt Up}
String := getDialogLine( num) ; Проверяет что написано в данной функции строке
IfInString, String, %lovla% ; Если в String найдено название самолёта из переменной lovla
{
setDialogIndex( num) ; Устанавливает активной строку в которой написано название самолёта
SendInput, {Enter}
break
goto, main
}
if num = %Max% ; Если прочитаны все строки и не найден нужный самолёт
{
num = 0
String = -1
SendInput, {Esc}
}
num++
}
return
)
AhkThread1.ahktextdll(close)
numpad2::
ahkThread2.ahktextdll(close)
return
