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

 

[Vintik]

sampRegisterChatCommand('tese', function(param)
    lua_thread.create(function()
        wait(0)
        sampSendChat('/invent')
        wait(5000)
        sampSendClickTextdraw('2110')
        wait(228)
        goKeyPressed(116, true)
        wait(1500)
        goKeyPressed(116, false)
        end)
    end)

помогите сделать двойной клик по текстдраву в одной функции, не могу понять как )))

-- функция, закинь в начало кода
local td = false
function sampev.onShowTextDraw(id, data)
    if id == 2110 and td then -- если открылся текстдрав с id 2110
        td = false -- возвращаем false, чтобы в случае открытия текстдрава вручную не было срабатывания
        sampSendClickTextdraw(id)
        sampSendClickTextdraw(id) -- дабл клик
    end
end

-- а на это замени то, что у тебя было
sampRegisterChatCommand('tese', function()
    sampSendChat('/invent')
    td = true -- обозначим переменную как true, что означает, что последний раз текстдрав открыл скрипт
end)

Если я верно понял, то вот так.

P. S. Это более грамотный метод ждать открытия текстдрава, а не wait(5000)

 

[Vintik]

я не понял, а ид где взять?

local sampev = require 'lib.samp.events'

function sampev.onShowTextDraw(id, data) -- срабатывает при появлении ЛЮБОГО текстдрава
    sampAddChatMessage('текстдрав id ' .. tostring(id) .. ' имеет текст: ' .. data.text, -1) -- таким образом узнаешь id текстдрава с нужным тебе текстом
end

 

[Vintik]

Как хукнуть анимацию и запринтить её?

Не понял.

function onApplyPlayerAnimation(playerId, animLib, animName, loop, lockX, lockY, freeze, time) -- срабатывает при установке персонажу любой анимации сервером
    if playerId = select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)) then -- если именно нашему игроку
        sampAddChatMessage('сервер попытался установить анимацию ' .. animName, -1) -- например, выведем имя анимации
        return false -- игнорирует запрос сервера (НЕ устанавливает анимацию), можно убрать
    end
end

 

[chapo]

local sampev = require 'lib.samp.events'

function sampev.onShowTextDraw(id, data) -- срабатывает при появлении ЛЮБОГО текстдрава
    sampAddChatMessage('текстдрав id ' .. tostring(id) .. ' имеет текст: ' .. data.text) -- таким образом узнаешь id текстдрава с нужным тебе текстом
end

мне кажется что на то что бы найти среди сотен сообщений нужный ему текстдрав ему понадобится несколько десятков минут
проще уже так:

local font_flag = require('moonloader').font_flag
local my_font = renderCreateFont('Verdana', 10, font_flag.BOLD + font_flag.SHADOW)

function main()
    while not isSampAvailable() do wait(0) end
    --code
    while true do
        wait(0)
        --code
        for a = 0, 2304    do
            if show_textdrawid then
                if sampTextdrawIsExists(a) then
                    x, y = sampTextdrawGetPos(a) --we get it's position. value returns in game coords
                    x1, y1 = convertGameScreenCoordsToWindowScreenCoords(x, y) --so we convert it to screen cuz render needs screen coords
                    renderFontDrawText(my_font, '{ffffff}ID: '..color..a, x1 + 25, y1 + 25, 0xFFFFFFFF)
                end
            end
        end
    end
end

 

[Vintik]

мне кажется что на то что бы найти среди сотен сообщений нужный ему текстдрав ему понадобится несколько десятков минут
проще уже так:

local font_flag = require('moonloader').font_flag
local my_font = renderCreateFont('Verdana', 10, font_flag.BOLD + font_flag.SHADOW)

function main()
    while not isSampAvailable() do wait(0) end
    --code
    while true do
        wait(0)
        --code
        for a = 0, 2304    do
            if show_textdrawid then
                if sampTextdrawIsExists(a) then
                    x, y = sampTextdrawGetPos(a) --we get it's position. value returns in game coords
                    x1, y1 = convertGameScreenCoordsToWindowScreenCoords(x, y) --so we convert it to screen cuz render needs screen coords
                    renderFontDrawText(my_font, '{ffffff}ID: '..color..a, x1 + 25, y1 + 25, 0xFFFFFFFF)
                end
            end
        end
    end
end

откуда переменная show_textdrawid взялась? не было, не было и тут бац – она попалась в условии if, ахах
ну такое себе способ, слишком сложно как для отладки. ты ж любитель рендера

кстати, хотел спросить, на модерку не собираешься?

 

[ewin]

local sampev = require 'lib.samp.events'

function sampev.onShowTextDraw(id, data) -- срабатывает при появлении ЛЮБОГО текстдрава
    sampAddChatMessage('текстдрав id ' .. tostring(id) .. ' имеет текст: ' .. data.text, -1) -- таким образом узнаешь id текстдрава с нужным тебе текстом
end

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

 

[Vintik]

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

не так уж и страшно, но в принципе можно юзать
function sampev.onSendClickTextDraw(id)
и просто кликнуть на нужный текстдрав, собсна

 

[ewin]

не так уж и страшно, но в принципе можно юзать
function sampev.onSendClickTextDraw(id)

думаю проще комбинировать, ту луашку которая отображает ид и кмд на отображение текста текстдрава по иду

 

[Smeruxa]

что за костыли?

@sep, вот код рабочий

for _, v in ipairs(getAllChars()) do -- проходимся по всем
    if isCharInAnyCar(v) and isCharInAnyCar(PLAYER_PED) then -- если оба в машине
        if storeCarCharIsInNoSave(v) == storeCarCharIsInNoSave(PLAYER_PED) then -- и в одной машине
            local result, id = sampGetPlayerIdByCharHandle(v) -- узнаем id игрока
            if result then -- если именно игрок в машине, а не, например, NPC
                sampSendChat('/eject ' .. tostring(id))
                wait(1000)
            end
        end
    end
end

не нравится можешь идти на 4 стороны, я предложил вариант

 

[Smeruxa]

sampSendChat('/eject ' .. tostring(id))

А если приебываться то, нахуя ты переводишь в строку id?

 

[chapo]

откуда переменная show_textdrawid взялась? не было, не было и тут бац – она попалась в условии if, ахах
ну такое себе способ, слишком сложно как для отладки. ты ж любитель рендера

кстати, хотел спросить, на модерку не собираешься?

я прост из своего скрипта вырезал и не проверил

 

[T1cKz]

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

псс.... print юзайте)) и бегайте тупо по консоли)

 

[T1cKz]

А если приебываться то, нахуя ты переводишь в строку id?

потому что id это integer а не string 👌

 

[Smeruxa]

потому что id это integer а не string 👌

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

 

[Vintik]

А если приебываться то, нахуя ты переводишь в строку id?

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

local my_car_id = getCarModel(storeCarCharIsInNoSave(playerPed))
local another_car_id = getCarModel(storeCarCharIsInNoSave(v))
if my_car_id == another_car_id then