Вопросы по 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.
— Как получить транспорт, в котором сидит игрок?
Lua: 
local veh = storeCarCharIsInNoSave(PLAYER_PED)
— Как получить свой id или id другого игрока?
Lua: 
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
— Как проверить, что строка содержит какой-то текст?
Lua: 
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
— Как эмулировать нажатие игровой клавиши?
Lua: 
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 другого игрока, в которого целюсь я?
Lua: 
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
— Как зарегистрировать команду чата SAMP?
Lua: 
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
— Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua: 
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: Jennifer, knowfaq, FreX и 38 других
Нажмите для раскрытия...
R

_razor

t.me/sssecretway | ТГК: t.me/razor_code
Всефорумный модератор
1,952
3,229
Vespan написал(а):
Помогите,когда я пишу /re и ид,и когда слежу в первый раз за игроков который в AFK,то плагин крашит
отрезок от моего кода: 
    if recon_infa_player.v then
    local sw, sh = getScreenResolution()
    imgui.SetNextWindowPos(imgui.ImVec2(650, 350), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.SetNextWindowSize(imgui.ImVec2(175, 250), imgui.Cond.FirstUseEver)
    local isPed, pPed = sampGetCharHandleBySampPlayerId(Load_Config.Recon.ReconID)
        if isPed and doesCharExist(pPed) then
            recon_skin = getCharModel(pPed)
        end
    local recon_nick = sampGetPlayerNickname(Load_Config.Recon.ReconID)
    local recon_health = sampGetPlayerHealth(Load_Config.Recon.ReconID)
    local recon_armour = sampGetPlayerArmor(Load_Config.Recon.ReconID)
    local recon_ping =  sampGetPlayerPing(Load_Config.Recon.ReconID)
    local recon_score = sampGetPlayerScore(Load_Config.Recon.ReconID)
        imgui.Begin('', recon_infa_player, imgui.WindowFlags.NoResize + imgui.WindowFlags.NoTitleBar)
        imgui.Text(u8'Информация о:')
            imgui.Text(u8''..recon_nick..' '..Load_Config.Recon.ReconID..' id')
                imgui.Text(u8'ХП:'..recon_health)
                    imgui.Text(u8'Броня:'..recon_armour)
                        imgui.Text(u8'Пинг:'..recon_ping)
                            imgui.Text(u8'LVL:'..recon_score)
                                imgui.Text(u8'Скин:'..recon_skin)
                                    local result = sampIsPlayerPaused(Load_Config.Recon.ReconID)
                                        if result then
                                            afk = u8'Да'
                                        else
                                            afk = u8'Нет'
                                        end
                                    imgui.Text(u8'AFK:'..afk)
                                imgui.Separator()
                                    local isPed, pPed = sampGetCharHandleBySampPlayerId(Load_Config.Recon.ReconID)
                                        if isPed and doesCharExist(pPed) then
                                            if isCharInAnyCar(pPed) then
                                            carHundle = storeCarCharIsInNoSave(pPed)
                                                carHealth = getCarHealth(carHundle)
                                                carSpeed = getCarSpeed(carHundle)
                                                car_model = getCarModel(carHundle)
                                                    imgui.Text('HP:'..carHealth)
                                                        imgui.Text(u8'Скорость:'..math.floor(carSpeed))
                                                            imgui.Text(u8'Модель:'..car_model)
                                                        if isCarEngineOn(carHundle) then
                                                            imgui.Text(u8'Двигатель:Заведен')
                                                        else
                                                            imgui.Text(u8'Двигатель:Заглушен')
                                                        end
                                                else
                                                    imgui.Text(u8'Игрок не тс')
                                            end
                                        end
                                imgui.Separator()
                                imgui.Text(os.date( "%H:%M:%S", os.time()))
        imgui.End()
    end
end
Нажмите для раскрытия...
Lua: 
local result = sampIsPlayerPaused(Load_Config.Recon.ReconID)
if result then
    afk = 'Да'
else
    afk = 'Нет'
end
imgui.Text(u8'AFK:'..afk)
а еще лучше скинь лог
 
Fabregoo

Fabregoo

Известный
656
129
seven. написал(а):
Lua: 
activation = false

function main()
    sampRegisterChatCommand('flood', Flooder)
    while true do
        wait(0)
        if activation then
            setVirtualKeyDown(VK_F, true)
            wait(1)
            setVirtualKeyDown(VK_F, false)
        end
    end
end

function Flooder()
    activation = not activation
end
Нажмите для раскрытия...
не подскажешь как ето впихнуть сюда, а то у меня получилось то его впихнуть, но перестали работать бинды...
Код снизу.
Lua: 
function main()
while not isSampAvailable() do wait(3000) end
sampRegisterChatCommand("rr", function() main_window_state.v = not main_window_state.v end)
   while true do
   wait(0)
     imgui.Process = main_window_state.v
    if testCheat("L") then
      sampSendChat("/lock")
end
    if testCheat("K") then
      sampSendChat("/key")     
end
    if testCheat("HH") then
    sampSetChatInputText('/findihouse ')
                sampSetChatInputEnabled(true)
    end
      if testCheat("BB") then
       sampSendChat("/buybiz")
                end
      if testCheat("report")then
      sampSendChat("/rep") end
     end
     end
 
Vespan

Vespan

Чешский луашер
Проверенный
2,124
1,740
seven. написал(а):
Lua: 
local result = sampIsPlayerPaused(Load_Config.Recon.ReconID)
if result then
    afk = 'Да'
else
    afk = 'Нет'
end
imgui.Text(u8'AFK:'..afk)
а еще лучше скинь лог
Нажмите для раскрытия...
Отрезок: 
19:24:03.861059] (error)    Imgui Admin Help: D:\GTASHKA\moonloader\Imgui Admin Help.lua:1941: attempt to concatenate global 'recon_skin' (a nil value)
stack traceback:
    D:\GTASHKA\moonloader\Imgui Admin Help.lua:1941: in function 'OnDrawFrame'
    D:\GTASHKA\moonloader\lib\imgui.lua:1378: in function <D:\GTASHKA\moonloader\lib\imgui.lua:1367>
[19:24:03.863062] (error)    Imgui Admin Help: Script died due to an error. (09ACA694)
Imgui Admin Help.lua
Если не понятно,то когда я начинаю слежку /re за игроков,то должен появиться панелька с инфой о игроке,а когда я начинаю слежку /re и попадаеться игрок в афк,то плагин крашиться
 

Вложения

  • moonloader.log
    6.4 KB · Просмотры: 4
Angr

Angr

Известный
291
99
Vespan написал(а):
Отрезок: 
19:24:03.861059] (error)    Imgui Admin Help: D:\GTASHKA\moonloader\Imgui Admin Help.lua:1941: attempt to concatenate global 'recon_skin' (a nil value)
stack traceback:
    D:\GTASHKA\moonloader\Imgui Admin Help.lua:1941: in function 'OnDrawFrame'
    D:\GTASHKA\moonloader\lib\imgui.lua:1378: in function <D:\GTASHKA\moonloader\lib\imgui.lua:1367>
[19:24:03.863062] (error)    Imgui Admin Help: Script died due to an error. (09ACA694)
Imgui Admin Help.lua
Если не понятно,то когда я начинаю слежку /re за игроков,то должен появиться панелька с инфой о игроке,а когда я начинаю слежку /re и попадаеться игрок в афк,то плагин крашиться
Нажмите для раскрытия...
Читай ошибки, написано же
recon_skin возвращает nil, исправляй
Вне майна
Lua: 
local recon_skin = 0
Код:
 
Vespan

Vespan

Чешский луашер
Проверенный
2,124
1,740
Angr написал(а):
Читай ошибки, написано же
recon_skin возвращает nil, исправляй
Вне майна
Lua: 
local recon_skin = 0
Код:
Нажмите для раскрытия...
Уже сам исправил
Lua: 
    if recon_infa_player.v then
    local sw, sh = getScreenResolution()
    imgui.SetNextWindowPos(imgui.ImVec2(650, 350), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
    imgui.SetNextWindowSize(imgui.ImVec2(175, 250), imgui.Cond.FirstUseEver)
    local recon_nick = sampGetPlayerNickname(Load_Config.Recon.ReconID)
    local recon_health = sampGetPlayerHealth(Load_Config.Recon.ReconID)
    local recon_armour = sampGetPlayerArmor(Load_Config.Recon.ReconID)
    local recon_ping =  sampGetPlayerPing(Load_Config.Recon.ReconID)
    local recon_score = sampGetPlayerScore(Load_Config.Recon.ReconID)
        imgui.Begin('', recon_infa_player, imgui.WindowFlags.NoResize + imgui.WindowFlags.NoTitleBar)
            local isPed, pPed = sampGetCharHandleBySampPlayerId(Load_Config.Recon.ReconID)
                if isPed and doesCharExist(pPed) then
                    recon_skin = getCharModel(pPed)
                    recon_weapon = getCurrentCharWeapon(pPed)
        imgui.Text(u8'Информация о:')
            imgui.Text(u8''..recon_nick..' | '..Load_Config.Recon.ReconID..' id')
                imgui.Text(u8'ХП:'..recon_health)
                    imgui.Text(u8'Броня:'..recon_armour)
                        imgui.Text(u8'Пинг:'..recon_ping)
                            imgui.Text(u8'LVL:'..recon_score)
                            local result = sampIsPlayerPaused(Load_Config.Recon.ReconID)
                                if result then
                                    afk = u8'Да'
                                else
                                    afk = u8'Нет'
                                end
                                imgui.Text(u8'AFK:'..afk)
                                    imgui.Text(u8'Скин:'..recon_skin..' id')
                                        imgui.Text(u8'Оружие:'..recon_weapon)
                                imgui.Separator()
                                    if isCharInAnyCar(pPed) then
                                        carHundle = storeCarCharIsInNoSave(pPed)
                                        carHealth = getCarHealth(carHundle)
                                        carSpeed = getCarSpeed(carHundle)
                                        car_model = getCarModel(carHundle)
                                            imgui.Text('HP:'..carHealth)
                                                imgui.Text(u8'Скорость:'..math.floor(carSpeed))
                                                    imgui.Text(u8'Модель:'..car_model)
                                                if isCarEngineOn(carHundle) then
                                                    imgui.Text(u8'Двигатель:Заведен')
                                                else
                                                    imgui.Text(u8'Двигатель:Заглушен')
                                                end
                                        else
                                            imgui.Text(u8'Игрок не тс')
                                    end
                                end
                        imgui.Separator()
                    imgui.Text(os.date( "%H:%M:%S", os.time()))
        imgui.End()
    end
end
 
Fabregoo

Fabregoo

Известный
656
129
Angr написал(а):
Все никак не поймешь ? :D
Lua: 
while true do
        wait(0)
        if  testCheat("flood") then printString("Hello", 1000) end
end
Нажмите для раскрытия...
Код не вставил, как вместо активации flood командой, сделать на клавиатуре?..
Lua: 
function main()
while not isSampAvailable() do wait(3000) end
sampRegisterChatCommand('flood', Flooder)
sampRegisterChatCommand("rr", function() main_window_state.v = not main_window_state.v end)
   while true do
   wait(0)
        if activation then
            setVirtualKeyDown(VK_F, true)
            wait(1)
            setVirtualKeyDown(VK_F, false)
            end
     imgui.Process = main_window_state.v
    if testCheat("L") then
      sampSendChat("/lock")
end
    if testCheat("K") then
      sampSendChat("/key")     
end
    if testCheat("HH") then
    sampSetChatInputText('/findihouse ')
                sampSetChatInputEnabled(true)
    end
      if testCheat("BB") then
       sampSendChat("/buybiz")
                end
      if testCheat("report")then
      sampSendChat("/rep") end
     end
     end
 
Vespan

Vespan

Чешский луашер
Проверенный
2,124
1,740
Fabregooooooooooooooooooo написал(а):
Код не вставил, как вместо активации flood командой, сделать на клавиатуре?..
Lua: 
function main()
while not isSampAvailable() do wait(3000) end
sampRegisterChatCommand('flood', Flooder)
sampRegisterChatCommand("rr", function() main_window_state.v = not main_window_state.v end)
   while true do
   wait(0)
        if activation then
            setVirtualKeyDown(VK_F, true)
            wait(1)
            setVirtualKeyDown(VK_F, false)
            end
     imgui.Process = main_window_state.v
    if testCheat("L") then
      sampSendChat("/lock")
end
    if testCheat("K") then
      sampSendChat("/key")    
end
    if testCheat("HH") then
    sampSetChatInputText('/findihouse ')
                sampSetChatInputEnabled(true)
    end
      if testCheat("BB") then
       sampSendChat("/buybiz")
                end
      if testCheat("report")then
      sampSendChat("/rep") end
     end
     end
Нажмите для раскрытия...
Код: 
while true do wait(0)
    if testCheat('gg') then
        activation = not activation
    end
    if activation then
            setVirtualKeyDown(VK_F, true)
                   wait(1)
                    setVirtualKeyDown(VK_F, false)
    end
МОЙ ВОПРОС:Как сделать,что когда у игрока 0 броника,заменивался 0-лик на "Нету"
sampGetPlayerArmor
Для imgui.Text
 
  • Нравится
Реакции: Fabregoo
Angr

Angr

Известный
291
99
Vespan написал(а):
Код: 
while true do wait(0)
    if testCheat('gg') then
        activation = not activation
    end
    if activation then
            setVirtualKeyDown(VK_F, true)
                   wait(1)
                    setVirtualKeyDown(VK_F, false)
    end
МОЙ ВОПРОС:Как сделать,что когда у игрока 0 броника,заменивался 0-лик на "Нету"
sampGetPlayerArmor
Для imgui.Text
Нажмите для раскрытия...
Lua: 
if tonumber(sampGetPlayerArmor(id)) == 0 then
    imgui.text("нет армора")
else
     imgui.text("есть армор")
end
 
  • Нравится
Реакции: Fabregoo
Vespan

Vespan

Чешский луашер
Проверенный
2,124
1,740
Как сделать,что когда я нажал на кнопку imgui.Button,и мне надо нажать от 1 до 100,и когда я нажал то выбилось сообщение в чат,какое число я нажал
 
Fabregoo

Fabregoo

Известный
656
129
Как сделать имгуи окно, с текстом, по типу инфо о скрипте, команды скрипта, что о как шпора, только так.
 
Vespan

Vespan

Чешский луашер
Проверенный
2,124
1,740
Fabregooooooooooooooooooo написал(а):
Как сделать имгуи окно, с текстом, по типу инфо о скрипте, команды скрипта, что о как шпора, только так.
Нажмите для раскрытия...
Код: 
if imgui.CollapsingHeader('info') then
    local info_text = [[  
Плагин,для таких отсталых пользователей/игроков,которые лень учить .LUA
ТАКИХ КАК 
Fabregooooooooooooooooooo
By Vespan
]]
    imgui.Text(u8(info_text))
end
 
  • Нравится
Реакции: Fabregoo
E

Enot_World

Известный
28
0
[RakBot] Люди, крч нужно создать условие, при котором будет искать тексдрав, если его нет, то писать команду
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. AnWu
    • Закреплено
    • Статья
    Информация Гайд Всё о Lua скриптинге для MoonLoader
      • Нравится
    Ответы
    46
    Просмотры
    173K
    Lua
    FlouZip
    FlouZip
  2. Frapsy
    • Опрос
    Исходник Полноценный исходник фракционного(МО) скрипта ARP
      • Нравится
    Ответы
    74
    Просмотры
    31K
    Lua
    Frapsy
    Frapsy
  3. PanSeek
    Интервью с Fomikus
      • Нравится
      • Влюблен
    Ответы
    3
    Просмотры
    2K
    Общение
    chromiusj
    C
  4. AnWu
    • Закреплено
    Информация Ответы на часто задаваемые вопросы [FAQ]
      • Нравится
      • Влюблен
    Ответы
    24
    Просмотры
    13K
    Lua
    Kusnrchik
    Kusnrchik
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    3K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу