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

Glockersik

Участник
86
3
Почему не выходит ?
Lua:
local sampev = require ('lib.samp.events')

function main()
  while not isSampAvailable() do wait(100) end
  sampAddChatMessage("Cкрипт by {00FF00}Glockers'a ",1337228)
  sampRegisterChatCommand('adm', adm)
  wait(-1)
end

function adm()
    if adm_state then
        adm_state = false
        printStringNow("Script ~g~ON", 1000)
    else
        adm_state = true
        printStringNow("Script ~r~OFF", 1000)
  end
end

function sampev.onServerMessage(msg)
    if adm_state and msg:find('Администратор (%a): .+') then

callFunction(0x823BDB , 3, 3, 0, 0, 0)

                end
            end
 

Natami

Участник
375
26
Почему не выходит ?
Lua:
local sampev = require ('lib.samp.events')

function main()
  while not isSampAvailable() do wait(100) end
  sampAddChatMessage("Cкрипт by {00FF00}Glockers'a ",1337228)
  sampRegisterChatCommand('adm', adm)
  wait(-1)
end

function adm()
    if adm_state then
        adm_state = false
        printStringNow("Script ~g~ON", 1000)
    else
        adm_state = true
        printStringNow("Script ~r~OFF", 1000)
  end
end

function sampev.onServerMessage(msg)
    if adm_state and msg:find('Администратор (%a): .+') then

callFunction(0x823BDB , 3, 3, 0, 0, 0)

                end
            end

краш вызывай
setAnimGroupForChar(PLAYER_PED, "RUN_PLAYER")
 

trefa

3d print
Всефорумный модератор
2,123
1,288
Lua:
function sampev.onServerMessage(msg)
if adm_state and msg:find('Администратор (%a): .+') then
    setAnimGroupForChar(PLAYER_PED, "RUN_PLAYER")
    end
end
Всё равно не будет работать, вы про 2й аргумент хука забыли. Да и без разницы что использовать.
 

Natami

Участник
375
26
Уберите проверку recona, а то бля запутался в край
Чтобы не в реконе трейсер работал

Lua:
function sampev.onBulletSync(playerid, data) -- трейсер
    if rInfo.state and tonumber(playerid) == rInfo.id and pInfo.set.traicers then
        if data.target.x == -1 or data.target.y == -1 or data.target.z == -1 then
            return true
        end
        BulletSync.lastId = BulletSync.lastId + 1
        if BulletSync.lastId < 1 or BulletSync.lastId > BulletSync.maxLines then
            BulletSync.lastId = 1
        end
    local id = BulletSync.lastId
        BulletSync[id].enable = true
        BulletSync[id].tType = data.targetType
        BulletSync[id].time = os.time() + 15
        BulletSync[id].o.x, BulletSync[id].o.y, BulletSync[id].o.z = data.origin.x, data.origin.y, data.origin.z
        BulletSync[id].t.x, BulletSync[id].t.y, BulletSync[id].t.z = data.target.x, data.target.y, data.target.z
    end
end
 

trefa

3d print
Всефорумный модератор
2,123
1,288
Почему не выходит ?
Lua:
local sampev = require ('lib.samp.events')

function main()
  while not isSampAvailable() do wait(100) end
  sampAddChatMessage("Cкрипт by {00FF00}Glockers'a ",1337228)
  sampRegisterChatCommand('adm', adm)
  wait(-1)
end

function adm()
    if adm_state then
        adm_state = false
        printStringNow("Script ~g~ON", 1000)
    else
        adm_state = true
        printStringNow("Script ~r~OFF", 1000)
  end
end

function sampev.onServerMessage(msg)
    if adm_state and msg:find('Администратор (%a): .+') then

callFunction(0x823BDB , 3, 3, 0, 0, 0)

                end
            end
Не проверял, но должно работать.
Lua:
local sampev = require ('lib.samp.events')
local adm_state = false

function main()
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage("Cкрипт by {00FF00}Glockers'a ",1337228)
    sampRegisterChatCommand('adm', function()
        adm_state = not adm_state
        printStringNow("Script "..(adm_state and "~g~ON" or "~r~OFF"), 1000)
    end)
    wait(-1)
end


function sampev.onServerMessage(color,text)
    if adm_state and text:find('Администратор (%a+): .+') then
        callFunction(0x823BDB , 3, 3, 0, 0, 0)
    end
end

Уберите проверку recona, а то бля запутался в край
Чтобы не в реконе трейсер работал

Lua:
function sampev.onBulletSync(playerid, data) -- трейсер
    if rInfo.state and tonumber(playerid) == rInfo.id and pInfo.set.traicers then
        if data.target.x == -1 or data.target.y == -1 or data.target.z == -1 then
            return true
        end
        BulletSync.lastId = BulletSync.lastId + 1
        if BulletSync.lastId < 1 or BulletSync.lastId > BulletSync.maxLines then
            BulletSync.lastId = 1
        end
    local id = BulletSync.lastId
        BulletSync[id].enable = true
        BulletSync[id].tType = data.targetType
        BulletSync[id].time = os.time() + 15
        BulletSync[id].o.x, BulletSync[id].o.y, BulletSync[id].o.z = data.origin.x, data.origin.y, data.origin.z
        BulletSync[id].t.x, BulletSync[id].t.y, BulletSync[id].t.z = data.target.x, data.target.y, data.target.z
    end
end
Тут её и нет
 

Natami

Участник
375
26
Не проверял, но должно работать.
Lua:
local sampev = require ('lib.samp.events')
local adm_state = false

function main()
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage("Cкрипт by {00FF00}Glockers'a ",1337228)
    sampRegisterChatCommand('adm', function()
        adm_state = not adm_state
        printStringNow("Script "..(adm_state and "~g~ON" or "~r~OFF"), 1000)
    end)
    wait(-1)
end


function sampev.onServerMessage(color,text)
    if adm_state and text:find('Администратор (%a+): .+') then
        callFunction(0x823BDB , 3, 3, 0, 0, 0)
    end
end


Тут её и нет
странно... Вырезал с реконом, типа в реконе только работает, хотелось бы это убрать

Lua:
        local oTime = os.time()
        if pInfo.set.traicers and not isPauseMenuActive() then
            for i = 1, BulletSync.maxLines do
                if BulletSync[i].enable == true and BulletSync[i].time >= oTime then
                    local sx, sy, sz = calcScreenCoors(BulletSync[i].o.x, BulletSync[i].o.y, BulletSync[i].o.z)
                    local fx, fy, fz = calcScreenCoors(BulletSync[i].t.x, BulletSync[i].t.y, BulletSync[i].t.z)

                    if sz > 1 and fz > 1 then
                        renderDrawLine(sx, sy, fx, fy, 1, BulletSync[i].tType == 0 and 0xFFFFFFFF or 0xFFFFC700)
                        renderDrawPolygon(fx, fy-1, 3, 3, 4.0, 10, BulletSync[i].tType == 0 and 0xFFFFFFFF or 0xFFFFC700)
                    end
                end
            end
        end
 
Последнее редактирование:

trefa

3d print
Всефорумный модератор
2,123
1,288
странно... Вырезал с реконом, типа в реконе только работает, хотелось бы это убрать

Lua:
        local oTime = os.time()
        if pInfo.set.traicers and not isPauseMenuActive() then
            for i = 1, BulletSync.maxLines do
                if BulletSync[i].enable == true and BulletSync[i].time >= oTime then
                    local sx, sy, sz = calcScreenCoors(BulletSync[i].o.x, BulletSync[i].o.y, BulletSync[i].o.z)
                    local fx, fy, fz = calcScreenCoors(BulletSync[i].t.x, BulletSync[i].t.y, BulletSync[i].t.z)

                    if sz > 1 and fz > 1 then
                        renderDrawLine(sx, sy, fx, fy, 1, BulletSync[i].tType == 0 and 0xFFFFFFFF or 0xFFFFC700)
                        renderDrawPolygon(fx, fy-1, 3, 3, 4.0, 10, BulletSync[i].tType == 0 and 0xFFFFFFFF or 0xFFFFC700)
                    end
                end
            end
        end
нет тут проверки на рекон, и вообще сложно сделать проверку на рекон
 

cover

Известный
Проверенный
245
271
У @cover нашел скрипт на cleo для дальнобоев. Если прицеп отцеплен, то скрипт его возвращает. Есть ли возможность сделать то же самое в lua?

Код:
{$CLEO .cs}
0000:

repeat
wait 300
until 0AFA:  is_samp_available

0B34: samp register_client_command "tsave" to_label @save_trailer
0B34: samp register_client_command "treturn" to_label @return_trailer

while true
wait 0
end

:save_trailer

0B35: samp 0@ = get_last_command_params
if
0AD4: 2@ = scan_string 0@ format "%d" 1@ //IF and SET
then
0AFF: samp 3@ = car_handle_by_samp_vehicle_id 1@
    if
    056E:   car 3@ defined
    then
        if or
        Car.Id(3@) == #ARTICT2
        Car.Id(3@) == #PETROTR
        then
        0AF8: samp add_message_to_chat "{FF0000}[Save trailer]: {FFFFFF}Трейлер сохранен.[ID: %d]. Для возвращения введите /treturn!" color -1 1@
        else 0AF8: samp add_message_to_chat "{FF0000}[Save trailer]:{FFFFFF} Не известная модель. Введите /tsave id трейлера!" color -1
        end
    else 0AF8: samp add_message_to_chat "{FF0000}[Save trailer]: {FFFFFF}Трейлер не найден." color -1
    end
else 0AF8: samp add_message_to_chat "{FF0000}[Save trailer]: {FFFFFF}Ошибка ввода. Введите /tsave id трейлера!" color -1
end
0B43: samp cmd_ret

:return_trailer
wait 0
if
056E:   car 3@ defined
then
    if
    not Actor.Driving($PLAYER_ACTOR)
    then
    Actor.StorePos($PLAYER_ACTOR, 4@ 5@ 6@)
    6@ -= 1.0
    0B30: samp send_enter_vehicle 1@ as_passenger false
    wait 200
    036A: put_actor $PLAYER_ACTOR in_car 3@
    wait 200
    Actor.PutAt($PLAYER_ACTOR, 4@ 5@ 6@)
    0AF8: samp add_message_to_chat "{FF0000}[Save trailer]: {FFFFFF}Трейлер телепортирован!" color -1
    else 0AF8: samp add_message_to_chat "{FF0000}[Save trailer]: {FFFFFF}Вы не должны находится в машине!" color -1
    end
else 0AF8: samp add_message_to_chat "{FF0000}[Save trailer]: {FFFFFF}Трейлер не найден. Введите /tsave id трейлера!" color -1
end
0B43: samp cmd_ret
Абсолютно
 

sdfaw

Активный
717
150
как сделать чтобы после нажатия на кнопку, допустим "Button" открывалось ещё одно окно imgui? help пж срочно
 

ШPEK

Известный
1,474
526
Lua:
local requests = require("requests")
token = "тут токен" -- # здесь вы должны написать свой access_token
params = requests.get('https://api.vk.com/method/messages.getLongPollServer?group_id=173575845&lp_version=3&need_pts=1&version=5.92&access_token='..token)
print(params.text)
Почему выдаёт ошибку?
Код:
[LIST]
[*][ML] (script) zora.lua: {"error":{"error_code":100,"error_msg":"One of the parameters specified was missing or invalid: lp_version is accepted only from version 5.65","request_params":[{"key":"oauth","value":"1"},{"key":"method","value":"messages.getLongPollServer"},{"key":"group_id","value":"173575845"},{"key":"lp_version","value":"2"},{"key":"need_pts","value":"1"},{"key":"version","value":"5.92"}]}}
[/LIST]

Как скопировать текст?
 

Cucumber

Участник
40
21
Столкнулся с проблемой, когда мне нужно получать одинаковые переменные из разных строк, т.е. есть строки:
C++:
Жалоба от: Nick_Name[132]: text
Репорт от Nick_Name[251]: text
Попробовал сделать таким образом, но в итоге срабатывает только та строка, в которой переменная объявлена последней.
Lua:
local rsName, rsId, rsText = string.match(text, "Жалоба от%: (.*)%[(%d+)%]%: (.*)")
local rsName, rsId, rsText = string.match(text, "Репорт от (.*)%[(%d+)%]%: (.*)")
Как можно это все под одну строку объединить?
 

dmitri4

Известный
452
79
Столкнулся с проблемой, когда мне нужно получать одинаковые переменные из разных строк, т.е. есть строки:
C++:
Жалоба от: Nick_Name[132]: text
Репорт от Nick_Name[251]: text
Попробовал сделать таким образом, но в итоге срабатывает только та строка, в которой переменная объявлена последней.
Lua:
local rsName, rsId, rsText = string.match(text, "Жалоба от%: (.*)%[(%d+)%]%: (.*)")
local rsName, rsId, rsText = string.match(text, "Репорт от (.*)%[(%d+)%]%: (.*)")
Как можно это все под одну строку объединить?
Потому что у тебя и там и там значения присваиваются в rsName, rsId, rsText вот они и перезаписываются