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

 

[Morse]

Как пофиксить он начинает флудить текстами и потом крашит

--в начале
dlstatus = require('moonloader').download_status

--в мэйн
checkData()

--функции

function checkData()
  if not doesFileExist('moonloader/lib/imgui_addons.lua') then
    sampAddChatMessage("{800080}[Admin-Tools] {FFE4E1}Отсутствуют некоторые файлы. Начинаю загружать", main_color)
  end
  lua_thread.create(function()
    downloadFile('imgui_addons', 'moonloader/lib/imgui_addons.lua', 'https://www.dropbox.com/s/sryeqo2aogn3xk3/imgui_addons.lua?dl=1')
    wait(50) sampAddChatMessage("{800080}[Admin-Tools] {FFE4E1}Все нужные для работы файлы загружены. Перезагружаюсь...", main_color)
    wait(500) thisScript():reload()
  end)
  if doesFileExist('moonloader/lib/imgui_addons.lua') then
    madd = require 'imgui_addons'
  end
end
function downloadFile(name, path, link)
  if not doesFileExist(path) then
    downloadUrlToFile(link, path, function(id, status, p1, p2)
      if status == dlstatus.STATUSEX_ENDDOWNLOAD then
        sampAddChatMessage('{800080}[Admin-Tools] {FFE4E1}Файл - {ACFF00}'..name..' {FFE4E1}- загружен!', main_color)
      end
    end)
  end
end

aктуальнооо

 

[Qushal]

Как фиксануть иероглифы?

Как фиксануть иероглифы?

script_name("Test")
script_author("Jezus_Make")
script_description("command")

require "lib.moonloader"
local tag = " [My Frist script]: "
local lable1 = 0
local main_color = 0x5A90CE
local main_color_text = "(5A90CE)"
local white_color = "(FFFFFF)"

function main()
  while not isSampAvailable() do wait(100) end
 
  sampRegisterChatCommand("test", cmd_test)
  sampRegisterChatCommand("kiberpantk", cmd_kiberpantk)
    
    
    if lable1 == 1 then
        --условие 1   
        sampAddChatMessage(tag .. "Выйди",0xFFFF00)

    else
      --условие 1   
        sampAddChatMessage(tag .. "Text",0xFFFFFF)
    end
      
      --sampAddChatMessage(tag .. "text",0xFFFF00
      
      --Блок выполняется 1 раз после рестарта сампа
      
    while true do
       wait(0)
        --Блок выполняется бесконечно пока сампа активен
    
    end
end
        
        
function cmd_test(arg)
  sampAddChatMessage("Данил Привет,если ты читаешь это отпиши мне в вк сообщение Salambosik(FFFF0)/test",main_color)
end

function cmd_kiberpantk(arg)
    if #arg == 0 then
       sampAddChatMessage ("Привет,вы ввели команду но не ввели аргумент : (",main_color)
    else
       sampAddChatMessage ("Привет,вам повестка из военнкомата пропешите команду /q да-бы убежать от веоннкомата:  FFFFFF" .. arg,main_color)
    end

end

 

[Next..]

Как фиксануть иероглифы?

Посмотреть вложение 77048

script_name("Test")
script_author("Jezus_Make")
script_description("command")

require "lib.moonloader"
local tag = " [My Frist script]: "
local lable1 = 0
local main_color = 0x5A90CE
local main_color_text = "(5A90CE)"
local white_color = "(FFFFFF)"

function main()
  while not isSampAvailable() do wait(100) end

  sampRegisterChatCommand("test", cmd_test)
  sampRegisterChatCommand("kiberpantk", cmd_kiberpantk)
   
   
    if lable1 == 1 then
        --условие 1  
        sampAddChatMessage(tag .. "Выйди",0xFFFF00)

    else
      --условие 1  
        sampAddChatMessage(tag .. "Text",0xFFFFFF)
    end
     
      --sampAddChatMessage(tag .. "text",0xFFFF00
     
      --Блок выполняется 1 раз после рестарта сампа
     
    while true do
       wait(0)
        --Блок выполняется бесконечно пока сампа активен
   
    end
end
       
       
function cmd_test(arg)
  sampAddChatMessage("Данил Привет,если ты читаешь это отпиши мне в вк сообщение Salambosik(FFFF0)/test",main_color)
end

function cmd_kiberpantk(arg)
    if #arg == 0 then
       sampAddChatMessage ("Привет,вы ввели команду но не ввели аргумент : (",main_color)
    else
       sampAddChatMessage ("Привет,вам повестка из военнкомата пропешите команду /q да-бы убежать от веоннкомата:  FFFFFF" .. arg,main_color)
    end

end

Кодировку 1251 поставь

 

[Qushal]

Кодировку 1251 поставь

Я прост новичек а где поставить тип в какой строке и как правильно написать?? ))

 

[Next..]

Я прост новичек а где поставить тип в какой строке и как правильно написать?? ))

В каком редакторе ты пишешь? Это делается в нем, можешь просто загуглить

 

[Qushal]

В каком редакторе ты пишешь? Это делается в нем, можешь просто загуглить

в notepad++

В каком редакторе ты пишешь? Это делается в нем, можешь просто загуглить

 

[Next..]

в notepad++

Кодировки - windows 1251(вроде там)

 

[Удалённый пользователь 341712]

Кодировки - windows 1251(вроде там)

Кодировки - кириллица - windows 1251

 

[Morse]

У кого есть код трейсеров пуль?

 

[Yondime]

Можно как-то пропустить анимацию открытия двери или сделать дверь машины открой при спавне?

 

[sadbones]

Можно как-то пропустить анимацию открытия двери или сделать дверь машины открой при спавне?

сам никогда не использовал, но можно поиграться с этими функциями
openCarDoor(Vehicle car, int door)
openCarDoorABit(Vehicle car, int door, float rotation)

 

[skeet.zxc]

Пацанчики, нужно узнать, как сделать так чтобы формы с админ-чата принимались автоматически после + в админ-чате. То-есть:

[A] Nick_Name[228]: /ban 247 30 чит / nick (здесь может быть любая другая причина бана или же дни, любая другая команда /kick /mute и т.п)
[A] Nick_Name[228]: +
Ну и еще раз скрипт должен после + автоматически принять форму.

Мне друг тут набросал, но почему то он не работает.

local events = require "samp.events"

local forma = nil

local commands = {"/kick", "/slap", "/pm", "/sethp", "/spplayer", "/spcar", "/flip", "/weap", "/cure", "/adeldesc", "/unjail", "/jail", "/unmute", "/mute", "/kick"}



function main()

    repeat wait(0) until isSampAvailable()

    sampRegisterChatCommand('+', send)

    while true do wait(0) end

end



function send()

    if forma ~= nil then

        sampSendChat('/a +')

        sampSendChat(forma)

        forma = nil

    end

end



function events.onServerMessage(color, text)

    if text:find("[A] .*: .*") then

        local admin, form = msg:match('[A] (.*): (.*)')

        if form ~= nil then

            for i = 1, #commands do

                if form:find(commands) then

                    sampAddChatMessage("{FF0000}[AF]{FFFFFF} Пришла админ форма: "..form.."!", -1)

                    forma = form

                    break

                end

            end

        end

    end

    if text:find("[A] .*: +") and forma ~= nil then

        local admint = msg:match('[A] (.*): +')

        if admint == admin then

            sampSendChat(forma)

            sampSendChat('/a Выдал')

            forma = nil

        end

    end

end

 

[thedqrkway]

как заставить скрипт нажать на кнопку в диалоге?

 

[Next..]

Пацанчики, нужно узнать, как сделать так чтобы формы с админ-чата принимались автоматически после + в админ-чате. То-есть:

[A] Nick_Name[228]: /ban 247 30 чит / nick (здесь может быть любая другая причина бана или же дни, любая другая команда /kick /mute и т.п)
[A] Nick_Name[228]: +
Ну и еще раз скрипт должен после + автоматически принять форму.

Мне друг тут набросал, но почему то он не работает.

local events = require "samp.events"

local forma = nil

local commands = {"/kick", "/slap", "/pm", "/sethp", "/spplayer", "/spcar", "/flip", "/weap", "/cure", "/adeldesc", "/unjail", "/jail", "/unmute", "/mute", "/kick"}



function main()

    repeat wait(0) until isSampAvailable()

    sampRegisterChatCommand('+', send)

    while true do wait(0) end

end



function send()

    if forma ~= nil then

        sampSendChat('/a +')

        sampSendChat(forma)

        forma = nil

    end

end



function events.onServerMessage(color, text)

    if text:find("[A] .*: .*") then

        local admin, form = msg:match('[A] (.*): (.*)')

        if form ~= nil then

            for i = 1, #commands do

                if form:find(commands) then

                    sampAddChatMessage("{FF0000}[AF]{FFFFFF} Пришла админ форма: "..form.."!", -1)

                    forma = form

                    break

                end

            end

        end

    end

    if text:find("[A] .*: +") and forma ~= nil then

        local admint = msg:match('[A] (.*): +')

        if admint == admin then

            sampSendChat(forma)

            sampSendChat('/a Выдал')

            forma = nil

        end

    end

end

Что не работает? Скрипт крашит?

 

[sadbones]

как заставить скрипт нажать на кнопку в диалоге?

sampSendDialogResponse

Отправляет RPC - RPC_DIALOGRESPONSE

www.blast.hk