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

 

[mihagrom]

как сделать если нашло это

>> ПМ от nick(id): hpme

то в ответ отправило это

/sethp id 160

if text:find('>> ПМ от (.*)%((%d+)%): hpme') then
    local nick, id = text:match('>> ПМ от (.*)%((%d+)%): hpme')
    sampSendChat('/sethp '..id..' 160')
end

 

[Tango]

function sampev.onShowDialog(id, style, title, button1, button2, text)
 
if mode == 3 and #myBuyArray <= 0 and text:find('Прекратить покупку товара') and text:find('Удалить товар с продажи') then
    sms('Список товаров на скуп пустой')
    mode = 0
  end

  if mode == 3 and #myBuyArray > 0 then
    for i, data in ipairs(myBuyArray) do
      if mode == 3 and text:find('Удалить товар с продажи') and text:find('Прекратить покупку товара') and #myBuyArray > 0 then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, getLineOnTextDialog(text, 'Добавить товар на покупку %(поиск по предметам%)'), nil)
        end)
      end
   
      if mode == 3 and text:find('Введите наименование товара, который хотите найти и выставить на скупку.') and #myBuyArray > 0 then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, nil, data[1])
        end)
      end

      if mode == 3 and title:find('Поиск товара') and not text:find('Введите наименование товара, который хотите найти и выставить на скупку.') and #myBuyArray > 0 then
        lua_thread.create(function ()
          wait(tw)
                  local text = text:gsub('{......}', '')
          local text = text:gsub('%d.','')
          sampSendDialogResponse(id, 1, 0, nil)
        end)
      end

      if mode == 3 and text:find('Введите цену за товар') then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, nil, data[3])
        end)
      end

      if mode == 3 and text:find('Введите количество и цену за один товар') then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, nil, data[2]..','..data[3])
        end)
      end

    end
end
  end

Надеюсь будет понятно и без обьяснений функций, крч как правильно перебрать массив myBuyArray в ивенте onshowdialog. Он при окончании по новой тоже самое делает

 

[deleted-user-139653]

есть нормальный адрес, который отвечает за "Дальности прорисовки" чтобы можно быль использовать без FixDist.cleo?

 

[XRLM]

function sampev.onShowDialog(id, style, title, button1, button2, text)
 
if mode == 3 and #myBuyArray <= 0 and text:find('Прекратить покупку товара') and text:find('Удалить товар с продажи') then
    sms('Список товаров на скуп пустой')
    mode = 0
  end

  if mode == 3 and #myBuyArray > 0 then
    for i, data in ipairs(myBuyArray) do
      if mode == 3 and text:find('Удалить товар с продажи') and text:find('Прекратить покупку товара') and #myBuyArray > 0 then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, getLineOnTextDialog(text, 'Добавить товар на покупку %(поиск по предметам%)'), nil)
        end)
      end
  
      if mode == 3 and text:find('Введите наименование товара, который хотите найти и выставить на скупку.') and #myBuyArray > 0 then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, nil, data[1])
        end)
      end

      if mode == 3 and title:find('Поиск товара') and not text:find('Введите наименование товара, который хотите найти и выставить на скупку.') and #myBuyArray > 0 then
        lua_thread.create(function ()
          wait(tw)
                  local text = text:gsub('{......}', '')
          local text = text:gsub('%d.','')
          sampSendDialogResponse(id, 1, 0, nil)
        end)
      end

      if mode == 3 and text:find('Введите цену за товар') then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, nil, data[3])
        end)
      end

      if mode == 3 and text:find('Введите количество и цену за один товар') then
        lua_thread.create(function ()
          wait(tw)
          sampSendDialogResponse(id, 1, nil, data[2]..','..data[3])
        end)
      end

    end
end
  end

Надеюсь будет понятно и без обьяснений функций, крч как правильно перебрать массив myBuyArray в ивенте onshowdialog. Он при окончании по новой тоже самое делает

где сам массив

 

[aidzava]

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

[ML] (error) auto_forms: ...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua:82: attempt to concatenate global 'ruk_id' (a nil value)
stack traceback:
...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua: in function <...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua:76>
stack traceback:
[C]: in function 'create'
...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua:76: in function 'callback'
...a Games Launcher\bin\moonloader\lib\samp\events\core.lua:79: in function <...a Games Launcher\bin\moonloader\lib\samp\events\core.lua:53>
[ML] (error) auto_forms: Script died due to an error. (1805723C)

no_forms = {'Ricky_Late', 'Farmer', 'Sam_Mason', 'Conor', 'Dorian_Gray', 'Stalker_Team', 'Sebastian_Disney', 'Jackie_Wilson', 'Derick_Stealer', 'Sapphire_Davydov', 'Maxim_Cordero', 'Don_Morrison', 'Nicolas_Source', 'Alfredo Reynolds'}



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

ruk_id = sampGetPlayerIdByNickname(no_forms)

function se.onServerMessage(color, text)
    if text:match('%[A%] %{......%}(.*)%[(%d+)%]%{......%}: /(.*) '..ruk_id..'%s(.*)') then
    -- code
    end
end

 

[madrasso]

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

[ML] (error) auto_forms: ...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua:82: attempt to concatenate global 'ruk_id' (a nil value)
stack traceback:
...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua: in function <...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua:76>
stack traceback:
[C]: in function 'create'
...mes\Arizona Games Launcher\bin\moonloader\auto_forms.lua:76: in function 'callback'
...a Games Launcher\bin\moonloader\lib\samp\events\core.lua:79: in function <...a Games Launcher\bin\moonloader\lib\samp\events\core.lua:53>
[ML] (error) auto_forms: Script died due to an error. (1805723C)

no_forms = {'Ricky_Late', 'Farmer', 'Sam_Mason', 'Conor', 'Dorian_Gray', 'Stalker_Team', 'Sebastian_Disney', 'Jackie_Wilson', 'Derick_Stealer', 'Sapphire_Davydov', 'Maxim_Cordero', 'Don_Morrison', 'Nicolas_Source', 'Alfredo Reynolds'}



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

ruk_id = sampGetPlayerIdByNickname(no_forms)

function se.onServerMessage(color, text)
    if text:match('%[A%] %{......%}(.*)%[(%d+)%]%{......%}: /(.*) '..ruk_id..'%s(.*)') then
    -- code
    end
end

Делаешь какой то бред, к тому же не объясняешь что тебе конкретно нужно. Подробнее можно пожалуйста, что за строка в onServerMessage, и что ты от неё хочешь.

есть нормальный адрес, который отвечает за "Дальности прорисовки" чтобы можно быль использовать без FixDist.cleo?

Lua - Fog distance

с помощью этого скрипта можно изменять дальность прорисовки почти без ограничений. использование: /fogdist [0-3600] в чат, еще можно указать свою команду, написав ее напротив ключа cmd_alias в конфиге (moonloader/config/fogdist.ini) введенное после команды значение сохраняется и применяется при...

www.blast.hk

 

[Tango]

где сам массив

Он в самом начале скрипта и выглядит примерно так myBuyArray = {{ларец, 1,10}}

 

[aidzava]

Делаешь какой то бред, к тому же не объясняешь что тебе конкретно нужно. Подробнее можно пожалуйста, что за строка в onServerMessage, и что ты от неё хочешь.

Lua - Fog distance

с помощью этого скрипта можно изменять дальность прорисовки почти без ограничений. использование: /fogdist [0-3600] в чат, еще можно указать свою команду, написав ее напротив ключа cmd_alias в конфиге (moonloader/config/fogdist.ini) введенное после команды значение сохраняется и применяется при...

www.blast.hk

нужно узнать ид, из списка который в начале скрипта, то-есть если чел на сервере из этого списка, я получаю ид его по НИКУ. и потом ищу строку с его ИД, который я получил до этого

 

[madrasso]

нужно узнать ид, из списка который в начале скрипта, то-есть если чел на сервере из этого списка, я получаю ид его по НИКУ. и потом ищу строку с его ИД, который я получил до этого

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

 

[aidzava]

Не проще будет получать ид из строки, получать ник с помощью ида взятого из строки и проверять есть ли он в массиве

как это сделать?

 

[madrasso]

как это сделать?

Полную строку дай

 

[aidzava]

Полную строку дай

if text:match('Игрок/админ (.+)%[(%d+)%] зашел (.+)') then
local admnick, admid, othz = text:match('Игрок/админ (.+)%[(%d+)%] зашел (.+)')
end

 

[deleted-user-139653]

Делаешь какой то бред, к тому же не объясняешь что тебе конкретно нужно. Подробнее можно пожалуйста, что за строка в onServerMessage, и что ты от неё хочешь.

Lua - Fog distance

с помощью этого скрипта можно изменять дальность прорисовки почти без ограничений. использование: /fogdist [0-3600] в чат, еще можно указать свою команду, написав ее напротив ключа cmd_alias в конфиге (moonloader/config/fogdist.ini) введенное после команды значение сохраняется и применяется при...

www.blast.hk

Ну и зачем ты это скинул?😵

 

[madrasso]

if text:match('Игрок/админ (.+)%[(%d+)%] зашел (.+)') then
local admnick, admid, othz = text:match('Игрок/админ (.+)%[(%d+)%] зашел (.+)')
end

local function findInArray(array, value)
    for i = 1, #array do
        if (array[i] == value) then
            return i;
        end
    end
    return false;
end


if text:match('Игрок/админ (.+)%[(%d+)%] зашел (.+)') then
    local admnick, admid, othz = text:match('Игрок/админ (.+)%[(%d+)%] зашел (.+)')
    local name = sampGetPlayerNickname(tonumber(admid));

    if (findInArray(no_forms, name)) then
        -------------------------
    end
end

 

[deleted-user-139653]

А че за прикол, почему меняет только высоту иконки кулака, а оружия нет?

local gunH = ffi.cast('float*', ffi.C.malloc(4))
gunH[0] = 55
ffi.cast('float**', 0x58D94D)[0] = gunH

UPD: Если менять так, то все нормально 😳

memory.setfloat(memory.getuint32(0x58D94D), 55)