Script de arrastar

Renaz · May 15, 2019

estou tendo um erro em um script para arrastar a pessoa para o carro do policial , ele inicia o script mas não funciona e não apresenta nenhum erro.

function seguirComando(player, commandName, playerid)
	if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount (player)), aclGetGroup ("ComandosCorporacoes")) then 

	if not (playerid) then return end
	
	local alvo = exports["ID_System"]:getPlayerID(tonumber(playerid))
	if not (alvo) then
		return player:outputChatBox("[Aviso] Jogador ' "..alvo.name.." ' não encontrado!", player,255,255,255)
	end
end
end
if getElementData(alvo,"Algemado") then
	alvox,alvoy,alvoz = getElementPosition (alvo)
	playerx,playery,playerz = getElementPosition (player)
		local dist = GetDistanceBetweenPoints3D(alvox,alvoy,alvoz,playerx,playery,playerz)
		if (dist <=5) then
		local vehicle = getPedOccupiedVehicle(player))
		if vehicle then
			warpPedIntoVehicle (alvo , vehicle , 2)
		end
	
end
addCommandHandler("arrastar", seguirComando)

[M]ister · May 15, 2019

function seguirComando(player, commandName, playerid)
	if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount (player)), aclGetGroup ("ComandosCorporacoes")) then 

		if not (playerid) then return end
		
		local alvo = exports["ID_System"]:getPlayerID(tonumber(playerid))
		if not (alvo) then
			return player:outputChatBox("[Aviso] Jogador ' "..alvo.name.." ' não encontrado!", player,255,255,255)
		end
		
		if getElementData(alvo,"Algemado") then
			alvox,alvoy,alvoz = getElementPosition (alvo)
			playerx,playery,playerz = getElementPosition (player)
			local dist = getDistanceBetweenPoints3D(alvox,alvoy,alvoz,playerx,playery,playerz)
			if (dist <=5) then
				local vehicle = getPedOccupiedVehicle(player)
				if vehicle then
					warpPedIntoVehicle (alvo , vehicle , 2)
				end
			end
		end
		
	end
end
addCommandHandler("arrastar", seguirComando)

Edited May 15, 2019 by MaligNos

Renaz · May 15, 2019

não está funcionando do mesmo jeito.

Jonas^ · May 15, 2019

Troque por isso e me diga o resultado da depuração.

				local vehicle = getPedOccupiedVehicle(player)
				if vehicle then
  					outputChatBox ("@Jogador preso no veículo.", player, 0, 255, 0)
					warpPedIntoVehicle (alvo , vehicle , 2)
				else
  					outputChatBox ("@Erro você não esta em um veículo.", player, 255, 120, 23)
  				end

Renaz · May 15, 2019

não funcinou do mesmo jeito

Jonas^ · May 15, 2019

Não fiz nem uma alteração quero ver se ele esta executando o escopo ou não.

Renaz · May 15, 2019

eu substitui e reiniciei o script , ele não deu nenhum erro mas não funcionou

[M]ister · May 15, 2019

43 minutes ago, Renazz said:

não apresenta nenhum erro.

Como chegou a tal conclusão ? certamente se tivesse usado o /debugscript 3 diversos erros apareceriam, você precisa executar o trecho para que os erros aparecessem: /arrastar

Tem um trecho POO incorreto, troque por:

if not (alvo) then
	return outputChatBox("[Aviso] Jogador ' "..alvo.name.." ' não encontrado!", player,255,255,255)
end

Renaz · May 15, 2019

function seguirComando(player, commandName, playerid)
	if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount (player)), aclGetGroup ("ComandosCorporacoes")) then 

		if not (playerid) then return end
		
		local alvo = exports["[LusoRP](Sistema)ID_System"]:getPlayerID(tonumber(playerid))
		if not (alvo) then
			return outputChatBox("[Aviso] Jogador ' "..alvo.name.." ' não encontrado!", player,255,255,255)
end
			if getElementData(alvo,"Algemado") then
			alvox,alvoy,alvoz = getElementPosition (alvo)
			playerx,playery,playerz = getElementPosition (player)
			local dist = getDistanceBetweenPoints3D(alvox,alvoy,alvoz,playerx,playery,playerz)
			if (dist <=6) then
				local vehicle = getPedOccupiedVehicle(player)
				if vehicle then
					warpPedIntoVehicle (alvo , vehicle , 3)
				end
			end
		end	
	end
end
addCommandHandler("puxar", seguirComando)

ficou desse jeito e ainda não funciona e não apresenta erros.

16 minutes ago, Jonas^ said:

local vehicle = getPedOccupiedVehicle(player)

if vehicle then

outputChatBox ("@Jogador preso no veículo.", player, 0, 255, 0)

warpPedIntoVehicle (alvo , vehicle , 2)

else

outputChatBox ("@Erro você não esta em um veículo.", player, 255, 120, 23)

end

testei desse jeito também e deu não funcionou na mesma

[M]ister · May 15, 2019

Certo, não apresenta mais erros, mas você está agindo de acordo com as verificações do script ?

Está no grupo da ACL ComandosCorporacoes ?
Essa função exportada de ID realmente funciona e retorna um player ?
Está digitando um ID existente ? Ex: /arrastar 1
O player alvo possui o elementdata “Algemado” ?
Você estava a uma distância menor ou igual a 6 unidades do player alvo ?
Você estava em um veículo quando usou o comando ?

Edited May 15, 2019 by MaligNos

Renaz · May 15, 2019

2 minutes ago, MaligNos said:

Está no grupo da ACL ComandosCorporacoes ?

Essa função exportada de ID realmente funciona ?

Está digitando um ID existente ? Ex: /arrastar 1

O player alvo possui o elementdata “Algemado” ?

Você estava a uma distância menor ou igual à 6 unidades do player algo ?

Você estava em um veículo quando usou o comando ?

sim estou cumprindo esses fatores todos.

Jonas^ · May 15, 2019

Até agora to esperando ele resolver mandar print das verificações, mas acredito que o erro esteja no element-data e nem esteja entrando no escopo da verificação.

Renaz · May 15, 2019

1 minute ago, Jonas^ said:

Até agora to esperando ele resolver mandar print das verificações, mas acredito que o erro esteja no element-data e nem esteja entrando no escopo da verificação.

como assim print das verificações?

[M]ister · May 15, 2019

22 minutes ago, MaligNos said:


if not (alvo) then
	return outputChatBox("[Aviso] Jogador ' "..alvo.name.." ' não encontrado!", player,255,255,255)
end

Na realidade seria:

if not (alvo) then
	return outputChatBox("[Aviso] Jogador ' "..playerid.." ' não encontrado!", player,255,255,255)
end

Mas se o seu "alvo" existe, nem entraria nessa verificação. Então não é a causa de não funcionar.

Jonas^ · May 15, 2019

function seguirComando(player, commandName, playerid)
	if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount (player)), aclGetGroup ("ComandosCorporacoes")) then 
		if not (playerid) then return end
		local alvo = exports["[LusoRP](Sistema)ID_System"]:getPlayerID(tonumber(playerid))
		if not (alvo) then
			return outputChatBox("[Aviso] Jogador ' "..alvo.name.." ' não encontrado!", player,255,255,255)
		end
		outputChatBox ("@Antes de entrar no escopo executado!.", player)
		if getElementData(alvo,"Algemado") then
			outputChatBox ("@element-data.", player)
			local alvox,alvoy,alvoz = getElementPosition (alvo)
			local playerx,playery,playerz = getElementPosition (player)
			local dist = getDistanceBetweenPoints3D(alvox,alvoy,alvoz,playerx,playery,playerz)
			if (dist <= 6) then
				local vehicle = getPedOccupiedVehicle(player)
				if vehicle then
					outputChatBox ("@Jogador preso no veículo.", player, 0, 255, 0)
					warpPedIntoVehicle (alvo , vehicle , 2)
				else
					outputChatBox ("@Erro você não esta em um veículo.", player, 255, 120, 23)
				end
			end
		end	
	end
end
addCommandHandler ("puxar", seguirComando)

Executa esse código e envie print aqui pra gente ver por favor.

DNL291 · May 15, 2019

Coloque também no seu código essa output para ver o resultado do element-data:

outputChatBox ("@getElementData: "..tostring(getElementData(player,"Algemado")), player)

Deixe isso antes do if getElementData(...

Edited May 15, 2019 by DNL291

Renaz · May 15, 2019

Sem erros de novo

https://prnt.sc/np235r

https://imgur.com/a/nARTfFN

Jonas^ · May 15, 2019

Impossível não estar executando nenhum dos outputs que coloquei no código.. você esta fazendo algo errado com certeza

Renaz · May 15, 2019

http://prntscr.com/np28yp

function seguirComando(player, commandName, playerid)
	if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount (player)), aclGetGroup ("ComandosCorporacoes")) then 
		if not (playerid) then return end
		local alvo = exports["[LusoRP](Sistema)ID_System"]:getPlayerID(tonumber(playerid))
		if not (alvo) then
			return outputChatBox("[Aviso] Jogador ' "..alvo.name.." ' não encontrado!", player,255,255,255)
		end
		outputChatBox ("@Antes de entrar no escopo executado!.", player)
		outputChatBox ("@getElementData: "..tostring(getElementData(player,"Algemado")), player)
		if getElementData(alvo,"Algemado") then
			outputChatBox ("@element-data.", player)
			local alvox,alvoy,alvoz = getElementPosition (alvo)
			local playerx,playery,playerz = getElementPosition (player)
			local dist = getDistanceBetweenPoints3D(alvox,alvoy,alvoz,playerx,playery,playerz)
			if (dist <= 6) then
				local vehicle = getPedOccupiedVehicle(player)
				if vehicle then
					outputChatBox ("@Jogador preso no veículo.", player, 0, 255, 0)
					warpPedIntoVehicle (alvo , vehicle , 2)
				else
					outputChatBox ("@Erro você não esta em um veículo.", player, 255, 120, 23)
				end
			end
		end	
	end
end
addCommandHandler ("puxar", seguirComando)

Edited May 15, 2019 by Renazz

[M]ister · May 15, 2019

Coloque um output teste antes de verificar se esta na ACL (linha 2). Notei também uma divergência do comando, antes era /arrastar agora está /puxar, está usando o /puxar né ?

Renaz · May 15, 2019

1 minute ago, MaligNos said:

Coloque um output teste antes de verificar se esta na ACL (linha 2). Notei também uma divergência do comando, antes era /arrastar agora está /puxar, está usando o /puxar né ?

correto.

#DeltaSCR · May 15, 2019

@Renazz mostre o meta

Jonas^ · May 15, 2019

Seu erro esta no element-data, acabei de testar aqui:

O problema então esta onde o player é algemado.

Se quiser testar aí pelo nick, fiz pelo nick pra mim testar pois não tenho o sistema de ID aqui:

addCommandHandler ("prender", function (player, cmd, nick)
	if isObjectInACLGroup ("user."..getAccountName(getPlayerAccount (player)), aclGetGroup ("Admin")) then 
		if not nick then return outputChatBox ("Digite o nick de um jogador", player, 255, 30, 30) end
		local alvo = getPlayerFromPartialName (nick)
		if not alvo then return outputChatBox ("Não encontramos um jogador com esse nick", player, 255, 30, 30) end
		outputChatBox ("@Antes de entrar no escopo executado!.", player)
		outputChatBox ("@getElementData: "..tostring(getElementData(player,"Algemado")), player)
		if getElementData (alvo, "Algemado") then
			outputChatBox ("@element-data.", player)
			local alvox, alvoy, alvoz = getElementPosition (alvo)
			local playerx, playery, playerz = getElementPosition (player)
			local dist = getDistanceBetweenPoints3D (alvox, alvoy, alvoz, playerx, playery, playerz)
			if (dist <= 6) then
				local vehicle = getPedOccupiedVehicle (player)
				if vehicle then
					outputChatBox ("@Jogador preso no veículo.", player, 0, 255, 0)
					warpPedIntoVehicle (alvo , vehicle , 2)
				else
					outputChatBox ("@Erro você não esta em um veículo.", player, 255, 120, 23)
				end
			end
		end	
	end
end)

function getPlayerFromPartialName(name)
    local name = name and name:gsub("#%x%x%x%x%x%x", ""):lower() or nil
    if name then
        for _, player in ipairs(getElementsByType("player")) do
            local name_ = getPlayerName(player):gsub("#%x%x%x%x%x%x", ""):lower()
            if name_:find(name, 1, true) then
                return player
            end
        end
    end
end

@Renazz

Renaz · May 16, 2019

para colocar por id é so substituir a linha 5 por local alvo = exports["[LusoRP](Sistema)ID_System"]:getPlayerID(tonumber(playerid)) ?

Lord Henry · May 16, 2019

Precisa ter o resource ID_System instalado e funcionando no servidor.

Sign In

Script de arrastar

Recommended Posts

Renaz

[M]ister

Renaz

Jonas^

Renaz

Jonas^

Renaz

[M]ister

Renaz

[M]ister

Renaz

Jonas^

Renaz

[M]ister

Jonas^

DNL291

Renaz

Jonas^

Renaz

[M]ister

Renaz

#DeltaSCR

Jonas^

Renaz

Lord Henry

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Browse

Activity

MTA Network

Social Media