Zombie

--By iiJoeCats (This is supposed to be for Halloween.)
--//BO NOT EDIT WHAT IS UNDER THIS UNLESS YOU KNOW WHAT YOUR DOING\\--
repeat wait(1) until game.Players.LocalPlayer
print("Running...")
local player = game.Players.LocalPlayer
local mouse = player:GetMouse()
local UIS = game:GetService("UserInputService")
local character = player.Character
local run = game:GetService("RunService")
local TweenS = game:GetService("TweenService")
local runS = run.RenderStepped
local maincolor = BrickColor.new("Camo")
local attack = false
local hum = character:FindFirstChildOfClass("Humanoid")
local rArm = character["Right Arm"]
local lArm = character["Left Arm"]
local rLeg = character["Right Leg"]
local lLeg = character["Left Leg"]
local tors = character.Torso
local hed = character.Head
local root = character.HumanoidRootPart
local rootj = root.RootJoint
local op = false
Instance.new("BoolValue",character).Name = "Zombie"
local names = {
    "oof",
    "wow",
    "OwO",
    "memes",
    "dedXD",
    "baby-shark",
    "wasted",
    "whostoleyourmomscokeandjustgothigh",
    "furry",
    "iburryguts",
    "fortnite",
    "BOI",
    "yodahitsthebooftoohardandfukingdiesXD"
}
function removeItem(item,timer)
    game:GetService("Debris"):AddItem(item,timer)
end
function morph()
    local bc = character:FindFirstChildOfClass("BodyColors")
    if bc then
        bc.HeadColor = maincolor
        bc.LeftArmColor = maincolor
        bc.RightArmColor = maincolor
        bc.LeftLegColor = maincolor
        bc.RightLegColor = maincolor
        bc.TorsoColor = maincolor
    else
        local newBc = Instance.new("BodyColors",character)
        newBc.HeadColor = maincolor
        newBc.LeftArmColor = maincolor
        newBc.RightArmColor = maincolor
        newBc.LeftLegColor = maincolor
        newBc.RightLegColor = maincolor
        newBc.TorsoColor = maincolor
    end
end
spawn(function()
    morph()
end)
hum.WalkSpeed = 20
local raWeld = Instance.new("Weld",tors)
raWeld.Part0 = tors
raWeld.Part1 = rArm
raWeld.C0 = CFrame.new(1.5,.5,-.5) * CFrame.fromEulerAnglesXYZ(math.rad(90),math.rad(0),math.rad(0))
local laWeld = Instance.new("Weld",tors)
laWeld.Part0 = tors
laWeld.Part1 = lArm
laWeld.C0 = CFrame.new(-1.5,.5,-.5) * CFrame.fromEulerAnglesXYZ(math.rad(90),math.rad(0),math.rad(0))
local theme = Instance.new("Sound",character)
theme.SoundId = "rbxassetid://1722896592"
theme.Volume = 1
theme.PlaybackSpeed = 1.01
theme.Looped = true
theme.MaxDistance = 5000
theme:Play()
function maul()
    local hedWeld = Instance.new("Weld",tors)
    hedWeld.Part0 = tors
    hedWeld.Part1 = hed
    hedWeld.C0 = CFrame.new(0,1.5,0) * CFrame.fromEulerAnglesXYZ(math.rad(0),math.rad(0),math.rad(0))
    for i = 0,1,0.29 do
        runS:wait()
        raWeld.C0 = raWeld.C0:lerp(CFrame.new(0.9,1.35,-.75) * CFrame.fromEulerAnglesXYZ(math.rad(135),math.rad(0),math.rad(-35)),i)
        laWeld.C0 = laWeld.C0:lerp(CFrame.new(-0.9,1.35,-.75) * CFrame.fromEulerAnglesXYZ(math.rad(135),math.rad(0),math.rad(35)),i)
        hedWeld.C0 = hedWeld.C0:lerp(CFrame.new(0,1.5,.45) * CFrame.fromEulerAnglesXYZ(math.rad(45),math.rad(0),math.rad(0)),i)
    end
    wait(0.25)
    for i = 0,0.86,0.3 do
        runS:wait()
        raWeld.C0 = raWeld.C0:lerp(CFrame.new(0.9,0.15,-.75) * CFrame.fromEulerAnglesXYZ(math.rad(20),math.rad(0),math.rad(-35)),i)
        laWeld.C0 = laWeld.C0:lerp(CFrame.new(-0.9,0.15,-.75) * CFrame.fromEulerAnglesXYZ(math.rad(20),math.rad(0),math.rad(35)),i)
        hedWeld.C0 = hedWeld.C0:lerp(CFrame.new(0,1.5,-.41) * CFrame.fromEulerAnglesXYZ(math.rad(-35),math.rad(0),math.rad(0)),i)
    end
    local function touched(prt)
        local humn = prt.Parent:FindFirstChildOfClass("Humanoid")
        if humn then
            local suspect = humn.Parent
            if suspect then
                if humn.Health > 0 then
                    local val = suspect:FindFirstChildOfClass("BinaryStringValue")
                    local secondVal = suspect:FindFirstChild("Zombie")
                    if not val then
                        Instance.new("BinaryStringValue",suspect).Name = names[math.random(1, #names)]
                        spawn(function()
                            if op == false then
                                humn:TakeDamage(math.random(15,20))
                            else
                                suspect:BreakJoints()
                            end
                            local sound = Instance.new("Sound",suspect)
                            sound.SoundId = "rbxassetid://131237241"
                            sound.Volume = 10
                            sound.MaxDistance = 1000
                            sound:Play()
                            removeItem(sound,1.4)
                            for i = 1,6 do
                                local bld = Instance.new("Part",suspect)
                                bld.BrickColor = BrickColor.new("Maroon")
                                bld.Material = Enum.Material.Glass
                                bld.Transparency = 0.45
                                bld.Reflectance = 0.75
                                bld.Size = Vector3.new(math.random(1,2),0.05,math.random(1,2))
                                bld.TopSurface = Enum.SurfaceType.Smooth
                                bld.BottomSurface = Enum.SurfaceType.Smooth
                                bld.Position = suspect.Head.Position + Vector3.new(math.random(-3,3),0,math.random(-3,3))
                                removeItem(bld,1.2)
                            end
                        end)
                        wait(0.5)
                        suspect:FindFirstChildOfClass("BinaryStringValue"):Destroy()
                    else
                        --nothing
                    end
                end
            end
        end
    end
    local touch = rArm.Touched:Connect(touched)
    local touch2 = lArm.Touched:Connect(touched)
    wait(0.1)
    for i = 0,1,0.25 do
        runS:wait()
        raWeld.C0 = raWeld.C0:lerp(CFrame.new(1.5,.5,-.5) * CFrame.fromEulerAnglesXYZ(math.rad(90),math.rad(0),math.rad(0)),i)
        laWeld.C0 = laWeld.C0:lerp(CFrame.new(-1.5,.5,-.5) * CFrame.fromEulerAnglesXYZ(math.rad(90),math.rad(0),math.rad(0)),i)
        hedWeld.C0 = hedWeld.C0:lerp(CFrame.new(0,1.5,0) * CFrame.fromEulerAnglesXYZ(math.rad(0),math.rad(0),math.rad(0)),i)
    end
    wait(0.1)
    touch:Disconnect()
    touch2:Disconnect()
    hedWeld:Destroy()
end
mouse.KeyDown:Connect(function(key)
    if not attack then
        if key == "q" then
            attack = true
            maul()
            attack = false
        end
        if key == "f" and player.Name == "iiJoeCats" then
            op = not op
        end
    end
    if key == "e" then
        theme.Playing = not theme.Playing
    end
end)
while runS:wait() do
    if run:IsClient() then
        --local
        workspace.CurrentCamera.FieldOfView = 70 + theme.PlaybackLoudness / 100
    else
        --server
    end
end