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

North Trees

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

Masayuki

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

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

North Trees

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

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

ARMOR

011110000111100101101001
Модератор
4,969
6,890

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

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

Masayuki

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

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

North Trees

Участник
34
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

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

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

E E E E E E E

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


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

Notepad++

Известный
280
161
есть функа бега для раксампа?
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.

Потрачен
124
34
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
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
 

E E E E E E E

Активный
154
26
У меня не работает почему то, что не так?

Lua:
    local wp_tb = imgui.ImBuffer(4)
    imgui.InputText('Set weapon (id): ', wp_tb)
    
    if imgui.Button('Set weapon') then
        getWeapontypeModel(wp_tb)
        requestModel(wp_tb)
        loadAllModelsNow()
        setCurrentCharWeapon(PLAYER_PED, wp_tb)
    end
 

ressedich

Новичок
2
0
привет, помогите пофиксить краш скрипта визуал выдачи денег, сам в софтах 0, не срите )))
local moonloader = require 'moonloader'
local memory = require 'memory'
local sampev = require 'samp.events'

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


sampRegisterChatCommand("takem", takemCommand)
end

function takemCommand()
-- Адрес памяти, где хранятся деньги игрока
local moneyAddress = 0xb7ce50
local moneyToAdd = 1000000

-- Получаем текущее значение денег
local currentMoney = memory.read(moneyAddres, 4, false)

-- Устанавливаем новое значение денег
memory.write(moneyAddress, currentMoney + moneyToAdd, 4, false)

-- Сообщение в чате
sampAddChatMessage("Ты получил миллион денег, ыы", -1)
end
 

Masayuki

Участник
79
31
привет, помогите пофиксить краш скрипта визуал выдачи денег, сам в софтах 0, не срите )))
local moonloader = require 'moonloader'
local memory = require 'memory'
local sampev = require 'samp.events'

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


sampRegisterChatCommand("takem", takemCommand)
wait(-1)
end

function takemCommand()
-- Адрес памяти, где хранятся деньги игрока
local moneyAddress = 0xb7ce50
local moneyToAdd = 1000000

-- Получаем текущее значение денег
local currentMoney = memory.read(moneyAddres, 4, false)

-- Устанавливаем новое значение денег
memory.write(moneyAddress, currentMoney + moneyToAdd, 4, false)

-- Сообщение в чате
sampAddChatMessage("Ты получил миллион денег, ыы", -1)
end

Попробуй так