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

egor230

Участник
47
16
Благодарю за участия вас Musaigen. Вы правы, язык lua регистрозависимый. Но к сожалению это не помогло(((((
 

Ethan Night

Новичок
27
0
Не хочет вообще запускаться ГТАшка с этим скриптом.
Lua:
require 'lib.moonloader'
local inicfg = require 'inicfg'
local key = require 'lib.vkeys'
local set = inicfg.load({
tags = {
    tagr = "Ваш тэг /r",
    tagf = "Ваш тэг /f",
    rang = "rang",
    name = "Имя",
    surname = "Фамилия",
    division = "отряд/взвод",
    }
})

military = [[Сорвать маску
Выдать розыск
Надеть наручники
Посадить в машину
Посадить в камеру
Предоставить удостоверение]]



commands = [[ПКМ(Прицелиться на игрока) + R - Меню взаимодействия с военнослужащим
/rn - НонРП рация Армии с. Пишется текст сразу в скобках
/f - Рация МО. Если указать тэг в настройках, то будет писаться с тэгом.
/fn - НонРП рация МО. Пишется текст сразу в скобках
/modhelp - Помощь по скрипту
/inihelp - Помощь: Как настроить тэги?]]
inihelp = [[                           
                            Как настроить автотэг?

                    Есть следуйщие тэги: тэг на фамилию, имя, должность агента. А также на отдел.
                       
                            Так как же сделать автотэг?
            1) Заходим в папку с игрой.
            2) Заходим в папку "moonloader".
            3) Заходим в папку "config". ЕСЛИ нету, то создаем и надо зайти в игру хотя бы один раз, дабы появился файл в папке.
            4) В папке "config" будет файл "MoD Helper(УСБ Edition).lua.ini".
            5) Открываем его в блокноте. Далее текст, то что в скобках, после знака равно, меняем.
       
Теперь когда будите писать в /r или в /f у Вас будет писаться Ваш тэг. А Фамилия, Имя, Должность Ваша будет использоваться в некоторых отыгровках.
       
            {FF0000}ПРИМЕЧАНИЕ!!! tagr - Тэг рации /r, tagf - Тэг /f рации, surname - Фамилия , name - Имя, rang - Должность(название).
       
        ]]



function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}MoD Helper(УСБ Edition) - запущен.", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}Авторы - Ethan Night(DRP Trilliant), forum: Ethan Night - Frederick Aguilar(DRP Sapphire), forum: Dmitry555", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}Инструкция по использованию - {00FF00}/modhelp", 0x00BFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nam, surnam = name:match("(.*)_(.*)")
local nick = nam.." "..surnam
sampRegisterChatCommand("modhelp", help)
sampRegisterChatCommand("inihelp", ihelp)

inicfg.save(set)
sampRegisterChatCommand("f", function(text)
sampSendChat("/f ["..set.tagf.tagr.."]: "..text)
end)
sampRegisterChatCommand("rn", function(text)
sampSendChat("/r (( "..text.." ))")
end)
sampRegisterChatCommand("fn", function(text)
sampSendChat("/f (( "..text.." ))")
end)


while true do

   
    local result, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
    if result then
    resultt, id1 = sampGetPlayerIdByCharHandle(ped)
    local name1 = sampGetPlayerNickname(id1)
            if resultt and isKeyJustPressed(VK_R) then
            sampShowDialog(7, "{66FFFF} Военнослужайщий: {00FF00}" ,military, "{00FF00}Продолжить", "{FF0000}Отмена", 2)
        end
        end
       
    local res, but, list, str = sampHasDialogRespond(7)
    if res then
         if but == 1 and list == 0 then
            sampSendChat("/me схватился рукой за маску, на голове гражданина, после чего сорвал её")
            wait(2000)
            sampSendChat("/do Личность военнослужещего установлена.")end
        if but == 1 and list == 1 then
            sampSendChat("/me открыл КПК, после чего ввел данные о военном преступнике")
            wait(2000)
            sampSendChat("/awol "..id1) end
        if but == 1 and list == 2 then
            sampSendChat("/do На поясном  креплению закреплены наручники.")
            wait(2500)
            sampSendChat("/me резким движением руки достал наручники с поясного крепления, затем начал надевать их на гражданина")
            wait(2500)
            sampSendChat("/cuff "..id1)
            wait(2500)
            sampSendChat("/me схватился левой рукой за цепь наручников")
            wait(2500)
            sampSendChat("/do Рука "..set.tags.name.."'a на цепи наручников.")
            wait(2500)
            sampSendChat("/hold "..id1) end
        if but == 1 and list == 3 then
            sampSendChat("/me открыл заднюю дверь автомобиля, после чего затолкал в салон военного пресутпника")
            wait(2000)
            sampSendChat("/push "..id1)
            wait(2000)
            samSendChat("/me закрыл заднюю дверь автомобиля") end
        if but == 1 and list == 4 then
            sampSendChat("/do На стене возле камеры висит бланк рапорта.")
            wait(2500)
            sampSendChat("/me взял бланк рапорта, после чего заполнил все ведомости о военном пресутпнике")
            wait(25000)               
            sampSendChat("/me повесил бланк рапорта обратно на стену возле камеры")
            wait(2500)
            sampSendChat("/me открыл камеру, после чего затолкнул туда военного преступника")
            wait(2500)
            sampSendChat("/arrest "..id1) end   
        if but == 1 and list == 5 then
            sampSendChat("/me взялся рукой за пиджак, затем достал с внутренего кармана удостоверение УСБ")
            wait(2500)
            sampSendChat("/me развернул удостоверение, затем предоставил его человеку напротив")
            wait(2500)
            sampSendChat("/do В удостоверении написано: "..set.tags.rang.." "..set.tags.division.." "..set.tags.name.." "..set.tags.surname..".")end   
        end
       
   
       
        end
        end
       
       
   
   
       

function help()
sampShowDialog(8, "{66FF66}Помощь по скриптку FBI Helper", commands, "Закрыть", _, 0)
end
function ihelp()
sampShowDialog(9, "{66FF66}Помощь по найстроке автотэга", inihelp, "Закрыть", _, 0)
end
 

trefa

Известный
Всефорумный модератор
2,097
1,233
Не хочет вообще запускаться ГТАшка с этим скриптом.
Lua:
require 'lib.moonloader'
local inicfg = require 'inicfg'
local key = require 'lib.vkeys'
local set = inicfg.load({
tags = {
    tagr = "Ваш тэг /r",
    tagf = "Ваш тэг /f",
    rang = "rang",
    name = "Имя",
    surname = "Фамилия",
    division = "отряд/взвод",
    }
})

military = [[Сорвать маску
Выдать розыск
Надеть наручники
Посадить в машину
Посадить в камеру
Предоставить удостоверение]]



commands = [[ПКМ(Прицелиться на игрока) + R - Меню взаимодействия с военнослужащим
/rn - НонРП рация Армии с. Пишется текст сразу в скобках
/f - Рация МО. Если указать тэг в настройках, то будет писаться с тэгом.
/fn - НонРП рация МО. Пишется текст сразу в скобках
/modhelp - Помощь по скрипту
/inihelp - Помощь: Как настроить тэги?]]
inihelp = [[                          
                            Как настроить автотэг?

                    Есть следуйщие тэги: тэг на фамилию, имя, должность агента. А также на отдел.
                      
                            Так как же сделать автотэг?
            1) Заходим в папку с игрой.
            2) Заходим в папку "moonloader".
            3) Заходим в папку "config". ЕСЛИ нету, то создаем и надо зайти в игру хотя бы один раз, дабы появился файл в папке.
            4) В папке "config" будет файл "MoD Helper(УСБ Edition).lua.ini".
            5) Открываем его в блокноте. Далее текст, то что в скобках, после знака равно, меняем.
      
Теперь когда будите писать в /r или в /f у Вас будет писаться Ваш тэг. А Фамилия, Имя, Должность Ваша будет использоваться в некоторых отыгровках.
      
            {FF0000}ПРИМЕЧАНИЕ!!! tagr - Тэг рации /r, tagf - Тэг /f рации, surname - Фамилия , name - Имя, rang - Должность(название).
      
        ]]



function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}MoD Helper(УСБ Edition) - запущен.", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}Авторы - Ethan Night(DRP Trilliant), forum: Ethan Night - Frederick Aguilar(DRP Sapphire), forum: Dmitry555", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}Инструкция по использованию - {00FF00}/modhelp", 0x00BFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nam, surnam = name:match("(.*)_(.*)")
local nick = nam.." "..surnam
sampRegisterChatCommand("modhelp", help)
sampRegisterChatCommand("inihelp", ihelp)

inicfg.save(set)
sampRegisterChatCommand("f", function(text)
sampSendChat("/f ["..set.tagf.tagr.."]: "..text)
end)
sampRegisterChatCommand("rn", function(text)
sampSendChat("/r (( "..text.." ))")
end)
sampRegisterChatCommand("fn", function(text)
sampSendChat("/f (( "..text.." ))")
end)


while true do

  
    local result, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
    if result then
    resultt, id1 = sampGetPlayerIdByCharHandle(ped)
    local name1 = sampGetPlayerNickname(id1)
            if resultt and isKeyJustPressed(VK_R) then
            sampShowDialog(7, "{66FFFF} Военнослужайщий: {00FF00}" ,military, "{00FF00}Продолжить", "{FF0000}Отмена", 2)
        end
        end
      
    local res, but, list, str = sampHasDialogRespond(7)
    if res then
         if but == 1 and list == 0 then
            sampSendChat("/me схватился рукой за маску, на голове гражданина, после чего сорвал её")
            wait(2000)
            sampSendChat("/do Личность военнослужещего установлена.")end
        if but == 1 and list == 1 then
            sampSendChat("/me открыл КПК, после чего ввел данные о военном преступнике")
            wait(2000)
            sampSendChat("/awol "..id1) end
        if but == 1 and list == 2 then
            sampSendChat("/do На поясном  креплению закреплены наручники.")
            wait(2500)
            sampSendChat("/me резким движением руки достал наручники с поясного крепления, затем начал надевать их на гражданина")
            wait(2500)
            sampSendChat("/cuff "..id1)
            wait(2500)
            sampSendChat("/me схватился левой рукой за цепь наручников")
            wait(2500)
            sampSendChat("/do Рука "..set.tags.name.."'a на цепи наручников.")
            wait(2500)
            sampSendChat("/hold "..id1) end
        if but == 1 and list == 3 then
            sampSendChat("/me открыл заднюю дверь автомобиля, после чего затолкал в салон военного пресутпника")
            wait(2000)
            sampSendChat("/push "..id1)
            wait(2000)
            samSendChat("/me закрыл заднюю дверь автомобиля") end
        if but == 1 and list == 4 then
            sampSendChat("/do На стене возле камеры висит бланк рапорта.")
            wait(2500)
            sampSendChat("/me взял бланк рапорта, после чего заполнил все ведомости о военном пресутпнике")
            wait(25000)              
            sampSendChat("/me повесил бланк рапорта обратно на стену возле камеры")
            wait(2500)
            sampSendChat("/me открыл камеру, после чего затолкнул туда военного преступника")
            wait(2500)
            sampSendChat("/arrest "..id1) end  
        if but == 1 and list == 5 then
            sampSendChat("/me взялся рукой за пиджак, затем достал с внутренего кармана удостоверение УСБ")
            wait(2500)
            sampSendChat("/me развернул удостоверение, затем предоставил его человеку напротив")
            wait(2500)
            sampSendChat("/do В удостоверении написано: "..set.tags.rang.." "..set.tags.division.." "..set.tags.name.." "..set.tags.surname..".")end  
        end
      
  
      
        end
        end
      
      
  
  
      

function help()
sampShowDialog(8, "{66FF66}Помощь по скриптку FBI Helper", commands, "Закрыть", _, 0)
end
function ihelp()
sampShowDialog(9, "{66FF66}Помощь по найстроке автотэга", inihelp, "Закрыть", _, 0)
end
Что в логе пишет?
 

imring

Ride the Lightning
Всефорумный модератор
2,355
2,518
Не хочет вообще запускаться ГТАшка с этим скриптом.
Lua:
require 'lib.moonloader'
local inicfg = require 'inicfg'
local key = require 'lib.vkeys'
local set = inicfg.load({
tags = {
    tagr = "Ваш тэг /r",
    tagf = "Ваш тэг /f",
    rang = "rang",
    name = "Имя",
    surname = "Фамилия",
    division = "отряд/взвод",
    }
})

military = [[Сорвать маску
Выдать розыск
Надеть наручники
Посадить в машину
Посадить в камеру
Предоставить удостоверение]]



commands = [[ПКМ(Прицелиться на игрока) + R - Меню взаимодействия с военнослужащим
/rn - НонРП рация Армии с. Пишется текст сразу в скобках
/f - Рация МО. Если указать тэг в настройках, то будет писаться с тэгом.
/fn - НонРП рация МО. Пишется текст сразу в скобках
/modhelp - Помощь по скрипту
/inihelp - Помощь: Как настроить тэги?]]
inihelp = [[                          
                            Как настроить автотэг?

                    Есть следуйщие тэги: тэг на фамилию, имя, должность агента. А также на отдел.
                      
                            Так как же сделать автотэг?
            1) Заходим в папку с игрой.
            2) Заходим в папку "moonloader".
            3) Заходим в папку "config". ЕСЛИ нету, то создаем и надо зайти в игру хотя бы один раз, дабы появился файл в папке.
            4) В папке "config" будет файл "MoD Helper(УСБ Edition).lua.ini".
            5) Открываем его в блокноте. Далее текст, то что в скобках, после знака равно, меняем.
      
Теперь когда будите писать в /r или в /f у Вас будет писаться Ваш тэг. А Фамилия, Имя, Должность Ваша будет использоваться в некоторых отыгровках.
      
            {FF0000}ПРИМЕЧАНИЕ!!! tagr - Тэг рации /r, tagf - Тэг /f рации, surname - Фамилия , name - Имя, rang - Должность(название).
      
        ]]



function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}MoD Helper(УСБ Edition) - запущен.", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}Авторы - Ethan Night(DRP Trilliant), forum: Ethan Night - Frederick Aguilar(DRP Sapphire), forum: Dmitry555", 0x00BFFF)
sampAddChatMessage("{4F4F4F}[MoD Helper] {00BFFF}Инструкция по использованию - {00FF00}/modhelp", 0x00BFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nam, surnam = name:match("(.*)_(.*)")
local nick = nam.." "..surnam
sampRegisterChatCommand("modhelp", help)
sampRegisterChatCommand("inihelp", ihelp)

inicfg.save(set)
sampRegisterChatCommand("f", function(text)
sampSendChat("/f ["..set.tagf.tagr.."]: "..text)
end)
sampRegisterChatCommand("rn", function(text)
sampSendChat("/r (( "..text.." ))")
end)
sampRegisterChatCommand("fn", function(text)
sampSendChat("/f (( "..text.." ))")
end)


while true do

  
    local result, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
    if result then
    resultt, id1 = sampGetPlayerIdByCharHandle(ped)
    local name1 = sampGetPlayerNickname(id1)
            if resultt and isKeyJustPressed(VK_R) then
            sampShowDialog(7, "{66FFFF} Военнослужайщий: {00FF00}" ,military, "{00FF00}Продолжить", "{FF0000}Отмена", 2)
        end
        end
      
    local res, but, list, str = sampHasDialogRespond(7)
    if res then
         if but == 1 and list == 0 then
            sampSendChat("/me схватился рукой за маску, на голове гражданина, после чего сорвал её")
            wait(2000)
            sampSendChat("/do Личность военнослужещего установлена.")end
        if but == 1 and list == 1 then
            sampSendChat("/me открыл КПК, после чего ввел данные о военном преступнике")
            wait(2000)
            sampSendChat("/awol "..id1) end
        if but == 1 and list == 2 then
            sampSendChat("/do На поясном  креплению закреплены наручники.")
            wait(2500)
            sampSendChat("/me резким движением руки достал наручники с поясного крепления, затем начал надевать их на гражданина")
            wait(2500)
            sampSendChat("/cuff "..id1)
            wait(2500)
            sampSendChat("/me схватился левой рукой за цепь наручников")
            wait(2500)
            sampSendChat("/do Рука "..set.tags.name.."'a на цепи наручников.")
            wait(2500)
            sampSendChat("/hold "..id1) end
        if but == 1 and list == 3 then
            sampSendChat("/me открыл заднюю дверь автомобиля, после чего затолкал в салон военного пресутпника")
            wait(2000)
            sampSendChat("/push "..id1)
            wait(2000)
            samSendChat("/me закрыл заднюю дверь автомобиля") end
        if but == 1 and list == 4 then
            sampSendChat("/do На стене возле камеры висит бланк рапорта.")
            wait(2500)
            sampSendChat("/me взял бланк рапорта, после чего заполнил все ведомости о военном пресутпнике")
            wait(25000)              
            sampSendChat("/me повесил бланк рапорта обратно на стену возле камеры")
            wait(2500)
            sampSendChat("/me открыл камеру, после чего затолкнул туда военного преступника")
            wait(2500)
            sampSendChat("/arrest "..id1) end  
        if but == 1 and list == 5 then
            sampSendChat("/me взялся рукой за пиджак, затем достал с внутренего кармана удостоверение УСБ")
            wait(2500)
            sampSendChat("/me развернул удостоверение, затем предоставил его человеку напротив")
            wait(2500)
            sampSendChat("/do В удостоверении написано: "..set.tags.rang.." "..set.tags.division.." "..set.tags.name.." "..set.tags.surname..".")end  
        end
      
  
      
        end
        end
      
      
  
  
      

function help()
sampShowDialog(8, "{66FF66}Помощь по скриптку FBI Helper", commands, "Закрыть", _, 0)
end
function ihelp()
sampShowDialog(9, "{66FF66}Помощь по найстроке автотэга", inihelp, "Закрыть", _, 0)
end
где задержка в беск. цикле?
 

egor230

Участник
47
16
вот так работает
Lua:
script_author("Egor")
script_name("RandomCharsIn")
require "lib.moonloader"
function main()
 while true do
  wait(0)
 if wasKeyPressed(VK_S) 
 then while isKeyDown(VK_S) do wait(510) end -- ждать пока отпустим кнопку
  local X, Y, Z = getCharCoordinates(PLAYER_PED) -- координаты cj
            result, Ped = findAllRandomCharsInSphere(X, Y, Z, 10.3, 0, 1) -- 0AE1: $actor = random_actor_near_point 0@ 1@ 2@ in_radius 10.0 find_next 1 pass_deads 1
            if result then Marker_marker = addBlipForChar(Ped)-- 0187: 39@ = create_marker_above_actor 67@
              taskKillCharOnFoot(Ped, PLAYER_PED) -- 05E2: AS_actor 65@ kill_actor 50@       
              end
              while not isCharDead(Ped)do wait(0) end
              printString("s", 2900)
            removeBlip(Marker_marker) -- 0164: disable_marker $MARKER_CATALINA
            end
        end
 end
 

Шурик

Активный
216
42
Внимание вопрос, как узнать скорость машины на сервере?
К примеру, есть функция getCarSpeed, но она показывает скорость не такую, которая используется на сервере.
На SAMPFUNCS я брал скорость по координатам (x, y, z) и по этой формуле определял скорость машины:
C++:
sqrt(pow(vector.fX, 2) + pow(vector.fY, 2) + pow(vector.fZ, 2)) * 125

Как мне такое повторить, но только на Lua? (Узнать скорость машины, сервер DRP)

P.S. скорость, которая показывается на спидометре DRP в 2.5 раза больше чем скорость, которую выдаёт getCarSpeed (но если тестить на мелких скоростях, то там уже другое число)
P.S. Вот функция на плюсах
C++:
int GetVehicleSpeed(int id)
{
    int speed;
    CVector vector;
    if (SF->getSAMP()->getPlayers()->sLocalPlayerID == id)
    {
        if (SF->getSAMP()->getPlayers()->pLocalPlayer->pSAMP_Actor->pGTA_Ped->state == 50)
        {
            vector.fX -= SF->getSAMP()->getPlayers()->pLocalPlayer->pSAMP_Actor->pGTA_Ped->vehicle->speed[0];
            vector.fY -= SF->getSAMP()->getPlayers()->pLocalPlayer->pSAMP_Actor->pGTA_Ped->vehicle->speed[1];
            vector.fZ -= SF->getSAMP()->getPlayers()->pLocalPlayer->pSAMP_Actor->pGTA_Ped->vehicle->speed[2];
            speed = int(sqrt(pow(vector.fX, 2) + pow(vector.fY, 2) + pow(vector.fZ, 2)) * 125);
        }
    }
    else if (SF->getSAMP()->getPlayers()->pRemotePlayer[id]->pPlayerData->pSAMP_Actor->pGTA_Ped != NULL)
    {
        if (SF->getSAMP()->getPlayers()->pRemotePlayer[id]->pPlayerData->pSAMP_Actor->pGTA_Ped->state == 50)
        {
            vector.fX -= SF->getSAMP()->getPlayers()->pRemotePlayer[id]->pPlayerData->pSAMP_Actor->pGTA_Ped->vehicle->speed[0];
            vector.fY -= SF->getSAMP()->getPlayers()->pRemotePlayer[id]->pPlayerData->pSAMP_Actor->pGTA_Ped->vehicle->speed[1];
            vector.fZ -= SF->getSAMP()->getPlayers()->pRemotePlayer[id]->pPlayerData->pSAMP_Actor->pGTA_Ped->vehicle->speed[2];
            speed = int(sqrt(pow(vector.fX, 2) + pow(vector.fY, 2) + pow(vector.fZ, 2)) * 125);
        }
    }
    return speed;
}
Актуально, прошу помочь