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

fokichevskiy

Известный
509
311
при таком коде nickname = table: 0x133d0118, как это расшифровать?
Lua:
directIni = 'test.ini'
local inicfg = require 'inicfg'
local ini = inicfg.load({
  settings = {
    help = 1,
    nickname = {
      help = 1,
    }
  }}, directIni)
inicfg.save(ini, directIni)
Посмотреть вложение 250904
может потому что у тебя в таблице help = 1 с запятой, хотя её не должно быть
 

Baika

Участник
55
34
А есть ли какой-нибудь вариант, как отправить булет синхру в серверный обьект, чтобы при этом меня анти чит не кикнул?
 

E E E E E E E

Активный
154
28
Как складывать опкоды?
1725379786722.png

1725380036290.png
 
  • Эм
Реакции: Andrinall

janet

Известный
1
0
Hello, can someone give me the imgui code to create these selection buttons?
Привет, может кто-то дать мне код ImGui для создания этих кнопок выбора?

Screenshot_1673.png
 

North Trees

Участник
39
2
Как вывести текст на экран?
Знаю что есть штука для смены стиля.
И printStyledString(text, time, style)
Для вывода самого текста.
Знаю что есть Очень много тем
По этому поводу.
НО есть вопрос как поменять расположение текста в пикселях?
 

Masayuki

Участник
92
36
Как вывести текст на экран?
Знаю что есть штука для смены стиля.
И printStyledString(text, time, style)
Для вывода самого текста.
Знаю что есть Очень много тем
По этому поводу.
НО есть вопрос как поменять расположение текста в пикселях?
В начале кода
local myfont = renderCreateFont('Arial', 10, 5)
10 размер шрифта, 5 флаг шрифта

В беск цикле
renderFontDrawText(myfont, 'text', 500, 500, 0xFFFFFFFF)
500, 500 - положение по х, у
 
  • Нравится
Реакции: North Trees

North Trees

Участник
39
2
В начале кода
local myfont = renderCreateFont('Arial', 10, 5)
10 размер шрифта, 5 флаг шрифта

В беск цикле
renderFontDrawText(myfont, 'text', 500, 500, 0xFFFFFFFF)
500, 500 - положение по х, у
А как сделать чтобы на команду?
Тип через переменную зарегать команду и сюда вписать?
 

ARMOR

Я креветка
Модератор
5,067
7,373

как можно чтобы эта машина красился в 2 цвет? через балончик ток нижный цвет меняется
Это уже зависит от модели и того как её создавали 3д дизайнеры

Это не опкоды, а оффсеты в классе CPed. Получаешь структуру CPed и потом к ней прибавляешь нужный оффсет, и получаешь оттуда значение
 
Последнее редактирование:

Masayuki

Участник
92
36
А как сделать чтобы на команду?
Тип через переменную зарегать команду и сюда вписать?
В мейне
sampRegisterChatCommand('test', function()
active = not active
sampAddChatMessage(tostring(active), -1)
end)

в беск цикле
if active then
renderFontDrawText(myfont, 'text', 500, 500, 0xFFFFFFFF)
end
 

North Trees

Участник
39
2
В мейне
sampRegisterChatCommand('test', function()
active = not active
sampAddChatMessage(tostring(active), -1)
end)

в беск цикле
if active then
renderFontDrawText(myfont, 'text', 500, 500, 0xFFFFFFFF)
end
Во пасиба, так и думал что просто после регистрации комманды функцию вписать

А как сделать штуку для выгрузки скрипта? Типа есть перезагрузка Ctrl+R, а надо выгрузить.
 
Последнее редактирование:

fokichevskiy

Известный
509
311
Во пасиба, так и думал что просто после регистрации комманды функцию вписать

А как сделать штуку для выгрузки скрипта? Типа есть перезагрузка Ctrl+R, а надо выгрузить.
 

E E E E E E E

Активный
154
28
Это уже зависит от модели и того как её создавали 3д дизайнеры


Это не опкоды, а оффсеты в классе CPed. Получаешь структуру CPed и потом к ней прибавляешь нужный оффсет, и получаешь оттуда значение
Как получить структуру Cped?
 

Notepad++

Известный
292
171
есть функа бега для раксампа?
Lua:
function getHeadingFromVector2d(x, y)  
    local angle = math.deg(math.atan2(y, x))
    if angle < 0 then
        angle = angle + 360
    end
    angle = angle - 90
    if angle < 0 then
        angle = angle + 360
    end
    return angle
end
function getDistanceBetweenCoords2d(x1, y1, x2, y2)
    return math.sqrt((x2-x1)^2 + (y2-y1)^2)
end

function angleToQuaternion(angle)
    local a = (math.rad(angle) / 2) 
    local qz = -(math.sin(a))
    local qw = math.cos(a)    
    return qz, qw 
end
function samp_create_sync_data(sync_type, copy_from_player)
    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)))
    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 = getBotId()
            else
                player_id = tonumber(copy_from_player)
            end
            copy_func(player_id, raw_data_ptr)
        end
    end
    local func_send = function()
        local bs = bitStream.new()
        bs:writeInt8(sync_info[2])
        bs:writeBuffer(raw_data_ptr, ffi.sizeof(data))
        bs:sendPacketEx(sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
    end
    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
function runToPosition(tox, toy, toz)
    local px, py, pz = getBotPosition()
    local bx, by = getBotPosition()
    local angle = getHeadingFromVector2d((tox - bx), (toy - by))
    local rad = -math.rad(angle)
    local sinX, cosY = math.sin(rad), math.cos(rad)
    local qz, qw = angleToQuaternion(angle)
    local kfPos = 0.09
    local kfSpeed = 30
    while getDistanceBetweenCoords2d(bx, by, tox, toy) > 0.8 do
        wait(0)
        bx = (bx + sinX*kfPos)
        by = (by + cosY*kfPos)
        angle = getHeadingFromVector2d((tox - bx), (toy - by))
        qz, qw = angleToQuaternion(angle)
        rad = -math.rad(angle)
        sinX, cosY = math.sin(rad), math.cos(rad)
        
        local data = samp_create_sync_data("player")
        data.upDownKeys = 65408   
        data.keysData = 8
        data.position.x, data.position.y, data.position.z = bx, by, toz
        data.moveSpeed.x, data.moveSpeed.y = (sinX/kfSpeed), (cosY/kfSpeed)
        data.quaternion[3], data.quaternion[0] = qz, qw      
        data.health = getBotHealth()
        data.armor = getBotArmor()
        data.animationId = 1224
        data.animationFlags = 32772        
        data.send()
        setBotPosition(bx, by, toz)
        setBotRotation(angle)                    
    end 
end
Вытащил из какого-то тгк
 

Cocolemunto.

Потрачен
108
26
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Lua:
function getHeadingFromVector2d(x, y) 
    local angle = math.deg(math.atan2(y, x))
    if angle < 0 then
        angle = angle + 360
    end
    angle = angle - 90
    if angle < 0 then
        angle = angle + 360
    end
    return angle
end
function getDistanceBetweenCoords2d(x1, y1, x2, y2)
    return math.sqrt((x2-x1)^2 + (y2-y1)^2)
end

function angleToQuaternion(angle)
    local a = (math.rad(angle) / 2)
    local qz = -(math.sin(a))
    local qw = math.cos(a)   
    return qz, qw
end
function samp_create_sync_data(sync_type, copy_from_player)
    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)))
    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 = getBotId()
            else
                player_id = tonumber(copy_from_player)
            end
            copy_func(player_id, raw_data_ptr)
        end
    end
    local func_send = function()
        local bs = bitStream.new()
        bs:writeInt8(sync_info[2])
        bs:writeBuffer(raw_data_ptr, ffi.sizeof(data))
        bs:sendPacketEx(sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
    end
    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
function runToPosition(tox, toy, toz)
    local px, py, pz = getBotPosition()
    local bx, by = getBotPosition()
    local angle = getHeadingFromVector2d((tox - bx), (toy - by))
    local rad = -math.rad(angle)
    local sinX, cosY = math.sin(rad), math.cos(rad)
    local qz, qw = angleToQuaternion(angle)
    local kfPos = 0.09
    local kfSpeed = 30
    while getDistanceBetweenCoords2d(bx, by, tox, toy) > 0.8 do
        wait(0)
        bx = (bx + sinX*kfPos)
        by = (by + cosY*kfPos)
        angle = getHeadingFromVector2d((tox - bx), (toy - by))
        qz, qw = angleToQuaternion(angle)
        rad = -math.rad(angle)
        sinX, cosY = math.sin(rad), math.cos(rad)
       
        local data = samp_create_sync_data("player")
        data.upDownKeys = 65408  
        data.keysData = 8
        data.position.x, data.position.y, data.position.z = bx, by, toz
        data.moveSpeed.x, data.moveSpeed.y = (sinX/kfSpeed), (cosY/kfSpeed)
        data.quaternion[3], data.quaternion[0] = qz, qw     
        data.health = getBotHealth()
        data.armor = getBotArmor()
        data.animationId = 1224
        data.animationFlags = 32772       
        data.send()
        setBotPosition(bx, by, toz)
        setBotRotation(angle)                   
    end
end
Вытащил из какого-то тгк
норм, но по высоте бегать не будет. бегает ток по x и y