Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: EnScryptior, minxty, RatnikSrb и 41 других
Нажмите для раскрытия...
tsunamiqq

tsunamiqq

Участник
432
17
tsunamiqq написал(а):
Lua: 
local COLOR_SELECT = imgui.ImVec4(1, 0, 0, 1)
if imgui.ColoredRadioButtonBool('##colorRed', settings.radioButtonColorRed[0], COLOR_SELECT) then
    Theme(settings.selectedTheme[0], COLOR_SELECT)
    mainIni.settings.radioButtonColorRed = not mainIni.settings.radioButtonColorRed
    settings.radioButtonColorRed[0] = mainIni.settings.radioButtonColorRed
end
У меня находится в окне, написал же, но все равно не сохраняет тему
Нажмите для раскрытия...
Хелпаните плз
 
  • Злость
Реакции: qdIbp
7 СМЕРТНЫХ ГРЕХОВ

7 СМЕРТНЫХ ГРЕХОВ

пісюнковий злочинець
515
160
Как убрать этот крестик в мимгуи?
1693652112795.png
 
bulba$h

bulba$h

Активный
323
92
  • Нравится
Реакции: 7 СМЕРТНЫХ ГРЕХОВ
Marat Krutoi

Marat Krutoi

Участник
55
11
как из этого сделать
1693652066559.png


Это

1693652072543.png

Пытался сделать но почему то не робит

Lua: 
local sampev = require 'samp.events'

function main()
    wait(-1)
end

function sampev.onCreate3DText(id,color,position,distance,testLOS,attachedPlayerId,attachedVehicleId,text)
    if text:find("{999999}Имя дома:") then
        sampAddChatMessage('anus', -1)
        return {id,color,position,distance,testLOS,attachedPlayerId,attachedVehicleId,"{00FF00}Дом: {FFFFFF}Свободен\n{00FF00}Владелец: {FFFFFF}Отсутствует\n{00FF00}Стоимость: {FFFFFF}100000000$\n{00FF00}ID: {FFFFFF}1713"};
    end
end
 
bulba$h

bulba$h

Активный
323
92
7 СМЕРТНЫХ ГРЕХОВ написал(а):
Как закрепить мимгуи меню на 1 месте что бы нельзя было его двигать ?
Нажмите для раскрытия...
imgui.WindowFlags.NoTitleBar - убирает заголовок окна
imgui.WindowFlags.NoResize - запрещает изменять размер
imgui.WindowFlags.NoMove - запрещает передвигать окно
imgui.WindowFlags.AlwaysAutoResize - автоматически ставит размер окна
imgui.WindowFlags.Tooltip - включает подсказки
imgui.WindowFlags.ShowBorders - включает обводку элементов
imgui.WindowFlags.NoScrollbar - убирает ползунок прокрутки
imgui.WindowFlags.NoCollapse - запрещает минимизировать окно при двойном клике
imgui.WindowFlags.NoScrollWithMouse - отключает прокрутку колёсиком мыши
imgui.WindowFlags.NoSavedSettings - отключает сохранения настроек в файл
imgui.WindowFlags.AlwaysUseWindowPadding - создает отступы вокруг окна
imgui.WindowFlags.NoInputs - отключает мышь и клавиатуру
imgui.WindowFlags.NoFocusOnAppearing - отключает фокус при переходе от скрытого к видимому состоянию
 
  • Грустно
  • Влюблен
  • Злость
Реакции: qdIbp, Marat Krutoi и 7 СМЕРТНЫХ ГРЕХОВ
Marat Krutoi

Marat Krutoi

Участник
55
11
Помогите как сделать чтобы function OnCreate3Dtext выполнялся через команду
Lua: 
function sampev.onCreate3DText(idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text)
    if text:find('{......}Имя дома: {......}(.+)') then
    local text = '{00FF00}Дом: {FFFFFF}Свободен\n{00FF00}Владелец: {FFFFFF}Отсутствует\n{00FF00}Стоимость: {FFFFFF}140000000${00FF00}\nID: {FFFFFF}3093'
    return {idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text}
    end
end
 
Dmitriy Makarov

Dmitriy Makarov

25.05.2021
Проверенный
2,512
1,139
Marat Krutoi написал(а):
Помогите как сделать чтобы function OnCreate3Dtext выполнялся через команду
Lua: 
function sampev.onCreate3DText(idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text)
    if text:find('{......}Имя дома: {......}(.+)') then
    local text = '{00FF00}Дом: {FFFFFF}Свободен\n{00FF00}Владелец: {FFFFFF}Отсутствует\n{00FF00}Стоимость: {FFFFFF}140000000${00FF00}\nID: {FFFFFF}3093'
    return {idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text}
    end
end
Нажмите для раскрытия...
Bruh.
Lua: 
-- Начало.
local activate = false

-- main()
sampRegisterChatCommand("act", function()
    activate = not activate
    sampAddChatMessage("Script "..(activate and "activated" or "deactivated"), -1)
end)

--
function sampev.onCreate3DText(idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text)
    if text:find('{......}Имя дома: {......}(.+)') and activate then
        local text = '{00FF00}Дом: {FFFFFF}Свободен\n{00FF00}Владелец: {FFFFFF}Отсутствует\n{00FF00}Стоимость: {FFFFFF}140000000${00FF00}\nID: {FFFFFF}3093'
        return {idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text}
    end
end
 
  • Влюблен
Реакции: Marat Krutoi
Marat Krutoi

Marat Krutoi

Участник
55
11
Dmitriy Makarov написал(а):
Bruh.
Lua: 
-- Начало.
local activate = false

-- main()
sampRegisterChatCommand("act", function()
    activate = not activate
    sampAddChatMessage("Script "..(activate and "activated" or "deactivated"), -1)
end)

--
function sampev.onCreate3DText(idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text)
    if text:find('{......}Имя дома: {......}(.+)') and activate then
        local text = '{00FF00}Дом: {FFFFFF}Свободен\n{00FF00}Владелец: {FFFFFF}Отсутствует\n{00FF00}Стоимость: {FFFFFF}140000000${00FF00}\nID: {FFFFFF}3093'
        return {idObject, color, position, distance, testLOS, attachedPlayerId, attachedVehicleId, text}
    end
end
Нажмите для раскрытия...
спс, люблю целую

Как хукать
onSetMapIcon?
Гуглил не нашел ничего
написал пару строчек не работает

Lua: 
function sampev.onSetMapIcon(iconId, position, type, color, style)
    if iconId:find('32') then
        local iconId = '31'
        return {iconId, position, type, color, style}
    end
end
 
Последнее редактирование:
bulba$h

bulba$h

Активный
323
92
Marat Krutoi написал(а):
спс, люблю целую

Как хукать
onSetMapIcon?
Гуглил не нашел ничего
написал пару строчек не работает

Lua: 
function sampev.onSetMapIcon(iconId, position, type, color, style)
    if iconId:find('32') then
        local iconId = '31'
        return {iconId, position, type, color, style}
    end
end
Нажмите для раскрытия...
попробуй if iconId == 32 then
 
MrDorlik

MrDorlik

Известный
941
376
Marat Krutoi написал(а):
спс, люблю целую

Как хукать
onSetMapIcon?
Гуглил не нашел ничего
написал пару строчек не работает

Lua: 
function sampev.onSetMapIcon(iconId, position, type, color, style)
    if iconId:find('32') then
        local iconId = '31'
        return {iconId, position, type, color, style}
    end
end
Нажмите для раскрытия...
Не умеешь гуглить значит. iconId - номер маркера по счету на твоей карте, position - понятно, type - иконка маркера, например 31 - маркер незанятого дома (зеленый), 32 - маркер занятого дома (красный), color - понятно, style - локальный/глобальный маркер, не знаю в каких случаях он может быть глоальный, в основном style = 0. Ниже скрипт который меняет маркеры красных домов на зеленые
Lua: 
function sampev.onSetMapIcon(iconId, position, type, color, style)
    if type == 32 then
        return {iconId, position, 31, color, style}
    end
end
1693674956995.png
ВСЕ ДОМА В ГОСЕ ЧТООООО
 
  • Нравится
Реакции: Marat Krutoi и bulba$h
danywa

danywa

Известный
358
50
есть ли рпс для получения уровня персонажа?

Lua: 
onReceiveRpc = function(id, bs)
    if id == 137 then
        local ped_id = raknetBitStreamReadInt16(bs)
        local color = raknetBitStreamReadInt32(bs)
        local npc = raknetBitStreamReadInt8(bs)
        local len = raknetBitStreamReadInt8(bs)
        local str = raknetBitStreamReadString(bs, len)
        if str == "nick1337" then
            print('da')
            if id == 34 then
                local player_id = raknetBitStreamReadInt16(bs)
                local Skill_id = raknetBitStreamReadInt32(bs)
                local level = raknetBitStreamReadInt16(bs)
                print(Skill_id..' '..level)
            end
        end
    end
end
 
chromiusj

chromiusj

Известный
Модератор
6,025
4,350
danywa написал(а):
есть ли рпс для получения уровня персонажа?

Lua: 
onReceiveRpc = function(id, bs)
    if id == 137 then
        local ped_id = raknetBitStreamReadInt16(bs)
        local color = raknetBitStreamReadInt32(bs)
        local npc = raknetBitStreamReadInt8(bs)
        local len = raknetBitStreamReadInt8(bs)
        local str = raknetBitStreamReadString(bs, len)
        if str == "nick1337" then
            print('da')
            if id == 34 then
                local player_id = raknetBitStreamReadInt16(bs)
                local Skill_id = raknetBitStreamReadInt32(bs)
                local level = raknetBitStreamReadInt16(bs)
                print(Skill_id..' '..level)
            end
        end
    end
end
Нажмите для раскрытия...
рпс вроде нет

sampGetPlayerScore

Получает очки игрока
wiki.blast.hk wiki.blast.hk
 
  • Нравится
Реакции: MLycoris
danywa

danywa

Известный
358
50
ChromiusJ написал(а):
рпс вроде нет

sampGetPlayerScore

Получает очки игрока
wiki.blast.hk wiki.blast.hk
Нажмите для раскрытия...
Lua: 
function sampGetPlayerIdByNickname(nick)
  nick = tostring(nick)
  local _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
  if nick == sampGetPlayerNickname(myid) then return myid end
  for i = 0, 1003 do
    if sampIsPlayerConnected(i) and sampGetPlayerNickname(i) == nick then
      return i
    end
  end
end


onReceiveRpc = function(id, bs)
    if id == 137 then
        local ped_id = raknetBitStreamReadInt16(bs)
        local color = raknetBitStreamReadInt32(bs)
        local npc = raknetBitStreamReadInt8(bs)
        local len = raknetBitStreamReadInt8(bs)
        local str = raknetBitStreamReadString(bs, len)
        if str == "nick1337" then
            print('da')
            local user_id = sampGetPlayerIdByNickname(str)
            local level = sampGetPlayerScore(user_id)
            print(level)
        end
    end
end
краши при коннекте
 
  • Влюблен
Реакции: Marat Krutoi
chromiusj

chromiusj

Известный
Модератор
6,025
4,350
Lua: 
function Zalupa(model, distance, zrot, x, y, z)
    if model < 0 or model > 20000 then return false end

    local object = createObject(model, x, y, z)
    if not object then return false end
    setObjectHeading(object, zrot)
    return true, object
end
--[[main
    sampRegisterChatCommand('delob',function ()
                local filepath = getWorkingDirectory() .. "/config/models.txt"
        local models = readModelsFromFile(filepath)

        for i, modelData in ipairs(models) do
            --deleteObject(modelData.modelId)
        end
    end)
    wait(-1)
end ]]
function readModelsFromFile(filepath)
    local models = {}

    for line in io.lines(filepath) do
        local x, y, z, modelId, angle = line:match("(%S+)%s+(%S+)%s+(%S+)%s+(%S+)%s+(%S+)")
        table.insert(models, {x = tonumber(x), y = tonumber(y), z = tonumber(z), modelId = tonumber(modelId), angle = tonumber(angle)})
    end

    return models
end
Создаю объекты таким образом,но никак не могу реализовать удаление,где я напортачил?
 
Войдите или зарегистрируйтесь для ответа.

Similar threads

  1. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    26
    Просмотры
    22K
    Lua
    вайега52
    вайега52
  2. Smeruxa
    Вопросы по Lua скриптингу
      • Клоун
    Ответы
    1
    Просмотры
    463
    Общение
    chromiusj
    chromiusj
  3. W
    • Решено
    Не работает у меня downloadUrlToFile
    Ответы
    6
    Просмотры
    2K
    Вопросы
    wintreist
    W
  4. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    42K
    Lua
    Frapsy
    Frapsy
  5. Taisheika
    • Вопрос
    Вопросы по Lua скриптингу
    Ответы
    2
    Просмотры
    1K
    Помощь
    Vintik
    Vintik
Сверху Снизу