Вопросы по 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.
Как получить транспорт, в котором сидит игрок?
Lua:
local veh = storeCarCharIsInNoSave(PLAYER_PED)
Как получить свой id или id другого игрока?
Lua:
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
Как проверить, что строка содержит какой-то текст?
Lua:
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
Как эмулировать нажатие игровой клавиши?
Lua:
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 другого игрока, в которого целюсь я?
Lua:
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
Как зарегистрировать команду чата SAMP?
Lua:
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua:
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:

MrBidloKoder

Известный
423
249
up
 

Gat

Участник
52
6
opcode '00A0' call caused an unhandled exception
stack traceback:
[C]: in function 'getCharCoordinates'
...ÈÑËÀÌÀ\GTA copy\moonloader\test.lua:1274: in function 'OnDrawFrame'
...ËÀÌÀ\GTA copy\moonloader\lib\imgui.lua:1378: in function <...ËÀÌÀ\GTA copy\moonloader\lib\imgui.lua:1367
Такая вот непонятная ошибка. Вот сами строки:
Lua:
for k, v in pairs(getAllChars()) do
                        if v ~= nil then
                            result_obv, id_obv = sampGetPlayerIdByCharHandle(v)
                            if result_obv and id_obv ~= -1 then
                                local iX, iY, iZ = getCharCoordinates(PLAYER_HANDLE)
                                local obvX, obvY, obvZ = getCharCoordinates(v)
                                local dist_bw = getDistanceBetweenCoords3d(iX, iY, iZ, obvX, obvY, obvZ)
                                if dist_bw <= check_obv_dist.v then
                                    wait(100)
                                    sampSendChat(string.format("/checkskills %s 2", id_obv))
                                end
                            end
                        end
                    end
В чем проблема? Ошибка?
 

D.Makarov

Участник
146
3
как сделать что бы когда садился в машину и когда прописываешь команду тебя будет кидать в разные стороны
вообщем мне нужен код что бы кидало в стороны не вузуально
 

D.Makarov

Участник
146
3
как сделать что бы когда было сообщение в чате скрипт прописывал какую либо команду
 

Fott

Простреленный
3,461
2,378
как сделать что бы когда было сообщение в чате скрипт прописывал какую либо команду
Lua:
local sampev = require "lib.samp.events"

function main()
    repeat wait(0) until isSampAvailable()
    while true do
        wait(0)
    end
end

function sampev.onServerMessage(color, text)
    if text:find("Текст") then
        sampAddChatMessage("Ну текст и чо", -1)
    end
end
 

HpP

Известный
368
119
Крашит игру при открытии меню imgui.Combo. С чем это может быть связано?
 

HpP

Известный
368
119
Проблема такова, что у меня есть выбор пола в скрипте(imgui.Combo) и при выводе значения, он пишет 0 или 1(0 - мужской, 1 - женский). И суть в том, что мне надо вывести сам пол, Мужской или Женский. Как это сделать?
 

Gat

Участник
52
6
Проблема такова, что у меня есть выбор пола в скрипте(imgui.Combo) и при выводе значения, он пишет 0 или 1(0 - мужской, 1 - женский). И суть в том, что мне надо вывести сам пол, Мужской или Женский. Как это сделать?
скинешь код?
какой код что бы когда было нужное сообщение в чате нажимался л. альт
Lua:
sampev = require('lib.samp.events')

function sampev.onServerMessage(color, text)
    if text:match('Искать эту строку в чате') then
        lua_thread.create(function()
            setVirtualKeyDown(0x12, true)
            wait(1)
            setVirtualKeyDown(0x12, false)
        end)
    end
end
 
  • Нравится
Реакции: HpP

HpP

Известный
368
119
скинешь код?

Lua:
script_name('YourCharacter')
script_author('HpP')
script_version('0.0.1')

require "lib.moonloader"
local encoding = require "encoding"
local inicfg = require "inicfg"
local sampev = require "lib.samp.events"
local imgui = require "imgui"
local inicfg = require 'inicfg'
local fa = require 'fAwesome5'
local fa_font = nil
local fa_glyph_ranges = imgui.ImGlyphRanges({ fa.min_range, fa.max_range })
imgui.ToggleButton = require('imgui_addons').ToggleButton
encoding.default = 'CP1251'
u8 = encoding.UTF8

local Register = imgui.ImBool(false)
local Register1 = imgui.ImBool(false)
local info = imgui.ImBool(false)
local WindowState = imgui.ImBool(false)
local X, Y = getScreenResolution()
local Pol = {u8'Мужской', u8'Женский'}
local Combo_Pol = imgui.ImInt(0)

-- Character
local FIO = imgui.ImBuffer(256)
local AGE = imgui.ImBuffer(256)
local SPECIAL = imgui.ImBuffer(256)
--
Char = 0
--


function main()
  if not isSampLoaded() or not isSampfuncsLoaded() then return end
  while not isSampAvailable() do wait(100) end
    --
        sampRegisterChatCommand('char', cmd_char)
        sampAddChatMessage('{3399FF}[YourCharacter] {FFFFFF}Скрипт загружен | Автор: {3399FF}HpP', 0xFFFFFF)
        sampAddChatMessage('{3399FF}[YourCharacter] {FFFFFF}Для управления скриптом, используйте команду {3399FF}/char', 0xFFFFFF)
    
  while true do
    wait(0)
  end
end


function imgui.OnDrawFrame()

    if not WindowState.v and not Register.v and not Register1.v and not info.v then
        imgui.Process = false
    end
    
    if info.v then
    imgui.SetNextWindowSize(imgui.ImVec2(360, 330), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2(X / 1.153, Y / 2.125), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))    
    imgui.Begin(u8'Информация', info, imgui.WindowFlags.NoResize)
    imgui.CenterText(u8'Добро пожаловать!')
    imgui.NewLine()
    imgui.Text(u8'Nen')
    imgui.Text(u8'Nen')
    imgui.Text(u8'Nen')
    imgui.Text(u8'Nen')
    imgui.Text(u8'Nen')
    imgui.End()
    end

    if Register.v then
    imgui.SetNextWindowSize(imgui.ImVec2(750, 460), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2(X / 2.2, Y / 1.8), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.Begin(u8'Создание нового персонажа', Register, imgui.WindowFlags.NoResize)
    imgui.SetCursorPos(imgui.ImVec2(233, 205))
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 60)
    if imgui.Button(u8'Создать персонажа', imgui.ImVec2(210, 50)) then
        Register.v = false
            Register1.v = true
    end
    imgui.PopStyleVar()
    imgui.SameLine()
    imgui.SetCursorPos(imgui.ImVec2(450, 205))
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 60)
    if imgui.Button(u8'Информация', imgui.ImVec2(100, 50)) then
        info.v = true
    end
    imgui.PopStyleVar()
    imgui.End()
    end
    
    if Register1.v then
    imgui.SetNextWindowSize(imgui.ImVec2(750, 460), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2(X / 2, Y / 1.8), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))    
    imgui.Begin(u8'Регистрация персонажа', Register1, imgui.WindowFlags.NoResize)
    imgui.Text(u8'-- Основная часть --')
    imgui.NewLine()
    imgui.Text(u8'Введите ФИО своего персонажа: ')
    imgui.InputText('##1', FIO)
    imgui.Text(u8'Введите возраст: ')
    imgui.InputText('##2', AGE)
    imgui.Text(u8'Выберете пол: ')
    imgui.Combo(' ', Combo_Pol, Pol)
    imgui.NewLine()
    imgui.Text(u8'-- Дополнительная часть --')
    imgui.Text(u8'Укажите три любимых занятия персонажа: ')
    imgui.InputText('##3', SPECIAL)
    if imgui.IsItemHovered() then
    imgui.BeginTooltip()
    imgui.TextUnformatted(u8('Пример: Спорт, самообразование, кататься на велосипеде'))
    imgui.EndTooltip()
    end
    imgui.NewLine()
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 60)
    if imgui.Button(u8'Закончить регистрацию', imgui.ImVec2(-1, 20)) then
        Register1.v = false
            WindowState.v = true
                Char = Char + 1
                    sampAddChatMessage('[YourCharacter] Регистрация успешно завершена. Сохранение персонажа.', -1)
    end
    imgui.PopStyleVar()
    imgui.End()
    end
    
    if WindowState.v then
    imgui.SetNextWindowSize(imgui.ImVec2(750, 460), imgui.Cond.FirstUseEver)
    imgui.SetNextWindowPos(imgui.ImVec2(X / 2, Y / 1.8), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))    
    imgui.Begin(u8'YourCharacter | Version: '..thisScript().version..' | Author: HpP', WindowState, imgui.WindowFlags.NoResize)
    imgui.BeginChild('Child', imgui.ImVec2(230, 425), true)
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 3)
    if imgui.Button(u8'Профиль', imgui.ImVec2(-1, 35)) then menu = 0 end
    imgui.PopStyleVar()
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 3)
    imgui.Button(u8'Дела', imgui.ImVec2(-1, 35))
    imgui.PopStyleVar()
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 3)
    imgui.Button(u8'Прокачка персонажа', imgui.ImVec2(-1, 35))
    imgui.PopStyleVar()
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 3)
    imgui.Button(u8'123', imgui.ImVec2(-1, 35))
    imgui.PopStyleVar()
    imgui.SetCursorPos(imgui.ImVec2(8, 380))
    imgui.PushStyleVar(imgui.StyleVar.FrameRounding, 3)
    imgui.Button(u8'Настройки', imgui.ImVec2(-1, 35))
    imgui.PopStyleVar()
    imgui.EndChild()
    imgui.SameLine()
    if menu == 0 then
    imgui.BeginChild('Was', imgui.ImVec2(496, 425), true)
    imgui.SetCursorPos(imgui.ImVec2(24, 10))
    imgui.Text(u8'-- Ваш Персонаж --')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 28))
    imgui.Text(u8'ФИО персонажа: ')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 46))
    imgui.Text(u8'Возраст: ')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 64))
    imgui.Text(u8'Пол: '..Combo_Pol.v)
    imgui.NewLine()
    imgui.SetCursorPos(imgui.ImVec2(24, 82))
    imgui.Text(u8'-- Нужды --')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 100))
    imgui.Text(u8'Голод: ')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 118))
    imgui.Text(u8'Жажда: ')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 136))
    imgui.Text(u8'Температура тела: ')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 154))
    imgui.Text(u8'Нужда:')
    imgui.NewLine()
    imgui.SetCursorPos(imgui.ImVec2(24, 172))
    imgui.Text(u8'-- Состояние --')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 190))
    imgui.Text(u8'Эмоциональное состояние: ')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 208))
    imgui.Text(u8'Агресивность:')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 226))
    imgui.Text(u8'Психологическое состояние: ')
    imgui.SetCursorPos(imgui.ImVec2(12.5, 244))
    imgui.Text(u8'Физическое состояние: ')
    imgui.EndChild()
    end
    imgui.End()
    end
end


function imgui.CenterText(text) -- Центр
    local width = imgui.GetWindowWidth()
    local calc = imgui.CalcTextSize(text)
    imgui.SetCursorPosX( width / 2 - calc.x / 2 )
    imgui.Text(text)
end


function imgui.CenterTextColoredRGB(text)
    local width = imgui.GetWindowWidth()
    local style = imgui.GetStyle()
    local colors = style.Colors
    local ImVec4 = imgui.ImVec4

    local explode_argb = function(argb)
        local a = bit.band(bit.rshift(argb, 24), 0xFF)
        local r = bit.band(bit.rshift(argb, 16), 0xFF)
        local g = bit.band(bit.rshift(argb, 8), 0xFF)
        local b = bit.band(argb, 0xFF)
        return a, r, g, b
    end

    local getcolor = function(color)
        if color:sub(1, 6):upper() == 'SSSSSS' then
            local r, g, b = colors[1].x, colors[1].y, colors[1].z
            local a = tonumber(color:sub(7, 8), 16) or colors[1].w * 255
            return ImVec4(r, g, b, a / 255)
        end
        local color = type(color) == 'string' and tonumber(color, 16) or color
        if type(color) ~= 'number' then return end
        local r, g, b, a = explode_argb(color)
        return imgui.ImColor(r, g, b, a):GetVec4()
    end

    local render_text = function(text_)
        for w in text_:gmatch('[^\r\n]+') do
            local textsize = w:gsub('{.-}', '')
            local text_width = imgui.CalcTextSize(u8(textsize))
            imgui.SetCursorPosX( width / 2 - text_width .x / 2 )
            local text, colors_, m = {}, {}, 1
            w = w:gsub('{(......)}', '{%1FF}')
            while w:find('{........}') do
                local n, k = w:find('{........}')
                local color = getcolor(w:sub(n + 1, k - 1))
                if color then
                    text[#text], text[#text + 1] = w:sub(m, n - 1), w:sub(k + 1, #w)
                    colors_[#colors_ + 1] = color
                    m = n
                end
                w = w:sub(1, n - 1) .. w:sub(k + 1, #w)
            end
            if text[0] then
                for i = 0, #text do
                    imgui.TextColored(colors_[i] or colors[1], u8(text[i]))
                    imgui.SameLine(nil, 0)
                end
                imgui.NewLine()
            else
                imgui.Text(u8(w))
            end
        end
    end
    render_text(text)
end


function cmd_char(arg)
    if Char == 0 then Register.v = not Register.v imgui.Process = Register.v elseif Char == 1 then WindowState.v = not WindowState.v imgui.Process = WindowState.v end
end
 

HpP

Известный
368
119
Можете посоветовать где можно по-лучше узнать информацию про функцию таймера? Заранее спасибо.