FE Suicide Gun v4

if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,game,owner = owner,game
local RealPlayer = Player
do
    print("FE Compatibility code by Mokiros")
    local rp = RealPlayer
    script.Parent = rp.Character

    --RemoteEvent for communicating
    local Event = Instance.new("RemoteEvent")
    Event.Name = "UserInput_Event"

    --Fake event to make stuff like Mouse.KeyDown work
    local function fakeEvent()
        local t = {_fakeEvent=true,Functions={},Connect=function(self,f)table.insert(self.Functions,f) end}
        t.connect = t.Connect
        return t
    end

    --Creating fake input objects with fake variables
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
    local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
    local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
        CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
    end}
    --Merged 2 functions into one by checking amount of arguments
    CAS.UnbindAction = CAS.BindAction

    --This function will trigger the events that have been :Connect()'ed
    local function te(self,ev,...)
        local t = m[ev]
        if t and t._fakeEvent then
            for _,f in pairs(t.Functions) do
                f(...)
            end
        end
    end
    m.TrigEvent = te
    UIS.TrigEvent = te

    Event.OnServerEvent:Connect(function(plr,io)
        if plr~=rp then return end
        m.Target = io.Target
        m.Hit = io.Hit
        if not io.isMouse then
            local b = io.UserInputState == Enum.UserInputState.Begin
            if io.UserInputType == Enum.UserInputType.MouseButton1 then
                return m:TrigEvent(b and "Button1Down" or "Button1Up")
            end
            for _,t in pairs(CAS.Actions) do
                for _,k in pairs(t.Keys) do
                    if k==io.KeyCode then
                        t.Function(t.Name,io.UserInputState,io)
                    end
                end
            end
            m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
            UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
        end
    end)
    Event.Parent = NLS([==[
    local Player = game:GetService("Players").LocalPlayer
    local Event = script:WaitForChild("UserInput_Event")

    local Mouse = Player:GetMouse()
    local UIS = game:GetService("UserInputService")
    local input = function(io,a)
        if a then return end
        --Since InputObject is a client-side instance, we create and pass table instead
        Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState,Hit=Mouse.Hit,Target=Mouse.Target})
    end
    UIS.InputBegan:Connect(input)
    UIS.InputEnded:Connect(input)

    local h,t
    --Give the server mouse data 30 times every second, but only if the values changed
    --If player is not moving their mouse, client won't fire events
    while wait(1/30) do
        if h~=Mouse.Hit or t~=Mouse.Target then
            h,t=Mouse.Hit,Mouse.Target
            Event:FireServer({isMouse=true,Target=t,Hit=h})
        end
    end]==],Player.Character)

    ----Sandboxed game object that allows the usage of client-side methods and services
    --Real game object
    local _rg = game

    --Metatable for fake service
    local fsmt = {
        __index = function(self,k)
            local s = rawget(self,"_RealService")
            if s then return s[k] end
        end,
        __newindex = function(self,k,v)
            local s = rawget(self,"_RealService")
            if s then s[k]=v end
        end,
        __call = function(self,...)
            local s = rawget(self,"_RealService")
            if s then return s(...) end
        end
    }
    local function FakeService(t,RealService)
        t._RealService = typeof(RealService)=="string" and _rg:GetService(RealService) or RealService
        return setmetatable(t,fsmt)
    end

    --Fake game object
    local g = {
        GetService = function(self,s)
            return self[s]
        end,
        Players = FakeService({
            LocalPlayer = FakeService({GetMouse=function(self)return m end},Player)
        },"Players"),
        UserInputService = FakeService(UIS,"UserInputService"),
        ContextActionService = FakeService(CAS,"ContextActionService"),
    }
    rawset(g.Players,"localPlayer",g.Players.LocalPlayer)
    g.service = g.GetService

    g.RunService = FakeService({
        RenderStepped = _rg:GetService("RunService").Heartbeat,
        BindToRenderStep = function(self,name,_,fun)
            self._btrs[name] = self.Heartbeat:Connect(fun)
        end,
        UnbindFromRenderStep = function(self,name)
            self._btrs[name]:Disconnect()
        end,
    },"RunService")

    setmetatable(g,{
        __index=function(self,s)
            return _rg:GetService(s) or typeof(_rg[s])=="function"
            and function(_,...)return _rg[s](_rg,...)end or _rg[s]
        end,
        __newindex = fsmt.__newindex,
        __call = fsmt.__call
    })
    --Changing owner to fake player object to support owner:GetMouse()
    game,owner = g,g.Players.LocalPlayer
end

--By Rufus14, first script on my new Pastebin account.
--Converted with ttyyuu12345's model to script plugin v4
mouse = game.Players.LocalPlayer:GetMouse()
function sandbox(var,func)
	local env = getfenv(func)
	local newenv = setmetatable({},{
		__index = function(self,k)
			if k=="script" then
				return var
			else
				return env[k]
			end
		end,
	})
	setfenv(func,newenv)
	return func
end
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
Part0 = Instance.new("Part")
SpecialMesh1 = Instance.new("SpecialMesh")
Part0.Name = "your end of life"
Part0.Parent = mas
Part0.CanCollide = false
Part0.Size = Vector3.new(1, 1, 1)
Part0.CFrame = CFrame.new(64.5, 1.5, -24.5, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Part0.BottomSurface = Enum.SurfaceType.Smooth
Part0.TopSurface = Enum.SurfaceType.Smooth
Part0.Position = Vector3.new(64.5, 1.5, -24.5)
SpecialMesh1.Parent = Part0
SpecialMesh1.MeshId = "rbxassetid://476920625"
SpecialMesh1.Scale = Vector3.new(0.0500000007, 0.0500000007, 0.0500000007)
SpecialMesh1.TextureId = "rbxassetid://476920703"
SpecialMesh1.MeshType = Enum.MeshType.FileMesh
SpecialMesh1.Scale = Vector3.new(0.0500000007, 0.0500000007, 0.0500000007)
for i,v in pairs(mas:GetChildren()) do
	v.Parent = game:GetService("Players").LocalPlayer.Character
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end
Part0:BreakJoints()
gunweld = Instance.new("Weld", Part0)
gunweld.Part0 = game.Players.LocalPlayer.Character["Right Arm"]
gunweld.Part1 = Part0
gunweld.C0 = CFrame.fromEulerAnglesXYZ(-math.pi/2,0,0) * CFrame.new(0,0,-1.5)
enditall = false
function endit()
	if not enditall then
		enditall = true
		if game.Players.LocalPlayer.Character.Head:findFirstChild("face") then
			game.Players.LocalPlayer.Character.Head.face.Texture = "rbxassetid://1148787155"
		end
		local rhandclone = game.Players.LocalPlayer.Character.Torso["Right Shoulder"]:Clone()
		local rhandweld = Instance.new("Weld", game.Players.LocalPlayer.Character.Torso)
		rhandweld.Part0 = game.Players.LocalPlayer.Character.Torso
		rhandweld.Part1 = game.Players.LocalPlayer.Character["Right Arm"]
		rhandweld.C0 = CFrame.new(1.5, 0, 0, 1, -1.6395192e-43, 0, -1.6395192e-43, 1, 0, 0, 0, 1)
		local lhandclone = game.Players.LocalPlayer.Character.Torso["Left Shoulder"]:Clone()
		local lhandweld = Instance.new("Weld", game.Players.LocalPlayer.Character.Torso)
		lhandweld.Part0 = game.Players.LocalPlayer.Character.Torso
		lhandweld.Part1 = game.Players.LocalPlayer.Character["Left Arm"]
		canshake = true
		lhandweld.C0 = CFrame.new(-1.5, 0, 0, 1, -1.6395192e-43, 0, -1.6395192e-43, 1, 0, 0, 0, 1)
		local function shake()
			if canshake then
				local lhandweldcoord = lhandweld.C0
				local rhandweldcoord = rhandweld.C0
				lhandweld.C0 = lhandweld.C0 * CFrame.fromEulerAnglesXYZ(math.random(-1,1) / 90,math.random(-1,1) / 90,math.random(-1,1) / 90)
				rhandweld.C0 = rhandweld.C0 * CFrame.fromEulerAnglesXYZ(math.random(-1,1) / 90,math.random(-1,1) / 90,math.random(-1,1) / 90)
				game:GetService("RunService").RenderStepped:wait()
				lhandweld.C0 = lhandweldcoord
				rhandweld.C0 = rhandweldcoord
			end
		end
		game:GetService("RunService").RenderStepped:connect(shake)
		for i = 0,0.2, 0.003 do
			lhandweld.C0 = lhandweld.C0:lerp(CFrame.new(-1.024086, 0.326375008, -0.685035706, 0.725385964, -0.677214801, 0.123269573, 0.252294838, 0.0949550942, -0.962980211, 0.640439332, 0.729632616, 0.23973687),i)
			rhandweld.C0 = rhandweld.C0:lerp(CFrame.new(0.996749878, 0.362232208, -0.693548203, 0.696461976, 0.702955902, -0.144200265, -0.238405854, 0.0371298455, -0.970455587, -0.676833391, 0.71026361, 0.193448365),i)
			gunweld.C0 = gunweld.C0:lerp(CFrame.new(-0.603973389, -0.884958267, -0.402515411, 0.696461976, -0.592066884, 0.405459702, 0.702955902, 0.676452041, -0.219694391, -0.144200265, 0.43802911, 0.887320042),i)
			game:GetService("RunService").RenderStepped:wait()
		end
		wait(math.random(0,3))
		local aaa = Instance.new("Sound", game.Players.LocalPlayer.Character.Head)
		aaa.SoundId = "rbxassetid://1764781073"
		aaa:Play()
		aaa.Volume = 10
		while aaa.PlaybackLoudness < 1 do
			wait()
		end
		if game.Players.LocalPlayer.Character.Head:findFirstChild("face") then
			game.Players.LocalPlayer.Character.Head.face.Texture = "http://www.roblox.com/asset/?id=982264415"
			game.Players.LocalPlayer.Character.Head.face.Color3 = Color3.fromRGB(255,0,0)
		end
		workspace.CurrentCamera.CameraSubject = game.Players.LocalPlayer.Character.Head
		gunweld:destroy()
		Part0.CanCollide = true
		local bloodyhell = Instance.new("Decal", game.Players.LocalPlayer.Character.Head)
		bloodyhell.Texture = "http://www.roblox.com/asset/?id=305296807"
		bloodyhell.Face = "Front"
		local huum = game.Players.LocalPlayer.Character:findFirstChildOfClass("Humanoid")
		huum:SetStateEnabled("Dead", false)
		local function hp()
			huum.Health = .001
			huum.WalkSpeed = 0
			huum.JumpPower = 0
		end
		game:GetService("RunService").RenderStepped:connect(hp)
		huum.Name = "Dead"
		local llegclone = game.Players.LocalPlayer.Character.Torso["Left Hip"]:Clone()
		game.Players.LocalPlayer.Character.Torso["Left Hip"]:Remove()
		local llegweld = Instance.new("Weld", game.Players.LocalPlayer.Character.Torso)
		llegweld.Part0 = game.Players.LocalPlayer.Character.Torso
		llegweld.Part1 = game.Players.LocalPlayer.Character["Left Leg"]
		llegweld.C0 = CFrame.new(-0.5,-2,0)
		local rlegclone = game.Players.LocalPlayer.Character.Torso["Right Hip"]:Clone()
		game.Players.LocalPlayer.Character.Torso["Right Hip"]:Remove()
		local rlegweld = Instance.new("Weld", game.Players.LocalPlayer.Character.Torso)
		rlegweld.Part0 = game.Players.LocalPlayer.Character.Torso
		rlegweld.Part1 = game.Players.LocalPlayer.Character["Right Leg"]
		rlegweld.C0 = CFrame.new(0.5,-2,0)
		local rootjointclone = game.Players.LocalPlayer.Character.HumanoidRootPart.RootJoint:Clone()
		game.Players.LocalPlayer.Character.HumanoidRootPart.RootJoint:Remove()
		local humanoidrootpart = Instance.new("Weld", game.Players.LocalPlayer.Character.Torso)
		humanoidrootpart.Part0 = game.Players.LocalPlayer.Character.HumanoidRootPart
		humanoidrootpart.Part1 = game.Players.LocalPlayer.Character.Torso
		local heed = game.Players.LocalPlayer.Character.Torso["Neck"]:Clone()
		local headweld = Instance.new("Weld", game.Players.LocalPlayer.Character.Torso)
		headweld.Part0 = game.Players.LocalPlayer.Character.Torso
		headweld.Part1 = game.Players.LocalPlayer.Character.Head
		headweld.C0 = headweld.C0 * CFrame.new(0,1.5,0)
		game.Players.LocalPlayer.Character.Torso.Neck:Remove()
		canshake = false
		for i = 0,0.4, 0.035 do
			humanoidrootpart.C0 = humanoidrootpart.C0:lerp(CFrame.new(0, -1.39999413, 0, 1, 0, 0, 0, 0.999995947, 0, 0, 0, 1),i)
			headweld.C0 = headweld.C0:lerp(CFrame.new(0, 1.48110318, -0.136140823, 1, 0, 0, 0, 0.962214053, 0.272279114, 0, -0.272280246, 0.962217987),i)
			rlegweld.C0 = rlegweld.C0:lerp(CFrame.new(0.5, -0.661647677, -0.778150558, 1, 0, 0, 0, 0.930413663, 0.366499782, 0, -0.366501302, 0.930417538),i)
			llegweld.C0 = llegweld.C0:lerp(CFrame.new(-0.5, -0.642013013, -0.875328064, 1, 0, 0, 0, 0.980951071, 0.194233701, 0, -0.19423449, 0.980955064),i)
			lhandweld.C0 = lhandweld.C0:lerp(CFrame.new(-1.5, 0.216077328, -0.411567688, 1, 0, 0, 0, 0.567841351, -0.823132992, 0, 0.823136389, 0.567843676),i)
			rhandweld.C0 = rhandweld.C0:lerp(CFrame.new(1.5, 0.171311736, -0.376781464, 1, 0, 0, 0, 0.657372534, -0.753560245, 0, 0.753563404, 0.657375216),i)
			game:GetService("RunService").RenderStepped:wait()
		end
		for i = 0,0.8, 0.02 do
			humanoidrootpart.C0 = humanoidrootpart.C0:lerp(CFrame.new(0, -2.59475183, 3.00209045, 1, 0, 0, 0, 0.00174529164, -0.999994397, 0, 0.99999845, 0.00174529862),i)
			headweld.C0 = headweld.C0:lerp(CFrame.new(0, 1.49978065, 0.0148329735, 1, 0, 0, 0, 0.99955982, -0.0296660569, 0, 0.0296659507, 0.999555767),i)
			rlegweld.C0 = rlegweld.C0:lerp(CFrame.new(0.5, -1.87047195, -0.0771479011, 1, 0, 0, 0, 0.983254671, 0.182235599, 0, -0.182234854, 0.983250797),i)
			llegweld.C0 = llegweld.C0:lerp(CFrame.new(-0.5, -1.87277603, 0.0985991359, 1, 0, 0, 0, 0.993767738, 0.11146906, 0, -0.111468606, 0.993763745),i)
			lhandweld.C0 = lhandweld.C0:lerp(CFrame.new(-1.78730774, 0.153375626, 0.000604957342, 0.859852254, 0.510542929, 0, -0.510542095, 0.859850943, 0.00174532051, 0.000891050149, -0.00150069932, 0.999994397),i)
			rhandweld.C0 = rhandweld.C0:lerp(CFrame.new(1.53527832, 0.0379638672, -0.00161281228, 0.997314453, -0.0732381865, 0, 0.0732377395, 0.997308135, -0.00349061936, 0.000255646679, 0.00348124537, 0.999989748),i)
			game:GetService("RunService").RenderStepped:wait()
		end
		wait(3)
		local aaa = Instance.new("Sound", game.Players.LocalPlayer.PlayerGui)
		aaa:Play()
		aaa.Volume = 10
		local songmath = math.random(1,2)
		if songmath == 1 then
			aaa.SoundId = "rbxassetid://169815500"
		end
		if songmath == 2 then
			aaa.SoundId = "rbxassetid://165679204"
		end
		-- Farewell infortality
		-- Revamp by ImFrostic, Version 2.8

		 -- Objects

		local TextButton = Instance.new("TextButton")
		local ScreenGui = Instance.new("ScreenGui")

		-- Properties

		ScreenGui.Parent = game.Players.LocalPlayer.PlayerGui
		TextButton.Parent = ScreenGui
		TextButton.BackgroundTransparency = 1
		TextButton.BackgroundColor3 = Color3.new(1, 1, 1)
		TextButton.Position = UDim2.new(0.35810867, 0, 0.874884784, 0)
		TextButton.Size = UDim2.new(0, 388, 0, 96)
		TextButton.Font = Enum.Font.SourceSansBold
		TextButton.Text = "Respawn"
		TextButton.TextColor3 = Color3.fromRGB(0, 0, 0)
		TextButton.TextScaled = true
		TextButton.TextSize = 14
		TextButton.TextTransparency = 1
		TextButton.TextWrapped = true
		-- Scripts
		for i = 1,200 do
			TextButton.TextTransparency = TextButton.TextTransparency - 0.005
			TextButton.BackgroundTransparency = TextButton.BackgroundTransparency - 0.005
			game:GetService("RunService").RenderStepped:wait()
		end
		local function respawn()
			ScreenGui:destroy()
			game.Players.LocalPlayer.Character.Archivable = true
		local clone = game.Players.LocalPlayer.Character:Clone()
		huum:SetStateEnabled("Dead", true)
		clone.Parent = workspace
		for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
			if v.ClassName == "Part" or v.ClassName == "MeshPart" or v.ClassName == "Accesssory" or v.ClassName == "Hat" then
				v:destroy()
			end
		end
		for z,x in pairs(clone:GetChildren()) do
                        if x.ClassName == "Accessory" then
                            local handle = x:findFirstChild("Handle")
                            if handle then
                                local attachment = handle:findFirstChildOfClass("Attachment")
                                if attachment then
                                    for q,w in pairs(clone:GetChildren()) do
                                        if w.Name == "Torso" or w.Name == "Head" then
                                            local anotherone = w:findFirstChild(attachment.Name)
                                            if attachment and anotherone then
                                                local constraint = Instance.new("HingeConstraint", clone) --making fake weld
                                                constraint.Attachment0 = attachment
                                                constraint.Attachment1 = anotherone
                                                constraint.LimitsEnabled = true
                                                constraint.LowerAngle = 0
                                                constraint.UpperAngle = 0
                                            end
                                        end
                                    end
                                end
                            end
                        end
		                    end
		for i = 1,100 do
			aaa.Volume = aaa.Volume - 0.1
			game:GetService("RunService").RenderStepped:wait()
		end

		end
		TextButton.MouseButton1Click:connect(respawn)

	end
end
mouse.Button1Down:connect(endit)
--Just fucking kill me already.