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.

Script de arrastar

Recommended Posts

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Link to comment

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members