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

Aniki

🐰
Администратор
1,225
1,506
Lua:
luavers = 0
 
local dlstatus = require('moonloader').download_status
 
-- main()
       while not isPlayerPlaying(PLAYER_HANDLE) do wait(100) end
       wait(1000)
       local fpath = os.getenv('TEMP') .. '\\script_vers1.json'
       downloadUrlToFile('https://raw.githubusercontent.com/../master/script_vers.json', fpath, function(id, status, p1, p2)
           if status == dlstatus.STATUS_ENDDOWNLOADDATA then
               local f = io.open(fpath, 'r')
               if f then
                  local info = decodeJson(f:read('*a'))
                  if info and info.latest then
                      local version = tonumber(info.latest)
                      if version > luavers then
                           show_main_upd.v = not show_main_upd.v
                           imgui.Process = show_main_upd.v
                      end
                  end
               end
           end
       end)
-- main
 
show_main_upd = imgui.ImBool(false)
function imgui.OnDrawFrame() -- Main Window
   gupd()
end
 
function gupd()
   if show_main_upd.v then
       local btn_size = imgui.ImVec2(100, 0)
       imgui.ShowCursor = true
       local sw, sh = getScreenResolution() -- center
       local nosize = imgui.WindowFlags.NoResize
       imgui.SetNextWindowPos(imgui.ImVec2(sw / 2, sh / 2), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
       imgui.SetNextWindowSize(imgui.ImVec2(320, 85), imgui.Cond.FirstUseEver)
       imgui.Begin(u8'Обновление!', _, nosize)
       imgui.SameLine(52, 0)
       imgui.Text(u8'Вышло новое обновление скрипта!!!')
       imgui.Text(u8'Скорее устанавливай его и опробуй новые функции')
       --imgui.Text(u8'Сосите жопу бай Эйми Руинер')
       imgui.Text(u8'')
       imgui.SameLine(50, 0)
       if imgui.Button(u8'Обновить', btn_size) then
           local link = '[URL]https://github.com/AngeloSalieri/AutoHotKey-for-LCN/blob/master/updt.exe?raw=true[/URL]'
           local fput = getWorkingDirectory() .. '/config'
           downloadUrlToFile(link, fput, gupdt)
       end
       imgui.SameLine(160, 5)
       if imgui.Button(u8'Отмена', btn_size) then
          show_main_upd.v = false
       end
       if not show_main_upd.v then
           imgui.ShowCursor = false
           --reloadScripts()
       end
       imgui.End()
   end
end
 
function gupdt(id, status, p1, p2)
   if status == dlstatus.STATUS_DOWNLOADINGDATA then
   print(string.format('Загружено %d из %d.', p1, p2))
   elseif status == dlstatus.STATUS_ENDDOWNLOADDATA then
       print('Загрузка завершена.')
       reloadScripts()
   end
end
Подскажите, почему при нажатии на "Обновить" не скачивает файл? Никаких ошибок... ничего
Попробуй чекать другой статус
Lua:
status == dlstatus.STATUSEX_ENDDOWNLOAD
 

checkdasound

Известный
Проверенный
963
406
Каким образом можно сократить данный скрипт?
Lua:
require 'lib.moonloader'
local vk = require 'lib.vkeys'


function main()
    requestModel(422)
    requestModel(432)
    requestModel(444)
    requestModel(447)
    requestModel(463)
    requestModel(471)
    requestModel(600)
    requestModel(601)
    loadAllModelsNow()
    while true do
    wait(0)
        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD2) then
            if isModelAvailable(422) then
                printStringNow('~g~BOBCAT HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(422, posX + 5, posY, posZ)
            end
        end
       
        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD3) then
            if isModelAvailable(432) then
                printStringNow('~g~RHINO HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(432, posX + 5, posY, posZ)
            end
        end

        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD4) then
            if isModelAvailable(444) then
                printStringNow('~g~MONSTER HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(444, posX + 5, posY, posZ)
            end
        end           
           
        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD5) then
            if isModelAvailable(447) then
                printStringNow('~g~SEASPARROW HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(447, posX + 5, posY, posZ)
            end
        end           

        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD6) then
            if isModelAvailable(463) then
                printStringNow('~g~FREEWAY HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(463, posX + 5, posY, posZ)
            end
        end           

        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD7) then
            if isModelAvailable(471) then
                printStringNow('~g~QUAD HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(471, posX + 5, posY, posZ)
            end
        end           

        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD8) then
            if isModelAvailable(600) then
                printStringNow('~g~PICADOR HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(600, posX + 5, posY, posZ)
            end
        end           

        if isKeyJustPressed(VK_NUMPAD1) and isKeyJustPressed(VK_NUMPAD9) then
            if isModelAvailable(601) then
                printStringNow('~g~S.W.A.T. HAS BEEN SPAWNED', 2000)
                local posX, posY, posZ = getCharCoordinates(playerPed)
                cHandle = createCar(601, posX + 5, posY, posZ)
            end
        end           
    end
end
 

cover

Известный
Проверенный
245
273
Есть замечательные штуки в луа, да и не только - циклы и таблицы. Почитай об этом.
 
  • Нравится
Реакции: checkdasound

KoJIoHHa

Известный
5
0
Как извлечь цвет строки чата? Чтобы потом можно было использовать в sampev.onServerMessage(color, text)
 

Rowland

Новичок
114
2
Как убрать сообщения с сервера определенного цвета, т.е. например все сообщения зеленого цвета...
 

ShuffleBoy

Известный
Друг
754
429
Как убрать сообщения с сервера определенного цвета, т.е. например все сообщения зеленого цвета...
Lua:
local sampev = require"lib.samp.events"

function sampev.onServerMessage(clr, msg)
    if clr ==  --color then
        return false
    end
end

Как извлечь цвет строки чата? Чтобы потом можно было использовать в sampev.onServerMessage(color, text)
Lua:
local sampev = require"lib.samp.events"

function sampev.onServerMessage(clr, msg)
    sampAddChatMessage(clr, -1)
end
 

Aniki

🐰
Администратор
1,225
1,506
Как извлечь цвет строки чата? Чтобы потом можно было использовать в sampev.onServerMessage(color, text)
Lua:
local sampev = require 'lib.samp.events'

function sampev.onServerMessage(color, text)
  return {color, text .. ' COL: ' .. color} -- в конце каждой строки скрипт будет писать ее цвет
end

Как убрать сообщения с сервера определенного цвета, т.е. например все сообщения зеленого цвета...

Lua:
local sampev = require 'lib.samp.events'

function sampev.onServerMessage(color, text)
  if color == x then-- x - код цвета который ты хочешь убрать
    return false
  end
end
 
  • Нравится
Реакции: KoJIoHHa

Rowland

Новичок
114
2
Почему при совпадении id и myid ничего не происходит, хотя в консоли
[ML] (script) Tsveta: -65281 Andrew_Rowland[43] (4 lvl) > /sp 43
[ML] (script) Checker: 43 43


Lua:
function sampev.onServerMessage(clr, msg)
    if clr == -65281 or msg == "Админы онлайн:" then
    _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
            my = msg:match("/sp.(%d+)")
            print (my, myid)
            if myid == my then
             sampAddChatMessage("Следят крысы!!!")
            end
        return false
end
end
 

f0rtrix

Известный
208
15
Попробуй чекать другой статус
Lua:
status == dlstatus.STATUSEX_ENDDOWNLOAD
Çàãðóæåíî 2147500036 èç 0.
При переводе с украинского означает: Загружено 2147500036 из 0. И ничего дальше не происходит. Можно просто без всяких сообщений, без print, скачать файл по нажатии кнопки "Обновить" и все?))
 
Последнее редактирование:

Qsany

Потрачен
464
147
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
когда пишу buy- в консоли пишется buy и происходит сама функция
Вопрос- как убрать слово buy
upload_2018-5-28_20-31-56.png
 

imring

Ride the Lightning
Всефорумный модератор
2,355
2,516
Почему при совпадении id и myid ничего не происходит, хотя в консоли
[ML] (script) Tsveta: -65281 Andrew_Rowland[43] (4 lvl) > /sp 43
[ML] (script) Checker: 43 43


Lua:
function sampev.onServerMessage(clr, msg)
    if clr == -65281 or msg == "Админы онлайн:" then
    _, myid = sampGetPlayerIdByCharHandle(PLAYER_PED)
            my = msg:match("/sp.(%d+)")
            print (my, myid)
            if myid == my then
             sampAddChatMessage("Следят крысы!!!")
            end
        return false
end
end
перед проверкой my = tonumber(my)
 

LinkelnAweil

Участник
122
7
Как изменить текст в dxutAddStatic без пересоздания диалога? Например, нажимаешь на Button и текст меняется.
 

castlefamily

Участник
104
3
Всем добрый вечер.
[ML] (error) Test: cannot resume non-suspended coroutine
stack traceback:
[C]: in function 'sampHasDialogRespond'
D:\Games\GTA San Andreas MultiPlayer\moonloader\ac.luac: in function <D:\Games\GTA San Andreas MultiPlayer\moonloader\test.luac:0>
[ML] (error) Test: Script died due to an error. (0CF3AF84)

Почему может возникать такая ошибка? (cтала возникать на ML 0.2.6)