require 'lib.moonloader'
local sampev = require 'lib.samp.events'
local BitStreamIO = require 'lib.samp.events.bitstream_io'
local imgui = require 'imgui'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local main_window_state = imgui.ImBool(false)
local sw, sh = getScreenResolution()
local statusBot = false
local statusTpBot = false
local sb1 = false
local sb2 = false
local collisia = false
function apply_custom_style()
imgui.SwitchContext()
local style = imgui.GetStyle()
local colors = style.Colors
local clr = imgui.Col
local ImVec4 = imgui.ImVec4
local ImVec2 = imgui.ImVec2
style.WindowPadding = ImVec2(10, 10)
style.WindowRounding = 8
style.ChildWindowRounding = 0
style.FramePadding = ImVec2(5, 4)
style.FrameRounding = 16
style.TouchExtraPadding = ImVec2(0, 0)
style.IndentSpacing = 21
style.ScrollbarSize = 10
style.ScrollbarRounding = 0
style.GrabMinSize = 20
style.GrabRounding = 16
style.WindowTitleAlign = imgui.ImVec2(0.5, 0.5)
style.ButtonTextAlign = ImVec2(1, 1)
colors[clr.Text] = ImVec4(1.00, 1.00, 1.00, 1.00)
colors[clr.TextDisabled] = ImVec4(0.73, 0.75, 0.74, 1.00)
colors[clr.WindowBg] = ImVec4(0.00, 0.00, 0.00, 0.94)
colors[clr.ChildWindowBg] = ImVec4(0.00, 0.00, 0.00, 0.00)
colors[clr.PopupBg] = ImVec4(0.00, 0.00, 0.00, 0.94)
colors[clr.Border] = ImVec4(0.00, 0.00, 0.00, 0.50)
colors[clr.BorderShadow] = ImVec4(0.00, 0.00, 0.00, 0.00)
colors[clr.FrameBg] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.FrameBgHovered] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.FrameBgActive] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.TitleBg] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.TitleBgActive] = ImVec4(0.00, 0.00, 0.00, 1.00)
colors[clr.TitleBgCollapsed] = ImVec4(0.00, 0.00, 0.00, 0.67)
colors[clr.MenuBarBg] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.ScrollbarBg] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.ScrollbarGrab] = ImVec4(0.36, 0.36, 0.36, 0.54)
colors[clr.ScrollbarGrabHovered] = ImVec4(0.27, 0.27, 0.27, 1.00)
colors[clr.ScrollbarGrabActive] = ImVec4(0.51, 0.51, 0.51, 1.00)
colors[clr.ComboBg] = ImVec4(0.20, 0.20, 0.20, 0.99)
colors[clr.CheckMark] = ImVec4(1.00, 1.00, 1.00, 1.00)
colors[clr.SliderGrab] = ImVec4(0.27, 0.27, 0.27, 0.54)
colors[clr.SliderGrabActive] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.Button] = ImVec4(0.12, 0.12, 0.12, 0.54)
colors[clr.ButtonHovered] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.ButtonActive] = ImVec4(0.20, 0.20, 0.20, 0.50)
colors[clr.Header] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.HeaderHovered] = ImVec4(0.84, 0.66, 0.66, 0.65)
colors[clr.HeaderActive] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.Separator] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.SeparatorHovered] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.SeparatorActive] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.ResizeGrip] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.ResizeGripHovered] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.ResizeGripActive] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.CloseButton] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.CloseButtonHovered] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.CloseButtonActive] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.PlotLines] = ImVec4(0.62, 0.62, 0.62, 1.00)
colors[clr.PlotLinesHovered] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.PlotHistogram] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.PlotHistogramHovered] = ImVec4(0.10, 0.10, 0.10, 0.54)
colors[clr.TextSelectedBg] = ImVec4(0.26, 0.59, 0.98, 0.35)
colors[clr.ModalWindowDarkening] = ImVec4(0.80, 0.80, 0.80, 0.35)
end
apply_custom_style()
function BeginToPoint(x, y, z, radius, move_code, isSprint)
repeat
local posX, posY, posZ = GetCoordinates()
SetAngle(x, y, z)
MovePlayer(move_code, isSprint)
local dist = getDistanceBetweenCoords3d(x, y, z, posX, posY, z)
wait(0)
until not statusBot or dist < radius
end
function MovePlayer(move_code, isSprint)
setGameKeyState(1, move_code)
if isSprint then setGameKeyState(16, -255) end
end
function SetAngle(x, y, z)
local posX, posY, posZ = GetCoordinates()
local pX = x - posX
local pY = y - posY
local zAngle = getHeadingFromVector2d(pX, pY)
if isCharInAnyCar(playerPed) then
local car = storeCarCharIsInNoSave(playerPed)
setCarHeading(car, zAngle)
else
setCharHeading(playerPed, zAngle)
end
restoreCameraJumpcut()
end
function GetCoordinates()
if isCharInAnyCar(playerPed) then
local car = storeCarCharIsInNoSave(playerPed)
return getCarCoordinates(car)
else
return getCharCoordinates(playerPed)
end
end
function sampev.onPlayerStreamIn()
if collisia then
return false
end
end
function sampev.onVehicleStreamIn()
if collisia then
return false
end
end
function main()
if not isSampLoaded() or not isSampfuncsLoaded() then return end
while not isSampAvailable() do wait(100) end
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Скрипт успешно загружен!', -1)
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Активация: /lbot', -1)
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Автор: Sadow', -1)
sampRegisterChatCommand('lbot', cmd_lbot)
local saveX = {}
local saveY = {}
local saveZ = {}
imgui.Process = false
while true do
wait(0)
if main_window_state.v == false then
imgui.Process = false
end
if collisia == true then
local chars = getAllChars()
for i = 1, #chars do
local res, id = sampGetPlayerIdByCharHandle(chars[i])
if res and chars[i] ~= 1 then
hidePlayer(id)
end
local cars = getAllVehicles()
for i = 1, #cars do
local res, id = sampGetVehicleIdByCarHandle(cars[i])
if res and cars[i] ~= 1 then
hideCar(id)
end
end
end
end
end
end
function hidePlayer(id)
local w = BitStreamIO.bs_write
local bs = raknetNewBitStream()
w.int16(bs, id)
raknetEmulRpcReceiveBitStream(163, bs)
end
function hideCar(id)
local w = BitStreamIO.bs_write
local bs = raknetNewBitStream()
w.int16(bs, id)
raknetEmulRpcReceiveBitStream(165, bs)
end
function cmd_lbot(arg)
main_window_state.v = not main_window_state.v
imgui.Process = main_window_state.v
end
function sampev.onShowTextDraw(id, data)
if statusBot or statusTpBot then
if data.text == 'X' then
sampSendClickTextdraw(id)
end
end
end
function imgui.Ques(text)
imgui.SameLine()
imgui.TextDisabled("(?)")
if imgui.IsItemHovered() then
imgui.BeginTooltip()
imgui.TextUnformatted(u8(text))
imgui.EndTooltip()
end
end
function imgui.OnDrawFrame()
imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
imgui.SetNextWindowSize(imgui.ImVec2(555, 180), imgui.Cond.FirstUseEver)
imgui.Begin(u8'Бот Лесоруб', main_window_state, imgui.WindowFlags.NoResize + imgui.WindowFlags.NoCollapse)
if statusBot == false then
if imgui.Button(u8'Включить') then
if statusTpBot == false then
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Бот начал работу пешком!', -1)
statusBot = true
else
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Для начала выключите бота телепортом!', -1)
end
end
else
if imgui.Button(u8'Выключить') then
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Бот был успешно выключен!', -1)
statusBot = false
end
end
imgui.SameLine(30)
imgui.Ques('Чтобы бот начал свою работу необходимо\nНадеть форму и желательно включить коллизию')
if statusTpBot == false then
if imgui.Button(u8'Включить тп бота') then
if statusBot == false then
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Бот начал работу телепортом', -1)
statusTpBot = true
else
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Для начала выключите бота пешком!', -1)
end
end
else
if imgui.Button(u8'Выключить тп бота') then
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Бот был успешно выключен!', -1)
statusTpBot = false
end
end
imgui.SameLine(30)
imgui.Ques('Чтобы бот начал свою работу необходимо\nНадеть форму и желательно включить коллизию')
if collisia == false then
if imgui.Button(u8'Включить коллизию') then
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Коллизия успешно включена!', -1)
collisia = true
end
else
if imgui.Button(u8'Выключить коллизию') then
sampAddChatMessage('{5A90CE}[Лесопильный Бот] {FFFFFF}Коллизия была выключена!', -1)
collisia = false
end
end
imgui.SameLine(30)
imgui.Ques('Убирает визуально:\nИгроков\nМашины\nСерверные объекты')
imgui.Text(u8'Автор: Sadow')
imgui.End()
end
function sampev.onServerMessage(color, text)
if statusBot or statusTpBot then
if text:match('{7396ff}%[Лесопилка%]{FFFFFF} Отнесите дерево на склад и продолжайте работу') then
sb1 = true
end
if text:match('{7396ff}%[Лесопилка%]{FFFFFF} Вы заработали - (.+)') then
sb1 = false
sb2 = true
end
end
end
lua_thread.create(function()
while true do
wait(0)
if isPlayerPlaying(playerHandle) and statusBot == true then
wait(1)
BeginToPoint(-502.23892211914, -175.7674407959, 76.726554870605, 1.000000, -255, true)
wait(1500)
BeginToPoint(-507.58218383789, -201.15493774414, 78.40625, 1.000000, -255, true)
wait(1)
end
end
end)
lua_thread.create(function()
while true do
wait(0)
if isPlayerPlaying(playerHandle) and statusTpBot == true then
setCharCoordinates(PLAYER_PED, -502.23892211914, -175.7674407959, 76.726554870605)
--wait(1700)
if sb1 == true then
setCharCoordinates(PLAYER_PED, -502.87048339844, -186.88681030273, 77.707412719727)
wait(500)
setCharCoordinates(PLAYER_PED, -507.58218383789, -201.15493774414, 78.40625)
end
--wait(1500)
if sb2 == true then
setCharCoordinates(PLAYER_PED, -502.87048339844, -186.88681030273, 77.707412719727)
wait(500)
setCharCoordinates(PLAYER_PED, -502.23892211914, -175.7674407959, 76.726554870605)
end
end
end
end)
