Вопросы по Lua скриптингу

Общая тема для вопросов по разработке скриптов на языке программирования Lua, в частности под MoonLoader.

• Задавая вопрос, убедитесь, что его нет в списке частых вопросов и что на него ещё не отвечали (воспользуйтесь поиском).
• Поищите ответ в теме посвященной разработке Lua скриптов в MoonLoader
• Отвечая, убедитесь, что ваш ответ корректен.
• Старайтесь как можно точнее выразить мысль, а если проблема связана с кодом, то обязательно прикрепите его к сообщению, используя блок [code=lua]здесь мог бы быть ваш код[/code].
• Если вопрос связан с MoonLoader-ом первым делом желательно поискать решение на wiki.

Частые вопросы

— Как научиться писать скрипты? С чего начать?
Информация - Гайд - Всё о Lua скриптинге для MoonLoader^{(https://blast.hk/threads/22707/)}
— Как вывести текст на русском? Вместо русского текста у меня какие-то каракули.

Спойлер

Изменить кодировку файла скрипта на Windows-1251. В Atom: комбинация клавиш Ctrl+Shift+U, в Notepad++: меню Кодировки -> Кодировки -> Кириллица -> Windows-1251.

— Как получить транспорт, в котором сидит игрок?

Спойлер

local veh = storeCarCharIsInNoSave(PLAYER_PED)

— Как получить свой id или id другого игрока?

Спойлер

local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа

— Как проверить, что строка содержит какой-то текст?

Спойлер

if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end

— Как эмулировать нажатие игровой клавиши?

Спойлер

local game_keys = require 'game.keys' -- где-нибудь в начале скрипта вне функции main

setGameKeyState(game_keys.player.FIREWEAPON, -1) -- будет сэмулировано нажатие клавиши атаки

Все иды клавиш находятся в файле moonloader/lib/game/keys.lua.
Подробнее о функции setGameKeyState здесь: lua - setgamekeystate | BlastHack — DEV_WIKI^{(https://www.blast.hk/wiki/lua:setgamekeystate)}

— Как получить id другого игрока, в которого целюсь я?

Спойлер

local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end

— Как зарегистрировать команду чата SAMP?

Спойлер

-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)

— Крашит игру при вызове sampSendChat. Как это исправить?

Спойлер

Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:

function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end

 

[chapo]

Почему игра крашится при добавлении всех шрифтов которые установлены в винде в mimgui?

local FONTS = {}
local FONTS_LIST = scanFiles(getFolderPath(0x14), '*.ttf') -- список нормальный, в принт все норм
local FONT_SELECTED = imgui.new.int(0)
local FONTS_COMBO = imgui.new['const char*'][#FONTS_LIST](FONTS_LIST)

-- OnInitialize
for k, v in ipairs(FONTS_LIST) do
    print(getFolderPath(0x14)..'\\'..v)
    FONTS[k] = imgui.GetIO().Fonts:AddFontFromFileTTF(getFolderPath(0x14)..'\\'..v, font_config.SizePixels, font_config, defGlyph)
end

 

[DON GANDON]

[ML] (error) 123.lua: opcode '0984' call caused an unhandled exception
stack traceback:
[C]: in function 'getObjectModel'
D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:18: in function <D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:6>
[ML] (error) 123.lua: Script died due to an error. (0E60B53C)
Как фиксить?

 

[Sanchez.]

[ML] (error) 123.lua: opcode '0984' call caused an unhandled exception
stack traceback:
[C]: in function 'getObjectModel'
D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:18: in function <D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:6>
[ML] (error) 123.lua: Script died due to an error. (0E60B53C)
Как фиксить?

Скинь скрипт

 

[DON GANDON]

Скинь скрипт

 

[shrug228]

1) Нужно скрыть чат с глаз игрока без использования F7 и sampSetChatDisplayMode(), мне лично в голову пришел костыль убрать из каждой строчки чата текст, но у меня это не получилось и решение не самое лучшее мягко говоря.
2) Нужно добавить шрифту в imgui обводку.

 

[.Makarov.]

Как включать/отключать игровой ограничитель кадров из настроек игры? И как проверить включен он или нет?

 

[shrug228]

Как включать/отключать игровой ограничитель кадров из настроек игры? И как проверить включен он или нет?

Адрес памяти: 0xBA6794 [byte] (взял отсюда), а дальше берем документацию по модулю memory и вперед.

[ML] (error) 123.lua: opcode '0984' call caused an unhandled exception
stack traceback:
[C]: in function 'getObjectModel'
D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:18: in function <D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:6>
[ML] (error) 123.lua: Script died due to an error. (0E60B53C)
Как фиксить?

Мне тоже интересно, кидай)

Внимание, минутка дебилизма!
Есть замечательная функция uint dialogPtr = sampGetDialogInfoPtr(), вопрос: что это за нечто, которое возвращает эта функция? Как мне из этого получить нормальную информацию про диалог?

 

[Andrinall]

Адрес памяти: 0xBA6794 [byte] (взял отсюда), а дальше берем документацию по модулю memory и вперед.


Мне тоже интересно, кидай)

Внимание, минутка дебилизма!
Есть замечательная функция uint dialogPtr = sampGetDialogInfoPtr(), вопрос: что это за нечто, которое возвращает эта функция? Как мне из этого получить нормальную информацию про диалог?

Функция возвращает, как я правильно помню, указатель на структуру stDialogInfo в памяти.

Там куча заморочек с ffi. Уверен что оно тебе надо?

Спойлер: ffi

local ffi = require 'ffi'
ffi.cdef[[
struct stDialogInfo
{
    unsigned int             m_pD3DDevice;
    int                      iTextPoxX;
    int                      iTextPoxY;
    int                      uiDialogSizeX;
    int                      uiDialogSizeY;
    int                      iBtnOffsetX;
    int                      iBtnOffsetY;
    struct _CDXUTDialog*     pDialog;
    struct _CDXUTListBox*    pList;
    struct _CDXUTIMEEditBox* pEditBox;
    int                      iIsActive;
    int                      iType;
    int                      DialogID;
    char*                    pText;
    int                      uiTextWidth;
    int                      uiTextHeight;
    char                     szCaption[65];
    int                      bServerside;
}__attribute__((packed));
]]

function getDialogInfo()
    local info = ffi.cast("struct stDialogInfo*", sampGetDialogInfoPtr())
    return info
end

function main()
    repeat wait(100) until isSampAvailable()
   
    local info = getDialogInfo()
    if info.iIsActive == 1 then
        info.iTextPoxX = 250
        info.iTextPoxY = 250
    end
end

Почему бы просто не использовать уже готовое?

--[[
sampSendDialogResponse(int id, int button, int listitem, zstring input)  -- opcode 0BC9

sampCloseCurrentDialogWithButton(int button)  -- opcode 0B47

zstring text = sampGetDialogText()  -- opcode 0BD7

zstring caption = sampGetDialogCaption()  -- opcode 0BD8

sampSetDialogClientside(bool clientside)  -- opcode 0BD9

bool result = sampIsDialogClientside()  -- opcode 0BDA

int list = sampGetCurrentDialogListItem()  -- opcode 0B48

sampSetCurrentDialogListItem(int list)  -- opcode 0B49

zstring text = sampGetCurrentDialogEditboxText()  -- opcode 0B4A

sampSetCurrentDialogEditboxText(zstring text)  -- opcode 0B4B

bool result = sampIsDialogActive()  -- opcode 0B4C

int type = sampGetCurrentDialogType()  -- opcode 0B4D

int id = sampGetCurrentDialogId()  -- opcode 0B4E
]]

 

[#Northn]

Почему игра крашится при добавлении всех шрифтов которые установлены в винде в mimgui?

local FONTS = {}
local FONTS_LIST = scanFiles(getFolderPath(0x14), '*.ttf') -- список нормальный, в принт все норм
local FONT_SELECTED = imgui.new.int(0)
local FONTS_COMBO = imgui.new['const char*'][#FONTS_LIST](FONTS_LIST)

-- OnInitialize
for k, v in ipairs(FONTS_LIST) do
    print(getFolderPath(0x14)..'\\'..v)
    FONTS[k] = imgui.GetIO().Fonts:AddFontFromFileTTF(getFolderPath(0x14)..'\\'..v, font_config.SizePixels, font_config, defGlyph)
end

Папка Fonts у меня весит 365 мегабайт, тебе нужно загрузить каждый шрифт с размером в 14 пикселей. Теперь представь, сколько займёт атлас шрифтов в памяти видеокарты. не представляй, около трёх-четырёх гигов будет

 

[Rice.]

Возможно ли как-то постоянно обновлять размер renderCreateFont без зависаний, потери фпс и т.п.?

 

[Andrinall]

Возможно ли как-то постоянно обновлять размер renderCreateFont без зависаний, потери фпс и т.п.?

Как вариант - заранее загрузить несколько шрифтов с разным размером и юзать их по мере надобности, но это так, что первое в голову пришло.
Может что лучше предложат.

 

[DON GANDON]

[ML] (error) 123.lua: opcode '0984' call caused an unhandled exception
stack traceback:
[C]: in function 'getObjectModel'
D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:18: in function <D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:6>
[ML] (error) 123.lua: Script died due to an error. (0E60B53C)
Вот такая ошибка вылетает, когда кончаются модели с ид 1294, как пофиксить это?

require 'moonloader'

local work = false
local result = false
local hook = require 'samp.events'

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
 
    sampRegisterChatCommand('tps', function()
        work = not work
        sampAddChatMessage(work and '{ffffff}Активирован' or '{ffffff}Деактивирован', -1)
    end)
    while true do
        wait(0)
        if work then
            for k, v in pairs(getAllObjects()) do
                local model = getObjectModel(v)
                if model == 1294 then
                        local _, x, y, z = getObjectCoordinates(v)
                            if model == 1294 then
                                freezeCharPosition(PLAYER_PED, true)
                                tpto(x,y,z)
                                wait(1000)
                     end
                end
            end
        end
    end
end

function tpto(x, y, z)
    setCharCoordinates(PLAYER_PED, x, y, z)
end

 

[Andrinall]

[ML] (error) 123.lua: opcode '0984' call caused an unhandled exception
stack traceback:
[C]: in function 'getObjectModel'
D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:18: in function <D:\GTA 130K BY DAPO SHOW\moonloader\123.lua:6>
[ML] (error) 123.lua: Script died due to an error. (0E60B53C)
Вот такая ошибка вылетает, когда кончаются модели с ид 1294, как пофиксить это?

require 'moonloader'

local work = false
local result = false
local hook = require 'samp.events'

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
 
    sampRegisterChatCommand('tps', function()
        work = not work
        sampAddChatMessage(work and '{ffffff}Активирован' or '{ffffff}Деактивирован', -1)
    end)
    while true do
        wait(0)
        if work then
            for k, v in pairs(getAllObjects()) do
                local model = getObjectModel(v)
                if model == 1294 then
                        local _, x, y, z = getObjectCoordinates(v)
                            if model == 1294 then
                                freezeCharPosition(PLAYER_PED, true)
                                tpto(x,y,z)
                                wait(1000)
                     end
                end
            end
        end
    end
end

function tpto(x, y, z)
    setCharCoordinates(PLAYER_PED, x, y, z)
end

while true do wait(0)
    if work then
        for _, v in pairs(getAllObjects()) do
            if doesObjectExist(v) then
                if getObjectModel(v) == 1294 then
                    local _, x, y, z = getObjectCoordinates(v)
                    freezeCharPosition(PLAYER_PED, true)
                    tpto(x, y, z)
                    wait(1000)
                end
            end
        end
    end
end

 

[TrixTM]

[ML] (error) 666.lua: GTA\moonloader\search marker.lua:6: ')' expected near 'function'
[ML] (error) 666.lua: Script died due to an error. (0852FC54)

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end

    while true do wait(0) end
    sampRegisterChatCommand("i9w41ask5419", cmd)
    sampRegisterChatCommand("mbot" function()
    mine = not mine
    if mine == true then
        local pos = {getCharCoordinates(PLAYER_PED)}
        local res, x, y, z = SearchMarker(posX, posY, posZ, 50.0, false)
        if res then
            if getDistanceBetweenCoords3d(pos[1], pos[2], pos[3], x, y, z) > 3 and mine then
                sampAddChatMessage("{DC2B2B}[Mine Bot]: {EAEAEA} Иду на маркер", -1)
                    BeginToPoint(x, y, z, 3.000000, -255, isSprint, isJumping)
                else
                    BeginToPoint(x, y, z, 3.000000, -255, false, false)
                end
            end
        end
    end)
end


-- function bot()
    -- mine = not mine
    -- if mine == true then
        -- local pos = {getCharCoordinates(PLAYER_PED)}
        -- local _, x, y, z = SearchMarker(posX, posY, posZ, 50.0, false)
        -- if _ then
            -- if getDistanceBetweenCoords3d(pos[1], pos[2], pos[3], x, y, z) > 3 and mine then
                -- sampAddChatMessage("{DC2B2B}[Mine Bot]: {EAEAEA} Иду на маркер", -1)
                    -- BeginToPoint(x, y, z, 3.000000, -255, isSprint, isJumping)
                -- else
                    -- BeginToPoint(x, y, z, 3.000000, -255, false, false)
                -- end
            -- end
        -- end
    -- end
-- end

function cmd(param)
    if isPlayerPlaying(playerHandle) then
        local posX, posY, posZ = getCharCoordinates(playerPed)
        local res, x, y, z = SearchMarker(posX, posY, posZ, 50.0, false)
        if res then
            sampAddChatMessage(string.format("Найден обычный маркер в координатах %.2f %.2f %.2f", x, y, z), -1)
        else
            res, x, y, z = SearchMarker(posX, posY, posZ, 50.0, true)
            if res then
                sampAddChatMessage(string.format("Найден гоночный маркер в координатах %.2f %.2f %.2f", x, y, z), -1)
            else
                sampAddChatMessage("Маркер не найден", -1)
            end
        end
    end
end

function SearchMarker(posX, posY, posZ, radius, isRace)
    local ret_posX = 0.0
    local ret_posY = 0.0
    local ret_posZ = 0.0
    local isFind = false

    for id = 0, 31 do
        local MarkerStruct = 0
        if isRace then MarkerStruct = 0xC7F168 + id * 56
        else MarkerStruct = 0xC7DD88 + id * 160 end
        local MarkerPosX = representIntAsFloat(readMemory(MarkerStruct + 0, 4, false))
        local MarkerPosY = representIntAsFloat(readMemory(MarkerStruct + 4, 4, false))
        local MarkerPosZ = representIntAsFloat(readMemory(MarkerStruct + 8, 4, false))

        if MarkerPosX ~= 0.0 or MarkerPosY ~= 0.0 or MarkerPosZ ~= 0.0 then
            if getDistanceBetweenCoords3d(MarkerPosX, MarkerPosY, MarkerPosZ, posX, posY, posZ) < radius then
                ret_posX = MarkerPosX
                ret_posY = MarkerPosY
                ret_posZ = MarkerPosZ
                isFind = true
                radius = getDistanceBetweenCoords3d(MarkerPosX, MarkerPosY, MarkerPosZ, posX, posY, posZ)
            end
        end
    end

    return isFind, ret_posX, ret_posY, ret_posZ
end

function BeginToPoint(x, y, z, radius, move_code, isSprint, isJumping)
    repeat
        local posX, posY, posZ = getCharCoordinates(PLAYER_PED)
        SetAngle(x, y, z);
        MovePlayer(move_code, isSprint, isJumping);
        local dist = getDistanceBetweenCoords3d(x, y, z, posX, posY, z);
        wait(0)
    until not mine or dist < radius
end

function SetAngle(x, y, z)
    local posX, posY, posZ = getCharCoordinates(PLAYER_PED)
    x1 = x - posX
    y1 = y - posY
    vec2 = getHeadingFromVector2d(x1, y1)
    shit = math.rad(vec2)
    shit = shit + 4.7
    setCameraPositionUnfixed(-0.3, shit)
end

function MovePlayer(move_code, isSprint, isJumping)
    setGameKeyState(1, move_code)
    --[[255 - обычный бег назад
       -255 - обычный бег вперед
      65535 - идти шагом вперед
     -65535 - идти шагом назад]]
    lua_thread.create(function()
        if isJumping then
            local rand = math.random(0, 9999999);
            if rand >= 9909999 then
                isSprint = false
                setGameKeyState(14, 255);
                wait(200)
                isSprint = true
            end
        end
    end)
    if isSprint then setGameKeyState(16, 255) end
end

function NearestObject(id)
    local objects = {};
    for _, v in pairs(getAllObjects()) do
        if getObjectModel(v) == id then
            local _, x, y, z = getObjectCoordinates(v)
            local x2,y2,z2 = getCharCoordinates(PLAYER_PED)
            local distance = getDistanceBetweenCoords3d(x, y, z, x2, y2, z2);
           
            table.insert(objects, {v, distance});
        end
    end
    table.sort(objects, function(a, b) return (a[2] < b[2]) end);
    if objects[1] == nil then mine = false; return false; end
    return getObjectCoordinates(objects[1][1]);
end

куда не поставлю скобку, все равно пишет одно и то же.​

 

[dmitri4]

[ML] (error) 666.lua: GTA\moonloader\search marker.lua:6: ')' expected near 'function'
[ML] (error) 666.lua: Script died due to an error. (0852FC54)

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end

    while true do wait(0) end
    sampRegisterChatCommand("i9w41ask5419", cmd)
    sampRegisterChatCommand("mbot" function()
    mine = not mine
    if mine == true then
        local pos = {getCharCoordinates(PLAYER_PED)}
        local res, x, y, z = SearchMarker(posX, posY, posZ, 50.0, false)
        if res then
            if getDistanceBetweenCoords3d(pos[1], pos[2], pos[3], x, y, z) > 3 and mine then
                sampAddChatMessage("{DC2B2B}[Mine Bot]: {EAEAEA} Иду на маркер", -1)
                    BeginToPoint(x, y, z, 3.000000, -255, isSprint, isJumping)
                else
                    BeginToPoint(x, y, z, 3.000000, -255, false, false)
                end
            end
        end
    end)
end


-- function bot()
    -- mine = not mine
    -- if mine == true then
        -- local pos = {getCharCoordinates(PLAYER_PED)}
        -- local _, x, y, z = SearchMarker(posX, posY, posZ, 50.0, false)
        -- if _ then
            -- if getDistanceBetweenCoords3d(pos[1], pos[2], pos[3], x, y, z) > 3 and mine then
                -- sampAddChatMessage("{DC2B2B}[Mine Bot]: {EAEAEA} Иду на маркер", -1)
                    -- BeginToPoint(x, y, z, 3.000000, -255, isSprint, isJumping)
                -- else
                    -- BeginToPoint(x, y, z, 3.000000, -255, false, false)
                -- end
            -- end
        -- end
    -- end
-- end

function cmd(param)
    if isPlayerPlaying(playerHandle) then
        local posX, posY, posZ = getCharCoordinates(playerPed)
        local res, x, y, z = SearchMarker(posX, posY, posZ, 50.0, false)
        if res then
            sampAddChatMessage(string.format("Найден обычный маркер в координатах %.2f %.2f %.2f", x, y, z), -1)
        else
            res, x, y, z = SearchMarker(posX, posY, posZ, 50.0, true)
            if res then
                sampAddChatMessage(string.format("Найден гоночный маркер в координатах %.2f %.2f %.2f", x, y, z), -1)
            else
                sampAddChatMessage("Маркер не найден", -1)
            end
        end
    end
end

function SearchMarker(posX, posY, posZ, radius, isRace)
    local ret_posX = 0.0
    local ret_posY = 0.0
    local ret_posZ = 0.0
    local isFind = false

    for id = 0, 31 do
        local MarkerStruct = 0
        if isRace then MarkerStruct = 0xC7F168 + id * 56
        else MarkerStruct = 0xC7DD88 + id * 160 end
        local MarkerPosX = representIntAsFloat(readMemory(MarkerStruct + 0, 4, false))
        local MarkerPosY = representIntAsFloat(readMemory(MarkerStruct + 4, 4, false))
        local MarkerPosZ = representIntAsFloat(readMemory(MarkerStruct + 8, 4, false))

        if MarkerPosX ~= 0.0 or MarkerPosY ~= 0.0 or MarkerPosZ ~= 0.0 then
            if getDistanceBetweenCoords3d(MarkerPosX, MarkerPosY, MarkerPosZ, posX, posY, posZ) < radius then
                ret_posX = MarkerPosX
                ret_posY = MarkerPosY
                ret_posZ = MarkerPosZ
                isFind = true
                radius = getDistanceBetweenCoords3d(MarkerPosX, MarkerPosY, MarkerPosZ, posX, posY, posZ)
            end
        end
    end

    return isFind, ret_posX, ret_posY, ret_posZ
end

function BeginToPoint(x, y, z, radius, move_code, isSprint, isJumping)
    repeat
        local posX, posY, posZ = getCharCoordinates(PLAYER_PED)
        SetAngle(x, y, z);
        MovePlayer(move_code, isSprint, isJumping);
        local dist = getDistanceBetweenCoords3d(x, y, z, posX, posY, z);
        wait(0)
    until not mine or dist < radius
end

function SetAngle(x, y, z)
    local posX, posY, posZ = getCharCoordinates(PLAYER_PED)
    x1 = x - posX
    y1 = y - posY
    vec2 = getHeadingFromVector2d(x1, y1)
    shit = math.rad(vec2)
    shit = shit + 4.7
    setCameraPositionUnfixed(-0.3, shit)
end

function MovePlayer(move_code, isSprint, isJumping)
    setGameKeyState(1, move_code)
    --[[255 - обычный бег назад
       -255 - обычный бег вперед
      65535 - идти шагом вперед
     -65535 - идти шагом назад]]
    lua_thread.create(function()
        if isJumping then
            local rand = math.random(0, 9999999);
            if rand >= 9909999 then
                isSprint = false
                setGameKeyState(14, 255);
                wait(200)
                isSprint = true
            end
        end
    end)
    if isSprint then setGameKeyState(16, 255) end
end

function NearestObject(id)
    local objects = {};
    for _, v in pairs(getAllObjects()) do
        if getObjectModel(v) == id then
            local _, x, y, z = getObjectCoordinates(v)
            local x2,y2,z2 = getCharCoordinates(PLAYER_PED)
            local distance = getDistanceBetweenCoords3d(x, y, z, x2, y2, z2);
          
            table.insert(objects, {v, distance});
        end
    end
    table.sort(objects, function(a, b) return (a[2] < b[2]) end);
    if objects[1] == nil then mine = false; return false; end
    return getObjectCoordinates(objects[1][1]);
end

куда не поставлю скобку, все равно пишет одно и то же.​

end забыл в main добавить

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while true do wait(0) end
        sampRegisterChatCommand("i9w41ask5419", cmd)
        sampRegisterChatCommand("mbot" function()
            mine = not mine
            if mine == true then
                local pos = {getCharCoordinates(PLAYER_PED)}
                local res, x, y, z = SearchMarker(posX, posY, posZ, 50.0, false)
                if res then
                    if getDistanceBetweenCoords3d(pos[1], pos[2], pos[3], x, y, z) > 3 and mine then
                        sampAddChatMessage("{DC2B2B}[Mine Bot]: {EAEAEA} Иду на маркер", -1)
                        BeginToPoint(x, y, z, 3.000000, -255, isSprint, isJumping)
                    else
                        BeginToPoint(x, y, z, 3.000000, -255, false, false)
                    end
                end
            end
        end)
    end
end