ROBLOX Boombox Head Explosion Script

screem = Instance.new("Sound", game.Players.LocalPlayer.Character.Head)
screem.SoundId = "rbxassetid://362485838"
screem.Volume = 30
plr = game.Players.LocalPlayer.Character
mouse = game.Players.LocalPlayer:GetMouse()
function key(key)
    key = key:lower()
    if key == "q" then
    for i = 1,10 do
    wait()
    plr.Torso.Neck.C0 = plr.Torso.Neck.C0 * CFrame.Angles(-0.07,0,0)
    plr.Torso["Left Shoulder"].C0 = plr.Torso["Left Shoulder"].C0 * CFrame.new(0,-0.15,0.05)
    plr.Torso["Left Shoulder"].C0 = plr.Torso["Left Shoulder"].C0 * CFrame.Angles(-0.3,0,0)
    plr.Torso["Right Shoulder"].C0 = plr.Torso["Right Shoulder"].C0 * CFrame.new(0,-0.15,0.05)
    plr.Torso["Right Shoulder"].C0 = plr.Torso["Right Shoulder"].C0 * CFrame.Angles(-0.3,0,0)
    end
    local boomb = Instance.new("Part", plr.Head)
    local mesh = Instance.new("SpecialMesh", boomb)
    mesh.MeshId = "http://www.roblox.com/asset/?id=192488915"
    mesh.TextureId = "http://www.roblox.com/asset/?id=192488947"
    local weld = Instance.new("Weld", boomb)
    weld.Part0 = boomb
    weld.Part1 = plr["Left Arm"]
    weld.C0 = weld.C0 * CFrame.Angles(0,0,3.3)
    weld.C0 = weld.C0 * CFrame.new(1.9,1.65,0)
    plr.Humanoid.JumpPower = 0
    plr.Humanoid.WalkSpeed = 0
    local cringe = Instance.new("Sound", boomb)
    cringe.Volume = 20
    local Math = math.random(1,4)
    if Math == 1 then
    cringe.SoundId = "rbxassetid://362485838"
    end
    if Math == 2 then
    cringe.SoundId = "rbxassetid://362485838"
    end
    if Math == 3 then
    cringe.SoundId = "rbxassetid://362485838"
    end
    if Math == 4 then
    cringe.SoundId = "rbxassetid://362485838"
    end
    cringe:Play()
    wait(8)
    screem:Play()
    for i = 1,150 do
    wait()
    plr.Torso.Neck.C0 = plr.Torso.Neck.C0 * CFrame.Angles(math.random(0.1,0.9),math.random(0.1,0.9),math.random(0.1,0.9))
end
local boom = Instance.new("Explosion", workspace)
boom.BlastPressure = 2000000
boom.BlastRadius = 50
boom.Position = boomb.Position
screem:Stop()
end
end
mouse.KeyDown:connect(key)