Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: Jennifer, knowfaq, FreX и 38 других
Нажмите для раскрытия...
Eugene Crabs

Eugene Crabs

Активный
544
30
В чем проблема этой гребанной параши? Падает в случайном вызове. Думал, может дистанция слишком большая, но даже с блоком на 50 ничего не изменилось


Код: 
function IsConnectedV2(X1, Y1, Z1, X2, Y2, Z2)
    return not processLineOfSight(X1, Y1, Z1, X2, Y2, Z2, true, true, false, false, false, false, false, false)
end

Moonloader.log особенного человека: 
-- (error)    Program.lua: cannot resume non-suspended coroutine stack traceback: [C]: in function 'processLineOfSight'
 
U

ufdhbi

Известный
Проверенный
1,459
866
Eugene Crabs написал(а):
В чем проблема этой гребанной параши? Падает в случайном вызове. Думал, может дистанция слишком большая, но даже с блоком на 50 ничего не изменилось


Код: 
function IsConnectedV2(X1, Y1, Z1, X2, Y2, Z2)
    return not processLineOfSight(X1, Y1, Z1, X2, Y2, Z2, true, true, false, false, false, false, false, false)
end

Moonloader.log особенного человека: 
-- (error)    Program.lua: cannot resume non-suspended coroutine stack traceback: [C]: in function 'processLineOfSight'
Нажмите для раскрытия...
@FYP тут все жалуются на эту функцию, там либо баг либо неправильно используют? Разъясните
 
  • Нравится
Реакции: Eugene Crabs
Nelit

Nelit

Потрачен
252
39
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Помогите с кодом этого игнорщика @imring. Как использовать эту фигню. Вставил ego функцию перед main. Ошибка. Дайте пример как юзать
Lua: 
-- bool, users = getTableUsersByUrl(url) - получить таблицу пользователей по ссылке на .txt файл списка.
-- * url - ссылка на .txt файл списка.
-- * users - таблица пользователей.
-- * bool - загрузка списка удалась (true/false)
-- * users[номер пользователя].name - имя пользователя; users[номер пользователя].date - окончательная дата работы скрипта (чтобы узнать, когда наступил окончательный..
-- ..срок, нужна функция isAvailableUser).
-- availabled = isAvailableUser(users, name) - узнать, находится ли пользователь в списке и узнать, не закончился ли срок.
-- * users - таблица пользователей.
-- * name - имя пользователя.
-- * availabled - доступность (true/false).

function getTableUsersByUrl(url)
    local n_file, bool, users = os.getenv('TEMP')..os.time(), false, {}
    downloadUrlToFile(url, n_file, function(id, status)
        if status == 6 then bool = true end
    end)
    while not doesFileExist(n_file) do wait(0) end
    if bool then
        local file = io.open(n_file, 'r')
        for w in file:lines() do
            local n, d = w:match('(.*): (.*)')
            users[#users+1] = { name = n, date = d }
        end
        file:close()
        os.remove(n_file)
    end
    return bool, users
end

function isAvailableUser(users, name)
    for i, k in pairs(users) do
        if k.name == name then
            local d, m, y = k.date:match('(%d+)%.(%d+)%.(%d+)')
            local time = {
                day = tonumber(d),
                isdst = true,
                wday = 0,
                yday = 0,
                year = tonumber(y),
                month = tonumber(m),
                hour = 0
            }
            if os.time(time) >= os.time() then return true end
        end
    end
    return false
end
Lua: 
-- Ссылка на список игроков с датами.
site = 'https://pastebin.com/raw/ZiJ9Xi3e'

function main()
    while not isSampAvailable() do wait(0) end
    while sampGetCurrentServerName() == 'SA-MP' do wait(0) end
    local bool, users = getTableUsersByUrl(site) -- узнаём таблицу списка.
    assert(bool, 'Downloading list users failed.') -- Если bool = false.
    local _, myid = sampGetPlayerIdByCharHandle(playerPed) -- Узнаём свой ид.
    assert(isAvailableUser(users, sampGetPlayerNickname(myid)), 'The term is ended or your name is not in the list.') -- Если пользователя нету в списке или срок уже пройден.
    wait(-1)
end
 
P3rsik

P3rsik

Активный
213
32
Форматирование кода
require ("lib.moonloader")
local ev = require ("lib.samp.events")
local inicfg = require ('inicfg')
local imgui = require ("lib.moonloader")

kfr_menu = imgui.ImBool(false)

local ini = inicfg.load({
Main =
{
arpcapt = false,
longhpbar = false
}
}, '..\\config\\[KFR menu] settings.ini')

--imgui
arpcapt = imgui.ImBool(ini.Main.arpcapt)
longHpBar = imgui.ImBool(ini.Main.longhpbar)
--

function main()
while not isSampAvailable() do wait(100) end
sampRegisterChatCommand('kfr', function() kfr_menu.v = not kfr_menu.v end)
while true do
wait(0)
imgui.Process = kfr_menu.v
checkbox()
end
end


function imgui.OnDrawFrame()
if gang_menu.v then
imgui.SetNextWindowPos(imgui.ImVec2(w / 2, h / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
imgui.SetNextWindowSize(imgui.ImVec2(576, 576), imgui.Cond.FirstUseEver)
imgui.Begin('KFR MENU 0.1', kfr_menu)
imgui.Checkbox('ARPCAPT', arpcapt)
imgui.Checkbox('160hp bar', longhpbar)
end
imgui.End()
end

function ev.onServerMessage(color, text)
if arpcapt.v then
if text:find("lohs") then
sampSendChat('lohs')
end
end
end

function checkbox()

-- hpbar
if longhpbar.v then
memory.setfloat(0xB793E0, 910.4)
else
memory.setfloat(0xB793E0, 569.0)
end
end


[14:28:24.214148] (error) KFR: C:\Users\37128\Desktop\sborkafull\moonloader\KFR.lua:10: attempt to call field 'ImBool' (a nil value)
stack traceback:

Desktop\sborkafull\moonloader\KFR.lua:10: in main chunk
[14:28:24.214148] (error) KFR: Script died due to an error. (01D45004)




PLEASE HELP ME
 
nomio

nomio

Известный
550
208
lmaohhhh написал(а):
require ("lib.moonloader")
local ev = require ("lib.samp.events")
local inicfg = require ('inicfg')
local imgui = require ("lib.moonloader")

kfr_menu = imgui.ImBool(false)

local ini = inicfg.load({
Main =
{
arpcapt = false,
longhpbar = false
}
}, '..\\config\\[KFR menu] settings.ini')

--imgui
arpcapt = imgui.ImBool(ini.Main.arpcapt)
longHpBar = imgui.ImBool(ini.Main.longhpbar)
--

function main()
while not isSampAvailable() do wait(100) end
sampRegisterChatCommand('kfr', function() kfr_menu.v = not kfr_menu.v end)
while true do
wait(0)
imgui.Process = kfr_menu.v
checkbox()
end
end


function imgui.OnDrawFrame()
if gang_menu.v then
imgui.SetNextWindowPos(imgui.ImVec2(w / 2, h / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
imgui.SetNextWindowSize(imgui.ImVec2(576, 576), imgui.Cond.FirstUseEver)
imgui.Begin('KFR MENU 0.1', kfr_menu)
imgui.Checkbox('ARPCAPT', arpcapt)
imgui.Checkbox('160hp bar', longhpbar)
end
imgui.End()
end

function ev.onServerMessage(color, text)
if arpcapt.v then
if text:find("lohs") then
sampSendChat('lohs')
end
end
end

function checkbox()

-- hpbar
if longhpbar.v then
memory.setfloat(0xB793E0, 910.4)
else
memory.setfloat(0xB793E0, 569.0)
end
end


[14:28:24.214148] (error) KFR: C:\Users\37128\Desktop\sborkafull\moonloader\KFR.lua:10: attempt to call field 'ImBool' (a nil value)
stack traceback:

Desktop\sborkafull\moonloader\KFR.lua:10: in main chunk
[14:28:24.214148] (error) KFR: Script died due to an error. (01D45004)




PLEASE HELP ME
Нажмите для раскрытия...
Ты не правильно имуги подключил,убери и подключи нормально
local imgui = require ("imgui")
 
Nelit

Nelit

Потрачен
252
39
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Помогите с кодом этого игнорщика @imring. Как использовать эту фигню. Вставил ego функцию перед main. Ошибка. Дайте пример как юзать

Lua: 
-- bool, users = getTableUsersByUrl(url) - получить таблицу пользователей по ссылке на .txt файл списка.

-- * url - ссылка на .txt файл списка.

-- * users - таблица пользователей.

-- * bool - загрузка списка удалась (true/false)

-- * users[номер пользователя].name - имя пользователя; users[номер пользователя].date - окончательная дата работы скрипта (чтобы узнать, когда наступил окончательный..

-- ..срок, нужна функция isAvailableUser).

-- availabled = isAvailableUser(users, name) - узнать, находится ли пользователь в списке и узнать, не закончился ли срок.

-- * users - таблица пользователей.

-- * name - имя пользователя.

-- * availabled - доступность (true/false).



function getTableUsersByUrl(url)

    local n_file, bool, users = os.getenv('TEMP')..os.time(), false, {}

    downloadUrlToFile(url, n_file, function(id, status)

        if status == 6 then bool = true end

    end)

    while not doesFileExist(n_file) do wait(0) end

    if bool then

        local file = io.open(n_file, 'r')

        for w in file:lines() do

            local n, d = w:match('(.*): (.*)')

            users[#users+1] = { name = n, date = d }

        end

        file:close()

        os.remove(n_file)

    end

    return bool, users

end



function isAvailableUser(users, name)

    for i, k in pairs(users) do

        if k.name == name then

            local d, m, y = k.date:match('(%d+)%.(%d+)%.(%d+)')

            local time = {

                day = tonumber(d),

                isdst = true,

                wday = 0,

                yday = 0,

                year = tonumber(y),

                month = tonumber(m),

                hour = 0

            }

            if os.time(time) >= os.time() then return true end

        end

    end

    return false

end

Lua: 
-- Ссылка на список игроков с датами.

site = 'https://pastebin.com/raw/ZiJ9Xi3e'



function main()

    while not isSampAvailable() do wait(0) end

    while sampGetCurrentServerName() == 'SA-MP' do wait(0) end

    local bool, users = getTableUsersByUrl(site) -- узнаём таблицу списка.

    assert(bool, 'Downloading list users failed.') -- Если bool = false.

    local _, myid = sampGetPlayerIdByCharHandle(playerPed) -- Узнаём свой ид.

    assert(isAvailableUser(users, sampGetPlayerNickname(myid)), 'The term is ended or your name is not in the list.') -- Если пользователя нету в списке или срок уже пройден.

    wait(-1)

end
 
Adrian G.

Adrian G.

Известный
Проверенный
520
457
Если принудительно завершить поток, то бесконечный цикл внутри него продолжит выполнятся?
 
P3rsik

P3rsik

Активный
213
32
Форматирование кода
function checkbox()

-- hpbar
if longhpbar.v then
memory.setfloat(0xB793E0, 910.4)
else
memory.setfloat(0xB793E0, 569.0)
end

-- nobat
if nobat.v then
if hasCharGotWeapon(PLAYER_PED, 5) then
removeWeaponFromChar(PLAYER_PED, 5)
end
end

-- rpkrava
function ev.onServerMessage(color,text)
if rpkrava.v then
if string.find(text, "^") then
sampSendChat("/")
elseif string.find(text, "^") then
sampSendChat("s")
end
end
end

KFR.lua:79: 'end' expected (to close 'function' at line 53) near '<eof>'

help please
 
danywa

danywa

Активный
358
50
Как можно получить ид модели объекта находясь рядом с ним?
 
P3rsik

P3rsik

Активный
213
32
atomlin написал(а):
Lua: 
function checkbox()

-- hpbar
if longhpbar.v then
memory.setfloat(0xB793E0, 910.4)
else
memory.setfloat(0xB793E0, 569.0)
end

-- nobat
if nobat.v then
if hasCharGotWeapon(PLAYER_PED, 5) then
removeWeaponFromChar(PLAYER_PED, 5)
end
end

-- rpkrava
function ev.onServerMessage(color,text)
if string.find(text, "^") and rpkrava.v then
sampSendChat("/")
if string.find(text, "^") and rpkrava.v then
sampSendChat("s")
end
end
Нажмите для раскрытия...


KFR.lua:78: 'end' expected (to close 'function' at line 53) near '<eof>'
 
chapo

chapo

чопа сребдс // @moujeek
Модератор
8,862
11,550
lmaohhhh написал(а):
KFR.lua:78: 'end' expected (to close 'function' at line 53) near '<eof>'
Нажмите для раскрытия...
еще 1 end добавь

1612273629006.png
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. AnWu
    • Закреплено
    • Статья
    Информация Гайд Всё о Lua скриптинге для MoonLoader
      • Нравится
    Ответы
    49
    Просмотры
    169K
    Lua
    FlouZip
    FlouZip
  2. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    31K
    Lua
    Frapsy
    Frapsy
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    2K
    Общение
    chromiusj
    chromiusj
  4. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    24
    Просмотры
    13K
    Lua
    Kusnrchik
    Kusnrchik
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    3K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу