- 447
- 120
Купил себе новый сундучек на аризоне помогите добавить его в скрипт от Dozor
ИД которые указаны в его скрипте не могу найти схожие
там чет айди которые в коде у него прописаны у меня не отображаются по всей видимости
так же буду рад если кто - то скинет его вк
ИД которые указаны в его скрипте не могу найти схожие
Код:
package.path = getRakBotPath().."/scripts/libs/?.lua;"..getRakBotPath().."/scripts/libs/?/init.lua;";
package.cpath = getRakBotPath().."/scripts/libs/?.dll";
require("luaAddons.textdraw")
require("luaAddons.fix")
require('Tasking')
--[[
Автор https://www.blast.hk/members/66561/ - Dozor
Version 1.2.4 Тема на blast hack https://www.blast.hk/threads/89958/
© Публикация на других интернет ресурсах разрешена при условии:
- если будет указан автор скрипта
- если будет оставлена ссылка на оригинальную тему
]]
local autostart = false -- автоактивация скрипта при спавне
local checkmaxid = false
local checktime = false
local check = false
local active = false
local warn = false
local nottime = false
local em = false
local recremove = false
syndyk1 = nil
syndyk2 = nil
syndyk3 = nil
syndyk4 = nil
maxid = 0
n = 0
time = 0
time1 = 0
s = 0
local ryletka = {
bronz = 0,
serebr = 0,
zoloto = 0,
platina = 0,
};
local larec = {
prem = 0,
supercar = 0,
};
local const = {
CHEST_STANDART = 19918,
CHEST_DONATE = 19613,
CHEST_PLATINUM = 1353,
CHEST_ELONMUSK = 1733,
close = 65535,
use = 2302,
};
function onRunCommand(cmd)
if cmd == '!rch' then
print('[RakChest] Активирован! Версия скрипта 1.2.4')
if maxid == 0 then
Tasking.new(checkMaxId)
else
Tasking.new(control)
end
return true
end
if cmd == '!rl' then
print('[RakChest] Рулеток собрано за сессию:')
print('[RakChest] Бронзовых: '..ryletka.bronz..', Серебряных: '..ryletka.serebr)
print('[RakChest] Золотых: '..ryletka.zoloto..', Платиновых: '..ryletka.platina)
if em then
print('')
print('[RakChest] Ларцов собрано:')
print('[RakChest] С премией: '..larec.prem..', Super Car: '..larec.supercar)
end
return true
end
if cmd == '!time' then
active = false
clickTextDraw(const.close)
sendInput('/invent')
checktime = true
Tasking.new(function()
Tasking.wait(3000)
active = true
clickTextDraw(const.close)
end)
return true
end
end
function onShowTextDraw(tId,data)
if checkmaxid then
if maxid < tId then
maxid = tId
end
end
if active then
if data.modelId == const.CHEST_STANDART then
syndyk1 = tId
end
if data.modelId == const.CHEST_DONATE then
syndyk2 = tId
end
if data.modelId == const.CHEST_PLATINUM then
syndyk3 = tId
end
if data.modelId == const.CHEST_ELONMUSK then
syndyk4 = tId
em = true
end
if data.text:match('%d- min') then
n = 0
nottime = true
local t = string.match(sampTextdrawGetString(tId), "(%d+)")
print('[RakChest] До открытия осталось '..t..' min')
time1 = (t*60000) + 60000
if time1 > time then
time = time1
end
clickTextDraw(const.close)
check = true
end
if tId == maxid then
if nottime then
Tasking.defer(control, time)
check = true
nottime = false
end
if check == false then
Tasking.new(click)
active = false
check = true
end
if syndyk1 == nil and syndyk2 == nil and syndyk3 == nil and syndyk4 == nil then
print('[RakChest] [Warning] Сундуки не обнаружено!')
print('[RakChest] [Warning] Все сундуки должны находиться на первой странице инвентаря!')
print('[RakChest] Скрипт выключен!')
Tasking.remove(click)
Tasking.remove(control)
checkmaxid = false
checktime = false
check = false
active = false
end
end
end
if checktime then
if data.text:match('%d- min') then
local t = string.match(sampTextdrawGetString(tId), "(%d+)")
print('[RakChest] До открытия осталось '..t..' min')
checktime = false
active = true
clickTextDraw(const.close)
end
end
end
function onDialogShow(id, style, title, bnt1, btn2, data)
if data:find('вы дополнительно получили предмет') then
print('[RakChest] Выпал х4. Закрываем диалог.')
sendDialog(id, 0, 0, "")
sendInput('/invent')
return true
end
if title:find('Игровое меню') then
if recremove then
print('[RakChest][Warning] Фиксим!')
sendDialog(id, 0, 0, "")
n = 0
defCallAdd(2000, false, function() Tasking.new(control) end)
recremove = false
return true
end
end
end
function click()
if n > 0 then
Tasking.remove(click)
recremove = true
print('[RakChest][Warning] Сервер перестал реагировать на нажатия!')
if recremove then
sendInput('/mm')
end
else
print('[RakChest] Открываем сундуки!')
clickTextDraw(const.close)
Tasking.wait(1000)
sendInput('/invent')
Tasking.wait(1000)
if syndyk1 ~= nil then
clickTextDraw(syndyk1)
Tasking.wait(3000)
clickTextDraw(const.use)
syndyk1 = nil
end
Tasking.wait(1000)
if syndyk3 ~= nil then
clickTextDraw(syndyk3)
Tasking.wait(3000)
clickTextDraw(const.use)
syndyk2 = nil
end
Tasking.wait(1000)
if syndyk2 ~= nil then
clickTextDraw(syndyk2)
Tasking.wait(3000)
clickTextDraw(const.use)
syndyk3 = nil
end
Tasking.wait(1000)
if syndyk4 ~= nil then
clickTextDraw(syndyk4)
Tasking.wait(3000)
clickTextDraw(const.use)
syndyk4 = nil
end
clickTextDraw(const.close)
print('[RakChest] Сундуки открыты!')
n = n + 1
Tasking.remove(click)
active = false
Tasking.wait(3000)
Tasking.new(control)
end
end
function control()
Tasking.wait(1000)
clickTextDraw(const.close)
warn = false
check = false
Tasking.wait(1000)
active = true
Tasking.wait(1000)
sendInput('/invent')
Tasking.remove(control)
end
function checkMaxId()
maxid = 0
checkmaxid = true
clickTextDraw(const.close)
print('[RakChest] Проверка инвентаря на наличие сундуков!')
sendInput('/invent')
Tasking.wait(3000)
print('[RakChest] Проверка окончена!')
checkmaxid = false
maxid = maxid - 4
--Tasking.remove(checkMaxId)
Tasking.new(control)
end
function onSpawned()
if warn and isBotSpawned then
Tasking.new(control)
end
if autostart then
defCallAdd(500, false, function()
runCommand('!rch')
end)
end
end
function onServerMessage(text)
if text:find('и получили бронзовую рулетку') then
ryletka.bronz = ryletka.bronz + 1
end
if text:find('и получили серебряную рулетку') then
ryletka.serebr = ryletka.serebr + 1
end
if text:find('и получили золотую рулетку') then
ryletka.zoloto = ryletka.zoloto + 1
end
if text:find('и получили платиновую рулетку') then
ryletka.platina = ryletka.platina + 1
end
if text:find('и получили Ларец с премией') then
larec.prem = larec.prem + 1
end
if text:find('и получили Ларец Super Car') then
larec.supercar = larec.supercar + 1
end
end
onScriptUpdate = Tasking.tick
там чет айди которые в коде у него прописаны у меня не отображаются по всей видимости
так же буду рад если кто - то скинет его вк