Jump to content

Sistema medico ajuda eu pfv


Recommended Posts

Pessoal, estou com problemas nesse meu código eu não consigo de maneira alguma resolver o erro do blip

vcs podem me ajudar corrigindo meu código para eu saber oq há de errado? Se puderem me dar uma atenção pois ainda sou iniciante em scripts e não sei se editei o script corretamente. Poderiam revisar? agradeço a atenção muito obg de coração pela humildade se puder ajudar

a cada uns 5 min da esses erros ai e quando eu mato o jogador desmaiado ou curo ele costuma dar alguns erros q vo udescrever logo abaixo:

Erros:

Line 86: Bad argument @ 'setElementVisibleTo' [Expected element at argument 1]
Line 87: Bad argument @ 'setElementVisibleTo' [Expected element at argument 1]
Line 126: Bad argument @ 'setElementVisibleTo' [Expected element at argument 1]
Line 127: Bad argument @ 'setElementVisibleTo' [Expected element at argument 1]
Line 147: Bad Argument @ 'destroyElement' [Expected element at argument 1,got table]

Tempo_Reanimar = {}
blip = {}


function Remove_Colete (hitElement, Danos)
	setPedArmor(hitElement, getPedArmor(hitElement) -Danos)
end
addEvent("DNL:setPedAmor(Danos)", true)
addEventHandler("DNL:setPedAmor(Danos)", root, Remove_Colete)

	                               --=============================--
                                   -------- VERIFICAR HT PED -------
                                   --=============================--

								   
function getHealthPlayer ()
	for i, player in pairs (getElementsByType("player")) do
		if getElementHealth(player) > 0 and getElementHealth(player) < 50 then 
			if getElementData(player, "DNL:Derrubado") == false then
				setElementFrozen(player, true)
				toggleAllControls(player, false, true, false)
				setElementData(player, "DNL:Derrubado", true)
				removePedFromVehicle(player)
				setPedAnimation(player, "SWEET", "Sweet_injuredloop", -1, false, false, false, true)
				triggerClientEvent(player, "DNL:HP_30", root)
				outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffLigue para o resgate #ffffffVocê está muito ferido", player, 255,255,255,true)
				Tempo_Reanimar = setTimer(function(player)
					if getElementData(player, "DNL:Derrubado") == true then
						setElementFrozen(player, false)
						toggleAllControls(player, true)
						killPlayer(player)
						setElementData(player, "DNL:Derrubado", false)
						outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffVocê não foi reanimado e morreu", player, 255,255,255,true)
					end
				end, 300000, 1, player)
			end
		end		
		if getElementHealth(player) > 50 and getElementData(player, "DNL:Derrubado") == true then 
			setElementData(player, "DNL:Derrubado", false)
			setPedAnimation(player, false)
			toggleAllControls(player, true)
			setElementFrozen(player, false)
			triggerClientEvent(player, "DNL:Fechar_HP_30", root)
			takePlayerMoney(player, 3000)
			outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffVocê foi reanimado e pagou $3000", player, 255,255,255,true)
		end
	end
end
setTimer(getHealthPlayer, 50, 0)

function Verificar_Anim ()
	for i, player in pairs (getElementsByType("player")) do
		if getElementHealth(player) > 0 and getElementHealth(player) < 30 then 
			if getElementData(player, "DNL:Derrubado") == true then
				setPedAnimation(player, "SWEET", "Sweet_injuredloop", -1, false, false, false, true)
			end
		end
	end
end
setTimer(Verificar_Anim, 1400, 0)
	                               --=============================--
                                   ----------- CURAR PED -----------
                                   --=============================--
function Curar_Cidadao (source, _, id, thePlayer, command, amount)
if(id) then
local playerID = tonumber(id)
if(playerID) then
	local Player_2 = getPlayerID(playerID)
		if isElement(Player_2) then 	
            if isObjectInACLGroup ("user."..getAccountName (getPlayerAccount(source)), aclGetGroup ( "Samu") ) then
				if Player_2 == source then outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffVocê não pode se curar", source, 255,255,255,true) return end	 
				local medico_X, medico_Y, medico_Z = getElementPosition ( source )
				local vitima_X, vitima_Y, vitima_Z = getElementPosition ( Player_2 )
				local dist = getDistanceBetweenPoints3D ( medico_X, medico_Y, medico_Z, vitima_X, vitima_Y, vitima_Z )
				if ( dist < 5 )  then
					if getElementData(source, "DNL:Curando") == false then
						if getElementData(Player_2, "DNL:Derrubado") == true then
							setPedAnimation( source, "MEDIC", "CPR", 4500, true, false, false, false)
							setElementData(source, "DNL:Curando", true)
							setTimer ( function()
								setElementHealth(Player_2, 100)
								setElementData(source, "DNL:Curando", false)
								outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffVocê Foi Curado Pelo Cidadao #00ff00"..getPlayerName(source).."", Player_2, 255,255,255,true)
								givePlayerMoney(source, 3000)
								outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffVocê Curou o Cidadão #00ff00 e recebeu um extra de $ 3000 #00ff00 "..getPlayerName(Player_2).."", source, 255,255,255,true) 
								setElementVisibleTo(blip, root, false)
								setElementVisibleTo(blip, source, false)
							end, 4500, 1 )	
						else
							outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffEsse Cidadao não precisa ser curado", source, 255,255,255,true)
						end
					else
						outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffVocê já está curando algum Cidadao", source, 255,255,255,true)
					end
				else
					outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffVocê precisa chegar mais perto do Cidadao", source, 255,255,255,true)
				end
			else
				outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffApenas membros do resgate pode curar Cidadaoes", source, 255,255,255,true)
			end
		else
			outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffO Cidadao(a) Não Foi Encontrado", source, 255,255,255,true)
		end	
    else
		outputChatBox ( "#00ff00✘#ffffffINFO#00ff00✘➺ #ffffffUse /curar [#00ff00Nick#ffffff]", source, 255,255,255,true)
	end	
end
end
addCommandHandler("curar", Curar_Cidadao)


function helpCommand(source)
	for i, player in pairs (getElementsByType("player")) do
		if getElementData(source, "DNL:Derrubado") then

			local accName = getAccountName ( getPlayerAccount ( player ) )
			outputChatBox("Você ligou para o número de emergência! Aguarde.", source)
			if ( isObjectInACLGroup ("user."..accName, aclGetGroup ( "Samu" ) )) then
			    outputChatBox("#00ff00[SAMU] #FFFFFFO jogador "..getPlayerName(source).." #FFFFFFestá pedindo socorro! Procurem o blip de coração.", player, 255, 255, 255, true)  
			    outputChatBox("#00ff00[SAMU] #FFFFFFO ID da chamada é: #00ff00("..getElementData(source, "ID")..")", player, 255, 255, 255, true)
			    local x, y, z = getElementPosition(source)
			    blip = createBlip(x, y, z, 21)
			    setElementVisibleTo(blip, root, false)
				setElementVisibleTo(blip, player, true)
				timerMorrer = setTimer(function(player)
					setElementVisibleTo(blip, root, false)
					setElementVisibleTo(blip, player, false)
				end, 300000, 1, player)
			end
	    else
			outputChatBox("Você não precisa de atendimento.", source)
		end
end
end
addCommandHandler("samu", helpCommand)

	                               --=============================--
                                   ----------- ANTI BUG ------------
                                   --=============================--
function Morrer ()
	if getElementData(source, "DNL:Derrubado") == true then		
		setElementData(source, "DNL:Derrubado", false)
		setPedAnimation(source, false)
		setElementFrozen(source, false )
		toggleAllControls(source, true)
		--setElementVisibleTo(blip, source, player, false)
		destroyElement(blip)
		triggerClientEvent(source, "DNL:Fechar_HP_30", source)
	end
end
addEventHandler("onPlayerWasted", root, Morrer)

function Quit()
	if getElementData(source, "DNL:Derrubado") == true then		
		setElementData(source, "DNL:Derrubado", false)
		destroyElement(blip)
	end
end
addEventHandler('onPlayerQuit', root, Quit)

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

 

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...