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

 

[deleted-user-139653]

Что-то тут не так, как сделать чтобы брало ники из списка?

require "moonloader"
local keys = require "vkeys"

cena = 10000

local Nick = {
    ["Spisok"] = { "Anomaliya" , "Buhai" }
}

function main()
if not isSampLoaded() or not isSampfuncsLoaded() then return end
while not isSampAvailable() do wait(100) end
while true do wait(0)
        if not sampIsChatInputActive() and not sampIsDialogActive() and not sampIsScoreboardOpen() and not isSampfuncsConsoleActive() then
                if isKeyJustPressed(VK_L) then
                sampSendChat("/contract" Spisok .. cena")
            end       
        end
    end
end

 

[XRLM]

Что-то тут не так, как сделать чтобы брало ники из списка?

require "moonloader"
local keys = require "vkeys"

cena = 10000

local Nick = {
    ["Spisok"] = { "Anomaliya" , "Buhai" }
}

function main()
if not isSampLoaded() or not isSampfuncsLoaded() then return end
while not isSampAvailable() do wait(100) end
while true do wait(0)
        if not sampIsChatInputActive() and not sampIsDialogActive() and not sampIsScoreboardOpen() and not isSampfuncsConsoleActive() then
                if isKeyJustPressed(VK_L) then
                sampSendChat("/contract" Spisok .. cena")
            end      
        end
    end
end

 

[xanndiane]

Надо сделать автоинвайтер для фамы который после инвайта будет делать скрин с таймом. Вот такого говна накидал но ничего не работает. Только сам инвайт. Помогите пожалуйста.

 

[whyega52]

Как правильно записать в битстрим encodedString4096? Нужно указывать его длину и если надо, то сколько бит для этого понадобится?
я так понимаю не надо

 

[nishino akane]

Как правильно записать в битстрим encodedString4096? Нужно указывать его длину и если надо, то сколько бит для этого понадобится?
я так понимаю не надо

encodedString4096 = {
    read = function(bs) return raknetBitStreamDecodeString(bs, 4096) end,
    write = function(bs, value) raknetBitStreamEncodeString(bs, value) end
}

 

[NetyEgo]

как в printStringNow вывести русский текст?

 

[ollydbg]

what is it for

  local ranges = imgui.GetIO().Fonts:GetGlyphRangesDefault()

if I leave it in nil I don't see any problem, then what is its function?

imgui.GetIO().Fonts:AddFontFromFileTTF(path, 18, nil, nil)

I'm not Russian so I don't use this Get Glyph Ranges Cyrillic, but what function does it have

 

[LuaMaster]

local evv = require "lib.samp.events"

function evv.onDisplayGameText(style, time, text)
 
    sampAddChatMessage(style,-1)
    sampAddChatMessage(text,-1)
 
if text:find('~n~~n~~n~~n~~n~~n~~w~Welcome~n~~b~(%w+_%w+)') then
        nick = text:match('~n~~n~~n~~n~~n~~n~~w~Welcome~n~~b~(%w+_%w+)')
         --мой код
        return false
    end


end

На аризоне не работает что-то уже 5 дней, раньше работало отлично, что не так?
Хочу заменить текст после авторизации

Но даже просто вывод текста и стиля не работает

Такая же проблема.. Еб*сь с ней уже 3 дня..

 

[the same]

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

 

[whyega52]

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

local ev = require("lib.samp.events")

function ev.onShowDialog(dialogId, style, title, button1, button2, text)
    if dialogId == 41 then
        -- читаешь инфу
        return false
    end
end

 

[ARMOR]

local ev = require("lib.samp.events")

function ev.onShowDialog(dialogId, style, title, button1, button2, text)
    if dialogId == 41 then
        -- читаешь инфу
        return false
    end
end

И получаешь баг из-за которого не сможешь взаимодействовать потом с инвентарем аризоны и т.д
Перед return false нужно отправлять sampSendDialogResponse

 

[whyega52]

Как лучше удалять значение из таблицы?

local arr = {"a", "b", "c", "d"}

arr[3] = nil
-- или
table.remove(arr, 3)

 

[ARMOR]

Как лучше удалять значение из таблицы?

local arr = {"a", "b", "c", "d"}

arr[3] = nil
-- или
table.remove(arr, 3)

arr[pos] = nil, ибо table.remove иногда не всё удаляет.

 

[ChаtGPT]

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

Собственно, как сделать renderDrawLine между мной и ближайшего транспорта? я делал но у меня не получилось, кто знает напишите пожалуйста

function getNearCarToCenter(radius)
    local arr = {}
    local sx, sy = getScreenResolution()
    for _, car in ipairs(getAllVehicles()) do
        if isCarOnScreen(car) and getDriverOfCar(car) ~= playerPed then
            local carX, carY, carZ = getCarCoordinates(car)
            local cX, cY = convert3DCoordsToScreen(carX, carY, carZ)
            local distBetween2d = getDistanceBetweenCoords2d(sx / 2, sy / 2, cX, cY)
            if distBetween2d <= tonumber(radius and radius or sx) then
                table.insert(arr, {distBetween2d, car})
            end
        end
    end
    if #arr > 0 then
        table.sort(arr, function(a, b) return (a[1] < b[1]) end)
        return arr[1][2]
    end
    return nil
end

local car = getNearCarToCenter(150)
if car then
    local carId = select(2, sampGetVehicleIdByCarHandle(car))
    print('Ближайшее к центру атво с ID: '..carId)
else -- nil
    print('Ближайшее к центру авто в указаном радиусе не найдено')
end

 

[XRLM]

Как лучше удалять значение из таблицы?

local arr = {"a", "b", "c", "d"}

arr[3] = nil
-- или
table.remove(arr, 3)

лучше юзай table.remove, когда делаешь так, как армор посоветовал, то arr[3] у тебя будет равно nil, а table.remove вообще удалит arr[3] и поставит на его место arr[4].

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

Собственно, как сделать renderDrawLine между мной и ближайшего транспорта? я делал но у меня не получилось, кто знает напишите пожалуйста

function getNearCarToCenter(radius)
    local arr = {}
    local sx, sy = getScreenResolution()
    for _, car in ipairs(getAllVehicles()) do
        if isCarOnScreen(car) and getDriverOfCar(car) ~= playerPed then
            local carX, carY, carZ = getCarCoordinates(car)
            local cX, cY = convert3DCoordsToScreen(carX, carY, carZ)
            local distBetween2d = getDistanceBetweenCoords2d(sx / 2, sy / 2, cX, cY)
            if distBetween2d <= tonumber(radius and radius or sx) then
                table.insert(arr, {distBetween2d, car})
            end
        end
    end
    if #arr > 0 then
        table.sort(arr, function(a, b) return (a[1] < b[1]) end)
        return arr[1][2]
    end
    return nil
end

local car = getNearCarToCenter(150)
if car then
    local carId = select(2, sampGetVehicleIdByCarHandle(car))
    print('Ближайшее к центру атво с ID: '..carId)
else -- nil
    print('Ближайшее к центру авто в указаном радиусе не найдено')
end

чекаешь свои корды и корды тачки, вставляешь их в renderDrawLine и все типа.

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

это ебани в любое место кода

function getNearCarToCenter(radius)
    local arr = {}
    local sx, sy = getScreenResolution()
    for _, car in ipairs(getAllVehicles()) do
        if isCarOnScreen(car) and getDriverOfCar(car) ~= playerPed then
            local carX, carY, carZ = getCarCoordinates(car)
            local cX, cY = convert3DCoordsToScreen(carX, carY, carZ)
            local distBetween2d = getDistanceBetweenCoords2d(sx / 2, sy / 2, cX, cY)
            if distBetween2d <= tonumber(radius and radius or sx) then
                table.insert(arr, {distBetween2d, car})
            end
        end
    end
    if #arr > 0 then
        table.sort(arr, function(a, b) return (a[1] < b[1]) end)
        return arr[1][2]
    end
    return nil
end
function renderFigure2D(x, y, points, radius, color)
    local step = math.pi * 2 / points
    local render_start, render_end = {}, {}
    for i = 0, math.pi * 2, step do
        render_start[1] = radius * math.cos(i) + x
        render_start[2] = radius * math.sin(i) + y
        render_end[1] = radius * math.cos(i + step) + x
        render_end[2] = radius * math.sin(i + step) + y
        renderDrawLine(render_start[1], render_start[2], render_end[1], render_end[2], 1, color)
    end
end
function get_crosshair_position()
    local vec_out = ffi.new("float[3]")
    local tmp_vec = ffi.new("float[3]")
    ffi.cast(
        "void (__thiscall*)(void*, float, float, float, float, float*, float*)",
        0x514970
    )(
        ffi.cast("void*", 0xB6F028),
        15.0,
        tmp_vec[0], tmp_vec[1], tmp_vec[2],
        tmp_vec,
        vec_out
    )
    return vec_out[0], vec_out[1], vec_out[2]
end

это сам рендер, мб не будет работать, не проверял

local radius = 150
--while true do
    local car = getNearCarToCenter(radius)
    if car then
        local cX, cY = get_crosshair_position()
        local pX, pY = getCarCoordinates(car)
        renderDrawLine(cX, cY, pX, pY, 5, 0xFFFFFFFF)
        renderFigure2D(250, 250, 16, radius, 0xFFFFFFFF)
        renderDrawPolygon(cX, cY, 10, 10, 15, 0, 0xFFFFFFFF)
        renderDrawPolygon(pX, pY, 10, 10, 15, 0, 0xFFFFFFFF)
    end