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

 

[checkdasound]

как сделать коллизию на авто?

setCarCollision(Vehicle car, bool collision)

 

[atizoff]

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

local anotherIni = inicfg.load(nil, "btn")
if anotherIni == nil then -- если ини такого нету, то создаём
local settingst = { -- структура ini
letsgo = {
sbiv = ""
med = ""
}
}
inicfg.save(settingst, "btn") -- сохраняем
end--
set = inicfg.load(nil,"btn") -- загрузка ини
print(set.letsgo.button) -- в консоли будет "ну типа ини"
-- end

 

[Pakulichev]

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

local anotherIni = inicfg.load(nil, "btn")
if anotherIni == nil then -- если ини такого нету, то создаём
local settingst = { -- структура ini
letsgo = {
sbiv = ""
med = ""
}
}
inicfg.save(settingst, "btn") -- сохраняем
end--
set = inicfg.load(nil,"btn") -- загрузка ини
print(set.letsgo.button) -- в консоли будет "ну типа ини"
-- end

Потому что массив плачет из-за отсутствия запятых.

 

[atizoff]

Потому что массив плачет из-за отсутствия запятых.

sbiv = "", med = ""?
если так, то краш(

 

[Pakulichev]

sbiv = "", med = ""?
если так, то краш(

local ini = inicfg.load(nil, 'ini.ini')
if ini == nil then
    local inidata =
    {
    main =
        {
            first = "",
            second = "",
        },
    };
    inicfg.save(inidata, 'ini.ini')
end

 

[ШPEK]

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

 

[Frapsy]

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

text:gsub("{.-}", "") -- где text это строка

А на счет цветного текста по частям - https://blast.hk/threads/13380/#post-184571

 

[Danil_Hades]

require "lib.moonloader"
require "lib.sampfuncs"
require "vkeys"

local font_flag = require('moonloader').font_flag
local my_font = renderCreateFont('Tahoma', 12, font_flag.BOLD + font_flag.BORDER)

function main()
  lua_thread.create(function()
  if not isSampLoaded() or not isSampfuncsLoaded() then return
end
  while not isSampAvailable() do wait(100)
end
lock = 0
while true do wait(0)
  local result = sampIsChatInputActive()
  if isKeyJustPressed(VK_X) and result == false and lock ~= 1 then
    main1()
end
end
end)
end

function main1()
  lock = 1
  health = getCharHealth(PLAYER_PED)
  if health == 160 then
    Hp()
  else up()
  end
end

function Hp()
  lua_thread.create(function()
  lock = 0
  while true do
    wait(0)
    renderFontDrawText(my_font, "{F5F5F5}FULL HP!", 920, 97, 0xFFFFFFFF)
    if isKeyJustPressed(VK_X) and result == false and lock ~= 1 then break
    end
  end
      main1()
    end)
end

function up()
  lua_thread.create(function()
  hp_need_boost = 160 - health
  hp_need_boost_2 = hp_need_boost / 10
  drugs_quantity = math.ceil(hp_need_boost_2)
  sampSendChat("/usedrugs " .. drugs_quantity)
  sampSendChat("Ку-ку")
  time = 0
  local timerr = os.clock()
while (os.clock() - timerr) ~= 60 do
   wait(0)
renderFontDrawText(my_font, "{F5F5F5}Time to USE: " .. 60 - math.floor(os.clock() - timerr), 920, 97, 0xFFFFFFFF)
if math.floor(os.clock() - timerr) > 60 then break
end
end
lock = 0
fwait()
end)
end

function fwait()
  lua_thread.create(function()
  while true do
    wait(0)
    renderFontDrawText(my_font, "{FF00FF}Use!", 920, 97, 0xFFFFFFFF)
    if isKeyJustPressed(VK_X) and result == false and lock ~= 1 then
      break
    end
  end
  main1()
end)
end

После 1 использования, во время 2 использования рендер "Use!" не пропадает. А рендер "Time to Use" налаживается поверх. Что делать?

 

[LZTD]

Где можно посмотреть опкоды на RakBot?

 

[Aniki]

Где можно посмотреть опкоды на RakBot?

Lua функции^{(https://rakbot.ru/funcs)}

 

[TheWille]

Можно как-то вызвать вот такое меню для редактирования объекта созданного через Lua?

 

[Doter228]

require 'lib.moonloader'
local hurt = [[Лечение
Операция
Укол
Медкарта]]
local commands = [[Lalt + 1 = спрашивает что болит у игрока
Lalt + 2 + ПКМ (навод на игрока) = выводит окно взаимодействия
/luahelp = инструкция]]
local resultt, id1
function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("Автор - Miracle Cassini (DRP Radiant)", 0x00FFFF)
sampAddChatMessage("Инструкция по использованию - {00FF00}/luahelp", 0x00FFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nick = name:gsub("_", " ")
sampRegisterChatCommand("luahelp", help)
::hhhh::
while true do
    wait(0)
    local result, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
    if isKeyJustPressed(VK_1) and isKeyJustPressed(VK_LMENU) then
        sampSendChat("Здравствуйте! Я ваш лечащий врач "..nick)
        wait(1500)
        sampSendChat("Чем Я могу вам помочь?")
    end
    if result then
    resultt, id1 = sampGetPlayerIdByCharHandle(ped)
    name1 = (sampGetPlayerNickname(id1)):gmatch('_', ' ')
        if resultt and isKeyDown(VK_LMENU) and isKeyJustPressed(VK_2) then
            sampShowDialog(5, "{66FFFF}Взаимодействие с игроком {00FF00}"..name1.."{FFFFFF}[{00FF00}"..id1.."{FFFFFF}]", hurt, "{00FF00}Продолжить", "{FF0000}Отмена", 2)
        end
    end
    local res, but, list, str = sampHasDialogRespond(5)
    if res then
        if but == 1 and list == 0 then
            sampSendChat("/do Медицинская сумка на плече.")
            wait(2000)
            sampSendChat("/me открыл сумку и достал из сумки пластинку с таблетками")
            wait(2000)
            sampSendChat("/do В руках пластинка.")
            wait(2000)
              sampSendChat("/me достал из пластинки таблетку и передал её больному")
            wait(1000)
              sampSendChat("/heal "..id1.." 100 ")
            wait(2000)
              sampSendChat("/time")
        elseif but == 1 and list == 1 then
            sampSendChat("/me взял перчатки и маску со стола и надел маску и перчатки")
            wait(2000)
            sampSendChat("/do Маска для наркоза висит на подставке.")
            wait(2000)
            sampSendChat("/me взяв маску для наркоза в правую руку, надел её на лицо пациента")
            wait(2000)
            sampSendChat("/me включил подачу наркоза")
            wait(2000)
            sampSendChat("/do Наркоз действует.")
            wait(2000)
            sampSendChat("/me взяв скальпель в руку, аккуратным движением сделал надрез")
            wait(2000)
            sampSendChat("/me начал процесс операции ")
            wait(2000)
            sampSendChat("/me взяв медицинскую нитку и иголку, начал зашивать рану")
            wait(2000)
            sampSendChat("/do Операция проведена.")
            sampSendPickedUpPickup(315)
            wait(2000)
            sampSendChat("/me привёл пациента в сознание")
            wait(2000)
            sampSendChat("Процесс операции окончен, всё прошло успешно.")
            wait(1000)
            sampSendChat("/time")
        elseif but == 1 and list == 2 then
              sampSendChat("/do На столе лежат: шприцы, ампулы и лекарства.")
            wait(2000)
            sampSendChat("/me взял шприц и ампулу со стола")
            wait(2000)
            sampSendChat("/me проткнул ампулу шприцом и наполняет шприц лекарством")
            wait(2000)
            sampSendChat("/do Шприц наполнен лекарством из ампулы.")
            wait(2000)
            sampSendChat("/me левой рукой потер кожу на правой руке пациента")
            wait(2000)
            sampSendChat("/me поднес шприц к руке и воткнул иглу в вену")
            wait(2000)
            sampSendChat("/inject "..id1)
            wait(3000)
            sampSendChat("/me убрал шприц и выбросил его в урну")
            wait(2000)
            sampSendChat("/todo Держите ватку в течении 3-х минут * передавая ватку пациенту.")
            wait(1000)
            sampSendChat("/time")
        elseif but == 1 and list == 3 then
            sampSendChat("Здравствуйте, сейчас я проведу медицинский осмотр.")
            sampAddChatMessage("{FFCC00}[Подсказка] {FFFFFF}Продолжить действие - Y, отклонить - N", -1)
            repeat
                wait(0)
                if isKeyJustPressed(VK_N) then
                    sampAddChatMessage("{FFCC00}[Подсказка] {FFFFFF}Вы отклонили действие", -1)
                    goto hhhh
                end
            until isKeyJustPressed(VK_Y)
            sampSendChat("/do На столе лежат тонкие перчатки.")
            wait(2000)
            sampSendChat("/me взял тонкие перчатки со стола")
            wait(2000)
            sampSendChat("/me надел перчатки на руки")
            wait(2000)
            sampSendChat("/do Перчатки на руках.")
            wait(2000)
            sampSendChat("/me приступил к медицинскому осмотру")
            wait(2000)
            sampSendChat("/me провел голову на наличие вшей")
            wait(0)
            sampAddChatMessage("{FFCC00}[Подсказка] {FFFFFF}Продолжить действие - Y, отклонить - N", -1)
            repeat
                wait(0)
                if isKeyJustPressed(VK_N) then
                    sampAddChatMessage("{FFCC00}[Подсказка] {FFFFFF}Вы отклонили действие", -1)
                        goto hhhh
                end
            until isKeyJustPressed(VK_Y)
            sampSendChat("/do Медицинская карта на столе.")
            wait(2000)
            sampSendChat("/me взял медицинскую карту со стола")
            wait(2000)
            sampSendChat("/do На столе лежит ручка.")
            wait(2000)
            sampSendChat("/me взял ручку со стола")
            wait(2000)
            sampSendChat("/me написал в строке \"Имя фамилия\"" ..name1)
            wait(2000)
            sampSendChat("/me поставил галочку на против строки \"Здоров\"")
            wait(2000)
            sampSendChat("/me поставил подпись в графе \"Подпись врача\"")
            wait(2000)
            sampSendChat("/me положив ручку на стол, взял со стола печать \"Hospital\"")
            wait(2000)
            sampSendChat("/me поставив печать \"Hospital\"")
            wait(2000)
            sampSendChat("/me передал медицинскую карту пациенту")
            wait(2000)
            sampSendChat("/medcard "..id1)
            wait(1000)
            sampSendChat("/time")
        end
    end
end
end
function help()
sampShowDialog(4, "{66FF66}Help", commands, "Закрыть", _, 0)
end

Ошибка:
[ML] (error) medic1.lua: D:\AHER GTA\moonloader\medic1.lua:32: attempt to concatenate global 'name1' (a function value)
stack traceback:
D:\AHER GTA\moonloader\medic1.lua: in function <D:\AHER GTA\moonloader\medic1.lua:10>

 

[Pakulichev]

Как можно проверить игроков в зоне стрима на наличие GM'a?
Например, вы стоите возле мэрии, а в зоне вашего стрима стреляются два человека.
По одному из них не проходит урон = GM. Пытался реализовать через onTakeDamage, но ничего не вышло. Помогите.

 

[[SA ARZ]]

в чём может быть проблема?

[00:44:13.533000] (error)    GovTools - универсальный помощник: C:\Games\Новая папка\moonloader\GovTools.luac:0: sol: no matching function call takes this number of arguments and the specified types
stack traceback:
    [C]: in function 'ImBool'

 

[Pakulichev]

в чём может быть проблема?

[00:44:13.533000] (error)    GovTools - универсальный помощник: C:\Games\Новая папка\moonloader\GovTools.luac:0: sol: no matching function call takes this number of arguments and the specified types
stack traceback:
    [C]: in function 'ImBool'

Код кинь.