Вопросы по 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

 

[Dmitriy Makarov]

Как сделать удаление папки? ( Слышал это делается через lfs )

Как удалить не пустую папку

Добрый вечер или день. У кого как. Короче, мне нужно удалить папку в config c файлами внутри. lfs.rmdir (dirname) или же ffi.cdef("int RemoveDirectoryA(const char* lpPathName);") local RemoveDirectoryA = ffi.C.RemoveDirectoryA не подходит. Как я понял, они удаляют пустые папки. А можно...

www.blast.hk

 

[chapo]

есть скрипт, который при входе вводит в консоль команду fps:

function main()
    while not isSampfuncsLoaded() do wait(0) end
    runSampfuncsConsoleCommand('fps')
end

то как сделать, что бы он за сессию работал только один раз? так как при релоаде оно заново вводится, и тем самым счетчик фпс вырубается

if os.clock() < 10 then
runSampfuncsConsoleComma...
end

 

[chapo]

function main()
    while not isSampfuncsLoaded() do wait(0) end
    if os.clock() < 10 then runSampfuncsConsoleCommand('fps') end
end

теперь чет вообще не пашет

мб у тебя игра загружается дольше 10 секунд. Поставь 60 вместо 10

 

[deleted-user-139653]

какого фига возвращает nil в оружие? хотя должно написать название оружия

    if sampTextdrawIsExists(225) and sampTextdrawIsExists(226) then
        --sampTextdrawSetPos(225, 9999, 9999)
        --sampTextdrawSetPos(226, 9999, 9999)
        for i = 2049, 2060 do
            if sampTextdrawIsExists(i) then
                local tdx, tdy = sampTextdrawGetPos(i)
                if (tdy) == 360 then
                    local specString = sampTextdrawGetString(i)
                    local id, hp, arm, lvl, ping, gun, gunpt, pl = specString:match("~w~(%d+)~n~(%d+)~n~(%d+)~n~(%d+)~n~(%d+)~n~(%d+)~n~(%d+)~n~(%d+%.%d+)")
                    local specFormat = string.format("Здоровье: %s \nБроня: %s \nУровень: %s \nПинг: %s \nОружие: %s \nПатроны: %s \nPL: %s", hp, arm, lvl, ping, game_weapons.get_name(gun), gunpt, pl)
                    imgui.Text(u8(specFormat))
                    --sampTextdrawSetPos(i, tdx + 1000, tdy)
                end
            end
        end
    end

Спойлер: скрин

Решил проблему, испанский стыд, надо получать так оружие....

local result, ped = sampGetCharHandleBySampPlayerId(id)
local wea = getCurrentCharWeapon(ped)

Спойлер: скр

 

[TSIDEX]

Как получить ped из ника игрока?

 

[deleted-user-139653]

Как получить ped из ника игрока?

если я правильно понял, что ты хочешь получить ид игрока по нику, то вот

function sampGetPlayerIdByNickname(nick)
  nick = tostring(nick)
  local _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
  if nick == sampGetPlayerNickname(myid) then return myid end
  for i = 0, 1003 do
    if sampIsPlayerConnected(i) and sampGetPlayerNickname(i) == nick then
      return i
    end
  end
end

 

[TSIDEX]

если я правильно понял, что ты хочешь получить ид игрока по нику, то вот

function sampGetPlayerIdByNickname(nick)
  nick = tostring(nick)
  local _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
  if nick == sampGetPlayerNickname(myid) then return myid end
  for i = 0, 1003 do
    if sampIsPlayerConnected(i) and sampGetPlayerNickname(i) == nick then
      return i
    end
  end
end

Нет, друг. Я упёрся в иной трабл. Конкретизирую:

   local tname = msg:match('тест на (%w+_%w+)')
    if tname then
        local tid = sampGetPlayerIdByNickname(tname)
        sampAddChatMessage('rez: '..tname..'['..tid..']', 0xffffff) --результат есть, возвращает и ник и ид как нужно
        local tped = sampGetCharHandleBySampPlayerId(tid)
        taskPlayAnim(tped, "KO_SKID_FRONT", "PED", 6.0, false, false, false, false, 1000) --результата нет
        local x, y, z = getCharCoordinates(tped)
        createObject(766, x, y, z-2) --результата нет
    end

Там где нет результата:
(error) test: opcode '0605' call caused an unhandled exception stack traceback: [C]: in function 'taskPlayAnim'

Из sampGetCharHandleBySampPlayerId() не получается вернуть хендл и использовать его в дальнейшем. В чём ошибка?

 

[Leon_Trotsky]

Как сообщение обрезать до первого символа?

 

[TSIDEX]

requestAnimation() есть?

Да, что с ним, что без него одно и то же. Там скорее в получении хендла загвоздка, ибо какую функцию не подставь, будет такой результат. Не хочет полученный из id хендл использовать.

 

[painw]

Как сообщение обрезать до первого символа?

local text = 'Text'
local one = text:sub(1,1)
print(one)

 

[Leon_Trotsky]

if text:find('A%-(.*) %| (.*)%[(.*)%]: (.*)') then
        local a_lvl, a_nick, a_id, a_mess = text:match('A%-(.*) %| (.*)%[(.*)%]: (.*)')

        if a_lvl == 1 then
            sampAddChatMessage('Мл. администратор | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)
            
        elseif a_lvl == 2 then
            sampAddChatMessage('Администратор | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)

        elseif a_lvl == 3 then
            sampAddChatMessage('Администратор | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)

        elseif a_lvl == 4 then
            sampAddChatMessage('Старший администратор | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)

        elseif a_lvl == 5 then
            sampAddChatMessage('Технический администратор | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)

        elseif a_lvl == 6 then
            sampAddChatMessage('ЗГА | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)

        elseif a_lvl == 7 then
            sampAddChatMessage('Главный администратор | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)

        else
            sampAddChatMessage('Руководство | '..a_nick..' ['..a_id..']: '..a_mess, 0x32CD32)
        end
        return false
    end

Работает только исключение "else". С чем можем быть связано?

 

[MLycoris]

Работает только исключение "else". С чем можем быть связано?

попробуй такой вариант

-- вне функи
local admList = {'Мл. администратор','Администратор','Администратор','Старший администратор','Технический администратор','ЗГА','Главный администратор'}

--
if text:find('A%-(%d+) %| (.*)%[(.*)%]: (.*)') then
    local a_lvl, a_nick, a_id, a_mess = text:match('A%-(%d+) %| (.*)%[(.*)%]: (.*)')
    sampAddChatMessage(string.format('%s | %s [%s]: %s', a_lvl < 8 and admList[tonumber(a_lvl)] or 'Руководство',a_nick,a_id,a_mess),-1)
    return false
end

 

[Leon_Trotsky]

попробуй такой вариант

-- вне функи
local admList = {'Мл. администратор','Администратор','Администратор','Старший администратор','Технический администратор','ЗГА','Главный администратор'}

--
if text:find('A%-(%d+) %| (.*)%[(.*)%]: (.*)') then
    local a_lvl, a_nick, a_id, a_mess = text:match('A%-(%d+) %| (.*)%[(.*)%]: (.*)')
    sampAddChatMessage(string.format('%s | %s [%s]: %s', a_lvl < 8 and admList[tonumber(a_lvl)] or 'Руководство',a_nick,a_id,a_mess),-1)
    return false
end

sampAddChatMessage(string.format('%s | %s [%s]: %s', a_lvl < 8 and admList[tonumber(a_lvl)] or 'Руководство',a_nick,a_id,a_mess),-1)

attempt to compare string with number

 

[chapo]

sampAddChatMessage(string.format('%s | %s [%s]: %s', a_lvl < 8 and admList[tonumber(a_lvl)] or 'Руководство',a_nick,a_id,a_mess),-1)

attempt to compare string with number

(tonumber(a_lvl) or 0) < 8 and ... or ...

 

[Leon_Trotsky]

(tonumber(a_lvl) or 0) < 8 and ... or ...

Руководство выводит, а всё остальное - true