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

 

[#kweeZ]

поставь вторым параметром true

каким образом можно узнать что я целюсь (жму пкм). не целюсь в игрока/машины, а просто целюсь?

объясни дураку подробнее)

 

[sdfaw]

imgui.Begin(test', show_imgui_example1)
                    imgui.Text('PASSWORD:')
                   if imgui.InputText('', param) then
                        if param.v == '123456' then
                          ---
                         end
                    end
                    imgui.End()
               end

как сделать чтобы после ввода в InputText "123456" открывалось новое окно imgui?

 

[tlwsn]

как получить координаты головы?

 

[suouca]

объясни дураку подробнее)

if imgui.CollapsingHeader("Test", true) then
        imgui.Text(u8"Test2")
end

как получить координаты головы?

из костей. поищи skeletal wallhack на луа там посмотреть можно

 

[deleted-user-164854]

imgui.Begin(test', show_imgui_example1)
                    imgui.Text('PASSWORD:')
                   if imgui.InputText('', param) then
                        if param.v == '123456' then
                          ---
                         end
                    end
                    imgui.End()
               end

как сделать чтобы после ввода в InputText "123456" открывалось новое окно imgui?

if param.v == '123456' then
 show_imgui_example1.v = false -- это если нужно закрыть текущее окно
 переменная_show_imgui_example2.v = not переменная_show_imgui_example2.v
end

Ну и потом само собой imgui.Begin("test-2", переменная_show_imgui_example2) и до конца код второго окна.
Так же не забудь про курсор и имгуи процесс

как получить координаты головы?

Направления? Или просто кости головы?

 

[tlwsn]

Направления? Или просто кости головы?

Просто кости головы. Нашел в скелетал вх, но там координаты шеи, а мне бы коорды именно головы

 

[Musaigen]

Просто кости головы. Нашел в скелетал вх, но там координаты шеи, а мне бы коорды именно головы

GetBodyPartCoordinates(6, ped)

каким образом можно узнать что я целюсь (жму пкм). не целюсь в игрока/машины, а просто целюсь?

isKeyDown(2)

 

[#kweeZ]

if imgui.CollapsingHeader("Test", true) then
        imgui.Text(u8"Test2")
end

Не работает

 

[Di3]

Кто может помочь решить проблему. Сделал функцию проверки Регов, пишу /getip ID в чате скрипт видит строку > Включает функцию проверки,все проверяется хорошо. Аналогичное делаю через sampSendChat('/getip '..rInfo.id) по нажатию клавиши на клавиатуре , все также проверяется хорошо и никаких проблем нет. Но когда это же делаю через imgui , функция так же выполняется,реги выводятся,но через 5-10 секунд после вывода происходит краш,не понимаю в чем проблема,в логе ничего нет,просто выгружаются все скрипты и гта закрывается.
Кнопка

    imgui.SetCursorPos(imgui.ImVec2(133, 6))
        if imgui.Button(u8'Реги') then
            sampSendChat('/getip '..rInfo.id)
        end

Последующее выполнение функции когда найден нужный ответ после команды выше

function  SE.onServerMessage(collor,msg)
if msg:find('Nik %[(.*)%]  R%-IP %[(.*)%]  IP %[(.*)%]')  then
local reginick,regip,reglast =    msg:match('Nik %[(.*)%]  R%-IP %[(.*)%]  IP %[(.*)%]')
if statusproverkiregov == false then
        lua_thread.create(function()
            regdanny = {}
checkregi(regip,reglast)
while not regdanny[1] or not regdanny[4] do    wait(0) if statuserrorregi == true then statuserrorregi = false return end end
sampAddChatMessage(reginick, -1)
sampAddChatMessage(regdanny[1]..'  '..regdanny[4], -1)
sampAddChatMessage(regdanny[2]..'   '..regdanny[5], -1)
sampAddChatMessage(regdanny[3]..'   '..regdanny[6], -1)
end)
else
    sampAddChatMessage('[Ошибка] Я не могу работать так быстро!', 0xFF44FF)
end
end
end

Сама функция

  function checkregi(ipregdanny,iplastregdanny)
        statusproverkiregov=true
                    regdanny = {}
                    regdanny2 = {}
                  lua_thread.create(function()
        async_http_request("GET", 'http://ip-api.com/json/'..u8(ipregdanny)..'?lang=ru' , nil,
        function(response)
        local regvrem = u8:decode(response.text)
    local city4,country3,isp2 = regvrem:match('city%":%"(.*)%"%,%"country%":%"(.*)%"%,%"countryCode.*%,%"isp%":%"(.*)%"%,%"lat"')
regdanny = {country3,city4,isp2}
        end,
        function(err)
        sampAddChatMessage('[ERROR] Не удалось загрузить информацию о IP REG',0xFF0000)
            regdanny[1] = 'ERROR'
        end)
        async_http_request("GET", 'http://ip-api.com/json/'..u8(iplastregdanny)..'?lang=ru' , nil,
        function(response)
        local regvrem = u8:decode(response.text)
        local city1,country1,isp1 = regvrem:match('city%":%"(.*)%"%,%"country%":%"(.*)%"%,%"countryCode.*%,%"isp%":%"(.*)%"%,%"lat"')
    regdanny2 = {country1,city1,isp1}
        end,
        function(err)
        sampAddChatMessage('[ERROR] Не удалось загрузить информацию о IP LAST',0xFF0000)
        regdanny2[1] = 'ERROR'
        end)
while not regdanny2[1] or not regdanny[1] do wait(0) end
if not regdanny2[1]:find('ERROR') or not regdanny[1]:find('ERROR') then
regdanny = {regdanny[1],regdanny[2],regdanny[3],regdanny2[1],regdanny2[2],regdanny2[3]}
wait(500)
statusproverkiregov=false
else
        sampAddChatMessage('[Ошибка] Произошла ошибка проверки. Повторите попытку.', -1)
        statuserrorregi = true
end
end)
end

в бесконечный цикл сунь.
While true do
--code
end
Для чего такой бредовый код?
Мб тебе это нужно?
if isKeyJustPressed(id key) then -- если была нажата 1 раз клавиша,то выполняется код
--code
end

Поможет кто?

 

[suouca]

каким образом я могу поставить все хуки, которые отправляю на сервер?

 

[DANIIL XPC]

как сделать многострочный ввод текста?

 

[sdfaw]

if param.v == '123456' then
 show_imgui_example1.v = false -- это если нужно закрыть текущее окно
 переменная_show_imgui_example2.v = not переменная_show_imgui_example2.v
end

Ну и потом само собой imgui.Begin("test-2", переменная_show_imgui_example2) и до конца код второго окна.
Так же не забудь про курсор и имгуи процесс


Направления? Или просто кости головы?

не работает

imgui.Begin(test', show_imgui_example1)
                    imgui.Text('PASSWORD:')
                   if imgui.InputText('', param) then
                        if param.v == '123456' then
                          ---
                         end
                    end
                    imgui.End()
               end

как сделать чтобы после ввода в InputText "123456" открывалось новое окно imgui?

 

[FBenz]

Решил написать быстренько простую функцию, которая возвращает true или false , если игрок с заданным ником в сети.
Таквот.
Ебался 4 часа, но них*ра не понял, бомбит уже. Функция все время возвращает false, даже если игрко в сети, даже если ввожу ник вручную, даже если они, бл, совпадают
Что не так с этой дурью?

function sampIsConnectedByNick(nick_arg)
 for i = 0, sampGetMaxPlayerId() do
  if sampIsPlayerConnected(i) then
   local rnick = sampGetPlayerNickname(i)
   if rnick == nick_arg then
    return true
   end
  end
 end
return false
end

 

[pwned]

Как сделать,чтобы нажимая кнопку
Ближайшему игроку писало сообщение типо: "Привет %s[%d] , стоимость будет твоя 5000"

 

[utmpL]

Как сделать,чтобы нажимая кнопку
Ближайшему игроку писало сообщение типо: "Привет %s[%d] , стоимость будет твоя 5000"

https://blast.hk/threads/13380/page-2#post-283168