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

 

[Nicolas]

В ini можно как-то записать аналог такой таблицы?

table = {
["1"] = {
{"1"},
{"1", "2", "3"},
}
}

в json переводи и сохраняй, потом обратно

 

[sat0ry]

require 'moonloader'
local sampev = require 'lib.samp.events'
local memory = require 'memory'

local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local inicfg = require 'inicfg'
local directIni = 'ahelper.ini'
local ini = inicfg.load(inicfg.load({
    cheats = {
        clickwarp = false
    },
}, directIni))
inicfg.save(ini, directIni)

local clickwarp = imgui.ImBool(ini.cheats.clickwarp)

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end

    sampRegisterChatCommand('menu', function()
        window.v = not window.v
        imgui.Process = window.v
    end)
    
   wait(-1)
end

function imgui.OnDrawFrame()
    if not window.v then
        imgui.Process = false
    end

    if window.v then
        local resX, resY = getScreenResolution()
        local sizeX, sizeY = 1000, 600 -- WINDOW SIZE
        imgui.SetNextWindowPos(imgui.ImVec2(resX / 2 - sizeX / 2, resY / 2 - sizeY / 2), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(sizeX, sizeY), imgui.Cond.FirstUseEver)
        imgui.Begin('Menu', window, imgui.WindowFlags.NoResize + imgui.WindowFlags.NoMove)
        if imgui.Checkbox('ClickWarp', clickwarp) then
            if clickwarp.v then
                while isPauseMenuActive() do
                    if cursorEnabled then
                        showCursor(false)
                    end
                    wait(100)
                 end
                 if isKeyDown(VK_MBUTTON) then
                     cursorEnabled = not cursorEnabled
                     click_warp()
                     showCursor(cursorEnabled)
                     while isKeyDown(VK_MBUTTON) do wait(80) end
                 end
                 save()
            end
            save()
        end
        imgui.End()
    end
end

function save()
    ini.cheats.clickwarp = clickwarp.v
    inicfg.save(ini, directIni)
end

function onScriptTerminate(script, quit)
    if script == thisScript() then
        imgui.Process = false
        imgui.ShowCursor = false
        showCursor(false, false)
    end
end

function showCursor(toggle)
    if toggle then
      sampSetCursorMode(CMODE_LOCKCAM)
    else
      sampToggleCursor(false)
    end
    cursorEnabled = toggle
end

function teleportPlayer(x, y, z)
    if isCharInAnyCar(playerPed) then
      setCharCoordinates(playerPed, x, y, z)
    end
    setCharCoordinatesDontResetAnim(playerPed, x, y, z)
end

function removePointMarker()
    if pointMarker then
      removeUser3dMarker(pointMarker)
      pointMarker = nil
    end
end

function createPointMarker(x, y, z)
    pointMarker = createUser3dMarker(x, y, z + 0.3, 4)
end

function click_warp()
    lua_thread.create(function()
        while true do
        if cursorEnabled then
          local mode = sampGetCursorMode()
          if mode == 0 then
            showCursor(true)
          end
          local sx, sy = getCursorPos()
          local sw, sh = getScreenResolution()
          if sx >= 0 and sy >= 0 and sx < sw and sy < sh then
            local posX, posY, posZ = convertScreenCoordsToWorld3D(sx, sy, 700.0)
            local camX, camY, camZ = getActiveCameraCoordinates()
            local result, colpoint = processLineOfSight(camX, camY, camZ, posX, posY, posZ,
            true, true, false, true, false, false, false)
            if result and colpoint.entity ~= 0 then
              local normal = colpoint.normal
              local pos = Vector3D(colpoint.pos[1], colpoint.pos[2], colpoint.pos[3]) - (Vector3D(normal[1], normal[2], normal[3]) * 0.1)
              local zOffset = 300
              if normal[3] >= 0.5 then zOffset = 1 end
              local result, colpoint2 = processLineOfSight(pos.x, pos.y, pos.z + zOffset, pos.x, pos.y, pos.z - 0.3,
                true, true, false, true, false, false, false)
              if result then
                pos = Vector3D(colpoint2.pos[1], colpoint2.pos[2], colpoint2.pos[3] + 1)

                local curX, curY, curZ  = getCharCoordinates(playerPed)
                local dist              = getDistanceBetweenCoords3d(curX, curY, curZ, pos.x, pos.y, pos.z)
                local hoffs             = renderGetFontDrawHeight(font)

                sy = sy - 2
                sx = sx - 2
                renderFontDrawText(font, string.format("{FFFFFF}%0.2fm", dist), sx, sy - hoffs, 0xEEEEEEEE)

                local tpIntoCar = nil
                if colpoint.entityType == 2 then
                  local car = getVehiclePointerHandle(colpoint.entity)
                  if doesVehicleExist(car) and (not isCharInAnyCar(playerPed) or storeCarCharIsInNoSave(playerPed) ~= car) then
                    displayVehicleName(sx, sy - hoffs * 2, getNameOfVehicleModel(getCarModel(car)))
                    local color = 0xFFFFFFFF
                    if isKeyDown(VK_RBUTTON) then
                      tpIntoCar = car
                      color = 0xFFFFFFFF
                    end
                    renderFontDrawText(font, "{FFFFFF}Hold right mouse button to teleport into the car", sx, sy - hoffs * 3, color)
                  end
                end

                createPointMarker(pos.x, pos.y, pos.z)

                if isKeyDown(VK_LBUTTON) then
                  if tpIntoCar then
                    if not jumpIntoCar(tpIntoCar) then
                      teleportPlayer(pos.x, pos.y, pos.z)
                      local veh = storeCarCharIsInNoSave(playerPed)
                      local cordsVeh = {getCarCoordinates(veh)}
                      setCarCoordinates(veh, cordsVeh[1], cordsVeh[2], cordsVeh[3])
                    end
                  else
                    if isCharInAnyCar(playerPed) then
                      local norm = Vector3D(colpoint.normal[1], colpoint.normal[2], 0)
                      local norm2 = Vector3D(colpoint2.normal[1], colpoint2.normal[2], colpoint2.normal[3])
                      rotateCarAroundUpAxis(storeCarCharIsInNoSave(playerPed), norm2)
                      pos = pos - norm * 1.8
                      pos.z = pos.z - 1.1
                    end
                    teleportPlayer(pos.x, pos.y, pos.z)
                  end
                  removePointMarker()

                  while isKeyDown(VK_LBUTTON) do wait(0) end
                  showCursor(false)
                end
              end
            end
          end
        end
        wait(0)
        removePointMarker()
        end
    end)
end

При нажатии на чекбокс 'clickwarp', кликварп просто не работает

тоесть нажимая на колесико ничего не происходит

 

[shrug228]

require 'moonloader'
local sampev = require 'lib.samp.events'
local memory = require 'memory'

local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local inicfg = require 'inicfg'
local directIni = 'ahelper.ini'
local ini = inicfg.load(inicfg.load({
    cheats = {
        clickwarp = false
    },
}, directIni))
inicfg.save(ini, directIni)

local clickwarp = imgui.ImBool(ini.cheats.clickwarp)

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end

    sampRegisterChatCommand('menu', function()
        window.v = not window.v
        imgui.Process = window.v
    end)
  
   wait(-1)
end

function imgui.OnDrawFrame()
    if not window.v then
        imgui.Process = false
    end

    if window.v then
        local resX, resY = getScreenResolution()
        local sizeX, sizeY = 1000, 600 -- WINDOW SIZE
        imgui.SetNextWindowPos(imgui.ImVec2(resX / 2 - sizeX / 2, resY / 2 - sizeY / 2), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(sizeX, sizeY), imgui.Cond.FirstUseEver)
        imgui.Begin('Menu', window, imgui.WindowFlags.NoResize + imgui.WindowFlags.NoMove)
        if imgui.Checkbox('ClickWarp', clickwarp) then
            if clickwarp.v then
                while isPauseMenuActive() do
                    if cursorEnabled then
                        showCursor(false)
                    end
                    wait(100)
                 end
                 if isKeyDown(VK_MBUTTON) then
                     cursorEnabled = not cursorEnabled
                     click_warp()
                     showCursor(cursorEnabled)
                     while isKeyDown(VK_MBUTTON) do wait(80) end
                 end
                 save()
            end
            save()
        end
        imgui.End()
    end
end

function save()
    ini.cheats.clickwarp = clickwarp.v
    inicfg.save(ini, directIni)
end

function onScriptTerminate(script, quit)
    if script == thisScript() then
        imgui.Process = false
        imgui.ShowCursor = false
        showCursor(false, false)
    end
end

function showCursor(toggle)
    if toggle then
      sampSetCursorMode(CMODE_LOCKCAM)
    else
      sampToggleCursor(false)
    end
    cursorEnabled = toggle
end

function teleportPlayer(x, y, z)
    if isCharInAnyCar(playerPed) then
      setCharCoordinates(playerPed, x, y, z)
    end
    setCharCoordinatesDontResetAnim(playerPed, x, y, z)
end

function removePointMarker()
    if pointMarker then
      removeUser3dMarker(pointMarker)
      pointMarker = nil
    end
end

function createPointMarker(x, y, z)
    pointMarker = createUser3dMarker(x, y, z + 0.3, 4)
end

function click_warp()
    lua_thread.create(function()
        while true do
        if cursorEnabled then
          local mode = sampGetCursorMode()
          if mode == 0 then
            showCursor(true)
          end
          local sx, sy = getCursorPos()
          local sw, sh = getScreenResolution()
          if sx >= 0 and sy >= 0 and sx < sw and sy < sh then
            local posX, posY, posZ = convertScreenCoordsToWorld3D(sx, sy, 700.0)
            local camX, camY, camZ = getActiveCameraCoordinates()
            local result, colpoint = processLineOfSight(camX, camY, camZ, posX, posY, posZ,
            true, true, false, true, false, false, false)
            if result and colpoint.entity ~= 0 then
              local normal = colpoint.normal
              local pos = Vector3D(colpoint.pos[1], colpoint.pos[2], colpoint.pos[3]) - (Vector3D(normal[1], normal[2], normal[3]) * 0.1)
              local zOffset = 300
              if normal[3] >= 0.5 then zOffset = 1 end
              local result, colpoint2 = processLineOfSight(pos.x, pos.y, pos.z + zOffset, pos.x, pos.y, pos.z - 0.3,
                true, true, false, true, false, false, false)
              if result then
                pos = Vector3D(colpoint2.pos[1], colpoint2.pos[2], colpoint2.pos[3] + 1)

                local curX, curY, curZ  = getCharCoordinates(playerPed)
                local dist              = getDistanceBetweenCoords3d(curX, curY, curZ, pos.x, pos.y, pos.z)
                local hoffs             = renderGetFontDrawHeight(font)

                sy = sy - 2
                sx = sx - 2
                renderFontDrawText(font, string.format("{FFFFFF}%0.2fm", dist), sx, sy - hoffs, 0xEEEEEEEE)

                local tpIntoCar = nil
                if colpoint.entityType == 2 then
                  local car = getVehiclePointerHandle(colpoint.entity)
                  if doesVehicleExist(car) and (not isCharInAnyCar(playerPed) or storeCarCharIsInNoSave(playerPed) ~= car) then
                    displayVehicleName(sx, sy - hoffs * 2, getNameOfVehicleModel(getCarModel(car)))
                    local color = 0xFFFFFFFF
                    if isKeyDown(VK_RBUTTON) then
                      tpIntoCar = car
                      color = 0xFFFFFFFF
                    end
                    renderFontDrawText(font, "{FFFFFF}Hold right mouse button to teleport into the car", sx, sy - hoffs * 3, color)
                  end
                end

                createPointMarker(pos.x, pos.y, pos.z)

                if isKeyDown(VK_LBUTTON) then
                  if tpIntoCar then
                    if not jumpIntoCar(tpIntoCar) then
                      teleportPlayer(pos.x, pos.y, pos.z)
                      local veh = storeCarCharIsInNoSave(playerPed)
                      local cordsVeh = {getCarCoordinates(veh)}
                      setCarCoordinates(veh, cordsVeh[1], cordsVeh[2], cordsVeh[3])
                    end
                  else
                    if isCharInAnyCar(playerPed) then
                      local norm = Vector3D(colpoint.normal[1], colpoint.normal[2], 0)
                      local norm2 = Vector3D(colpoint2.normal[1], colpoint2.normal[2], colpoint2.normal[3])
                      rotateCarAroundUpAxis(storeCarCharIsInNoSave(playerPed), norm2)
                      pos = pos - norm * 1.8
                      pos.z = pos.z - 1.1
                    end
                    teleportPlayer(pos.x, pos.y, pos.z)
                  end
                  removePointMarker()

                  while isKeyDown(VK_LBUTTON) do wait(0) end
                  showCursor(false)
                end
              end
            end
          end
        end
        wait(0)
        removePointMarker()
        end
    end)
end

При нажатии на чекбокс 'clickwarp', кликварп просто не работает

тоесть нажимая на колесико ничего не происходит

Тебе уже выше писали, что стоит ознакомиться с основами языка, настоятельно рекомендую все же это сделать. Блок кода, где ты и отслеживаешь нажатие клавиш находится в if wnidow.v then, т.е. когда окно закрыто оно никак не может выполняться.
Условие if imgui.Checkbox() then срабатывает только при смене состояния чекбокса, т.е. когда на него нажали и он стал включен/выключен.

 

[sat0ry]

Тебе уже выше писали, что стоит ознакомиться с основами языка, настоятельно рекомендую все же это сделать. Блок кода, где ты и отслеживаешь нажатие клавиш находится в if wnidow.v then, т.е. когда окно закрыто оно никак не может выполняться.
Условие if imgui.Checkbox() then срабатывает только при смене состояния чекбокса, т.е. когда на него нажали и он стал включен/выключен.

Не понимаю с чего ты взял, что я не ознакомлен с основами? Пытался засовывать в while true do -- постоянный цикл, и что ты думаешь? ПРАВИЛЬНО! нихуя не работало.

Прежде чем писать не обдуманную хуету, попробуй сам изменить код

 

[shrug228]

Не понимаю с чего ты взял, что я не ознакомлен с основами? Пытался засовывать в while true do -- постоянный цикл, и что ты думаешь? ПРАВИЛЬНО! нихуя не работало.

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

Прежде чем писать не обдуманную хуету, попробуй сам изменить код

Я "необдуманную хуету" не пишу в отличии от некоторых) Тут и делать толком нефиг, но раз просишь, то без проблем, я тебе сейчас такую хрень с 0 сделаю, засекай.

И так, на часах 16:06 (начало - 16:02), а код уже готов. А закончил все это дело писать я еще минуты две назад)

P.S.: Можно вообще и без потоков сделать и немного подзасрать основной цикл, но мне как-то это делать не захотелось)

 

[sat0ry]

И че? Где кликварп? Он вообще не фурычит. Одно лишь сообщение test при нажатии на колесико, гений.

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


Я "необдуманную хуету" не пишу в отличии от некоторых) Тут и делать толком нефиг, но раз просишь, то без проблем, я тебе сейчас такую хрень с 0 сделаю, засекай.

И так, на часах 16:06 (начало - 16:02), а код уже готов. А закончил все это дело писать я еще минуты две назад)

P.S.: Можно вообще и без потоков сделать и немного подзасрать основной цикл, но мне как-то это делать не захотелось)

такой код и мне не сложно написать, займет всего 1 - 2 минуты.

 

[sep]

Когда скрипт ловит моё объявление, его не видно в чате.
как пофиксить это ? ((без sampAddChatMessage итд ))
return true и return {colors, text} не помогает

 

[shrug228]

Когда скрипт ловит моё объявление, его не видно в чате.
как пофиксить это ? ((без sampAddChatMessage итд ))
return true и return {colors, text} не помогает

Не совсем понимаю о чем ты. Можешь код кинуть?

Не понимаю с чего ты взял, что я не ознакомлен с основами?

Например с того, что ты используешь переменную (window), которую еще не создал и не можешь посмотреть лог, чтобы про это узнать.

И че? Где кликварп? Он вообще не фурычит. Одно лишь сообщение test при нажатии на колесико, гений.

Я тебе показал работающую активацию, кликварп подставляй свой. Я его проверил, он не работает, но про него речь и не шла.

такой код и мне не сложно написать, займет всего 1 - 2 минуты.

Так если не сложно, то почему не написал? Просто подставь вывод рандомного сообщения в чат при активации кликварпа в свой скрипт и в мой и убедишься, что мой работает, а вот твой нет.

 

[sep]

уже помоги но всеравно спасибо

 

[TrixTM]

мучаюсь с ником локального игрока уже где-то пол часа, не получается получить ник именно мой, выводит ток ник 0 айди.

local lplayer = sampGetPlayerNickname(sampGetPlayerIdByCharHandle(playerPed)) -- локалка
if isKeyJustPressed(75) and not sampIsCursorActive() then printStringNow(lplayer, 3000) -- не полный код

 

[halfastrc]

мучаюсь с ником локального игрока уже где-то пол часа, не получается получить ник именно мой, выводит ток ник 0 айди.

local lplayer = sampGetPlayerNickname(sampGetPlayerIdByCharHandle(playerPed)) -- локалка
if isKeyJustPressed(75) and not sampIsCursorActive() then printStringNow(lplayer, 3000) -- не полный код

You can try something like this:

local vkeys = require 'vkeys'

function main()
    local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local nick = sampGetPlayerNickname(id)

    while true do wait(0)
        if isKeyJustPressed(0x31) then --1
            print(nick)
        end
    end
end

 

[sep]

мучаюсь с ником локального игрока уже где-то пол часа, не получается получить ник именно мой, выводит ток ник 0 айди.

local lplayer = sampGetPlayerNickname(sampGetPlayerIdByCharHandle(playerPed)) -- локалка
if isKeyJustPressed(75) and not sampIsCursorActive() then printStringNow(lplayer, 3000) -- не полный код

_, id = sampGetPlayerIdByCharHandle(PLAYER_PED)
nick = sampGetPlayerNickname(id)
тебе же дали ответ у тебе шас работает ?

 

[TrixTM]

You can try something like this:

local vkeys = require 'vkeys'

function main()
    local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local nick = sampGetPlayerNickname(id)

    while true do wait(0)
        if isKeyJustPressed(0x31) then --1
            print(nick)
        end
    end
end

thx, i try it
UPD: It's work, thx.

 

[dendy.]

Как сделать что бы обьект и 3д текст не появлялся когда другой игрок убивает другого игрока.
А только чтобы когда я убью кого-то чтобы появлялось

function event.onPlayerDeath(playerId)
    id = playerId
    nickname = sampGetPlayerNickname(playerId)
    bool, ped = sampGetCharHandleBySampPlayerId(playerId)
    if bool then
        x, y, z = getDeadCharPickupCoords(ped)
        z = getGroundZFor3dCoord(x, y, z)
        object = createObject(5777, x, y, z-0.25)
        objectt = createObject(2895, x, y, z-0.25)
        setObjectScale(object, 0.5)
        setObjectHeading(object, math.random(0, 180))
        markObjectAsNoLongerNeeded(object)
        markObjectAsNoLongerNeeded(objectt)
        setObjectCollision(object, false)
        textlabel = sampCreate3dText('Тут умер \n'..nickname..' ['..id..']\n помянем\nPress F', 0xffffffff, x, y, z+0.30, 5.0, true, -1, -1)
        local index = #graves + 1
        table.insert(graves, index, {x = x,y = y,z = z, nick = nickname})
        lua_thread.create(function()
              wait(10000)
              sampDestroy3dText(textlabel)
              deleteObject(object)
              deleteObject(objectt)
              table.remove(graves, index)
        end)
    end
end

 

[shrug228]

Как сделать что бы обьект и 3д текст не появлялся когда другой игрок убивает другого игрока.
А только чтобы когда я убью кого-то чтобы появлялось

Как возможный костыль getCharPlayerIsTargetings(), но не во всех случаях будет толк.