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

Eugene Crabs

Активный
544
30
Вопрос. Что не так с этим скриптом?

Lua:
 function samp_create_sync_data(sync_type, copy_from_player)
     local ffi = require 'ffi'
     local sampfuncs = require 'sampfuncs'
     -- from SAMP.Lua
     local raknet = require 'samp.raknet'
     require 'samp.synchronization'

     copy_from_player = copy_from_player or true
     local sync_traits = {
         player = {'PlayerSyncData', raknet.PACKET.PLAYER_SYNC, sampStorePlayerOnfootData},
         vehicle = {'VehicleSyncData', raknet.PACKET.VEHICLE_SYNC, sampStorePlayerIncarData},
         passenger = {'PassengerSyncData', raknet.PACKET.PASSENGER_SYNC, sampStorePlayerPassengerData},
         aim = {'AimSyncData', raknet.PACKET.AIM_SYNC, sampStorePlayerAimData},
         trailer = {'TrailerSyncData', raknet.PACKET.TRAILER_SYNC, sampStorePlayerTrailerData},
         unoccupied = {'UnoccupiedSyncData', raknet.PACKET.UNOCCUPIED_SYNC, nil},
         bullet = {'BulletSyncData', raknet.PACKET.BULLET_SYNC, nil},
         spectator = {'SpectatorSyncData', raknet.PACKET.SPECTATOR_SYNC, nil}
     }
     local sync_info = sync_traits[sync_type]
     local data_type = 'struct ' .. sync_info[1]
     local data = ffi.new(data_type, {})
     local raw_data_ptr = tonumber(ffi.cast('uintptr_t', ffi.new(data_type .. '*', data)))
     -- copy player's sync data to the allocated memory
     if copy_from_player then
         local copy_func = sync_info[3]
         if copy_func then
             local _, player_id
             if copy_from_player == true then
                 _, player_id = sampGetPlayerIdByCharHandle(PLAYER_PED)
             else
                 player_id = tonumber(copy_from_player)
             end
             copy_func(player_id, raw_data_ptr)
         end
     end
     -- function to send packet
     local func_send = function()
         local bs = raknetNewBitStream()
         raknetBitStreamWriteInt8(bs, sync_info[2])
         raknetBitStreamWriteBuffer(bs, raw_data_ptr, ffi.sizeof(data))
         raknetSendBitStreamEx(bs, sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
         raknetDeleteBitStream(bs)
     end
     -- metatable to access sync data and 'send' function
     local mt = {
         __index = function(t, index)
             return data[index]
         end,
         __newindex = function(t, index, value)
             data[index] = value
         end
     }
     return setmetatable({send = func_send}, mt)
 end


local data = samp_create_sync_data('player')

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

    while true do

      data.keysData = 1024
      data.send()
        wait(0)

    end


    wait(-1)
end

Должен нажимать на "Alt"
 

Vespan

loneliness
Проверенный
2,102
1,631
Скажите пожалуйста,как сделать такое выбрать цвет??
41713
 

papercut

Участник
90
13
Есть ли хук для renderFontDrawText или хз как рисуется этот текст радио
41724

Ну, и как его перехватить?
p.s. это не textdraw, спецом не стал обрезать название сервера и textdrawid, чтобы было видно
 

chehon

Новичок
24
12
Этот скрипт должен работать только в диалоге капчи, но он работает во всех диалогах, как сделать только для капчи?

12:
if onumbers.v and dialogId == 8869 then
    lua_thread.create(function()
      wait(0)
      while true do wait(0)
        inputtext = sampGetCurrentDialogEditboxText()
          if inputtext ~= '' then
            sampSetCurrentDialogEditboxText(string.gsub(inputtext, '[^1234567890]',''))
          end
      end
    end)
  end
Lua:
if onumbers.v and dialogId == 8869 then
    lua_thread.create(function()
        while true do
            wait(0)
            if sampGetCurrentDialogId() == 8869 then
                inputtext = sampGetCurrentDialogEditboxText()
                if inputtext ~= '' then
                    sampSetCurrentDialogEditboxText(string.gsub(inputtext, '[^1234567890]',''))
                end
            end
        end
    end)
end
 

Fabregoo

Известный
656
128
Есть код ввода пароля.
Вот он.
Lua:
local d = false
local b = "banmeplease"

sampRegisterChatCommand("login", function(a)
    if a:len() > 0 then
        if a == b then d = true sampAddChatMessage("Доступ предоставлен!", -1)
        else sampAddChatMessage("Неверный пароль!", -1) end
    else sampAddChatMessage("Вы не указали пароль!", -1) end
end)

sampRegisterChatCommand("test", function(a)
    if not d then return end -- Пока пароль не введен, доступа нет
    sampAddChatMessage("Доступ есть!", -1)
end)
Как его привязать к етому коду...
То есть пока не введен пароль, то нижним скриптом пользоваться нельзя...
Вот код
Lua:
require "lib.moonloader"
local sf = require "sampfuncs"
local sampev = require "lib.samp.events"
local d = false
local b = "123123"

function main()
   if not isSampLoaded() or not isSampfuncsLoaded() then return end
   while not isSampAvailable() do wait(3000) end
   sampRegisterChatCommand("okno", dialog)
  while true do
    wait(0)
      local result, button, list, input = sampHasDialogRespond(10)
      if result then
        if button == 1 and list == 0 then -- button 1 - Левая кнопка, 0 - правая. list 0 - 1 строка
                sampSendChat("/me снял портфель с плечей, положил на землю, и открыл его")
                wait(1200)
                sampSendChat("/me достал из откротого портфеля, и открыл первую страницу")
                wait(1200)
                sampSendChat("/me передал паспорт человеку напротив")
                wait(1200)
                sampSetChatInputText('/showpass ')
                sampSetChatInputEnabled(true)
        end
        if button == 1 and list == 1 then
                sampSendChat("/me достал из нагрудного карманчика, и открыл 1-у страницу")
                wait(1200)
                sampSendChat("/todo Вот держите* говорит передаваю лицензии человеку напротив.")
                wait(1200)
                sampSendChat("/me передал лицензии человеку напротив")
                wait(1200)
                sampSetChatInputText('/showlic ')
                sampSetChatInputEnabled(true)
        end
        if button == 1 and list == 2 then
          sampSendChat("/me достал из кармана мед.книжку")
          wait(1500)
          sampSendChat("/me открыл первую страницу, и передал человеку напротив")
          wait(1500)
          sampSendChat("/todo Вот держите!*говорит передавая документ")
          wait(1500)
          sampSetChatInputText("/showmc  ")
          sampSetChatInputEnabled(true)
        end if button == 1 and list == 3 then
          sampSendChat("TEST ")
        end
      end
  end
end
актуально
 

_raz0r

t.me/sssecretway | ТГК: t.me/razor_code
Модератор
1,889
3,050
Lua:
require "lib.moonloader"
local sf = require "sampfuncs"
local sampev = require "lib.samp.events"
local d = false
local b = "123123"

function main()
   if not isSampLoaded() or not isSampfuncsLoaded() then return end
   while not isSampAvailable() do wait(3000) end
   sampRegisterChatCommand("okno", dialog)
   sampRegisterChatCommand("login", function(a)
    if a:len() > 0 then
        if a == b then d = true sampAddChatMessage("Доступ предоставлен!", -1)
        else sampAddChatMessage("Неверный пароль!", -1) end
    else sampAddChatMessage("Вы не указали пароль!", -1) end
end)
  while true do
    wait(0)
    if d then
          local result, button, list, input = sampHasDialogRespond(10)
          if result then
            if button == 1 and list == 0 then -- button 1 - Левая кнопка, 0 - правая. list 0 - 1 строка
                    sampSendChat("/me снял портфель с плечей, положил на землю, и открыл его")
                    wait(1200)
                    sampSendChat("/me достал из откротого портфеля, и открыл первую страницу")
                    wait(1200)
                    sampSendChat("/me передал паспорт человеку напротив")
                    wait(1200)
                    sampSetChatInputText('/showpass ')
                    sampSetChatInputEnabled(true)
            end
            if button == 1 and list == 1 then
                    sampSendChat("/me достал из нагрудного карманчика, и открыл 1-у страницу")
                    wait(1200)
                    sampSendChat("/todo Вот держите* говорит передаваю лицензии человеку напротив.")
                    wait(1200)
                    sampSendChat("/me передал лицензии человеку напротив")
                    wait(1200)
                    sampSetChatInputText('/showlic ')
                    sampSetChatInputEnabled(true)
            end
            if button == 1 and list == 2 then
              sampSendChat("/me достал из кармана мед.книжку")
              wait(1500)
              sampSendChat("/me открыл первую страницу, и передал человеку напротив")
              wait(1500)
              sampSendChat("/todo Вот держите!*говорит передавая документ")
              wait(1500)
              sampSetChatInputText("/showmc  ")
              sampSetChatInputEnabled(true)
            end if button == 1 and list == 3 then
              sampSendChat("TEST ")
            end
          end
         end
  end
end
Когда код сюда кидаешь, делай нормальную табуляцию, потому, что сложно разобраться
 
  • Нравится
Реакции: Fabregoo

spr1te

Потрачен
251
65
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Как проигать анимацию?
 

quesada

q-team
Проверенный
846
1,157
когда идёт процесс телепорта(коормастер) как мне туда мувспид добавить? Да глупый вопрос, но хелп плс
 

mld

Участник
99
11
Как убрать прозрачность у imgui?
style.Alpha = 1
чет пытался,в итоге крашило
 

Eugene Crabs

Активный
544
30
Как отправить зажатие клавиши "Alt" через синхронизацию? Уже неделю бьюсь, и только моя вежливость не дает мне использовать мат в этом сообщении.
 

Ne Drake

Потрачен
11
3
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
когда идёт процесс телепорта(коормастер) как мне туда мувспид добавить? Да глупый вопрос, но хелп плс
Через функцию от фипа (samp_create_data_with_sync(('player'))
Либо же объявить глобальную переменную и в onSendPlayerSync сверять на ее 'активность' (bool = true)

Как убрать прозрачность у imgui?
style.Alpha = 1
чет пытался,в итоге крашило
За прозрачность отвечает канал альфа в редактировании цвета colors[clr.WindowBg] по imVec4

Как отправить зажатие клавиши "Alt" через синхронизацию? Уже неделю бьюсь, и только моя вежливость не дает мне использовать мат в этом сообщении.
Использование : sendKey(id)

Lua:
function sendKey(key)
    local _, myId = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local data = allocateMemory(68)
    sampStorePlayerOnfootData(myId, data)
    setStructElement(data, 4, 2, key, false)
    sampSendOnfootData(data)
    freeMemory(data)
end

Или же через функцию от фипа создавать плеер синхру и использовать data.keysData, либо же в onSendPlayerSync через bool (использование data.keysData)
 
  • Нравится
Реакции: mld и quesada

Eugene Crabs

Активный
544
30
Через функцию от фипа (samp_create_data_with_sync(('player'))
Либо же объявить глобальную переменную и в onSendPlayerSync сверять на ее 'активность' (bool = true)


За прозрачность отвечает канал альфа в редактировании цвета colors[clr.WindowBg] по imVec4


Использование : sendKey(id)

Lua:
function sendKey(key)
    local _, myId = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local data = allocateMemory(68)
    sampStorePlayerOnfootData(myId, data)
    setStructElement(data, 4, 2, key, false)
    sampSendOnfootData(data)
    freeMemory(data)
end

Или же через функцию от фипа создавать плеер синхру и использовать data.keysData, либо же в onSendPlayerSync через bool (использование data.keysData)
Пробовал этот код. ALT это 1024, верно?
Плеер Синхру тоже пробовал. Не вышло.
 

Ne Drake

Потрачен
11
3
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.

Eugene Crabs

Активный
544
30
Используются hex значения клавиш.

Альт это 0x12 по hex

sendKey(12)
Не пашет. Функция вроде как воздействует только на клавиши подобные Y, N, H, так как они изменяют значение оружия в руках. ALT это dataKeys через синхру. Но и тут я рабочий скрипт не нашел.
Короч в конце сделал вывод о том, что сервера воспринимают только клавиши из setKeyGameState (или как-то так), что упростило задачу. А пишу я это разъяснение только для будущих поколений, чтобы они не долбились с этой хренью неделю, как я.

Ну и чтобы этот коммент модераторы не могли выпилить - вопрос. Что делает функция "int handle = getPickupPointerHandle(Pickup pickup)"?

p.s. Код для лучшего нахождения через поиск этого сообщения

Lua:
function sendKey(key)
    local _, myId = sampGetPlayerIdByCharHandle(PLAYER_PED)
    local data = allocateMemory(68)
    sampStorePlayerOnfootData(myId, data)
    setStructElement(data, 4, 2, key, false)
    sampSendOnfootData(data)
    freeMemory(data)
end


Повторю свой старый вопрос может у кого опыт появился. Можно ли как-то узнать какие объекты прикреплены к персонажу?
 
Последнее редактирование: