Вопросы по 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
 
Последнее редактирование:

Vespan

loneliness
Проверенный
2,101
1,633
Как сделать,чекер онлайн по клисту через sampGetPlayerColor ?
А то флуд через это -
Lua:
function test_1(arg)
    for i = 0, 999 do
    local color = sampGetPlayerColor(i)
        if sampIsPlayerConnected(i) then
            if color == 2133213694 then
                sampAddChatMessage('Есть!', -1)
            else
                sampAddChatMessage('Нету(', -1)
            end
        end
    end
end
 

Eugene Crabs

Активный
544
30
Как сделать,чекер онлайн по клисту через sampGetPlayerColor ?
А то флуд через это -
Lua:
function test_1(arg)
    for i = 0, 999 do
    local color = sampGetPlayerColor(i)
        if sampIsPlayerConnected(i) then
            if color == 2133213694 then
                sampAddChatMessage('Есть!', -1)
            else
                sampAddChatMessage('Нету(', -1)
            end
        end
    end
end
1 раз нужно чтобы выдал?
 

SnOoWmaN

Известный
118
101
Как сделать,чекер онлайн по клисту через sampGetPlayerColor ?
А то флуд через это -
Lua:
function test_1(arg)
    for i = 0, 999 do
    local color = sampGetPlayerColor(i)
        if sampIsPlayerConnected(i) then
            if color == 2133213694 then
                sampAddChatMessage('Есть!', -1)
            else
                sampAddChatMessage('Нету(', -1)
            end
        end
    end
end
Lua:
function test_1(clr)
    local count = 0
    for i = 0, 999 do
    local color = sampGetPlayerColor(i)
        if sampIsPlayerConnected(i) then
            if color == clr then
                count = count + 1
            end
        end
    end
    return count
end


    sampRegisterChatCommand("getcolorcount", function(arg)
        if arg ~= nil then print(test_1(tonumber(arg))) end
    end)

ну или просто
Lua:
    sampRegisterChatCommand("getcolorcount", function()
        print(test_1(2133213694))
    end)
 

Vespan

loneliness
Проверенный
2,101
1,633
Объясните на русском чо это такое
ImageButton(ImTextureID user_texture_id, const ImVec2& size, const ImVec2& uv0 = ImVec2(0,0), const ImVec2& uv1 = ImVec2(1,1), int frame_padding = -1, const ImVec4& bg_col = ImVec4(0,0,0,0), const ImVec4& tint_col = ImVec4(1,1,1,1)); // <0 frame_padding uses default frame padding settings. 0 for no padding
Тип знаю,картинка будет как кнопка,но блет я не понимаю эти цыфрь,буквы,объясните по русскому что и как,или сделайте пример
 

SnOoWmaN

Известный
118
101
По айди мне не нужно, нужно по тексту, если нашел текст, высвечивает координаты
Lua:
local sampev = require 'lib.samp.events'
local texts = {}

function checkTable(table_name, arg1, arg2, arg3)
    for _, i in ipairs(table_name) do
        if (i[1] == arg1) and (i[2] == arg2) and (i[3] == arg3) then return true end
    end
    return false
end

function main()
    wait(-1)
end

function sampev.onCreate3DText(id, color, pos, dist, testLOS, attachedPlayerId, attachedVehicleId, text)
    if text:find("tut tvoy text") then
        if not checkTable(texts, pos.x, pos.y, pos.z) then
            table.insert(texts, {pos.x, pos.y, pos.z})
            sampAddChatMessage("3d text: "..text, -1)
            sampAddChatMessage("coords: "..pos.x.." "..pos.y.." "..pos.z, -1)
            sampAddChatMessage("количество сохраненных 3D текстов: " .. #texts, -1)
        end
        return {id, color, pos, dist, testLOS, attachedPlayerId, attachedVehicleId, text}
    end
end
Lua:
function cmd_startre(arg)
    if arg == "" or arg == nil then
        sampAddChatMessage("Вы не ввели ID. Введите: {FFFFFF}/startre [id]", main_color)
    elseif arg == "%D" then
        sampAddChatMessage("Вы ввели не числовой ID. Введите: {FFFFFF}/startre [id]", color)
    else
        sampSendChat("/ans " .. arg .. " Начал слежку за игроком. Ожидайте.")
    end
end
Не работает код в подсвеченных строках(4-5), только начал писать на lua, как правильно сделать?

upd:
Lua:
    sampRegisterChatCommand("startre", function(arg)
        if arg == "" or tonumber(arg) < 0 or tonumber(arg) > 1000 then
            sampAddChatMessage("Вы ввели неверный ID. Введите: {FFFFFF}/startre [id]", -1)
        else
            sampSendChat("/ans " .. tonumber(arg) .. " Начал слежку за игроком. Ожидайте.")
        end
    end)

прошлый код был ошибочный, соре
 
Последнее редактирование:

Eugene Crabs

Активный
544
30
Как взять первые несколько символов в строке и при этом разделить её? К примеру есть строка "111222". Я применяю функцию/команду и получаю две строки "1112" и "22".
 

thecrakedblock

Участник
49
5
Не работают функции, что делать??
Lua:
script_name('AutoHello')
script_version('1.1')
script_author('Matteo')

local ev = require 'lib.samp.events' -- в начало скрипта

function main()
while not isSampAvailable() do wait(9000) end
sampAddChatMessage('{019829}[AutoHello]: {019829}Загружен!', -1)
sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Высрал: {019829}Matteo_Warden!', -1)
sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Скрипт создан для: {FDFF01}Mescaline Empire.', -1)
sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Вк автора: {FF5656}vk.com/thecrakedblock', -1)
wait(-1)
end

function ev.onServerMessage(color, text)
if text:find('пригласил в семью нового члена') and not text:find("говорит") then
sampSendChat('/fam Велком :3')
return {color, text}
end
end

function ev.onServerMessage(color, text)
if text:find("%[Семья%] %a+_%a+%[%d+%]: Ку") then
sampSendChat ('/b Дарова!')
end
end

[/CODE=lua]
 

_raz0r

t.me/sssecretway | ТГК: t.me/razor_code
Модератор
1,889
3,050
Не работают функции, что делать??
Lua:
:

cript_name('AutoHello')
script_version('1.1')
script_author('Matteo')

local ev = require 'lib.samp.events' -- в начало скрипта

function main()
while not isSampAvailable() do wait(9000) end
sampAddChatMessage('{019829}[AutoHello]: {019829}Загружен!', -1)
sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Высрал: {019829}Matteo_Warden!', -1)
sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Скрипт создан для: {FDFF01}Mescaline Empire.', -1)
sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Вк автора: {FF5656}vk.com/thecrakedblock', -1)
wait(-1)
end

function ev.onServerMessage(color, text)
if text:find('пригласил в семью нового члена') and not text:find("говорит") then
sampSendChat('/fam Велком :3')
return {color, text}
end
end

function ev.onServerMessage(color, text)
if text:find("%[Семья%] %a+_%a+%[%d+%]: Ку") then
sampSendChat ('/b Дарова!')
end
end

[/CODE=lua]
лог прикрепи
 

_raz0r

t.me/sssecretway | ТГК: t.me/razor_code
Модератор
1,889
3,050
зачем два раза onServerMessage? это можно соединить в одно
 

thecrakedblock

Участник
49
5
зачем два раза onServerMessage? это можно соединить в одно
Как?
зачем два раза onServerMessage? это можно соединить в одно

Объединил в одну функцию, теперь первая работает - вторая все равно не канает, как ещё можно сделать поиск именно в чате семьи?

Lua:
function ev.onServerMessage(color, text)
    if text:find('пригласил в семью нового члена') and not text:find("говорит")  then
        sampSendChat('/fam Велком :3')
    if text:find("%[Семья%] %a+_%a+%[%d+%]: Ку") then
        sampSendChat ('/b Дарова!')
        return {color, text}
    end
    end
end
 

_raz0r

t.me/sssecretway | ТГК: t.me/razor_code
Модератор
1,889
3,050
Как?


Объединил в одну функцию, теперь первая работает - вторая все равно не канает, как ещё можно сделать поиск именно в чате семьи?

Lua:
function ev.onServerMessage(color, text)
    if text:find('пригласил в семью нового члена') and not text:find("говорит")  then
        sampSendChat('/fam Велком :3')
    if text:find("%[Семья%] %a+_%a+%[%d+%]: Ку") then
        sampSendChat ('/b Дарова!')
        return {color, text}
    end
    end
end
Lua:
script_name('AutoHello')
script_version('1.1')
script_author('Matteo')

local ev = require 'lib.samp.events' -- в начало скрипта

function main()
    while not isSampAvailable() do wait(9000) end
    sampAddChatMessage('{019829}[AutoHello]: {019829}Загружен!', -1)
    sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Высрал: {019829}Matteo_Warden!', -1)
    sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Скрипт создан для: {FDFF01}Mescaline Empire.', -1)
    sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Вк автора: {FF5656}vk.com/thecrakedblock', -1)
    wait(-1)
end

function ev.onServerMessage(color, text)
    if text:find('пригласил в семью нового члена') and not text:find("говорит") then
        sampSendChat('/fam Велком :3')
    elseif text:find("%[Семья%] %a+_%a+%[%d+%]: Ку") then
        sampSendChat ('/b Дарова!')
    end
end
 

thecrakedblock

Участник
49
5
Lua:
script_name('AutoHello')
script_version('1.1')
script_author('Matteo')

local ev = require 'lib.samp.events' -- в начало скрипта

function main()
    while not isSampAvailable() do wait(9000) end
    sampAddChatMessage('{019829}[AutoHello]: {019829}Загружен!', -1)
    sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Высрал: {019829}Matteo_Warden!', -1)
    sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Скрипт создан для: {FDFF01}Mescaline Empire.', -1)
    sampAddChatMessage('{019829}[AutoHello]: {FFFFFF}Вк автора: {FF5656}vk.com/thecrakedblock', -1)
    wait(-1)
end

function ev.onServerMessage(color, text)
    if text:find('пригласил в семью нового члена') and not text:find("говорит") then
        sampSendChat('/fam Велком :3')
    elseif text:find("%[Семья%] %a+_%a+%[%d+%]: Ку") then
        sampSendChat ('/b Дарова!')
    end
end

Трабл остаётся, при вводе слова Ку в фам чат - ответ в /b не приходит, как сделать поиск по цвету?
Допустим: find:text(текст который нужно искать и его цвет)

Как правильно сделать поиск по цвету?
 

_raz0r

t.me/sssecretway | ТГК: t.me/razor_code
Модератор
1,889
3,050
Трабл остаётся, при вводе слова Ку в фам чат - ответ в /b не приходит, как сделать поиск по цвету?
Допустим: find:text(текст который нужно искать и его цвет)

Как правильно сделать поиск по цвету?
Значит составлено неправильно регулярное выражение