Вопросы по 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
 
Последнее редактирование:
  • Нравится
  • Клоун
  • Эм
Реакции: TheMostMercieful, Jennifer, knowfaq и 39 других
Нажмите для раскрытия...
imring

imring

Ride the Lightning
Всефорумный модератор
2,366
2,557
rraggerr написал(а):
\n - новая строка если ты не знал, легкий способ исправить эту ошибку
Нажмите для раскрытия...
Yj47kLV.png
 
ImPasha

ImPasha

Software Developer & System Administrator
Друг
1,788
2,145
#Northn написал(а):
Lua: 
if isKeyJustPressed(VK_NUMPAD6) and not sampIsChatInputActive() and not sampIsDialogActive() and not isPauseMenuActive() then
    if isCharInAnyCar(playerPed) then
        peds = getAllChars()
        if peds ~= nil then
            for _, hm in pairs(peds) do
                _ , id = sampGetPlayerIdByCharHandle(hm)
                _ , m = sampGetPlayerIdByCharHandle(PLAYER_PED)
                if id ~= -1 and id ~= m and doesCharExist(hm) and sampIsPlayerConnected(id) then
                    local x, y, z = getCharCoordinates(hm)
                    local mx, my, mz = getCharCoordinates(PLAYER_PED)
                    local dist = getDistanceBetweenCoords3d(mx, my, mz, x, y, z)
                    local color = string.format("%06X", ARGBtoRGB(sampGetPlayerColor(hm)))
                    if dist <= 55 then
                        if isCharInAnyCar(hm) then
                            if color ~= '0066FF' and color ~= '6666FF' and color ~= 'F4A460' and color ~= 'FF6666' and color ~= 'FFCC66' and color ~= '000080' and color ~= '333300' and color ~= '00CC99' and color ~= '339966' then
                                if storeCarCharIsInNoSave(hm) ~= storeCarCharIsInNoSave(playerPed) then
                                    if isCharInCarDriver(hm) then
                                        carh = storeCarCharIsInNoSave(hm)
                                        nameofcar = getNameOfVehicleModel(getCarModel(carh))
                                        _ , idofplayercar = sampGetPlayerIdByCharHandle(hm)
                                        sampSendChat(string.format("/m Водитель транспорта %s под номером %d. ", nameofcar, idofplayercar))
                                        wait(3500)
                                        sampSendChat('/m Прижмите своё транспортное средство к обочине! ')
                                    end
                                end
                            end
                        end
                    end
                end
            end
        else
            sampAddChatMessage("[ PHELP ]{ffffff}: Не найден ни один игрок в зоне прорисовки для объявления в мегафон.", 0x0088ff)
            sampAddChatMessage("[ PHELP ]{ffffff}: Для объявления в мегафон о нарушении вам необходимо быть не более 50 метров от нарушителя.", 0x0088ff)
        end
    else
        sampAddChatMessage("[ PHELP ]{ffffff}: Вам необходимо сидеть в транспорте правоохранительных органов.", 0x0088ff)
    end
end
Нажмите для раскрытия...
Если несколько игроков в зоне, то кидает несколько раз. Нужно кидать только на одного самого ближайшего игрока.
 
A

ADavy

Новичок
3
0
Всем привет, мне надо чтобы при нажатии на клавишу (это я знаю как) воспроизводился звук, который лежит в папочке с moonloader. Заранее спасибо!
 
Aniki

Aniki

🐰
Администратор
1,231
1,574
f0rtrix написал(а):
Конечно интересно. Токо не уже скидывали какой то. Там чат зафлуживало и киаало
Нажмите для раскрытия...
у меня ничего не флудило. Вот интересующий тебя кусок кода, надеюсь что-то понятно будет
Lua: 
function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
    if (dialogId == 436 and checking) then
        text = string.gsub(text, '{.-}', '')
        for nickname in string.gmatch(text, '\t(.-)\n') do
            blcheck(nickname)
        end
        if (button2 ~= '') then
            sampSendDialogResponse(436, 1, -1, '')
            return false
        else
            checking = false
        end
    end
end
Суть в том, что тебе нужна переменная, которая будет истинна при активации проверки на ЧС и до тех пор, пока не закончатся все хистори диалоги (checking у меня), чтобы чекались новые диалоги, которые будут открываться при нажатии на стрелку. А если все-таки зафлуживает, то можно через потоки вставить задержку перед отправкой респонса.
 
imring

imring

Ride the Lightning
Всефорумный модератор
2,366
2,557
ADavy написал(а):
Я возможно еблан, но у меня не получается, вот код:
Код: 
script_name("Audio")
script_version_number(1)
script_version("v.1")

function main()

  while true do
    wait(40)

    if isKeyDown(113) then
      while isKeyDown(113) do wait(80) end
        local bass = require "lib.bass"
        local radio = bass.BASS_StreamCreateFile(false, "moonloader/audio.mp3", 0, 0, 0)
        bass.BASS_ChannelSetAttribute(radio, BASS_ATTRIB_VOL, 0.5)
        bass.BASS_ChannelPlay(radio, false)
        wait(-1)
    end
    end
end
Нажмите для раскрытия...
Lua: 
script_name("Audio")
script_version_number(1)
script_version("v.1")

local bass = require "lib.bass"

function main()
  local radio = bass.BASS_StreamCreateFile(false, "moonloader/audio.mp3", 0, 0, 0)
  while true do
    wait(40)
    if isKeyDown(113) then
      while isKeyDown(113) do wait(80) end
      bass.BASS_ChannelSetAttribute(radio, BASS_ATTRIB_VOL, 0.5)
      bass.BASS_ChannelPlay(radio, false)
    end
  end
end
 
M

mr.qldu

Известный
46
0
Автоподача объявлений + бинды клавиш. Бинд клавиши NUMPAD2 не исполняется. А автоподача флудит без интервала /ad (Server closed the connection моментально), а если ставить wait(1000) то выдаёт ошибку. Как исправить?
Lua: 
local spev = require 'lib.samp.events'
local key = require 'vkeys'

local outPass = "Высадка пассажиров"
local count = 0        
local money = -3000 

local sendAd = "/ad обменяю FCR-900 на Huntley с доплатой"
local searchAd = "Отправил Franco_DeRienzo"


function main()
  while true do
    wait(0)
        if isKeyJustPressed(key.VK_F1) then
            sampSendChat("/c 60")
            wait(500)
            sampSendChat("/me задумчиво взглянул на часы")
        end
       
        if isKeyJustPressed(key.VK_DELETE) then
            if count ~= 0 then
                sampAddChatMessage(string.format("{32CD32}Счётчики обнулены. Заработано примерно {FFFF00}%d${32CD32} за {FFFF00}%d{32CD32} рейсов.", money, count), -1)
                count = 0
                money = -3000
            else
                sampAddChatMessage("{32CD32}Счётчики уже обнулены.")
            end
        end
       
        if isKeyJustPressed(key.VK_ADD) then
            sampSendChat(sendAd)
        end
       
        if isKeyJustPressed(key.VK_F9) then
            sampSetChatInputText("/f • ")
            sampSetChatInputEnabled(true)
        end
       
        if isKeyJustPressed(key.VK_NUMPAD2) then
            sampSendChat("/airpair")
            wait(500)
            sampSendChat("/airfill")
        end
    
  end
end


function spev.onServerMessage(clr,text)
    str, --[[string]] prefstr, --[[int]] colstr, --[[int]] pcolstr = sampGetChatString(--[[int]] 99)
    if string.find(str, outPass, 0, true) ~= nil then
        pilotCount()
    end
   
    if string.find(str, searchAd, 0, true) ~= nil then
        sampSendChat(sendAd)
    end
end
    
    


function pilotCount()
        count = count + 1
        money = money + 1500
       
        if money > 0 then
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
            text1 = string.format("{3333FF}Совершено рейсов: {007DFF}%d", count)
            sampAddChatMessage(text1, -1)
            text2 = string.format("{3333FF}Заработано примерно: {008000}%d$", money)
            sampAddChatMessage(text2, -1)
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
        else
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
            text1 = string.format("{3333FF}Совершено рейсов: {007DFF}%d", count)
            sampAddChatMessage(text1, -1)
            text2 = string.format("{3333FF}Заработано примерно: {FFA500}%d$", money)
            sampAddChatMessage(text2, -1)
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
        end
end
 
R

rraggerr

проверенный какой-то
1,626
851
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
mr.qldu написал(а):
Автоподача объявлений + бинды клавиш. Бинд клавиши NUMPAD2 не исполняется. А автоподача флудит без интервала /ad (Server closed the connection моментально), а если ставить wait(1000) то выдаёт ошибку. Как исправить?
Lua: 
local spev = require 'lib.samp.events'
local key = require 'vkeys'

local outPass = "Высадка пассажиров"
local count = 0   
local money = -3000

local sendAd = "/ad обменяю FCR-900 на Huntley с доплатой"
local searchAd = "Отправил Franco_DeRienzo"


function main()
  while true do
    wait(0)
        if isKeyJustPressed(key.VK_F1) then
            sampSendChat("/c 60")
            wait(500)
            sampSendChat("/me задумчиво взглянул на часы")
        end
  
        if isKeyJustPressed(key.VK_DELETE) then
            if count ~= 0 then
                sampAddChatMessage(string.format("{32CD32}Счётчики обнулены. Заработано примерно {FFFF00}%d${32CD32} за {FFFF00}%d{32CD32} рейсов.", money, count), -1)
                count = 0
                money = -3000
            else
                sampAddChatMessage("{32CD32}Счётчики уже обнулены.")
            end
        end
  
        if isKeyJustPressed(key.VK_ADD) then
            sampSendChat(sendAd)
        end
  
        if isKeyJustPressed(key.VK_F9) then
            sampSetChatInputText("/f • ")
            sampSetChatInputEnabled(true)
        end
  
        if isKeyJustPressed(key.VK_NUMPAD2) then
            sampSendChat("/airpair")
            wait(500)
            sampSendChat("/airfill")
        end
 
  end
end


function spev.onServerMessage(clr,text)
    str, --[[string]] prefstr, --[[int]] colstr, --[[int]] pcolstr = sampGetChatString(--[[int]] 99)
    if string.find(str, outPass, 0, true) ~= nil then
        pilotCount()
    end
 
    if string.find(str, searchAd, 0, true) ~= nil then
        sampSendChat(sendAd)
    end
end
 
 


function pilotCount()
        count = count + 1
        money = money + 1500
  
        if money > 0 then
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
            text1 = string.format("{3333FF}Совершено рейсов: {007DFF}%d", count)
            sampAddChatMessage(text1, -1)
            text2 = string.format("{3333FF}Заработано примерно: {008000}%d$", money)
            sampAddChatMessage(text2, -1)
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
        else
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
            text1 = string.format("{3333FF}Совершено рейсов: {007DFF}%d", count)
            sampAddChatMessage(text1, -1)
            text2 = string.format("{3333FF}Заработано примерно: {FFA500}%d$", money)
            sampAddChatMessage(text2, -1)
            sampAddChatMessage("{75C1FF}--------------------------------------------------", -1)
        end
end
Нажмите для раскрытия...
делай print("get" ..text) когда получаешь сообщение. Ты там увидишь что будет дикий флуд, его легко решить и можно сразу несколькими способами, например
Lua: 
local send = false
func ev.Onservermessage(c,t)
if string.find(t, "hui") and not send then
sampSendchat("HUI!")
send = true
end
if send then
wait(15000) -- должно быть в lua_thread но мне лень
send = false
end
end
 
M

mr.qldu

Известный
46
0
rraggerr написал(а):
делай print("get" ..text) когда получаешь сообщение. Ты там увидишь что будет дикий флуд, его легко решить и можно сразу несколькими способами, например
Lua: 
local send = false
func ev.Onservermessage(c,t)
if string.find(t, "hui") and not send then
sampSendchat("HUI!")
send = true
end
if send then
wait(15000) -- должно быть в lua_thread но мне лень
send = false
end
end
Нажмите для раскрытия...
интересное решение, но я не понял зачем потом проверка на отправку/неотправку сообщения и задержка в нём на 15 секунд, можешь объяснить?
 
Ш

штейн

Известный
Проверенный
1,002
688
Lua: 
    lua_thread.create(function()
        while true do wait(0)
            if wasKeyPressed(VK_Y) and not sampIsChatInputActive() and not sampIsDialogActive() and not isPauseMenuActive() then
                if not isCharInCarDriver(playerPed) then
                    print ('1')
                    setCharKeyDown(0x48, true)
                    wait(200)
                    print ('2')
                    setCharKeyDown(0x48, false)
                end
            end
        end
    end)
и че он не работает лол
 
R

rraggerr

проверенный какой-то
1,626
851
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
mr.qldu написал(а):
интересное решение, но я не понял зачем потом проверка на отправку/неотправку сообщения и задержка в нём на 15 секунд, можешь объяснить?
Нажмите для раскрытия...
если сообщение было отправлено - повторно оно отправится только через 15 секунд, это предотвратит тебя от кика за флуд
 
imring

imring

Ride the Lightning
Всефорумный модератор
2,366
2,557
crybaby написал(а):
Lua: 
    lua_thread.create(function()
        while true do wait(0)
            if wasKeyPressed(VK_Y) and not sampIsChatInputActive() and not sampIsDialogActive() and not isPauseMenuActive() then
                if not isCharInCarDriver(playerPed) then
                    print ('1')
                    setCharKeyDown(0x48, true)
                    wait(200)
                    print ('2')
                    setCharKeyDown(0x48, false)
                end
            end
        end
    end)
и че он не работает лол
Нажмите для раскрытия...
попробуй заменить setCharKeyDown на setVirtualKeyDown.
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

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