local F=script.Parent.Stats.Frame.Vida local H=script.Parent.Stats.Frame.Consciente local T=script.Parent.Stats.Frame.Dor local C=script.Parent.Stats.Frame.Ferido local b=script.Parent.Stats.Frame.Sangrando local A=TS:Create(b,TweenInfo.new(1,Enum.EasingStyle.Linear,Enum.EasingDirection.InOut,-1,true),{TextColor3=Color3.fromRGB(255,0,0)})A:Play()RS.RenderStepped:connect(function()if script.Parent.Visible==true then if Target.Value~=nil then local F=game.Players:FindFirstChild(Target.Value.Name)local H=F.Character:FindFirstChild("\065\067\083\095\067\108\105\101\110\116")if F and H then local H=F.Character.Humanoid local T=F.Character.ACS_Client.Variaveis.Sangue local C=H.Health/H.MaxHealth script.Parent.Overview.Frame.VidaBar.Bar.Size=UDim2.new(C,0,1,0)local b=T.Value/T.MaxValue script.Parent.Overview.Frame.SangueBar.Bar.Size=UDim2.new(b,0,1,0)else Target.Value=nil end else local F=Human.Health/Human.MaxHealth script.Parent.Overview.Frame.VidaBar.Bar.Size=UDim2.new(F,0,1,0)local H=Saude.Variaveis.Sangue.Value/Saude.Variaveis.Sangue.MaxValue script.Parent.Overview.Frame.SangueBar.Bar.Size=UDim2.new(H,0,1,0)end if Target.Value==nil then if Human.Health<=0 then F.Text="\068\101\097\100"F.TextColor3=Color3.fromRGB(255,0,0)H.Visible=false elseif Human.Health<=Human.MaxHealth*.5 then F.Text="\072\105\103\104 \082\105\115\107"F.TextColor3=Color3.fromRGB(255,0,0)H.Visible=true elseif Human.Health<=Human.MaxHealth*.75 then F.Text="\076\111\119 \082\105\115\107"F.TextColor3=Color3.fromRGB(255,255,0)H.Visible=true elseif Human.Health<=Human.MaxHealth then F.Text="\072\101\097\108\116\104\121"F.TextColor3=Color3.fromRGB(255,255,255)H.Visible=true end if Saude:GetAttribute("\067\111\108\108\097\112\115\101\100")==true then H.Text="\085\110\099\111\110\115\099\105\111\117\115"else H.Text="\067\111\110\115\099\105\111\117\115"end if Saude.Variaveis.Dor.Value<=0 then T.Text="\078\111 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,255,255)T.Visible=false elseif Saude.Variaveis.Dor.Value<=50 then T.Text="\077\105\110\111\114 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,255,255)T.Visible=true elseif Saude.Variaveis.Dor.Value<100 then T.Text="\077\097\106\111\114 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,255,0)T.Visible=true elseif Saude.Variaveis.Dor.Value>=100 then T.Text="\069\120\116\114\101\109\101 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,0,0)T.Visible=true end if Saude:GetAttribute("\073\110\106\117\114\101\100")==true then C.Visible=true else C.Visible=false end if Saude:GetAttribute("\066\108\101\101\100\105\110\103")==true or Saude:GetAttribute("\084\111\117\114\110\105\113\117\101\116")then if Saude:GetAttribute("\084\111\117\114\110\105\113\117\101\116")then b.Text="\084\111\117\114\110\105\113\117\101\116"else b.Text="\066\108\101\101\100\105\110\103"end b.Visible=true else b.Visible=false end else local A=game.Players:FindFirstChild(Target.Value.Name)local E=A.Character.Humanoid local o=A.Character.ACS_Client if E.Health>0 then if E.Health<=0 then F.Text="\068\101\097\100"F.TextColor3=Color3.fromRGB(255,0,0)H.Visible=false elseif E.Health<=E.MaxHealth*.5 then F.Text="\072\105\103\104 \082\105\115\107"F.TextColor3=Color3.fromRGB(255,0,0)H.Visible=true elseif E.Health<=E.MaxHealth*.75 then F.Text="\076\111\119 \082\105\115\107"F.TextColor3=Color3.fromRGB(255,255,0)H.Visible=true elseif E.Health<=E.MaxHealth then F.Text="\072\101\097\108\116\104\121"F.TextColor3=Color3.fromRGB(255,255,255)H.Visible=true end if o:GetAttribute("\067\111\108\108\097\112\115\101\100")==true then H.Text="\085\110\099\111\110\115\099\105\111\117\115"else H.Text="\067\111\110\115\099\105\111\117\115"end if o.Variaveis.Dor.Value<=0 then T.Text="\078\111 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,255,255)T.Visible=false elseif o.Variaveis.Dor.Value<=50 then T.Text="\077\105\110\111\114 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,255,255)T.Visible=true elseif o.Variaveis.Dor.Value<100 then T.Text="\077\097\106\111\114 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,255,0)T.Visible=true elseif o.Variaveis.Dor.Value>=100 then T.Text="\069\120\116\114\101\109\101 \112\097\105\110"T.TextColor3=Color3.fromRGB(255,0,0)T.Visible=true end if o:GetAttribute("\073\110\106\117\114\101\100")==true then C.Visible=true else C.Visible=false end if o:GetAttribute("\066\108\101\101\100\105\110\103")==true or o:GetAttribute("\084\111\117\114\110\105\113\117\101\116")then if o:GetAttribute("\084\111\117\114\110\105\113\117\101\116")then b.Text="\084\111\117\114\110\105\113\117\101\116"else b.Text="\066\108\101\101\100\105\110\103"end b.Visible=true else b.Visible=false end end end end end)
-----------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------
local Vida = script.Parent.Stats.Frame.Vida
local Consciente = script.Parent.Stats.Frame.Consciente
local Dor = script.Parent.Stats.Frame.Dor
local Ferido = script.Parent.Stats.Frame.Ferido
local Sangrando = script.Parent.Stats.Frame.Sangrando

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

RS.RenderStepped:connect(function()
	if script.Parent.Visible == true then
		if Target.Value ~= nil then
			local player = game.Players:FindFirstChild(Target.Value.Name)
			local P2_Client = player.Character:FindFirstChild("ACS_Client")

			if player and P2_Client then
				local vHuman = player.Character.Humanoid
				local vSang = player.Character.ACS_Client.Variaveis.Sangue

				local pie = (vHuman.Health / vHuman.MaxHealth)
				script.Parent.Overview.Frame.VidaBar.Bar.Size = UDim2.new(pie, 0, 1, 0)

				local Pizza = (vSang.Value / vSang.MaxValue)
				script.Parent.Overview.Frame.SangueBar.Bar.Size = UDim2.new(Pizza, 0, 1, 0)
			else
				Target.Value = nil
			end
		else
			local pie = (Human.Health / Human.MaxHealth)
			script.Parent.Overview.Frame.VidaBar.Bar.Size = UDim2.new(pie, 0, 1, 0)

			local Pizza = (Saude.Variaveis.Sangue.Value / Saude.Variaveis.Sangue.MaxValue)
			script.Parent.Overview.Frame.SangueBar.Bar.Size = UDim2.new(Pizza, 0, 1, 0)
		end

		if Target.Value == nil then
			if Human.Health <= 0 then
				Vida.Text = "Dead"
				Vida.TextColor3 = Color3.fromRGB(255, 0, 0)
				Consciente.Visible = false
			elseif Human.Health <= (Human.MaxHealth * 0.5) then
				Vida.Text = "High Risk"
				Vida.TextColor3 = Color3.fromRGB(255, 0, 0)
				Consciente.Visible = true
			elseif Human.Health <= (Human.MaxHealth * 0.75) then
				Vida.Text = "Low Risk"
				Vida.TextColor3 = Color3.fromRGB(255, 255, 0)
				Consciente.Visible = true
			elseif Human.Health <= Human.MaxHealth then
				Vida.Text = "Healthy"
				Vida.TextColor3 = Color3.fromRGB(255, 255, 255)
				Consciente.Visible = true
			end

			if Saude:GetAttribute("Collapsed") == 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)
				Dor.Visible = false
			elseif Saude.Variaveis.Dor.Value <= 50 then
				Dor.Text = "Minor pain"
				Dor.TextColor3 = Color3.fromRGB(255, 255, 255)
				Dor.Visible = true
			elseif Saude.Variaveis.Dor.Value < 100 then
				Dor.Text = "Major pain"
				Dor.TextColor3 = Color3.fromRGB(255, 255, 0)
				Dor.Visible = true
			elseif Saude.Variaveis.Dor.Value >= 100 then
				Dor.Text = "Extreme pain"
				Dor.TextColor3 = Color3.fromRGB(255, 0, 0)
				Dor.Visible = true
			end

			if Saude:GetAttribute("Injured") == true then
				Ferido.Visible = true
			else
				Ferido.Visible = false
			end

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

				if PlSaude:GetAttribute("Collapsed") == 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)
					Dor.Visible = false
				elseif PlSaude.Variaveis.Dor.Value <= 50 then
					Dor.Text = "Minor pain"
					Dor.TextColor3 = Color3.fromRGB(255, 255, 255)
					Dor.Visible = true
				elseif PlSaude.Variaveis.Dor.Value < 100 then
					Dor.Text = "Major pain"
					Dor.TextColor3 = Color3.fromRGB(255, 255, 0)
					Dor.Visible = true
				elseif PlSaude.Variaveis.Dor.Value >= 100 then
					Dor.Text = "Extreme pain"
					Dor.TextColor3 = Color3.fromRGB(255, 0, 0)
					Dor.Visible = true
				end

				if PlSaude:GetAttribute("Injured") == true then
					Ferido.Visible = true
				else
					Ferido.Visible = false
				end

				if PlSaude:GetAttribute("Bleeding") == true or PlSaude:GetAttribute("Tourniquet") then
					if PlSaude:GetAttribute("Tourniquet") then
						Sangrando.Text = "Tourniquet"
					else
						Sangrando.Text = "Bleeding"
					end
					Sangrando.Visible = true
				else
					Sangrando.Visible = false
				end
			end
		end
	end
end)
