local S=script.Parent.Overhaul.Vida local Q=script.Parent.Overhaul.Consciente local X=script.Parent.Overhaul.Dor local y=script.Parent.Overhaul.Ferido local V=script.Parent.Overhaul.Sangrando local Y=TS:Create(V,TweenInfo.new(1,Enum.EasingStyle.Linear,Enum.EasingDirection.InOut,-1,true),{TextColor3=Color3.fromRGB(255,0,0)})RS.RenderStepped:connect(function()if script.Parent.Visible==true then if Target.Value~="\078\047\065"then local S=game.Players:FindFirstChild(Target.Value)local Q=S.Character.Humanoid local X=S.Character.Saude.Variaveis.Sangue local y=Q.Health/Q.MaxHealth script.Parent.Menu.Base.VidaBar.Sangue.Size=UDim2.new(1,0,-y,0)local V=X.Value/X.MaxValue script.Parent.Menu.Base.SangueBar.Sangue.Size=UDim2.new(1,0,-V,0)else local S=Human.Health/Human.MaxHealth script.Parent.Menu.Base.VidaBar.Sangue.Size=UDim2.new(1,0,-S,0)local Q=Saude.Variaveis.Sangue.Value/Saude.Variaveis.Sangue.MaxValue script.Parent.Menu.Base.SangueBar.Sangue.Size=UDim2.new(1,0,-Q,0)end if Target.Value=="\078\047\065"then if Human.Health<=0 then S.Text="\068\101\097\100"S.TextColor3=Color3.fromRGB(255,0,0)elseif Human.Health<=Human.MaxHealth*.5 then S.Text="\072\105\103\104 \082\105\115\107"S.TextColor3=Color3.fromRGB(255,0,0)elseif Human.Health<=Human.MaxHealth*.75 then S.Text="\076\111\119 \082\105\115\107"S.TextColor3=Color3.fromRGB(255,255,0)elseif Human.Health<=Human.MaxHealth then S.Text="\072\101\097\108\116\104\121"S.TextColor3=Color3.fromRGB(255,255,255)end if Saude.Stances.Caido.Value==true then Q.Text="\085\110\099\111\110\115\099\105\111\117\115"else Q.Text="\067\111\110\115\099\105\111\117\115"end if Saude.Variaveis.Dor.Value<=0 then X.Text="\078\111 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,255,255)elseif Saude.Variaveis.Dor.Value<=25 then X.Text="\077\105\110\111\114 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,255,255)elseif Saude.Variaveis.Dor.Value<100 then X.Text="\077\097\106\111\114 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,255,0)elseif Saude.Variaveis.Dor.Value>=100 then X.Text="\069\120\116\114\101\109\101 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,0,0)end if Saude.Stances.Ferido.Value==true then y.Visible=true else y.Visible=false end if Saude.Stances.Sangrando.Value==true or Saude.Stances.Tourniquet.Value==true then if Saude.Stances.Tourniquet.Value==true then V.Text="\084\111\117\114\110\105\113\117\101\116"else V.Text="\066\108\101\101\100\105\110\103"end V.Visible=true V.TextColor3=Color3.fromRGB(255,255,255)Y:Play()else V.Visible=false Y:Cancel()end else local w=game.Players:FindFirstChild(Target.Value)local g=w.Character.Humanoid local r=w.Character.Saude if g.Health>0 then if g.Health<=0 then S.Text="\068\101\097\100"S.TextColor3=Color3.fromRGB(255,0,0)elseif g.Health<=g.MaxHealth*.5 then S.Text="\072\105\103\104 \082\105\115\107"S.TextColor3=Color3.fromRGB(255,0,0)elseif g.Health<=g.MaxHealth*.75 then S.Text="\076\111\119 \082\105\115\107"S.TextColor3=Color3.fromRGB(255,255,0)elseif g.Health<=g.MaxHealth then S.Text="\072\101\097\108\116\104\121"S.TextColor3=Color3.fromRGB(255,255,255)end if r.Stances.Caido.Value==true then Q.Text="\085\110\099\111\110\115\099\105\111\117\115"else Q.Text="\067\111\110\115\099\105\111\117\115"end if r.Variaveis.Dor.Value<=0 then X.Text="\078\111 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,255,255)elseif r.Variaveis.Dor.Value<=25 then X.Text="\077\105\110\111\114 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,255,255)elseif r.Variaveis.Dor.Value<100 then X.Text="\077\097\106\111\114 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,255,0)elseif r.Variaveis.Dor.Value>=100 then X.Text="\069\120\116\114\101\109\101 \112\097\105\110"X.TextColor3=Color3.fromRGB(255,0,0)end if r.Stances.Ferido.Value==true then y.Visible=true else y.Visible=false end if r.Stances.Sangrando.Value==true or r.Stances.Tourniquet.Value==true then if r.Stances.Tourniquet.Value==true then V.Text="\084\111\117\114\110\105\113\117\101\116"else V.Text="\066\108\101\101\100\105\110\103"end V.Visible=true V.TextColor3=Color3.fromRGB(255,255,255)Y:Play()else V.Visible=false Y:Cancel()end else Reset:FireServer()end end end end)
-----------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------
local Vida = script.Parent.Overhaul.Vida
local Consciente = script.Parent.Overhaul.Consciente
local Dor = script.Parent.Overhaul.Dor
local Ferido = script.Parent.Overhaul.Ferido
local Sangrando = script.Parent.Overhaul.Sangrando

local BleedTween = TS:Create(
	Sangrando,
	TweenInfo.new(1, Enum.EasingStyle.Linear, Enum.EasingDirection.InOut, -1, true),
	{ TextColor3 = Color3.fromRGB(255, 0, 0) }
)

RS.RenderStepped:connect(function()
	if script.Parent.Visible == true then
		if Target.Value ~= "N/A" then
			local player = game.Players:FindFirstChild(Target.Value)
			local vHuman = player.Character.Humanoid
			local vSang = player.Character.Saude.Variaveis.Sangue

			local pie = (vHuman.Health / vHuman.MaxHealth)
			script.Parent.Menu.Base.VidaBar.Sangue.Size = UDim2.new(1, 0, -pie, 0)

			local Pizza = (vSang.Value / vSang.MaxValue)
			script.Parent.Menu.Base.SangueBar.Sangue.Size = UDim2.new(1, 0, -Pizza, 0)
		else
			local pie = (Human.Health / Human.MaxHealth)
			script.Parent.Menu.Base.VidaBar.Sangue.Size = UDim2.new(1, 0, -pie, 0)

			local Pizza = (Saude.Variaveis.Sangue.Value / Saude.Variaveis.Sangue.MaxValue)
			script.Parent.Menu.Base.SangueBar.Sangue.Size = UDim2.new(1, 0, -Pizza, 0)
		end

		if Target.Value == "N/A" then
			if Human.Health <= 0 then
				Vida.Text = "Dead"
				Vida.TextColor3 = Color3.fromRGB(255, 0, 0)
			elseif Human.Health <= (Human.MaxHealth * 0.5) then
				Vida.Text = "High Risk"
				Vida.TextColor3 = Color3.fromRGB(255, 0, 0)
			elseif Human.Health <= (Human.MaxHealth * 0.75) then
				Vida.Text = "Low Risk"
				Vida.TextColor3 = Color3.fromRGB(255, 255, 0)
			elseif Human.Health <= Human.MaxHealth then
				Vida.Text = "Healthy"
				Vida.TextColor3 = Color3.fromRGB(255, 255, 255)
			end

			if Saude.Stances.Caido.Value == true then
				Consciente.Text = "Unconscious"
			else
				Consciente.Text = "Conscious"
			end

			if Saude.Variaveis.Dor.Value <= 0 then
				Dor.Text = "No pain"
				Dor.TextColor3 = Color3.fromRGB(255, 255, 255)
			elseif Saude.Variaveis.Dor.Value <= 25 then
				Dor.Text = "Minor pain"
				Dor.TextColor3 = Color3.fromRGB(255, 255, 255)
			elseif Saude.Variaveis.Dor.Value < 100 then
				Dor.Text = "Major pain"
				Dor.TextColor3 = Color3.fromRGB(255, 255, 0)
			elseif Saude.Variaveis.Dor.Value >= 100 then
				Dor.Text = "Extreme pain"
				Dor.TextColor3 = Color3.fromRGB(255, 0, 0)
			end

			if Saude.Stances.Ferido.Value == true then
				Ferido.Visible = true
			else
				Ferido.Visible = false
			end

			if Saude.Stances.Sangrando.Value == true or Saude.Stances.Tourniquet.Value == true then
				if Saude.Stances.Tourniquet.Value == true then
					Sangrando.Text = "Tourniquet"
				else
					Sangrando.Text = "Bleeding"
				end
				Sangrando.Visible = true
				Sangrando.TextColor3 = Color3.fromRGB(255, 255, 255)
				BleedTween:Play()
			else
				Sangrando.Visible = false
				BleedTween:Cancel()
			end
		else
			local player2 = game.Players:FindFirstChild(Target.Value)
			local PlHuman = player2.Character.Humanoid
			local PlSaude = player2.Character.Saude
			if PlHuman.Health > 0 then
				if PlHuman.Health <= 0 then
					Vida.Text = "Dead"
					Vida.TextColor3 = Color3.fromRGB(255, 0, 0)
				elseif PlHuman.Health <= (PlHuman.MaxHealth * 0.5) then
					Vida.Text = "High Risk"
					Vida.TextColor3 = Color3.fromRGB(255, 0, 0)
				elseif PlHuman.Health <= (PlHuman.MaxHealth * 0.75) then
					Vida.Text = "Low Risk"
					Vida.TextColor3 = Color3.fromRGB(255, 255, 0)
				elseif PlHuman.Health <= PlHuman.MaxHealth then
					Vida.Text = "Healthy"
					Vida.TextColor3 = Color3.fromRGB(255, 255, 255)
				end

				if PlSaude.Stances.Caido.Value == true then
					Consciente.Text = "Unconscious"
				else
					Consciente.Text = "Conscious"
				end

				if PlSaude.Variaveis.Dor.Value <= 0 then
					Dor.Text = "No pain"
					Dor.TextColor3 = Color3.fromRGB(255, 255, 255)
				elseif PlSaude.Variaveis.Dor.Value <= 25 then
					Dor.Text = "Minor pain"
					Dor.TextColor3 = Color3.fromRGB(255, 255, 255)
				elseif PlSaude.Variaveis.Dor.Value < 100 then
					Dor.Text = "Major pain"
					Dor.TextColor3 = Color3.fromRGB(255, 255, 0)
				elseif PlSaude.Variaveis.Dor.Value >= 100 then
					Dor.Text = "Extreme pain"
					Dor.TextColor3 = Color3.fromRGB(255, 0, 0)
				end

				if PlSaude.Stances.Ferido.Value == true then
					Ferido.Visible = true
				else
					Ferido.Visible = false
				end

				if PlSaude.Stances.Sangrando.Value == true or PlSaude.Stances.Tourniquet.Value == true then
					if PlSaude.Stances.Tourniquet.Value == true then
						Sangrando.Text = "Tourniquet"
					else
						Sangrando.Text = "Bleeding"
					end
					Sangrando.Visible = true
					Sangrando.TextColor3 = Color3.fromRGB(255, 255, 255)
					BleedTween:Play()
				else
					Sangrando.Visible = false
					BleedTween:Cancel()
				end
			else
				Reset:FireServer()
			end
		end
	end
end)
