Jump to content

Ajuda Com Script

Niick

By Niick
in Programação em Lua

Recommended Posts

Niick Rat

Niick

Posted
Posted 
hpMin = 15
Tempo = {}
ColMedic = {}

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	

function ChecarVida()
	for i, player in pairs (getElementsByType("player")) do
		if not getElementData(player, "PlayerCaido") then
			local conta = getAccountName(getPlayerAccount(player))
				if getElementHealth(player) >= 1 then
					if getElementHealth(player) <= hpMin then 
						removePedFromVehicle(player)
						setElementData(player, "PlayerCaido", true)
						setElementFrozen(player, true)
						setPedAnimation(player, "CRACK", "crckdeth3", -1, false, true, false)
						setTimer(function()
							if getElementData(player, "PlayerCaido") then	
								killPlayer(player)
							end
						end, 240000, 1)
				end
			end
		else
			setPedAnimation(player, "CRACK", "crckdeth3", -1, false, true, false)
		end
	end
end
setTimer(ChecarVida, 200, 0)

function ChecarVidaA()
	for i, player in pairs (getElementsByType("player")) do
		if  getElementData(player, "PlayerCaido") then
		local conta = getAccountName(getPlayerAccount(player))
			if getElementHealth(player) >= 31 then
				setElementData(player, "PlayerCaido", false)
				setPedAnimation(player, false)
				setElementFrozen(player, false )
			end
		end
	end
end
setTimer(ChecarVidaA, 200, 0)

function SetarCaidoComHS()
	player = source
	if not getElementData(player, "PlayerCaido") then
		removePedFromVehicle(player)
		setElementHealth(player, 20)
		setElementData(player, "PlayerCaido", true)
		setPedAnimation(player, "CRACK", "crckdeth3", -1, false, true, false)
		setTimer(function()
			if getElementData(player, "PlayerCaido") then	
				killPlayer(player)
			end
		end, 240000, 1)
	end
end
addEvent("OnHS", true)
addEventHandler("OnHS", getRootElement(), SetarCaidoComHS)

function curar_jogador ( thePlayer, comando, nick )
    if nick then
        if getPlayerFromPartialName ( nick ) then
            local accName = getAccountName ( getPlayerAccount ( thePlayer ) )
            if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Samu") ) then
				local player_a_ser_curado    =   getPlayerFromPartialName ( nick )
				local samux, samuy, samuz = getElementPosition ( thePlayer )
				local curadox, curadoy, curadoz = getElementPosition ( player_a_ser_curado )
				local dist = getDistanceBetweenPoints3D ( samux, samuy, samuz, curadox, curadoy, curadoz )
				if player_a_ser_curado == thePlayer then
					outputChatBox("#bebebeVocê não pode se curar!",thePlayer,255,255,255,true)
					return
				end
				if ( dist > 3 )  then
				outputChatBox("#bebebeChegue mais perto do jogador!", thePlayer, 255, 255, 255, true)
				elseif ( dist < 3 )then
				setPedAnimation( thePlayer, "MEDIC", "CPR", 4500, true, false, false, false)
				setTimer ( function()
					setElementHealth ( player_a_ser_curado, 100 )
					setPedAnimation(player_a_ser_curado, false)
					setElementFrozen( player_a_ser_curado, false )
					setElementData(player_a_ser_curado,"PlayerCaido",false)
				end, 4500, 1 )	
				end		
			end
		end
	end
end
addCommandHandler ( "curar", curar_jogador )

Olá Boa Noite, achei esse script na internet "SAMU", porém quando o cidadão cai, consegue correr caido, apertando espaço consegue ficar correndo caido, porem era pra ficar caido sem conseguir se mecher, alguem pode mim ajudar? Desde já obrigado.

Link to comment
Tommy. Trick

Tommy.

Posted
Posted

Tente isso:

  

hpMin = 15
Tempo = {}
ColMedic = {}

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	

function ChecarVida()
	for i, player in pairs (getElementsByType("player")) do
		if not getElementData(player, "PlayerCaido") then
			local conta = getAccountName(getPlayerAccount(player))
				if getElementHealth(player) >= 1 then
					if getElementHealth(player) <= hpMin then 
						removePedFromVehicle(player)
						setElementData(player, "PlayerCaido", true)
						setElementFrozen(player, true)
						setPedAnimation(player, "CRACK", "crckdeth3", -1, false, true, false)
						setTimer(function()
							if getElementData(player, "PlayerCaido") then	
								killPlayer(player)
							end
						end, 240000, 1)
				end
			end
		else
			setPedAnimation(player, "CRACK", "crckdeth3", -1, false, true, false)
		end
	end
end
setTimer(ChecarVida, 200, 0)

function ChecarVidaA()
	for i, player in pairs (getElementsByType("player")) do
		if  getElementData(player, "PlayerCaido") then
		local conta = getAccountName(getPlayerAccount(player))
			if getElementHealth(player) >= 31 then
				setElementData(player, "PlayerCaido", false)
				setPedAnimation(player, false)
				setElementFrozen(player, false )
			end
		end
	end
end
setTimer(ChecarVidaA, 200, 0)

function SetarCaidoComHS()
	player = source
	if not getElementData(player, "PlayerCaido") then
		removePedFromVehicle(player)
		setElementHealth(player, 20)
		setElementData(player, "PlayerCaido", true)
    	setElementFrozen(player, true)
		setPedAnimation(player, "CRACK", "crckdeth3", -1, false, true, false)
		setTimer(function()
			if getElementData(player, "PlayerCaido") then	
				killPlayer(player)
			end
		end, 240000, 1)
	end
end
addEvent("OnHS", true)
addEventHandler("OnHS", getRootElement(), SetarCaidoComHS)

function curar_jogador ( thePlayer, comando, nick )
    if nick then
        if getPlayerFromPartialName ( nick ) then
            local accName = getAccountName ( getPlayerAccount ( thePlayer ) )
            if isObjectInACLGroup ("user."..accName, aclGetGroup ( "Samu") ) then
				local player_a_ser_curado    =   getPlayerFromPartialName ( nick )
				local samux, samuy, samuz = getElementPosition ( thePlayer )
				local curadox, curadoy, curadoz = getElementPosition ( player_a_ser_curado )
				local dist = getDistanceBetweenPoints3D ( samux, samuy, samuz, curadox, curadoy, curadoz )
				if player_a_ser_curado == thePlayer then
					outputChatBox("#bebebeVocê não pode se curar!",thePlayer,255,255,255,true)
					return
				end
				if ( dist > 3 )  then
				outputChatBox("#bebebeChegue mais perto do jogador!", thePlayer, 255, 255, 255, true)
				elseif ( dist < 3 )then
				setPedAnimation( thePlayer, "MEDIC", "CPR", 4500, true, false, false, false)
				setTimer ( function()
					setElementHealth ( player_a_ser_curado, 100 )
					setPedAnimation(player_a_ser_curado, false)
					setElementFrozen( player_a_ser_curado, false )
					setElementData(player_a_ser_curado,"PlayerCaido",false)
              		setElementFrozen(player_a_ser_curado, false)
				end, 4500, 1 )	
				end		
			end
		end
	end
end
addCommandHandler ( "curar", curar_jogador )

 

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
Go to topic listing

  • Recently Browsing   0 members

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