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

 

[aurora_]

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

require "lib.moonloader"
local sampev = require "lib.samp.events"

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

function sampev.onServerMessage(color, text)
    if text:find("Добро пожаловать на Arizona Role Play!") then
        lua_thread.create(firstThread)
    end
end

function firstThread()
    wait(5000)
    sampSendChat("/log Пароль")
end

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

 

[samartinell1]

@AterEX

Кстати если используешь клео для входа /log, то тебе нужно не sampSendChat, a sampProcessChatInput('text')

 

[Мира]

не подскажите как сделать автологин по вводу пароля в текстовый документ?

require "lib.moonloader"
 
local samp = require "samp.events"
local sampev = require "lib.samp.events"
local ev = require 'lib.samp.events'
local inicfg = require 'inicfg'
local password = {
u8"password"
}
 
u8 = encoding.UTF8
 
function main()
 
function sampev.onShowDialog(id, style, title, btn1, btn2, text)
    if (id == 3) then
        sampSendDialogResponse(id, 1, -1, u8:decode(password[mainIni.settings.band+1])
        return false
    end
    if (id == 5) then
        return false
    end
        if (id == 562) then
        sampSendDialogResponse(id, 1, _, _)
        return false
    end
        if (id == 563) then
        sampSendChat("/engine")
        sampSendDialogResponse(id, 1, _, _)
        return false
    end
end)

 

[meosh]

Можно как то обойти античит серверный? Может статьи есть об этом? Что бы меньше кикало за дган/тп и тп

 

[СоМиК]

Можно пожалуйста пример кода с этой функцией: жмяк
Мне нужно, чтобы запускался определенный звук из папки. И чтобы если значение work равняется true, воспроизводился этот самый звук из папки

 

[user31883]

Можно пожалуйста пример кода с этой функцией: жмяк
Мне нужно, чтобы запускался определенный звук из папки. И чтобы если значение work равняется true, воспроизводился этот самый звук из папки

https://www.blast.hk/threads/59325/ (пример)
В следующий раз пользуйся поиском на форуме( поиск loadAudioStream )

 

[samartinell1]

У меня есть поиск по содержанию строки, то есть я нахожу нужную мне строчку через for line in io.lines(path) do, как я могу с этой информации узнать номер строки нужной? Ну то есть, у меня как бы несколько строк, а мне нужна вторая, у меня есть все данные с неё кроме порядкового номера строки, как его можно вычислить?

Спойлер: code

        if imgui.BeginPopup('ChangeContact') then
          imgui.Text(u8'Вы можете изменить имя текущего контакта')
          imgui.InputText('##3', buffername)
          local enter = imgui.Button(u8'Подтвердить')
          if enter and buffername.v == '' then
            sampAddChatMessage(tg..' Сначала введите новое имя контакта.',main_color)
          elseif enter then
            contacfound = false
            for line in io.lines(getWorkingDirectory().."/favorite.txt") do
              lnumber, lname = line:match('(%d+) : (.+)')
              liner = liner + 1
              if u8:decode(buffername.v) ~= lname and tonumber(pnumberchel) == tonumber(lnumber) then
                lnamefound = lname
                lnumberfound = lnumber
                contactfound = true
              elseif lname:find(u8:decode(buffername.v)) then
                contferror = true
                  sampAddChatMessage(tg..' Набранное имя уже существует. Введите другое!',main_color)
              end
            end
            if contactfound and not contferror then
              sampAddChatMessage(tg..' Контакт '..lnamefound..'('..lnumberfound..') был переименован в '..u8:decode(buffername.v),main_color)
              local filechange = io.open(getWorkingDirectory().."/favorite.txt", 'w')

              lines = {} -- массив линий файла
              for line in io.lines(getWorkingDirectory().."/favorite.txt") do
                  table.insert(lines, liner)
              end
              lines[liner] = lnumberfound..' : '..u8:decode(buffername.v)
              filechange:write(table.concat(lines, '\n'))

              filechange:close()
              contactfound = false
            elseif u8:decode(buffername.v) == lnamefound then
              sampAddChatMessage(tg..' Набранное имя уже существует. Введите другое!',main_color)
            elseif contferror then
              contferror = false
            end
          end
          imgui.SameLine()
          if imgui.Button(u8'Отмена') then
            imgui.CloseCurrentPopup()
          end
          imgui.EndPopup()
        end

проблема актуальна, блин, помогите пж

upd: исправил проблему, если кому-то интересно, просто заменил table.insert(lines.liner) на table.insert(lines, line), осталось ток пофиксить беспорядок со строчками, но это куда проще

 

[AterEX]

Кстати если используешь клео для входа /log, то тебе нужно не sampSendChat, a sampProcessChatInput('text')

Я так понял там нужно еще Enter нажать, т.к. строка просто в чат введется, но не отправится
Вот так:
sampProcessChatInput("/log пароль")?

 

[СоМиК]

https://www.blast.hk/threads/59325/ (пример)
В следующий раз пользуйся поиском на форуме( поиск loadAudioStream )

оке

 

[samartinell1]

Я так понял там нужно еще Enter нажать, т.к. строка просто в чат введется, но не отправится
Вот так:
sampProcessChatInput("/log пароль")?

не нужно, оно отправится точно также как и с sampSendChat, просто напрямую в клиент, а не на сервер

 

[roman_vodola]

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

 

[Biuti]

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

local sampev = require "lib.samp.events"
require "lib.moonloader"
local keys = require 'vkeys'
local imgui = require 'imgui'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local main_window_state = imgui.ImBool(false)
local text_buffer = imgui.ImBuffer(256)


function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage('{FF0000}активация /cnnh')
    sampRegisterChatCommand('cnnh', qq)
        imgui.Process = false
    wait(-1)
    if main_window_state.v == false then
    imgui.Process = false
end
end

function qq(arg)
main_window_state.v = not main_window_state.v
imgui.Process = main_window_state.v

end

function imgui.OnDrawFrame()
if main_window_state.v then
    imgui.Begin("Cnn helper by Luntek", main_window_state)
    imgui.Text("")
    imgui.Checkbox("Auto ad edit",cheked_test)
    imgui.End()
end
end

 

[kin4stat]

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

local sampev = require "lib.samp.events"
require "lib.moonloader"
local keys = require 'vkeys'
local imgui = require 'imgui'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8
local main_window_state = imgui.ImBool(false)
local text_buffer = imgui.ImBuffer(256)


function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage('{FF0000}активация /cnnh')
    sampRegisterChatCommand('cnnh', qq)
        imgui.Process = false
    wait(-1)
    if main_window_state.v == false then
    imgui.Process = false
end
end

function qq(arg)
main_window_state.v = not main_window_state.v
imgui.Process = main_window_state.v

end

function imgui.OnDrawFrame()
if main_window_state.v then
    imgui.Begin("Cnn helper by Luntek", main_window_state)
    imgui.Text("")
    imgui.Checkbox("Auto ad edit",cheked_test)
    imgui.End()
end
end

Потому что у тебя не объявлена переменная checked_test которая должна быть типа ImBool

 

[Biuti]

после закрытия окна имгуи на крестик остаётся курсор,как это исправить?

 

[Myradov|]

после закрытия окна имгуи на крестик остаётся курсор,как это исправить?

У тебя скорее всего крашит скрипт, кинь лог