[AHK]: АвтоПриготовление указанного количества рыбы | Форум онлайн-игры – AMAZING ONLINE
Форум
AMAZING ONLINE

[AHK]: АвтоПриготовление указанного количества рыбы

egor_akular

Новичок
Пользователь
После нажатия скрипт спросит сколько рыбы нужно приготовить.
Активация/деактивация Ctrl+1


; Инициализация переменных
isActive := false
fishCount := 0
currentCycle := 0

; Горячая клавиша Ctrl+1 для активации/деактивации
^1::
if (!isActive) {
; Запрашиваем количество рыбы только при активации
InputBox, fishCount, Количество рыбы, Введите сколько рыбы нужно приготовить:, , 300, 150, , , , , 1

if (ErrorLevel) {
; Пользователь нажал Cancel
ToolTip, Отменено пользователем, 10, 10
SetTimer, RemoveToolTip, -2000
return
}

if (fishCount <= 0) {
ToolTip, Неверное количество!, 10, 10
SetTimer, RemoveToolTip, -2000
return
}

isActive := true
currentCycle := 0
ToolTip, Скрипт АКТИВИРОВАН`nРыбы: %fishCount% шт., 10, 10
SoundBeep, 1000, 300
SetTimer, CraftFood, -1000
} else {
; Деактивация
isActive := false
ToolTip, Скрипт ДЕАКТИВИРОВАН`nПриготовлено: %currentCycle%/%fishCount% рыбы, 10, 10
SoundBeep, 500, 300
SetTimer, CraftFood, Off
}

SetTimer, RemoveToolTip, -3000
return

; Функция для крафта еды
CraftFood:
if (!isActive) {
return
}

currentCycle++

; Обновляем статус
ToolTip, Скрипт АКТИВИРОВАН`nЦикл: %currentCycle%/%fishCount%, 10, 10

; Нажимаем F6
Send, {F6}
Sleep, 500

; Вводим команду /craftfood
Send, /craftfood
Sleep, 500

; Нажимаем Enter
Send, {Enter}
Sleep, 1000

; Вводим число 10
Send, 10
Sleep, 500

; Нажимаем Enter
Send, {Enter}
Sleep, 500

; Проверяем, достигли ли нужного количества
if (currentCycle >= fishCount) {
isActive := false
ToolTip, ЗАВЕРШЕНО!`nПриготовлено: %fishCount% рыбы, 10, 10
SoundBeep, 800, 500
SetTimer, RemoveToolTip, -5000
SetTimer, CraftFood, Off
return
}

; Ждем 2 минуты перед следующим циклом
ToolTip, Ожидание 2 минуты...`nЦикл: %currentCycle%/%fishCount%, 10, 10
SetTimer, CraftFood, -120000
return

; Функция для удаления подсказки
RemoveToolTip:
ToolTip
return

; Дополнительная горячая клавиша для принудительной остановки
^2::
isActive := false
SetTimer, CraftFood, Off
ToolTip, Скрипт ОСТАНОВЛЕН`nПриготовлено: %currentCycle%/%fishCount% рыбы, 10, 10
SoundBeep, 400, 500
SetTimer, RemoveToolTip, -3000
return

; Горячая клавиша для проверки статуса
^3::
if (isActive) {
ToolTip, Статус: АКТИВЕН`nЦикл: %currentCycle%/%fishCount%, 10, 10
} else {
ToolTip, Статус: НЕАКТИВЕН`nПриготовлено: %currentCycle%/%fishCount% рыбы, 10, 10
}
SetTimer, RemoveToolTip, -3000
return

; Меню в системном трее
Menu, Tray, Tip, CraftFood Script`nCtrl+1 - вкл/выкл`nCtrl+2 - остановка`nCtrl+3 - статус
Menu, Tray, Add, Статус, ShowStatus
Menu, Tray, Add, Быстрый старт, QuickStart
Menu, Tray, Add
Menu, Tray, Add, Выход, ExitScript

ShowStatus:
if (isActive) {
remaining := fishCount - currentCycle
MsgBox, 64, Статус скрипта, Скрипт АКТИВИРОВАН`nПриготовлено: %currentCycle%/%fishCount% рыбы`nОсталось: %remaining% циклов
} else {
MsgBox, 64, Статус скрипта, Скрипт ДЕАКТИВИРОВАН`nПриготовлено: %currentCycle%/%fishCount% рыбы
}
return

QuickStart:
if (isActive) {
MsgBox, 48, Внимание, Скрипт уже активен!
return
}

InputBox, fishCount, Быстрый старт, Введите количество рыбы:, , 300, 150, , , , , 1

if (ErrorLevel || fishCount <= 0) {
return
}

isActive := true
currentCycle := 0
ToolTip, Быстрый старт!`nРыбы: %fishCount% шт., 10, 10
SoundBeep, 1000, 300
SetTimer, CraftFood, -1000
SetTimer, RemoveToolTip, -3000
return

ExitScript:
ExitApp
return
 

egor_akular

Новичок
Пользователь
Скрипт по дефолту готовит 1 жаренную рыбу из 10 кг сырой рыбы, изменить можно на 65 строке
 
Вверх
Розыгрыш