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

 

[Rice.]

Up

Потому-что тебе нужно math.randomseed(os.clock())

 

[hackeridze]

Как в этом коде сделать чтобы в чат 1 раз вывелся ID игрока на которого я целюсь

require "lib.moonloader" 
function main()
 if not isSampLoaded() or not isSampfuncsLoaded() then return end
 while not isSampAvailable() do wait(100) end

local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    sampAddChatMessage("id",0x50FF21) -- здесь любые действия с полученным идом игрока -- вот это я написал и чот ничо
    
  end
        end
            end

.

 

[Rice.]

Как в этом коде сделать чтобы в чат 1 раз вывелся ID игрока на которого я целюсь

require "lib.moonloader"
function main()
 if not isSampLoaded() or not isSampfuncsLoaded() then return end
 while not isSampAvailable() do wait(100) end

local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    sampAddChatMessage("id",0x50FF21) -- здесь любые действия с полученным идом игрока -- вот это я написал и чот ничо
   
  end
        end
            end

.

require "lib.moonloader"
local bool = true
function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    while true do wait(0)
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
        if valid and doesCharExist(ped) and bool then -- если цель есть и персонаж существует
            local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
            if result then -- проверить, прошло ли получение ида успешно
                sampAddChatMessage("id",0x50FF21) -- здесь любые действия с полученным идом игрока -- вот это я написал и чот ничо
                bool = false
            end
        end
    end
end

 

[ewin]

есть таблица следующего вида:

table = {
    ["Alvaro_Sanches"] = {
        ['lvl'] = "5",
        ['rank'] = "2",
    },
    ["Nero_Boro"] = {
        ['lvl'] = "2",
        ['rank'] = "2",
    },
    ["La_Vierro"] = {
        ['lvl'] = "4",
        ['rank'] = "3"
    }
}

значения и имена постоянно меняются, как можно сортировать таблицу по значению ['lvl']?

 

[ewin]

table.sort(table, function(a,b) return tonumber(a.lvl) < tonumber(b.lvl) end) -- сортировка по lvl в порядке возрастания

не сортирует

 

[moreveal]

не сортирует

ну, оставь тогда индексы числовыми, храня ники внутри каждого элемента

local array = {
    [1] = {
        ['name'] = "Alvaro_Sanches",
        ['lvl'] = "5",
        ['rank'] = "2",
    },
    [2] = {
        ['name'] = "Nero_Boro",
        ['lvl'] = "2",
        ['rank'] = "2",
    },
    [3] = {
        ['name'] = "La_Vierro",
        ['lvl'] = "4",
        ['rank'] = "3"
    }
}
table.sort(array, function(a,b) return tonumber(a.lvl) < tonumber(b.lvl) end)

 

[wintreist]

Не работает отправка диалога в пилотах аризона:

Спойлер: Код

if dialogId == 1421 then
        local textes = {}
        text = text .. '\n'
        local checkneed = false
        for i in text:gmatch('(.-)\n') do table.insert(textes, i) end
        for key, val in pairs(textes) do
            if val:find('Andromada', 1, true) or val:find('Shamal', 1, true) then
                sampAddChatMessage('Вижу самолёт под номером: '.. key-2, -1)
                checkneed = true
                sampSendDialogResponse(dialogId, 1, tonumber(key-2), nil)
                break
            end
        end
        if checkneed == false then sampSendDialogResponse(dialogId, 0, nil, nil) --end
        return false
        end
    end

*Видео*

 

[sep]

как очистить от текста файл
делал через os.remove и if not doesFileExist(sms1) then local newfile = io.open(sms1,'w') newfile:close() end
но пока скрипт не перезагрузишь не создается файл

 

[chapo]

не сортирует

потому что у в твоей таблице лвл это текст, а не число, сравнивай через tonumber

 

[ewin]

потому что у в твоей таблице лвл это текст, а не число, сравнивай через tonumber

психанул, создал несколько массивов для каждого уровня(уровни если шо не scores из таба) и туда запихал

 

[deleted-user-216129]

Как получить точку пересечения двух прямых. (есть 2 точки каждой прямой) И где можно найти код на проверку лежит ли точка внутри четырёх угольника.

Как получить точку пересечения двух прямых. (есть 2 точки каждой прямой) И где можно найти код на проверку лежит ли точка внутри четырёх угольника.

Точка пересечения двух прямых

get2dLinesIntersectPoint(...)

Кривокод, но вот как проверить находится ли точка внутри прямоугольника:

function isPointInRect(x, y, x1, y1, x3, y3)
   local x2, y2 = x3, y1
   local x4, y4 = x1, y3
   local function product(Px, Py, Ax, Ay, Bx, By)
     return (Bx - Ax) * (Py - Ay) - (By - Ay) * (Px - Ax)
   end
   local p1 = product(x, y, x1, y1, x2, y2)
   local p2 = product(x, y, x2, y2, x3, y3)
   local p3 = product(x, y, x3, y3, x4, y4)
   local p4 = product(x, y, x4, y4, x1, y1)
   if ((p1 < 0 and p2 < 0 and p3 < 0 and p4 < 0) or
   (p1 > 0 and p2 > 0 and p3 > 0 and p4 > 0)) then
     return true
   else
     return false
   end
end

 

[hackeridze]

Как сделать чтобы при заходе в игру у меня автоматом писались команды в чат, например /fd 300, и /settime 19, чтобы как только у меня загрузился самп сразу выставилась нужная дальность прорисовки, и время дня

 

[Sanchez.]

Как сделать чтобы при заходе в игру у меня автоматом писались команды в чат, например /fd 300, и /settime 19, чтобы как только у меня загрузился самп сразу выставилась нужная дальность прорисовки, и время дня

require 'lib.moonloader'

function main()
    while not isSampAvailable() do wait(0) end
    
    sampProcessChatInput('/fd 300')
    wait(10)
    sampProcessChatInput('/settime 19')
  
    while true do
        wait(0)
      
    end
end

Если что, sampSendChat() в этом случае использовать не нужно. Так как команды, перечисленные в твоём вопросе не будут найдены скриптом (sampSendChat() воспринимает серверные и клиентские команды, команды скриптов он не найдёт).

 

[Hideme Flow]

[mimgui] Как конвентировать ImVec4 в argb?

 

[sep]

как очистить файл от текста без перезагрузки скриптов
делал через os.remove и if not doesFileExist(sms1) then local newfile = io.open(sms1,'w') newfile:close() end
но пока скрипт не перезагрузишь не создается файл