Вопросы по 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
 
Последнее редактирование:

ufdhbi

Известный
Проверенный
1,455
861
Можете кто-то пожалуйста объяснить как пользоваться функцией в Imgui данное, т.е. какие парамеры за что овтечают.
Image(ImTextureID user_texture_id, const ImVec2& size, const ImVec2& uv0 = ImVec2(0,0), const ImVec2& uv1 = ImVec2(1,1), const ImVec4& tint_col = ImVec4(1,1,1,1), const ImVec4& border_col = ImVec4(0,0,0,0));
Загружаешь сначало изображение
local Texture = imgui.CreateTextureFromFile(getWorkingDirectory()..'\\texture.png')
там где require всякие, потом в OnDrawFrame юзаешь
imgui.Image(Texture, imgui.ImVec2(350,150), imgui.SetCursorPosX(200)) чет тип такого, уже сам натыкай, второй ппараметр размер изображения который в имгуи будет
 
  • Нравится
Реакции: Hatiko

checkdasound

Известный
Проверенный
963
406
как в синхре тачек работать со штуками где несколько параметров? например мне нужно отправить синхру через: float fPosition[3]; + 24
Как я понял 3 в кв. скобках это кол-во значений.
Вот как я отправляю хп, где одно значение, как отправить позицию с несколькими?
Lua:
local _, id = sampGetPlayerIdByCharHandle(playerPed)
local carStruct = allocateMemory(68)
sampStorePlayerIncarData(id, carStruct)
setStructFloatElement(carStruct, 48, 0.0, false)
sampSendIncarData(carStruct)
freeMemory(carStruct)
 

BARRY BRADLEY

Известный
711
176
Lua:
function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand('ss', function()
        local closestId, model = getPlayer()
        if closestId ~= -1 then
            local score = sampGetPlayerScore(closestId)
            if (score >= 3) then
                if (model ~= 280 and model ~= 281 and model ~= 282 and model ~= 283 and model ~= 284 and model ~= 285 and model ~= 286 and model ~= 288 and model ~= 295 and model ~= 71 and model ~= 265 and model ~= 163 and model ~= 164 and model ~= 165 and model ~= 166 and model ~= 266 and model ~= 267 and model ~= 300 and model ~= 301 and model ~= 302 and model ~= 306 and model ~= 307 and model ~= 309 and model ~= 310 and model ~= 311) then
                    sampSendChat('/m Говорит лидер [US:PD], '..sampGetPlayerNickname(closestId)..', остановите ТС и выйдите из машины! Держите руки перед собой!')
                    sampAddChatMessage('{FF0000}> У игрока {FFFFFF}'..sampGetPlayerNickname(closestId)..' {A4A4A4}[id '..closestId..'] {FF0000}- {00FF00}'..score.. ' уровень.', -1)
                else
                    sampSendChat('/m Говорит лидер [US:PD], остановите ТС и выйдите из машины! Держите руки перед собой!')
                end
            else
                sampAddChatMessage('{FF0000}ВНИМАНИЕ > У игрока {FFFFFF}'..sampGetPlayerNickname(closestId)..' {A4A4A4}[id '..closestId..'] {FF0000}- {00FF00}'..score.. ' уровень.', -1)
            end
        end
    end)
    wait(-1)
end


function getPlayer()
    local maxDist = 50.0
    local closestPlayer = -1
    for i = 0, sampGetMaxPlayerId(true) do
        if sampIsPlayerConnected(i) and not sampIsPlayerNpc(i) then
            if sampGetCharHandleBySampPlayerId(i) then
                local playerPosX, playerPosY, playerPosZ = getCharCoordinates(select(2, sampGetCharHandleBySampPlayerId(i)))
                local myPosX, myPosY, myPosZ = getCharCoordinates(PLAYER_PED)
                local dist = getDistanceBetweenCoords3d(myPosX, myPosY, myPosZ, playerPosX, playerPosY, playerPosZ)
                if dist < maxDist then
                    maxDist, closestPlayer, model = dist, i, getCharModel(select(2, sampGetCharHandleBySampPlayerId(i)))
                end
            end
        end
    end
    return closestPlayer, model
end

Здраствуйте. Вот имею код который находит ближайшего игрока в радиусе 50 метров, а так же если у игрока определенный скин, то выводит другое сообщение. Хотелось бы переписать так чтоб если у игрока определенный скин, то тогда код ищет другого ближайшего игрока без скина из списка и выводит его имя. Так как я новичек, то не могу понять как это работает и не могу дописать самостоятельно. Простите за такой не красивы код :D Зараниие благодарю за помощь.
 

Acerdragons

Известный
22
0
Хочу сделать скрипт который позволяет при нажатии кнопки и команды усадить персонажа на вертолет с анимацией. Нашел подходящую функцию attachCharToCar. Дальше не продвинулся.
 

Petr_Sergeevich

Известный
Проверенный
707
296
Lua:
local sampev = require "lib.samp.events"

local t = { "test1", "test2" }
local delay = 10

function sampev.onServerMessage(color, message)
    for i = 1, #t do
        if message:find(t[i]) then
            lua_thread.create(function()
                local time = delay
                while time ~= -1 do
                    wait(1000)
                    sampAddChatMessage("До конца осталось "..time.." секунд.", -1)
                    time = time - 1
                end
            end)
        end
    end
end

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

Если снова ввести слово из таблицы, а таймер для этого слова уже был запущен, нужно это определить и написать в чат. Как можно сделать такое? Подскажите, пожалуйста, получается сделать только для одного слова через флаг
 

LZTD

Активный
129
25
Попробуй этот хук: onSetMapIcon', {iconId = 'int8'}, {position = 'vector3d'}, {type = 'int8'}, {color = 'int32'}, {style = 'int8'}}

Нужна библиотека SAMP.Lua
Lua:
local events = require ('samp.events')

function events.onSetMapIcon(iconId, position, type, color, style)
   if iconId = 37 then
       sampAddChatMessage('Иконка знака вопроса находится по координатам: '..position, -1)
   end
end
Вот тут иды значков узнавай.
Map icons - SA-MP Wiki(https://sampwiki.blast.hk/wiki/MapIcons)
почему то не работает
Lua:
local events = require ('samp.events')

function events.onSetMapIcon(iconId, position, type, color, style)
   if iconId == 18 then
       sampAddChatMessage('Icon pos: '..position, -1)
   end
end
 

ШPEK

Известный
1,476
525
почему то не работает
Lua:
local events = require ('samp.events')

function events.onSetMapIcon(iconId, position, type, color, style)
   if iconId == 18 then
       sampAddChatMessage('Icon pos: '..position, -1)
   end
end
Lua:
local events = require ('samp.events')

function events.onSetMapIcon(iconId, position, type, color, style)
   if iconId == 18 then
       sampAddChatMessage('Icon pos: '..position.x..' '..position.y..' '..position.z, -1)
   end
end

Хочу сделать скрипт который позволяет при нажатии кнопки и команды усадить персонажа на вертолет с анимацией. Нашел подходящую функцию attachCharToCar. Дальше не продвинулся.

taskEnterCarAsPassenger(PLAYER_PED, хэндл вертолёта, время за которое должен сесть персонаж, 0)
[TBODY] [/TBODY]
 
Последнее редактирование модератором:

Shell :3

Активный
159
32
Как можно сделать чтоб считывало текст из капчи и вписывало его в диалоговое окно?
Для аризоны, ловля домов
 

samespoon

Известный
163
20
Есть ли такой сайт, на который можно отправить запрос и в ответ получить свой IP, страну и город?
 
Последнее редактирование:

Ethan Night

Новичок
27
0
Не хочет пахать. В чат первые три строки выводит, в консоле всё норм. А пахать не хочет.
Lua:
require 'lib.moonloader'
local inicfg = require 'inicfg'
local key = require 'lib.vkeys'
local set = inicfg.load({
tags = {
   kogorta = "Ваш тэг когорты",
   }
})


commands = [[
/f - Рация Легиона. Если указать тэг в настройках, то будет писаться с тэгом.
/fn - НонРП рация Легиона. Пишется текст сразу в скобках
/leghelp - Помощь по скрипту
/inihelp - Помощь: Как настроить тэги?]]
inihelp = [[                          
                           Как настроить автотэг?

                   Есть следуйщие тэги: тэг на фамилию, имя, должность агента. А также на отдел.
                    
                           Так как же сделать автотэг?
           1) Заходим в папку с игрой.
           2) Заходим в папку "moonloader".
           3) Заходим в папку "config". ЕСЛИ нету, то создаем и надо зайти в игру хотя бы один раз, дабы появился файл в папке.
           4) В папке "config" будет файл "LEG.lua.ini".
           5) Открываем его в блокноте. Далее текст, то что в скобках, после знака равно, меняем.
    
Теперь когда будите писать в /f у Вас будет писаться Ваш тэг.
    
           {FF0000}ПРИМЕЧАНИЕ!!! kogorta - вместо этого слова - вставляите тэг Вашей когорты.
    
       ]]



function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Скрипт 9th Legion - запущен.", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Авторы - Ethan Night, forum: Ethan Night", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Инструкция по использованию - {00FF00}/leghelp", 0x00BFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nam, surnam = name:match("(.*)_(.*)")
local nick = nam.." "..surnam
sampRegisterChatCommand("leghelp", help)
sampRegisterChatCommand("inihelp", ihelp)

   sampRegisterChatCommand("fn",
       function(args)
           if #args > 0 then
               sampSendChat('/f (( '..tostring(args)..' ))')
           end
       end
   )
   sampRegisterChatCommand('f',
       function(args)
           if #args > 0 then
               sampSendChat('/f ['..set.tags.kogorta..']: '..tostring(args))
           end
       end
   )
  

   end
    
    
    
  
  
    

function help()
sampShowDialog(8, "{66FF66}Помощь по скриптку LEG", commands, "Закрыть", _, 0)
end
function ihelp()
sampShowDialog(9, "{66FF66}Помощь по найстроке автотэга", inihelp, "Закрыть", _, 0)
end
 

штейн

Известный
Проверенный
1,001
687
Не хочет пахать. В чат первые три строки выводит, в консоле всё норм. А пахать не хочет.
Lua:
require 'lib.moonloader'
local inicfg = require 'inicfg'
local key = require 'lib.vkeys'
local set = inicfg.load({
tags = {
   kogorta = "Ваш тэг когорты",
   }
})


commands = [[
/f - Рация Легиона. Если указать тэг в настройках, то будет писаться с тэгом.
/fn - НонРП рация Легиона. Пишется текст сразу в скобках
/leghelp - Помощь по скрипту
/inihelp - Помощь: Как настроить тэги?]]
inihelp = [[                         
                           Как настроить автотэг?

                   Есть следуйщие тэги: тэг на фамилию, имя, должность агента. А также на отдел.
                   
                           Так как же сделать автотэг?
           1) Заходим в папку с игрой.
           2) Заходим в папку "moonloader".
           3) Заходим в папку "config". ЕСЛИ нету, то создаем и надо зайти в игру хотя бы один раз, дабы появился файл в папке.
           4) В папке "config" будет файл "LEG.lua.ini".
           5) Открываем его в блокноте. Далее текст, то что в скобках, после знака равно, меняем.
   
Теперь когда будите писать в /f у Вас будет писаться Ваш тэг.
   
           {FF0000}ПРИМЕЧАНИЕ!!! kogorta - вместо этого слова - вставляите тэг Вашей когорты.
   
       ]]



function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Скрипт 9th Legion - запущен.", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Авторы - Ethan Night, forum: Ethan Night", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Инструкция по использованию - {00FF00}/leghelp", 0x00BFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nam, surnam = name:match("(.*)_(.*)")
local nick = nam.." "..surnam
sampRegisterChatCommand("leghelp", help)
sampRegisterChatCommand("inihelp", ihelp)

   sampRegisterChatCommand("fn",
       function(args)
           if #args > 0 then
               sampSendChat('/f (( '..tostring(args)..' ))')
           end
       end
   )
   sampRegisterChatCommand('f',
       function(args)
           if #args > 0 then
               sampSendChat('/f ['..set.tags.kogorta..']: '..tostring(args))
           end
       end
   )
 

   end
   
   
   
 
 
   

function help()
sampShowDialog(8, "{66FF66}Помощь по скриптку LEG", commands, "Закрыть", _, 0)
end
function ihelp()
sampShowDialog(9, "{66FF66}Помощь по найстроке автотэга", inihelp, "Закрыть", _, 0)
end
Lua:
require 'lib.moonloader'
local inicfg = require 'inicfg'
local key = require 'lib.vkeys'

commands = [[
/f - Рация Легиона. Если указать тэг в настройках, то будет писаться с тэгом.
/fn - НонРП рация Легиона. Пишется текст сразу в скобках
/leghelp - Помощь по скрипту
/inihelp - Помощь: Как настроить тэги?]]
inihelp = [[
                           Как настроить автотэг?

                   Есть следуйщие тэги: тэг на фамилию, имя, должность агента. А также на отдел.

                           Так как же сделать автотэг?
           1) Заходим в папку с игрой.
           2) Заходим в папку "moonloader".
           3) Заходим в папку "config". ЕСЛИ нету, то создаем и надо зайти в игру хотя бы один раз, дабы появился файл в папке.
           4) В папке "config" будет файл "LEG.lua.ini".
           5) Открываем его в блокноте. Далее текст, то что в скобках, после знака равно, меняем.

Теперь когда будите писать в /f у Вас будет писаться Ваш тэг.

           {FF0000}ПРИМЕЧАНИЕ!!! kogorta - вместо этого слова - вставляите тэг Вашей когорты.

       ]]



function main()
    while not isSampAvailable() do wait(100) end
    cfg()
    sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Скрипт 9th Legion - запущен.", 0x00BFFF)
    sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Авторы - Ethan Night, forum: Ethan Night", 0x00BFFF)
    sampAddChatMessage("{4F4F4F}[LEG] {00BFFF}Инструкция по использованию - {00FF00}/leghelp", 0x00BFFF)
    local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local nam, surnam = sampGetPlayerNickname(id):match("(.*)_(.*)")
    local nick = sampGetPlayerNickname(id):gsub('_', ' ')
    sampRegisterChatCommand("leghelp", help)
    sampRegisterChatCommand("inihelp", ihelp)
  sampRegisterChatCommand("hn", fn)
  sampRegisterChatCommand('h', f)
    wait(-1)
end

function cfg()
    if not doesFileExist("moonloader\\config\\govnoini.ini") then
        local set =
        {
            tags =
            {
                kogorta = "я пидрпас"
            }
        };
        inicfg.save(set, 'govnoini.ini')
    end
end

function fn(args)
    if #args > 0 then
        sampSendChat('/b (( '..args..' ))')
    end
end

function f(args)
    if #args > 0 then
        local set = inicfg.load(nil, 'moonloader\\config\\govnoini.ini')
        sampSendChat('/b ['..set.tags.kogorta..']: '..args)
    end
end

function help()
    sampShowDialog(8, "{66FF66}Помощь по скриптку LEG", commands, "Закрыть", _, 0)
end
function ihelp()
    sampShowDialog(9, "{66FF66}Помощь по найстроке автотэга", inihelp, "Закрыть", _, 0)
end
 
  • Нравится
Реакции: Cutler18

штейн

Известный
Проверенный
1,001
687
Он возвращает виджет сразу в виде картинки. Доставать неоткуда.
Lua:
downloadUrlToFile('https://2ip.ru', os.getenv('TEMP') .. '\\ipv.txt', function(id, status, p1, p2)
        if status == dlstatus.STATUS_ENDDOWNLOADDATA then
            local f = io.open(os.getenv('TEMP') .. '\\ipv.txt', 'r')
            if f then
                local info = f:read('*a')
                local ip = info:match('.+:.+</span> <big id="d_clip_button">(.+)</big>.+')
            end
        end
    end)
мб костыльно но работает

а боже, ща про страну и город сделаю сразу не заметил

local country, city = info:match('.+<a title=".+" href="/geoip/"/>(.+), (.+)</a>')
достает норм страну но город с остальным мусором там сам
 
Последнее редактирование:
  • Нравится
Реакции: samespoon