Lua Arizona Бот на новую рыболовлю

Xaкep Рабинович

Участник
125
22
гайд можно на починку?
Конечно, там ничего сложного. Смотри, разработчики что-то поменяли в кодировке капчи, поэтому чтобы бот снова заработал, нужно заменить в нём часть кода.

Открой скрипт через блокнот или Notepad++, там через поиск найди cef, будет строка типа:
{D766F604-AA73-49C5-B462-3C76466F54D6}.png

Листай до самого низа, пока не найдёшь конец функции, он заканчивается вот тут:
{BA8D4E74-CFD2-40A5-90CD-B91200808142}.png


Сотри полностью функцию, и аккуратно, чтобы ничего не сломать, вставь туда следующую функцию:
local cef = (function()
local this = {}

function this:onDisplay(str)
return str
end

function this:onSend(str)
return str
end

function this:send(str)
local bs = raknetNewBitStream()
raknetBitStreamWriteInt8(bs, 220)
raknetBitStreamWriteInt8(bs, 18)
raknetBitStreamWriteInt16(bs, #str)
raknetBitStreamWriteString(bs, str)
raknetBitStreamWriteInt32(bs, 0)
raknetSendBitStream(bs)
raknetDeleteBitStream(bs)
end

function this:emulation(str)
local bs = raknetNewBitStream()
raknetBitStreamWriteInt8(bs, 17)
raknetBitStreamWriteInt32(bs, 0)
raknetBitStreamWriteInt16(bs, #str)
raknetBitStreamWriteInt8(bs, is_encoded and 1 or 0)
if is_encoded then
raknetBitStreamEncodeString(bs, str)
else
raknetBitStreamWriteString(bs, str)
end
raknetEmulPacketReceiveBitStream(220, bs)
raknetDeleteBitStream(bs)
end

function this:call()
local cef = setmetatable({}, { __index = self })

addEventHandler("onReceivePacket", function (id, bs)
if id == 220 then
raknetBitStreamIgnoreBits(bs, 8)
if (raknetBitStreamReadInt8(bs) == 17) then
raknetBitStreamIgnoreBits(bs, 32)
local length = raknetBitStreamReadInt16(bs)
local encoded = raknetBitStreamReadInt8(bs)
local str = (encoded ~= 0) and raknetBitStreamDecodeString(bs, length + encoded) or raknetBitStreamReadString(bs, length)
local result = cef:onDisplay(str)
if type(result) ~= "nil" then
return result
end
end
end
end)

addEventHandler("onSendPacket", function (id, bs, priority, reliability, orderingChannel)
if id == 220 then
local id = raknetBitStreamReadInt8(bs)
local packettype = raknetBitStreamReadInt8(bs)
local strlen = raknetBitStreamReadInt16(bs)
local str = raknetBitStreamReadString(bs, strlen)
if packettype ~= 0 and packettype ~= 1 and #str > 2 then
local result = cef:onSend(str)
if type(result) ~= "nil" then
return result
end
end
end
end)

return cef
end

return setmetatable(this, { __call = this.call })
end)()

Теперь сохрани, и бот должен снова начать работать.
 

sanferson

Участник
80
12
после обновы сломался бот, заливаю фикс и полностью рабочий
а можно фикс этой версии скрипта от совы, чёт он удалил его, а у меня остался, и там же автоприманка есть
 

Вложения

  • Fishbot.lua
    46 KB · Просмотры: 153

Xaкep Рабинович

Участник
125
22
а можно фикс этой версии скрипта от совы, чёт он удалил его, а у меня остался, и там же автоприманка есть
Я этого бота пофиксил, но публиковать не буду от греха подальше. Могу тебе лишь объяснить как тебе его починить вручную, чтобы он снова стал работать.

Открой этот скрипт от совы, там через поиск найди функцию local cef, она выглядит так:
{D766F604-AA73-49C5-B462-3C76466F54D6}.png

Найди конец функции в самом низу, он выглядит так:
{BA8D4E74-CFD2-40A5-90CD-B91200808142}.png

Вот где end) (), это конец функции. Полностью её сотри, прямо от самого начала, до самого конца, и вместо неё поставь новую функцию, которая работает. Она почти такая же, но там немного отличаются некоторые элементы. В общем если поставить её на замену той, он снова будет работать.
Поставь её туда аккуратно, чтобы ничего не сломать. Убедись что кодировка файла осталась ANSI, после чего сохрани. Бот снова будет работать.
Функцию прикреплю в txt документе, чтобы корректно можно было скопировать текст.
 

Вложения

  • Fishbot AHK.txt
    2.6 KB · Просмотры: 167

Twistted

Новичок
17
0
Подскажите , /fbot menu не работает.Просто активируется бот и начинает рыбачить.
 

paek1w3 [EA]

Известный
4
0
На экранной клавиатуре даже не отображается нажатия клавиш, уже не говоря про админ тулс, палево ведь максимальное
 

paek1w3 [EA]

Известный
4
0
у админов не вся клава отображается
Конечно не вся, только 9 клавиш, одну из которых ты точно хоть раз нажмёшь при ловле одной рыбы
Если такое даже в платной версии, я лучше пойду посру и жопу 300 рублями подтеру или скок он там стоит