Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- wait(0.1)
- local Character = script.Parent
- local Humanoid = Character:FindFirstChildWhichIsA("Humanoid")
- Humanoid.HealthDisplayType = Enum.HumanoidHealthDisplayType.AlwaysOff
- local Value = Instance.new("NumberValue",script)
- Value.Name = "Damage"
- local Halt = false
- local Halt2 = false
- local HeldTag = nil
- local LastDown = false
- local During = false
- local LastValue = 0
- local Color = Color3.new(1,1,1)
- local Sound = Instance.new("Sound",Character:WaitForChild("Head"))
- Sound.SoundId = "rbxassetid://877221802"
- Sound.EmitterSize = 100
- Sound.MaxDistance = 100000
- Humanoid.MaxHealth = 200
- local BBG = Instance.new("BillboardGui",Character)
- BBG.Adornee = Character:WaitForChild("Head")
- BBG.Size = UDim2.new(5,0,5,0)
- BBG.LightInfluence = 0.1
- BBG.StudsOffsetWorldSpace = Vector3.new(0,3,0)
- local TL = Instance.new("TextLabel",BBG)
- TL.AnchorPoint = Vector2.new(0.5,0)
- TL.Position = UDim2.new(0.5,0,-0.5,0)
- TL.Size = UDim2.new(2,0,2,0)
- TL.BackgroundTransparency = 1
- TL.TextStrokeTransparency = 0
- TL.TextScaled = true
- TL.Font = Enum.Font.SciFi
- TL.TextColor3 = Color3.new(1,1,1)
- TL.TextStrokeColor3 = Color3.new(0,0,0)
- function Changed()
- TL.Text = math.ceil(Value.Value / 10).."%"
- local Player = game.Players:GetPlayerFromCharacter(Character)
- if Player then
- local leaderstats = Player:FindFirstChild("leaderstats")
- if leaderstats then
- local damagestats = leaderstats:FindFirstChild("Damage")
- if not damagestats then
- damagestats = Instance.new("IntValue")
- damagestats.Name = "Damage"
- damagestats.Parent = leaderstats
- end
- damagestats.Value = math.ceil(Value.Value / 10)
- end
- end
- if LastValue >= Value.Value then
- LastDown = false
- else
- LastDown = true
- end
- LastValue = Value.Value
- if LastDown then
- During = true
- for i = 1,2 do
- BBG.StudsOffsetWorldSpace = Vector3.new(0,4,0)
- TL.TextColor3 = Color3.new(1,0,0)
- TL.TextStrokeColor3 = Color3.new(1,1,1)
- wait(0.01)
- BBG.StudsOffsetWorldSpace = Vector3.new(0,2,0)
- TL.TextColor3 = Color3.new(1,0,0)
- TL.TextStrokeColor3 = Color3.new(1,1,1)
- wait(0.01)
- end
- BBG.StudsOffsetWorldSpace = Vector3.new(0,3,0)
- TL.TextColor3 = Color3.new(1,1,1)
- TL.TextStrokeColor3 = Color3.new(0,0,0)
- During = false
- end
- end
- Value.Changed:connect(Changed)
- Changed()
- function Fling(part,damage)
- local BodyThrust = Instance.new("BodyThrust",part)
- BodyThrust.Force = Vector3.new(0,2 * (Value.Value * (damage / 5)),1 * (Value.Value * (damage / 5)))
- delay(0.05,function()
- if BodyThrust then
- BodyThrust:Destroy()
- end
- end)
- end
- function HealthChanged(NewHealth)
- if Halt or Humanoid:GetState() == Enum.HumanoidStateType.Dead then return end
- Halt = true
- Humanoid.MaxHealth = 200
- Value.Value = math.max(0,Value.Value + (100 - NewHealth))
- if 100 > NewHealth then
- if Value.Value > 500 then
- Humanoid.Sit = true
- end
- local Torso = Character:FindFirstChild("Torso") or Character:FindFirstChild("UpperTorso") or Character:FindFirstChild("HumanoidRootPart")
- if Torso then
- Fling(Torso,100 - NewHealth)
- else
- local Torso = Humanoid.RootPart
- if Torso then
- Fling(Torso,100 - NewHealth)
- end
- end
- end
- Humanoid.Health = 100
- Halt = false
- end
- Humanoid.HealthChanged:connect(HealthChanged)
- function ChildAdded(item)
- if Halt2 then return end
- Halt2 = true
- if HeldTag then
- HeldTag:Destroy()
- end
- if item.Name == "creator" then
- HeldTag = item:Clone()
- end
- Halt2 = false
- end
- Humanoid.ChildAdded:connect(ChildAdded)
- function Died()
- if Sound then
- Sound:Play()
- end
- Value.Value = 999990
- local D = Character:GetDescendants()
- for i = 1,#D do
- if D[i]:IsA("BasePart") and D[i]:FindFirstAncestorWhichIsA("Tool") == nil then
- D[i].Anchored = true
- D[i].Transparency = 1
- if D[i] == Humanoid.RootPart then
- local Attachment = Instance.new("Attachment",Humanoid.RootPart)
- Attachment.Rotation = -Humanoid.RootPart.Rotation
- local ParticleEmitter = Instance.new("ParticleEmitter",Attachment)
- ParticleEmitter.Enabled = false
- ParticleEmitter.Texture = "rbxasset://textures/particles/fire_main.dds"
- ParticleEmitter.LightEmission = 0.8
- ParticleEmitter.Color = ColorSequence.new(Color)
- ParticleEmitter.Size = NumberSequence.new(5,25)
- ParticleEmitter.Transparency = NumberSequence.new(0,1)
- ParticleEmitter.Lifetime = NumberRange.new(1.5)
- ParticleEmitter.Rate = 500
- ParticleEmitter.Rotation = NumberRange.new(-360,360)
- ParticleEmitter.Speed = NumberRange.new(0,0)
- ParticleEmitter.EmissionDirection = Enum.NormalId.Top
- ParticleEmitter:Emit(15)
- end
- end
- end
- end
- Humanoid.Died:connect(Died)
- while Humanoid:GetState() ~= Enum.HumanoidStateType.Dead do
- wait(0.01)
- if not During then
- local BodyColor = Character:FindFirstChildWhichIsA("BodyColors")
- if BodyColor ~= nil then
- Color = BodyColor.TorsoColor3
- TL.TextStrokeColor3 = BodyColor.LeftLegColor3
- end
- local Player = game.Players:GetPlayerFromCharacter(Character)
- if Player ~= nil and Player.Neutral == false then
- Color = Player.TeamColor.Color
- end
- TL.TextColor3 = Color
- end
- Changed()
- if Humanoid.RootPart ~= nil and (Humanoid.RootPart.Position.X > 500 or Humanoid.RootPart.Position.X < -500) then
- Value.Value = 999990
- if HeldTag then
- HeldTag.Parent = Humanoid
- end
- Character:BreakJoints()
- local Attachment = Instance.new("Attachment",Humanoid.RootPart)
- Humanoid.RootPart.Rotation = Vector3.new(0,0,0)
- local ParticleEmitter = Instance.new("ParticleEmitter",Attachment)
- ParticleEmitter.Enabled = false
- ParticleEmitter.Texture = "rbxasset://textures/particles/fire_main.dds"
- ParticleEmitter.LightEmission = 0.8
- ParticleEmitter.Color = ColorSequence.new(Color)
- ParticleEmitter.Size = NumberSequence.new(15,0)
- ParticleEmitter.Transparency = NumberSequence.new(0,0.5)
- ParticleEmitter.Lifetime = NumberRange.new(1.5)
- ParticleEmitter.Rate = 500
- ParticleEmitter.Rotation = NumberRange.new(-360,360)
- ParticleEmitter.Speed = NumberRange.new(-500,500)
- ParticleEmitter.EmissionDirection = Enum.NormalId.Left
- ParticleEmitter:Emit(100)
- end
- if Humanoid.RootPart ~= nil and (Humanoid.RootPart.Position.Z > 500 or Humanoid.RootPart.Position.Z < -500) then
- Value.Value = 999990
- if HeldTag then
- HeldTag.Parent = Humanoid
- end
- Character:BreakJoints()
- local Attachment = Instance.new("Attachment",Humanoid.RootPart)
- Humanoid.RootPart.Rotation = Vector3.new(0,0,0)
- local ParticleEmitter = Instance.new("ParticleEmitter",Attachment)
- ParticleEmitter.Enabled = false
- ParticleEmitter.Texture = "rbxasset://textures/particles/fire_main.dds"
- ParticleEmitter.LightEmission = 0.8
- ParticleEmitter.Color = ColorSequence.new(Color)
- ParticleEmitter.Size = NumberSequence.new(15,0)
- ParticleEmitter.Transparency = NumberSequence.new(0,0.5)
- ParticleEmitter.Lifetime = NumberRange.new(1.5)
- ParticleEmitter.Rate = 500
- ParticleEmitter.Rotation = NumberRange.new(-360,360)
- ParticleEmitter.Speed = NumberRange.new(-500,500)
- ParticleEmitter.EmissionDirection = Enum.NormalId.Front
- ParticleEmitter:Emit(100)
- end
- if Humanoid.RootPart ~= nil and (Humanoid.RootPart.Position.Y > 500 or Humanoid.RootPart.Position.Y < -10) then
- Value.Value = 999990
- if HeldTag then
- HeldTag.Parent = Humanoid
- end
- Character:BreakJoints()
- local Attachment = Instance.new("Attachment",Humanoid.RootPart)
- Humanoid.RootPart.Rotation = Vector3.new(0,0,0)
- local ParticleEmitter = Instance.new("ParticleEmitter",Attachment)
- ParticleEmitter.Enabled = false
- ParticleEmitter.Texture = "rbxasset://textures/particles/fire_main.dds"
- ParticleEmitter.LightEmission = 0.8
- ParticleEmitter.Color = ColorSequence.new(Color)
- ParticleEmitter.Size = NumberSequence.new(15,0)
- ParticleEmitter.Transparency = NumberSequence.new(0,0.5)
- ParticleEmitter.Lifetime = NumberRange.new(1.5)
- ParticleEmitter.Rate = 500
- ParticleEmitter.Rotation = NumberRange.new(-360,360)
- ParticleEmitter.Speed = NumberRange.new(-500,500)
- ParticleEmitter.EmissionDirection = Enum.NormalId.Top
- ParticleEmitter:Emit(100)
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement