Jump to content

Ajuda em script de enviar dinheiro


Recommended Posts

Fiz download de um script de enviar dinheiro sujo (para o sistema de drogas que tenho no servidor) mas ele so envia dinheiro para outro player as vezes, o mesmo aconteceu com um outro script de enviar dinheiro nomal alguém sabe o que possa ser?

Aqui está o script de dinheiro sujo
 

function getPlayerID(id)
	v = true
	for i, player in ipairs (getElementsByType("player")) do
		if getElementData(player, "ID") == id then
			v = player
			break
		end
	end
	return v
end

addCommandHandler("enviarsujo", function(player, cmd, id, quantia)
	if not id or not quantia then return outputChatBox("#FFFFFF[#FF0000Portugália RP#FFFFFF] #FFFFFF/" .. cmd .. " [ID] [Quantia]", player, 255, 255, 255, true) end
	if(id) then end
    local playerID = tonumber(id)
	if(playerID) then end
	local target = getPlayerID(playerID)
	if not target then return outputChatBox("#FFFFFF[#FF0000Portugália RP#FFFFFF] #FFFFFFJogador não encontrado.", player, 255, 255, 255, true) end
	
	if target == player then return outputChatBox("#FFFFFF[#FF0000Portugália RP#FFFFFF] #FFFFFFVocê não pode enviar dinheiro sujo para si mesmo.", player, 255, 255, 255, true) end
	local x, y, z = getElementPosition(player)
	local ux, uy, uz = getElementPosition(target)

	if tonumber(quantia) and (tonumber(quantia) <= 0) or not (tonumber(quantia)) then return outputChatBox("#FFFFFF[#FF0000Portugália RP#FFFFFF] #FFFFFFValor inválido.", player, 255, 255, 255, true) end

	if getDistanceBetweenPoints3D(x, y, z, ux, uy, uz) <= 2 then
		local dinheirosujo = tonumber(getElementData(player, "Dinheiro:Sujo")) or 0
		if not (dinheirosujo >= tonumber(quantia)) then return outputChatBox("#FFFFFF[#FF0000Portugália RP#FFFFFF] #FFFFFFVocê não possui essa quantia.", player, 255, 255, 255, true) end

		setElementData(target,"Dinheiro:Sujo",getElementData(target,"Dinheiro:Sujo")+quantia)
		
		setElementData(player,"Dinheiro:Sujo",getElementData(player,"Dinheiro:Sujo")-quantia)
		
		outputChatBox("#FFFFFF[#FF0000Portugália RP#FFFFFF] #FFFFFFVocê enviou " .. quantia .. "€ de dinheiro sujo, para: #8A2BE2" .. getPlayerName(target), player, 255, 255, 255, true)
		outputChatBox("#FFFFFF[#FF0000Portugália RP#FFFFFF] #FFFFFFVocê recebeu " .. quantia .. "€ dinheiro sujo, de: #8A2BE2" .. getPlayerName(player), target, 255, 255, 255, true)
		end
end)

 

Edited by _Zedd_
Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...