Вопросы по Lua скриптингу

Andrinall · 13 Янв 2024

quad? написал(а):
как получить количество обьектов по его айди в зоне стрима?

Типо того

Lua:

function getObjectsCountByModel(modelid)
	local count = 0
	for _, v in ipairs(getAllObjects()) do
		if doesObjectExist(v) and getObjectModel(v) == modelid then
			count = count + 1
		end
	end
	return count
end

function main()
	repeat wait(100) until isSampAvailable()

	sampRegisterChatCommand("objs", function(args)
		local modelid = tonumber(args:match("^(%d+)$"))
		if not modelid then return sampAddChatMessage("Аргументы указаны не верно! /objs [modelId]", -1) end
		local count = getObjectsCountByModel(modelid)
		sampAddChatMessage(("Количество объектов с моделью[%d] == %d"):format(modelid, count), -1)
	end)

	wait(-1)
end

DiteD331 · 13 Янв 2024

Почему-то функция main не хочет закрываться. Пишет, мол неожиданная строчка( end, последняя строка)

Lua:

require(moonloader)

local weapons = false

function main()
    while isSampAvailable() do wait(0) end
    sampSendChat('Скрипт успешно запущен!', 0xFF0000)
    giveWeaponToChar(PLAYER_PED, 1, 42)
        sampRegisterChatCommand('gun', function()
            weapons = not true
            sampAddChatMessage(active + "Включён" or "Выключен", 0xFF0000)
        end)
        while true do
            wait(0)
            printStyledString('Оружие выдано', 3, 1)
        end
    end
end

chapo · 13 Янв 2024

DiteD331 написал(а):
Почему-то функция main не хочет закрываться. Пишет, мол неожиданная строчка( end, последняя строка)

Lua:

require(moonloader) local weapons = false function main() while isSampAvailable() do wait(0) end sampSendChat('Скрипт успешно запущен!', 0xFF0000) giveWeaponToChar(PLAYER_PED, 1, 42) sampRegisterChatCommand('gun', function() weapons = not true sampAddChatMessage(active + "Включён" or "Выключен", 0xFF0000) end) while true do wait(0) printStyledString('Оружие выдано', 3, 1) end end end

Сделай нормальную табуляцию и сразу увидишь ошибку

percheklii · 13 Янв 2024

где накосячил, не бум-бум в этом. фикс взял отсюда, думал поможет https://www.blast.hk/threads/86750/
типо постоянно пишет:
[19:31:24] The server didn't respond. Retrying..
[19:31:24] Connecting to 194.147.32.35:7777...
Для обычного сампа если что, не раклуа

Lua:

local sampev = require("samp.events")

function main()
    sampRegisterChatCommand("test", function()
        on = true
        authorization = true
    end)
    while true do wait(0)
        if on then
            sampDisconnectWithReason(false)
            sampAddChatMessage("Wait reconnecting...", 0xa9c4e4)
            wait(3 * 1000)
            sampSetGamestate(1)
            on = false
        end
    end
end

function sampev.onInitGame()
    if authorization then
        local bs = bitStreamNew()
        bitStreamWriteByte(bs, 212)
        bitStreamWriteWord(bs, 0)
        bitStreamWriteWord(bs, 0)
        bitStreamWriteWord(bs, 0)
        bitStreamWriteFloat(bs, 1093.0)
        bitStreamWriteFloat(bs, -2036.0)
        bitStreamWriteFloat(bs, 90.0)
        sendPacket(bs)
        bitStreamDelete(bs)
    end
end

addEventHandler("onSendRpc", function(id, bs)
    if authorization then
        if id == 129 --[[RequestSpawn]] or id == 52 --[[SendSpawn]] or id == 128 --[[RequestClass]] then
            return true
        end
    end
end)

function sampev.onSendSpawn()
    if authorization then
        authorization = false

        local bs = bitStreamNew()
        bitStreamWriteWord(bs, 0)
        sendRpc(128, bs)
        bitStreamDelete(bs)
    end
end

T.Barrett · 13 Янв 2024

Andrinall написал(а):
Можно пример этой работы с объектами? (желательно с объяснением желаемого результата)

Используя средства работы с игровой памятью установить относительный угол вращения компонента транспорта по его наименованию

Т.е. к примеру есть у нас компонент wheel_lf_dummy2 (пользовательский),
хочу сделать вращение второй оси трех-четврехосного транспорта

Andrinall · 14 Янв 2024

T.Barrett написал(а):
Используя средства работы с игровой памятью установить относительный угол вращения компонента транспорта по его наименованию

Т.е. к примеру есть у нас компонент wheel_lf_dummy2 (пользовательский),
хочу сделать вращение второй оси трех-четврехосного транспорта

При тестировании столкнулся с такой проблемой, что на стандартные колёса оно не применяется(видимо игра перезаписывает данные уже после скрипта, но до рендера)
Надеюсь, на кастомные компоненты оно всё же применится.

Lua:

local mad = require 'MoonAdditions'
local Vector3D = require 'vector3d'
function main()
    while true do wait(0)
		if isPlayerPlaying(PLAYER_HANDLE) and isCharInAnyCar(PLAYER_PED) then
			local car = storeCarCharIsInNoSave(PLAYER_PED)

			for _, comp in ipairs(mad.get_all_vehicle_components(car)) do
				if comp.name:find('^wheel_lf_dummy$') then
					wheel_angles = Vector3D(comp.modeling_matrix:get_angles())
				end

				if wheel_angles and comp.name:find('^wheel_%w+_dummy%d+$') then -- wheel_rf_dummy5, wheel_lf_dummy50, wheel_rb_dummy3 и т.д.
				-- Если компонент всего 1 - можно указать 1 вместо паттерна... можно прикрутить проверки на модель авто и т.д.
					comp.modeling_matrix:rotate(wheel_angles:get())
				end
			end
		end
	end
end

T.Barrett · 15 Янв 2024

Andrinall написал(а):
При тестировании столкнулся с такой проблемой, что на стандартные колёса оно не применяется(видимо игра перезаписывает данные уже после скрипта, но до рендера)
Надеюсь, на кастомные компоненты оно всё же применится.

Lua:

local mad = require 'MoonAdditions' local Vector3D = require 'vector3d' function main() while true do wait(0) if isPlayerPlaying(PLAYER_HANDLE) and isCharInAnyCar(PLAYER_PED) then local car = storeCarCharIsInNoSave(PLAYER_PED) for _, comp in ipairs(mad.get_all_vehicle_components(car)) do if comp.name:find('^wheel_lf_dummy$') then wheel_angles = Vector3D(comp.modeling_matrix:get_angles()) end if wheel_angles and comp.name:find('^wheel_%w+_dummy%d+$') then -- wheel_rf_dummy5, wheel_lf_dummy50, wheel_rb_dummy3 и т.д. -- Если компонент всего 1 - можно указать 1 вместо паттерна... можно прикрутить проверки на модель авто и т.д. comp.modeling_matrix:rotate(wheel_angles:get()) end end end end end

Благодарю, буду пробовать!

tor1 · 15 Янв 2024

Привет, может кто-нибудь показать как сделать газ/тормоз через ffi ?

decidelater · 15 Янв 2024

Hi everyone, can someone help in finishing the below snippet, basically I want to remove blips which i created earlier.
Tried removeBlip but, it removes everything or bugged.

Lua:

function loadCoordinates()
  coordinateDict = inicfg.load(nil, "coodinates_data")
  for _, coordinates in pairs(coordinateDict) do
    if coordinates.condition == 1 then
      deleteOtherMarkers(1)
      local marker = addSpriteBlipForCoord(coordinates.x, coordinates.y, coordinates.z, 56)
      changeBlipScale(marker, 1)
    elseif coordinates.condition == 2 then
      deleteOtherMarkers(2)
      local marker = addSpriteBlipForCoord(coordinates.x, coordinates.y, coordinates.z, 55)
      changeBlipScale(marker, 1)
    end
  end
end

function deleteOtherMarkers(except_id)
  --will remove markers created using coordinateDict
  --Example: writing a for loop to iterate over coordinateDict, and remove markers where coordinates.condition != except_id
end

T.Barrett · 16 Янв 2024

Andrinall написал(а):
При тестировании столкнулся с такой проблемой, что на стандартные колёса оно не применяется(видимо игра перезаписывает данные уже после скрипта, но до рендера)
Надеюсь, на кастомные компоненты оно всё же применится.

Lua:

local mad = require 'MoonAdditions' local Vector3D = require 'vector3d' function main() while true do wait(0) if isPlayerPlaying(PLAYER_HANDLE) and isCharInAnyCar(PLAYER_PED) then local car = storeCarCharIsInNoSave(PLAYER_PED) for _, comp in ipairs(mad.get_all_vehicle_components(car)) do if comp.name:find('^wheel_lf_dummy$') then wheel_angles = Vector3D(comp.modeling_matrix:get_angles()) end if wheel_angles and comp.name:find('^wheel_%w+_dummy%d+$') then -- wheel_rf_dummy5, wheel_lf_dummy50, wheel_rb_dummy3 и т.д. -- Если компонент всего 1 - можно указать 1 вместо паттерна... можно прикрутить проверки на модель авто и т.д. comp.modeling_matrix:rotate(wheel_angles:get()) end end end end end

С небольшими доработками удалось заставить двигаться нужные компоненты. Однако встал вопрос по поводу коллизии, которая на компонентах отсутствует.
Имеется ли возможность изменения позиции объектов коллизии (в транспорте) при помощи работы с памятью или ещё какими-либо средствами?

Seniosik · 16 Янв 2024

Всем привет. У меня есть вот такая функция. Если сделать function sampev.OnMessageServer(). То функция всегда будет парсить. А мне нужно что бы я эту функцию вызывал. Как это можно реализовать?

Lua:

function chat()
    lua_thread.create(function()
    local text, color = sampev.onServerMessage()   
    if text:match('живым') then
        wait(4000)
        nt()
    else
        print("что то пошло не так")
        wait(6000)
        nt()
    end
end)
end

tor1 · 16 Янв 2024

Seniosik написал(а):
Всем привет. У меня есть вот такая функция. Если сделать function sampev.OnMessageServer(). То функция всегда будет парсить. А мне нужно что бы я эту функцию вызывал. Как это можно реализовать?

Lua:

function chat() lua_thread.create(function() local text, color = sampev.onServerMessage() if text:match('живым') then wait(4000) nt() else print("что то пошло не так") wait(6000) nt() end end) end

Это event handler как все что находится в samp events, он сам вызывается когда приходит любой server message

code:

function sampev.onServerMessage(color, text)
 lua_thread.create(function()
    if text:match('живым') then
        wait(4000)
        nt()
    else
        print("что то пошло не так")
        wait(6000)
        nt()
    end
 end)
end

percheklii · 16 Янв 2024

как сделать чтобы в спеке показывало радар?
Находил уже подобные вопросы и решения, но там показывает радар и худ, надо ток радар

Dmitriy Makarov · 16 Янв 2024

percheklii написал(а):
как сделать чтобы в спеке показывало радар?
Находил уже подобные вопросы и решения, но там показывает радар и худ, надо ток радар