Vampire Script

local function makevampire(human,dmg)
if(human.Health <= dmg)then
human.Parent.Head:FindFirstChildOfClass("Decal").Texture = "http://www.roblox.com/asset/?id=171384974"
if(human.Parent:FindFirstChildOfClass("BodyColors"))then
human.Parent:FindFirstChildOfClass("BodyColors"):remove()
end
local s = Instance.new("Sound")
s.Parent = human.Parent.Head
s.Name = "Mario"
s.SoundId = "http://www.roblox.com/asset/?id=1973317014"
s:Play()
--human.WalkSpeed = 25
human.Parent:FindFirstChildOfClass("BodyColors")
local r = Instance.new("Accoutrement")
r.Parent = human.Parent
r.Name = "IsVampire"
local s = human.Parent:GetChildren()
for i = 1,#s do
if(s[i].ClassName == "Part")then
s[i].Color = Color3.new(0,0,0)
s[i].Anchored = true
wait(0.7)
s[i].Anchored = false
s[i].Touched:connect(function(hit)
if(hit.Parent:FindFirstChild("Humanoid")) and not (hit.Parent:FindFirstChild("IsVampire"))then
makevampire(hit.Parent.Humanoid,dmg)
end
end)
end
end
human.Parent.Head:FindFirstChildOfClass("Decal").Texture = "http://www.roblox.com/asset/?id=127959433"
if(game.Players:GetPlayerFromCharacter(human.Parent))then
game.Players:GetPlayerFromCharacter(human.Parent).TeamColor = BrickColor.new("Dark stone grey")
end
else
local r = Instance.new("Accoutrement")
r.Parent = human.Parent
r.Name = "IsVampire"
human.Parent.Torso.Anchored = true
human:TakeDamage(dmg)
if(human.Parent.Head:FindFirstChild("MarioOof"))then
human.Parent.Head.MarioOof:Play()
else
local s = Instance.new("Sound")
s.Parent = human.Parent.Head
s.Name = "MarioOof"
s.SoundId = "http://www.roblox.com/asset/?id=2815207981"
s:Play()
end
wait(0.5)
human.Parent.Torso.Anchored = false
wait(1)
r:remove()
end
end


local r = Instance.new("Accoutrement")
r.Parent = game.Workspace.magic277
r.Name = "IsVampire"
local s = game.Workspace.magic277:GetChildren()
for i = 1, #s do
if(s[i].ClassName == "Part")then
s[i].Touched:connect(function(hit)
if(hit.Parent:FindFirstChild("Humanoid")) and not (hit.Parent:FindFirstChild("IsVampire"))then
makevampire(hit.Parent.Humanoid,40)
end
end)
end
end