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

 

[sep]

script_author("myr0cha")
script_description("EasyCMD for radmir rp samp")
script_name("EasyCMD by myr0cha")
script_moonloader('0.26.5')

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(0) end

    sampRegisterChatCommand("c", cut)
    sampRegisterChatCommand("ad", cut1)
    sampRegisterChatCommand("vs", cut2)
    sampRegisterChatCommand("mr", cut3)
    sampRegisterChatCommand("use", cut4)
    sampRegisterChatCommand("fi", cut5)
    sampRegisterChatCommand('fm', cut6)
    sampRegisterChatCommand('ac', cut7)
    sampRegisterChatCommand('re', cut8)
    sampRegisterChatCommand('nc', cut9)
    sampRegisterChatCommand('nn', cut10)
    sampRegisterChatCommand('rep', cut11)
    sampRegisterChatCommand('sd', cut12)
    while true do
        wait(0)
    end
end

function cut()
    sampSendChat("/clist 0")
end

function cut1()
    sampSendChat("/admins")
end

function cut2()
    sampSendChat("/vehspawn")
end

function cut3()
    sampSendChat("/members")
end

function cut4()
    sampSendChat("/usemedkit")
end

function cut5(arg)
    sampSendChat('/finvite '..arg)
end

function cut6()
    sampSendChat('/fmembers')
end

function cut7()
    sampSendChat('/accept')
end

function cut8(arg)
    sampSendChat('/repairengine '..arg)
end

function cut9(arg)
    sampSendChat('/newcolor '..arg)
end

function cut10(arg)
    sampSendChat('/newnumber '..arg)
end

function cut11(arg)
    sampSendChat('/repair '..arg)
end

function cut12()
    sampSendChat('/speed')
end

начиная с cut9 почему то не роботает, все остальное роботает

нахрена так усложнять
делай так
sampRegisterChatCommand('gans', function(param)
lua_thread.create(function()
wait(0)
код много строчный
end)
end)
если однострочные еще проще
sampRegisterChatCommand('fn', function(param) sampSendChat('/f (( '..param..' ))') end)
или так
sampRegisterChatCommand('fin', function(param) sampSendChat('/finvite '..param) end)

 

[paulohardy]

делай так
sampRegisterChatCommand('gans', function(param)
lua_thread.create(function()
wait(0)
код много строчный
end)
end)
если однострочные еще проще
sampRegisterChatCommand('fn', function(param) sampSendChat('/f (( '..param..' ))') end)
или так
sampRegisterChatCommand('fin', function(param) sampSendChat('/finvite '..param) end)

Заменил говнокод на говнокод, отлично, таблицы ведь просто так существуют

 

[sep]

Заменил говнокод на говнокод, отлично, таблицы ведь просто так существуют

пример в студию плиз

 

[sep]

if pie.PieMenuItem('TestSub') then end
можно ли добавить фото
или очень большую иконку
как обычную я знаю

 

[ewin]

Как можно вытащить эти цифры из текстдрава?

 

[VgrxTxch]

как добавить команду, чтобы выключить/включить скрипт?

Спойлер: Код

function onReceiveRpc(id, bitStream)
    if id == 121 then return false end -- RPC_ScrGangZoneFlash
    if id == 85 then return false end -- RPC_ScrGangZoneStopFlash
    if id == 108 then return false end -- RPC_ScrGangZoneCreate
    if id == 120 then return false end -- RPC_ScrGangZoneDestroy
end

function main()
    while not isSampAvailable() do wait(0) end
    wait(-1)
end

 

[ewin]

как добавить команду, чтобы выключить/включить скрипт?

Спойлер: Код

function onReceiveRpc(id, bitStream)
    if id == 121 then return false end -- RPC_ScrGangZoneFlash
    if id == 85 then return false end -- RPC_ScrGangZoneStopFlash
    if id == 108 then return false end -- RPC_ScrGangZoneCreate
    if id == 120 then return false end -- RPC_ScrGangZoneDestroy
end

function main()
    while not isSampAvailable() do wait(0) end
    wait(-1)
end

active=false 

function main()
    sampRegisterChatCommand("start", function() active=not active end)
end

function *твоя функция или rpc, без разницы*
    if active then
        --функциОнал
    end
end

 

[paulohardy]

пример в студию плиз

Lua - Сокращение команд (Помогите со скриптом)

Ребят, нужен скрипт подобия сокращения команд как это было в cleo только на lua. По принципу работы с ID игрока: /fd [ID] /find [ID]. Знаю что пишется это все, грубо говоря, в пару строк, но моих мозгов и рук на это не хватит (было бы что-то сложнее, то я бы не просил :) ) Заранее спасибо

www.blast.hk

 

[P3rsik]

how to make in imgui show nick?

 

[ewin]

how to make in imgui show nick?

Did u mean that?
nick = sampGetPlayerNickname(id)

 

[nomio]

how to make in imgui show nick?

imgui.Text(sampGetPlayerNickname(id))

 

[ewin]

Посмотреть вложение 86476
Как можно вытащить эти цифры из текстдрава?

Актуально

 

[Smeruxa]

А как мне это делать? Типо если заспавнился то продолжать дальше? Просто "You are banned from this server" сраз при заходе на сервер

Да блять там снизу пример есть

 

[Smeruxa]

Актуально

вроде этот хук onShowTextDraw

 

[P3rsik]

Did u mean that?
nick = sampGetPlayerNickname(id)

yes in imgui