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

 

[abnomegd]

Как такое сделать?

 

[paulohardy]

Как такое сделать?
Посмотреть вложение 114266

printString
printStringNow

 

[Shepi]

printString
printStringNow

Пример использования пж

 

[paulohardy]

Пример использования пж

Какой пример? Там всё описано
printString('text', 1000)

 

[Andrinall]

Пример использования пж

Берёшь и вбиваешь имя функции в поиск тут...

Главная

wiki.blast.hk

 

[chapo]

пингани его, ресивер выкладывал код

есть ссылка на его код?

 

[salominka]

Как можно сделать парсинг визальных строк в чате?(в чате оно есть, а в чат логе нет)
Отпишите в ТГ плиз, если поможете, накину денюжку.

 

[Стэнфорд]

Помогите добавить в имгуи хоткей. Ряд вариантов шаблонов смотрел, постоянно что-то не дает работать скрипту

 

[Shepi]

почему при нажатии кнопки отвечающей за открытие 3 меню ничего не открывается?

imgui.BeginChild('##121', imgui.ImVec2(320, 500), true)
                if imgui.Button(u8'Основное меню', imgui.ImVec2(250, 25), admin_window_state) then menu = 0 end

                if imgui.Button(u8'Настройки', imgui.ImVec2(250, 25), admin_window_state) then menu = 1 end

                if imgui.Button(u8'Заметки', imgui.ImVec2(250, 25), admin_window_state) then menu = 2 end

                if imgui.Button(u8"Читы", imgui.ImVec2(250, 25), admin_window_state) then menu = 3 end

                if imgui.Button(u8"Все команды зарегистрированные в скрипте", imgui.ImVec2(295, 25), admin_window_state) then menu = 4 end
                imgui.EndChild()






              if menu == 0 then
              imgui.SameLine()
                imgui.Text(u8"Вас приветствует ssut.\nКнопки переключения менюшек находятся слева.\nПриятного пользования ^-^")


              elseif menu == 1 then



                  if imgui.Combo(u8'Выбор темы для имгуи', selected_item, {u8'Фиолетовая', u8'Тёмная', u8'Красная', u8'Вишнёвая'}, 4) then

  if selected_item.v == 0 then
    FiollaTheme()
  end
    if selected_item.v == 1 then
        DarkTheme()
    end
    if selected_item.v == 2 then
        RedTheme()
    end
    if selected_item.v == 3 then
        ShepiTheme()
    end



              elseif menu == 2 then
              imgui.SameLine()
                imgui.Text(u8"Типа да")
                imgui.InputTextMultiline("##Bloknot", textbloknot, imgui.ImVec2(-1, 250))
                if imgui.Button('Сохранить', main_window_state) then
                    sampAddChatMessage(u8:decode'Успешно сохранено!')
                end


              elseif menu == 3 then
              imgui.SameLine()

                 imgui.Checkbox(u8"Да", CheckBox)


                imgui.Text(u8"Да")

              elseif menu == 4 then
              imgui.SameLine()
                imgui.Text(u8"/ssut - Данный диалог")
              end
              end

(не высвечивается должное при нажатии)

 

[Dmitriy Makarov]

Помогите добавить в имгуи хоткей. Ряд вариантов шаблонов смотрел, постоянно что-то не дает работать скрипту

local rkeys = require 'rkeys'
imgui.HotKey = require('imgui_addons').HotKey

local tLastKeys = {}
local bindText = {v = {VK_R}} -- Тут клавиша наша. Буква R.

-- main
cmdbind = rkeys.registerHotKey(bindText.v, true, function()
    sampAddChatMessage("Тест", -1) -- Этот код выполнится при нажатии на забинженную кнопку в ХотКее.
end)

-- OnDrawFrame
if imgui.HotKey("##", bindText, tLastKeys, 100) then -- Сам ХотКей. Первый аргумент - это не текст рядом, а текст внутри ХотКея.
    rkeys.changeHotKey(cmdbind, bindText.v)
end
imgui.SameLine()
imgui.Text("- HotKey")

почему при нажатии кнопки отвечающей за открытие 3 меню ничего не открывается?

imgui.BeginChild('##121', imgui.ImVec2(320, 500), true)
                if imgui.Button(u8'Основное меню', imgui.ImVec2(250, 25), admin_window_state) then menu = 0 end

                if imgui.Button(u8'Настройки', imgui.ImVec2(250, 25), admin_window_state) then menu = 1 end

                if imgui.Button(u8'Заметки', imgui.ImVec2(250, 25), admin_window_state) then menu = 2 end

                if imgui.Button(u8"Читы", imgui.ImVec2(250, 25), admin_window_state) then menu = 3 end

                if imgui.Button(u8"Все команды зарегистрированные в скрипте", imgui.ImVec2(295, 25), admin_window_state) then menu = 4 end
                imgui.EndChild()






              if menu == 0 then
              imgui.SameLine()
                imgui.Text(u8"Вас приветствует ssut.\nКнопки переключения менюшек находятся слева.\nПриятного пользования ^-^")


              elseif menu == 1 then



                  if imgui.Combo(u8'Выбор темы для имгуи', selected_item, {u8'Фиолетовая', u8'Тёмная', u8'Красная', u8'Вишнёвая'}, 4) then

  if selected_item.v == 0 then
    FiollaTheme()
  end
    if selected_item.v == 1 then
        DarkTheme()
    end
    if selected_item.v == 2 then
        RedTheme()
    end
    if selected_item.v == 3 then
        ShepiTheme()
    end



              elseif menu == 2 then
              imgui.SameLine()
                imgui.Text(u8"Типа да")
                imgui.InputTextMultiline("##Bloknot", textbloknot, imgui.ImVec2(-1, 250))
                if imgui.Button('Сохранить', main_window_state) then
                    sampAddChatMessage(u8:decode'Успешно сохранено!')
                end


              elseif menu == 3 then
              imgui.SameLine()

                 imgui.Checkbox(u8"Да", CheckBox)


                imgui.Text(u8"Да")

              elseif menu == 4 then
              imgui.SameLine()
                imgui.Text(u8"/ssut - Данный диалог")
              end
              end

Посмотреть вложение 114277
(не высвечивается должное при нажатии)

Посмотреть вложение 114278

По этому примеру сделай, там работает всё.

Помоги imgui

local check_box = imgui.ImBool(false) if imgui.Button(u8"Основное") then imgui.Checkbox(u8"Отключение биты", check_box) end Выводит чекбокс на 1 секунду и сразу закрывает

www.blast.hk

 

[Стэнфорд]

local rkeys = require 'rkeys'
imgui.HotKey = require('imgui_addons').HotKey

local tLastKeys = {}
local bindText = {v = {VK_R}} -- Тут клавиша наша. Буква R.

-- main
cmdbind = rkeys.registerHotKey(bindText.v, true, function()
    sampAddChatMessage("Тест", -1) -- Этот код выполнится при нажатии на забинженную кнопку в ХотКее.
end)

-- OnDrawFrame
if imgui.HotKey("##", bindText, tLastKeys, 100) then -- Сам ХотКей. Первый аргумент - это не текст рядом, а текст внутри ХотКея.
    rkeys.changeHotKey(cmdbind, bindText.v)
end
imgui.SameLine()
imgui.Text("- HotKey")

Посмотреть вложение 114283


По этому примеру сделай, там работает всё.

Помоги imgui

local check_box = imgui.ImBool(false) if imgui.Button(u8"Основное") then imgui.Checkbox(u8"Отключение биты", check_box) end Выводит чекбокс на 1 секунду и сразу закрывает

www.blast.hk

Добавляю хоткей новый - он не реагирует(

 

[EclipsedFlow]

Нужно ник и id в переменную

[Подсказка] Ник_Ник[id] Принял предложение работать на вас!

 

[abnomegd]

Крч хуйню какую то написал которая не работает, хотел сделать типо при вводе в чате /asz то показывалось на экране типо ASZ on (типо включился и работает) а если еще раз напишу /asz то ASZ off (типо отключился и теперь не работает)

local sampev = require 'lib.samp.events'
local game_keys = require 'game.keys'
local activate = false

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
  
    sampAddChatMessage("[AutoSpisokZakazov]: {FFFFFF}Скрипт загружен. Активация {00ff00}/asz", 0x5CBCFF)
    sampRegisterChatCommand("asz", function()
        activate = not activate
     --   sampAddChatMessage(activate and "[AutoSpisokZakazov]: {FFFFFF}Скрипт включён." or "[AutoSpisokZakazov]: {FFFFFF}Скрипт выключён.", 0x5CBCFF)
    activate and printString('~g~ asz ON', 2000)
    else
    or printString('~r~ asz OFF', 2000)
end
end
    while true do
        wait(0)

    end
end

if isKeyJustPressed(VK_F3) and activate then
    setGameKeyState(game_keys.vehicle.TOGGLESUBMISSION, 1)
    wait(10)
    setGameKeyState(game_keys.vehicle.TOGGLESUBMISSION, 0)
end

function sampev.onShowDialog(id, style, title, b1, b2, text)
    if id == 3080 and activate then
        sampSendDialogResponse(3080, 1, 0, nil)
    end
end

 

[Akionka]

Нужно ник и id в переменную

[Подсказка] Ник_Ник[id] Принял предложение работать на вас!

local text = '[Подсказка] Ник_Ник[12] Принял предложение работать на вас!'
local nick, id = text:match('%[Подсказка%] (.-)%[(%d+)%] Принял предложение работать на вас!')
print(nick, id)

 

[relog]

срочно нужна помощь заранее спасибо. в краце скрипт не работает хз почему, а именно он не телепортирует хотя должен

[/B]
require 'lib.moonloader'
local sampev = require 'lib.samp.events'

local gang_names = {
    {'Мэрия', 2102.43, -1760.78, 13.569},
    {'Банк ЛС', 1422.3694, -1699.8092, 13.5469},
    {'Больница ЛС', 1183.67, -1330.25, 13.5799},
    {'Лесопилка', -529.4583, -189.4596, 78.4063},
    {'Автошкола', -2028.9406, -89.2032, 35.3203},
    {'Почтальон', 1992.4285, -1276.7489, 23.8203},
    {'Центр', 1180.0305, -1039.7784, 31.8185},
    {'Загород', 722.3078, -576.4109, 16.1875},
    {'Гетто', 2210.2712, -1450.4303, 23.8178},
    {'Сотовый салон', 1377.4240, -1090.7538, 26.5168},
}

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampAddChatMessage("{00ffff}Квестовик {00ffff}для {00ffff}Sucre {00ffff}успешно {00ffff}загружен.", -1)
    sampAddChatMessage("{00ffff}Активация{00ffff}: {ff0000}/qst", -1)
    sampRegisterChatCommand("qst", function()
        local str = "{FFFFFF}Место\n"
        for i = 1, #gang_names do
            if gang_names[i] ~= nil then
                str = str..string.format("%s\n", gang_names[i][1])
            end  
        end
        sampShowDialog(2232, "Автор: {ff0000}@stalinsmods", str, "Выбрать", "Закрыть", DIALOG_STYLE_TABLIST_HEADERS)
    end)
    while true do wait(0)
        local result, button, list, input = sampHasDialogRespond(2232)
        if result and button == 1 then
                        setCharCoordinates(PLAYER_PED, gang_names[i][2], gang_names[i][3], gang_names[i][4])
                        sampAddChatMessage("Вы на респe "..gang_names[i][1], 0x00ffff)
        end
    end
end
[B]

.