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

 

[ufdhbi]

Как сделать, чтобы при нажатии X выполнялось действие, пока эта клавиша опять не будет нажата.

isKeyDown в майн цикл

 

[rraggerr]

Как сделать, чтобы при нажатии X выполнялось действие, пока эта клавиша опять не будет нажата.

local booleanval = false
if isKeyJustPressed(VK_F1) then
booleanval = not booleanval
end

if booleanval then
-- действия
end

 

[ZKelo]

какая функция может скролить оружие? У меня кулак я нажал кнопку и у меня дигл

Попробуй setCurrentCharWeapon

 

[ufdhbi]

а как проверить есть ли вообще в перса определенное оружие?

bool result = isCurrentCharWeapon(Ped ped, int weapon)

[TBODY] [/TBODY]

int weapon = getCurrentCharWeapon(Ped ped)

 

[Ken Block]

require 'lib.moonloader'

local sas = [[0.Test
1.Test]]

function main()
  if not isSampfuncsLoaded() or not isSampLoaded() then return end
  while not isSampAvailable() do wait(100) end
  while true do
    wait(0)
    if isKeyJustPressed(VK_5) then sampShowDialog(3, 'Test', sas, 'da', 'nit', 2) end
    local result, button, list, input = sampHasDialogRespond(3)
    if resault then
      if list == 0 and button == 1 then
        sampAddChatMessage('0.Test', 0x000FF)
      end
      if list == 1 and button == 1 then
        sampAddChatMessage('2.Test', 0xFF0000)
      end
    end
  end
end

Почему не работает??!!

 

[ufdhbi]

require 'lib.moonloader'

local sas = [[0.Test
1.Test]]

function main()
  if not isSampfuncsLoaded() or not isSampLoaded() then return end
  while not isSampAvailable() do wait(100) end
  while true do
    wait(0)
    if isKeyJustPressed(VK_5) then sampShowDialog(3, 'Test', sas, 'da', 'nit', 2) end
    local result, button, list, input = sampHasDialogRespond(3)
    if resault then
      if list == 0 and button == 1 then
        sampAddChatMessage('0.Test', 0x000FF)
      end
      if list == 1 and button == 1 then
        sampAddChatMessage('2.Test', 0xFF0000)
      end
    end
  end
end

Почему не работает??!!

require 'lib.moonloader'

local sas = [[0.Test
1.Test]]

function main()
  if not isSampfuncsLoaded() or not isSampLoaded() then return end
  while not isSampAvailable() do wait(100) end
  while true do
    wait(0)
    if isKeyJustPressed(VK_5) then sampShowDialog(3, 'Test', sas, 'da', 'nit', 2) end
    local result, button, list, input = sampHasDialogRespond(3)
    if result then
      if list == 0 and button == 1 then
        sampAddChatMessage('0.Test', 0x000FF)
      end
      if list == 1 and button == 1 then
        sampAddChatMessage('2.Test', 0xFF0000)
      end
    end
  end
end

 

[#Northn]

Как сделать чтобы все было одновременно а не нажимать по 2 раза

    if isKeyJustPressed(key.VK_1) and isKeyJustPressed(key.VK_RBUTTON) then
      setCurrentCharWeapon(playerPed, 0)
      if weapon == 0 then
        wait(0)
        sampSendChat("/me убрал оружие и готов в любой момент достать его")
      end
    end

    if isKeyDown(key.VK_1) and isKeyJustPressed(key.VK_RBUTTON) then
      if weapon ~= 0 then
        setCurrentCharWeapon(playerPed, 0)
        wait(0)
        sampSendChat("/me убрал оружие и готов в любой момент достать его")
      end
    end

 

[sanekson]

Подскажите, как припаять luasec? Скачал скопилированный luasec для винды Re: Luasec for Windows^{(http://lua-users.org/lists/lua-l/2016-01/msg00270.html)} отсюда, но выбивает, что нет библиотек ssl.core и ssl.http. Подскажите не образованному

 

[atiZZZ]

Кто может помочь? Сделал "скрипт" (говно код, автор даун(я)), в чём здесь ошибка? Можете исправить? Смысл скрипта: написать /timee (без перехвата данных со стороны сервера) и после этого отыграть написать в чате /time и дальше /me взглянул на часы с гравировкой "Rollex". (можно и с перехватом, будет лучше)0))

require ("lib.moonloader")

function main()
if not isSampLoaded() or not isSampfuncsLoaded() then return end
while not isSampAvailable() do wait(100) end
sampRegisterChatCommand("timee")
function ()
sampSendChat("/me взглянул на часы")
wait(1000)

end

wait(-1)
end

 

[checkdasound]

Кто может помочь? Сделал "скрипт" (говно код, автор даун(я)), в чём здесь ошибка? Можете исправить? Смысл скрипта: написать /timee (без перехвата данных со стороны сервера) и после этого отыграть написать в чате /time и дальше /me взглянул на часы с гравировкой "Rollex". (можно и с перехватом, будет лучше)0))

require ("lib.moonloader")

function main()
if not isSampLoaded() or not isSampfuncsLoaded() then return end
while not isSampAvailable() do wait(100) end
sampRegisterChatCommand("timee")
function ()
sampSendChat("/me взглянул на часы")
wait(1000)

end

wait(-1)
end

Гайд - Написание Lua скриптов для MoonLoader^{(https://blast.hk/threads/21056/#aq4)}
Почитай тут про работу с командами.

 

[trefa]

Кто может помочь? Сделал "скрипт" (говно код, автор даун(я)), в чём здесь ошибка? Можете исправить? Смысл скрипта: написать /timee (без перехвата данных со стороны сервера) и после этого отыграть написать в чате /time и дальше /me взглянул на часы с гравировкой "Rollex". (можно и с перехватом, будет лучше)0))

require ("lib.moonloader")

function main()
if not isSampLoaded() or not isSampfuncsLoaded() then return end
while not isSampAvailable() do wait(100) end
sampRegisterChatCommand("timee")
function ()
sampSendChat("/me взглянул на часы")
wait(1000)

end

wait(-1)
end

v1

require ("lib.moonloader")


function main()
if not isSampLoaded() then return end
while not isSampAvailable() do wait (100) end
sampRegisterChatCommand("time", function() lua_thread.create(test) end)
wait(-1)
end

function test()
sampSendChat("/me взглянул на часы")
wait(1000)
sampSendChat("/time")
end

v2

require ("lib.moonloader")
local sampev = require 'lib.samp.events'

function main()
if not isSampLoaded() then return end
while not isSampAvailable() do wait (100) end
wait(-1)
end

function sampev.onSendCommand(command)
if string.find(caption, "^time$") then
lua_thread.create(function()
wait(1)
sampSendChat("/me взглянул на часы")
end)
end
end

 

[Petr_Sergeevich]

Как можно применить выравнивание к текстдраву?
Например, renderFontDrawText(font, text, x, y, -1) - создаёт какой-то текст на экране и нужно его выравнять по левому краю, чтобы значения не смещались вправо.

 

[trefa]

Как можно применить выравнивание к текстдраву?
Например, renderFontDrawText(font, text, x, y, -1) - создаёт какой-то текст на экране и нужно его выравнять по левому краю, чтобы значения не смещались вправо.

Попробуй

text = "Пример"
font = renderCreateFont("Arial", 9, 13)

renderFontDrawText(font, text, X - renderGetFontDrawTextLength(font,text,true), Y, -1) -- в цикл

 

[checkdasound]

Код ниже должен работать?

require 'lib.sampfuncs'

function onReceiveRpc(rpcid)
    if rpcid == RPC_SCRRESETPLAYERWEAPONS then
        return false
    end
end

 

[trefa]

как через команду поставить скрипт на паузу а потом через эту же команду заставить работать дальше?

act = false

sampRegisterChatCommand("test", function() act = not act end)

while true do
wait(0)
if act then
end
end