Вопросы по 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.
Как получить транспорт, в котором сидит игрок?
Lua:
local veh = storeCarCharIsInNoSave(PLAYER_PED)
Как получить свой id или id другого игрока?
Lua:
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
Как проверить, что строка содержит какой-то текст?
Lua:
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
Как эмулировать нажатие игровой клавиши?
Lua:
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 другого игрока, в которого целюсь я?
Lua:
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
Как зарегистрировать команду чата SAMP?
Lua:
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua:
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:

Sanchez.

Известный
704
187
Lua:
local actStatus,actStatus1 = false,false

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("botferma", function()
        actStatus = not actStatus
        sampAddChatMessage(string.format("{00FF00} Bot Ferma {ff0077}%s", actStatus and "Enabled" or "Disabled"), -1)
    end)
    sampRegisterChatCommand("botgruz", function()
        actStatus1 = not actStatus1
        sampAddChatMessage(string.format("{00FF00} Bot Gruzchik {ff0077}%s", actStatus1 and "Enabled" or "Disabled"), -1)
    end)
    while true do
        wait(1)
        if actStatus then
            setCharCoordinates(1, -105.25, 100.60, 3.12)
            wait(500)
            setCharCoordinates(1, -94.84, 76.43, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -49.19, 26.30, 3.122)
            wait(1)
            setCharCoordinates(1, -105.25, 100.60, 3.12)
        else if actStatus1 then
            setCharCoordinates(1, 2015.66, -1958.35, 12.40)
            wait(1000)
            setCharCoordinates{1, 2014.44, -1981.39, 13.55)
            wait(1000)
            setCharCoordinates(1, 2012.10, -1989.15, 13.00)
            wait(1000)
        end
    end
end

функа:
Lua:
function imgui.TextColoredRGB(string)
    local style = imgui.GetStyle()
    local colors = style.Colors
    local clr = imgui.Col

    local function color_imvec4(color)
        if color:upper() == 'SSSSSS' then return colors[clr.Text] end
        local color = type(color) == 'number' and ('%X'):format(color):upper() or color:upper()
        local rgb = {}
        for i = 1, #color/2 do rgb[#rgb+1] = tonumber(color:sub(2*i-1, 2*i), 16) end
        return imgui.ImVec4(rgb[1]/255, rgb[2]/255, rgb[3]/255, rgb[4] and rgb[4]/255 or colors[clr.Text].w)
    end

    local function render_text(string)
        local text, color = {}, {}
        local m = 1
        while string:find('{......}') do
            local n, k = string:find('{......}')
            text[#text], text[#text+1] = string:sub(m, n-1), string:sub(k+1, #string)
            color[#color+1] = color_imvec4(string:sub(n+1, k-1))
            local t1, t2 = string:sub(1, n-1), string:sub(k+1, #string)
            string = t1..t2
            m = k-7
        end
        if text[0] then
            for i, _ in ipairs(text) do
                imgui.TextColored(color[i] or colors[clr.Text], u8(text[i]))
                imgui.SameLine(nil, 0)
            end
            imgui.NewLine()
        else imgui.Text(u8(string)) end
    end

    render_text(string)
end


пример:
Lua:
local text = '{FFFFFF}text1 {SSSSSS}text2 {CCFF00}text3 {FF0000}text4'
imgui.TextColoredRGB(text)

вроде имринг автор этой функи
Да это функу я знаю, мне просто нужно переливающейся текст
 

Andy Safino

Участник
69
4
Подскажите, пожалуйста. Хотел ввести автообновление после введения нового значения, но вставив mainIni = inicfg.load(nil, directIni) в бесконечный цикл локальной переменной sampHasDialogRespond(15) выдаёт ошибку main chunk.

Ещё проще, при любых изменений данных пользователем нужна автоматическая выгрузка с ini файла, а не после перезапуска скрипта

Lua:
require "lib.moonloader"
require "lib.sampfuncs"

local main_color = 0x4D76FF
local main_color_text = "{4D76FF}"
local white_color = "{FFFFFF}"

local keys = require "vkeys"
local sampev = require "lib.samp.events"
local inicfg = require "inicfg"
local directIni = "moonloader\\config.ini"

-- Для основного диалога с ID 12
local dialog = {"Информация об игроке", "Помощь", "Обновить"}
local dialogStr = ""

for _, str in ipairs(dialog) do
  dialogStr = dialogStr .. str .. "\n"
end

-- Для диалога с ID 14
local dialogTabArr = {"Ваше имя:\t" .. mainIni.config.name, "Место работы:\tОрганизация", "Ваша должность:\tДолжность", "Ваш профиль:\tПрофиль"}
local dialogTabStr = ""

for _, str in ipairs(dialogTabArr) do
  dialogTabStr = dialogTabStr .. str .. "\n"
end

-- Для диалога с ID 15
local dialogTabHeaderStr = "Функция\tЗначение\n" .. dialogTabStr




function main()
  if not isSampLoaded() or not isSampfuncsLoaded() then return end
  while not isSampAvailable() do wait(100) end

sampRegisterChatCommand("help", cmd_help)

while true do
wait(0)

local result, button, list, input = sampHasDialogRespond(11)
if result then
  if button == 1 then
    mainIni.config.name = input
    if inicfg.save(mainIni, directIni) then
      sampAddChatMessage(tag .. white_color .. "Данные успешно сохранены!", main_color)
    else
      sampAddChatMessage(tag .. white_color .. "Произошла неизвестная ошибка.", main_color)
    end
  end
end

local result, button, list, input = sampHasDialogRespond(12)
if result then
  if button == 1 then
    if list == 0 then -- если диалог открыт
      sampShowDialog(15, "Помощник", dialogTabHeaderStr, "Выбрать", "Отмена", 5)
    end
  end
end

local result, button, list, input = sampHasDialogRespond(15)
if result then
  mainIni = inicfg.load(nil, directIni)
  if button == 1 then
    if list == 0 then -- если диалог открыт
      sampShowDialog(11, "Помощник", "Введите ваш NickName (без _): ", "Выбрать", "Отмена", 1)
    end
  end
end
end
end

function cmd_help()
  sampShowDialog(12, "Помощник", dialogStr, "Выбрать", "Отмена", 2)
end
Ребятки, не получится с этим помочь? Не получается посмотреть только что введённый в input текст (диалог в диалоге). Выдаёт ошибку: main chunk (22 строка)
 

ShadowKnife

Потрачен
231
25
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Lua:
local actStatus,actStatus1 = false,false

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("botferma", function()
        actStatus = not actStatus
        sampAddChatMessage(string.format("{00FF00} Bot Ferma {ff0077}%s", actStatus and "Enabled" or "Disabled"), -1)
    end)
    sampRegisterChatCommand("botgruz", function()
        actStatus1 = not actStatus1
        sampAddChatMessage(string.format("{00FF00} Bot Gruzchik {ff0077}%s", actStatus1 and "Enabled" or "Disabled"), -1)
    end)
    while true do
        wait(1)
        if actStatus then
            setCharCoordinates(1, -105.25, 100.60, 3.12)
            wait(500)
            setCharCoordinates(1, -94.84, 76.43, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -49.19, 26.30, 3.122)
            wait(1)
            setCharCoordinates(1, -105.25, 100.60, 3.12)
        else if actStatus1 then
            setCharCoordinates(1, 2015.66, -1958.35, 12.40)
            wait(1000)
            setCharCoordinates{1, 2014.44, -1981.39, 13.55)
            wait(1000)
            setCharCoordinates(1, 2012.10, -1989.15, 13.00)
            wait(1000)
        end
    end
end
[/QUOTE]
не работает, неизвестная команда

[ML] (error) botsarena.lua: ...___a_ Gta San Andres by Gremdik\moonloader\botsarena.lua:30: '}' expected near ')'
[ML] (error) botsarena.lua: Script died due to an error. (01D1E5AC)
1:
local actStatus,actStatus1 = false,false

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("botferma", function()
        actStatus = not actStatus
        sampAddChatMessage(string.format("{00FF00} Bot Ferma {ff0077}%s", actStatus and "Enabled" or "Disabled"), -1)
    end)
    sampRegisterChatCommand("botgruz", function()
        actStatus1 = not actStatus1
        sampAddChatMessage(string.format("{00FF00} Bot Gruzchik {ff0077}%s", actStatus1 and "Enabled" or "Disabled"), -1)
    end)
    while true do
        wait(1)
        if actStatus then
            setCharCoordinates(1, -105.25, 100.60, 3.12)
            wait(500)
            setCharCoordinates(1, -94.84, 76.43, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -49.19, 26.30, 3.122)
            wait(1)
            setCharCoordinates(1, -105.25, 100.60, 3.12)
        else if actStatus1 then
            setCharCoordinates(1, 2015.66, -1958.35, 12.40)
            wait(1000)
            setCharCoordinates(1, 2014.44, -1981.39, 13.55)
            wait(1000)
            setCharCoordinates(1, 2012.10, -1989.15, 13.00)
            wait(1000)
        end
    end
end

[ML] (error) botsarena.lua: ...___a_ Gta San Andres by Gremdik\moonloader\botsarena.lua:36: 'end' expected (to close 'function' at line 3) near '<eof>'
[ML] (error) botsarena.lua: Script died due to an error. (01CBD144)
НЕИЗВЕСТНАЯ команда
 
Последнее редактирование:

Andy Safino

Участник
69
4
Как умно заблокировать отправку пакета (команды) до полной отыгровки (через me) и только потом дать её дорогу?
Пробовал через onSendCommand(command), но она просто блокирует действие с командой и никаких отыгровок нет
 

kin4stat

mq-team · kin4@naebalovo.team
Всефорумный модератор
2,731
4,716
Как умно заблокировать отправку пакета (команды) до полной отыгровки (через me) и только потом дать её дорогу?
Пробовал через onSendCommand(command), но она просто блокирует действие с командой и никаких отыгровок нет
Зарегистрировать такую же команду на клиенте, сделать все нужные действия и в конце отправить ввод команды игроком
 

Warklot

Участник
112
3
Hello , how to remove {faF495} , {e8bd1F} and etc.. from chat? i tried with my code below but removes whole text
Lua:
function sampev.onServerMessage(color, text)

text = text:gsub("{.*}", "")

    return {color, text}
end
 

ShadowKnife

Потрачен
231
25
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
как добавить триггер tusamov к этому коду что бы он тепал сюда 1773.12, -1892.18, 13.55 ?
ПОМОГИТЕ ПЖ:
local actStatus,actStatus1 = false,false

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("botferma", function()
        actStatus = not actStatus
        sampAddChatMessage(string.format("{00FF00} Bot Ferma {ff0077}%s", actStatus and "Enabled" or "Disabled"), -1)
    end)
    sampRegisterChatCommand("botgruz", function()
        actStatus1 = not actStatus1
        sampAddChatMessage(string.format("{00FF00} Bot Gruzchik {ff0077}%s", actStatus1 and "Enabled" or "Disabled"), -1)
    end)
    while true do
        wait(1)
        if actStatus then
            setCharCoordinates(1, -105.25, 100.60, 3.12)
            wait(500)
            setCharCoordinates(1, -94.84, 76.43, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -49.19, 26.30, 3.52)
            wait(1)
            setCharCoordinates(1, -49.10, 26.39, 3.12)
            wait(100)
            setCharCoordinates(1, -105.25, 100.60, 3.12)
        elseif actStatus1 then
            setCharCoordinates(1, 2015.66, -1958.35, 12.40)
            wait(1000)
            setCharCoordinates(1, 2014.44, -1981.39, 13.55)
            wait(1000)
            setCharCoordinates(1, 2024.59, -1959.11, 14.39)
            wait(500)
            setCharCoordinates(1, 2012.10, -1989.15, 13.00)
            wait(1000)
        end
    end
end
 

Andy Safino

Участник
69
4
Зарегистрировать такую же команду на клиенте, сделать все нужные действия и в конце отправить ввод команды игроком
Не работает. Просьба помочь:
require "lib.moonloader"
require "lib.sampfuncs"

function main()
  if not isSampLoaded() or not isSampfuncsLoaded() then return end
  while not isSampAvailable() do wait(100) end

    sampRegisterChatCommand("su", function() lua_thread.create(su) end)

  while true do
    wait(0)

  end
end

function su(params)
  local id, num, text = string.match(params, '(%d+)%s*([1-6])(%a+)')
  if id ~= nil and num ~= nil and text ~= nil then
    string_format = string.format("/su %d %s", id, num, text)
    sampSendChat("/me lalala")
    wait(1000)
    sampSendChat("/me lalal")
    wait(1000)
  else
    sampAddChatMessage(tag .. "{ffffff}Используйте: /su [ID, кол-во, причина]", main_color)
  end
end

Безымянный.jpg

Код отправил не полный. Поэтому не 66я строка, а 17я.
 

Andy Safino

Участник
69
4
Lua:
function main()
  if not isSampLoaded() or not isSampfuncsLoaded() then return end
  while not isSampAvailable() do wait(100) end

    sampRegisterChatCommand("su", cmd_su)
    thread = lua_thread.create_suspended(thread_function)

while true do
  wait(0)

  end
end



function cmd_su()
  local id, text = string.match(params, '(%d+)%s*(%a+)')
  if id ~= nil and text ~= nil then
    string_format = string.format("/su %d %s", id, text)
    thread:run("su")
  else
    sampAddChatMessage(tag .. "{ffffff}Используйте: /su [ID, причина]", main_color)
  end
end

function thread_function(option, var)
  if option == "su" then
    sampSendChat("/me lalala")
    wait(1000)
    sampSendChat("/me lalal")
    wait(1000)
    sampSendChat(string_format)
  end
end
 

ShadowKnife

Потрачен
231
25
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
п
как добавить триггер tusamov к этому коду что бы он тепал сюда 1773.12, -1892.18, 13.55 ?
ПОМОГИТЕ ПЖ:
local actStatus,actStatus1 = false,false

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("botferma", function()
        actStatus = not actStatus
        sampAddChatMessage(string.format("{00FF00} Bot Ferma {ff0077}%s", actStatus and "Enabled" or "Disabled"), -1)
    end)
    sampRegisterChatCommand("botgruz", function()
        actStatus1 = not actStatus1
        sampAddChatMessage(string.format("{00FF00} Bot Gruzchik {ff0077}%s", actStatus1 and "Enabled" or "Disabled"), -1)
    end)
    while true do
        wait(1)
        if actStatus then
            setCharCoordinates(1, -105.25, 100.60, 3.12)
            wait(500)
            setCharCoordinates(1, -94.84, 76.43, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -86.68, 53.33, 3.12)
            wait(500)
            setCharCoordinates(1, -49.19, 26.30, 3.52)
            wait(1)
            setCharCoordinates(1, -49.10, 26.39, 3.12)
            wait(100)
            setCharCoordinates(1, -105.25, 100.60, 3.12)
        elseif actStatus1 then
            setCharCoordinates(1, 2015.66, -1958.35, 12.40)
            wait(1000)
            setCharCoordinates(1, 2014.44, -1981.39, 13.55)
            wait(1000)
            setCharCoordinates(1, 2024.59, -1959.11, 14.39)
            wait(500)
            setCharCoordinates(1, 2012.10, -1989.15, 13.00)
            wait(1000)
        end
    end
end
помогите пж