View difference between Paste ID: m4yfvRhi and 83yykvU9

---[[
+--https://github.com/Mokiros/roblox-FE-compatibility
-Concussion Grenade
+if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
-When it explodes, it sends out an explosive shockwave, pushing parts away and causing damage.
+local Player,Mouse,mouse,UserInputService,ContextActionService = owner
---]]
+local RealPlayer = Player
 do print("FE Compatibility code by Mokiros")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end
 if script == nil then return end
 ModelName = "Conc. Grenade"
 Player = Game.Players.LocalPlayer
 Selected = false
 Connected = false
 Button1Down = false
 CanUse = true
 Primed = false
 Thrown = false
 
 
 function CheckPlayer()
 	if Player.Character == nil then return false end
 	if Player.Character:FindFirstChild("Torso") == nil or Player.Character:FindFirstChild("Right Arm") == nil or Player.Character:FindFirstChild("Humanoid") == nil then return false end
 	if Player.Character.Humanoid.Health <= 0 then return false end
 	return true
 end
 
 function tagHumanoid(humanoid)
  local tag = Instance.new("ObjectValue")
  tag.Name = "creator"
  tag.Value = Player
  tag.Parent = humanoid
  local tag = Instance.new("StringValue")
  tag.Name = "creatorType1"
  tag.Value = ModelName
  tag.Parent = humanoid
  local tag = Instance.new("StringValue")
  tag.Name = "creatorType2"
  tag.Value = "shot"
  tag.Parent = humanoid
 end
 
 function untagHumanoid(humanoid)
  if humanoid ~= nil then
   local tag = humanoid:FindFirstChild("creator")
   if tag ~= nil then
    tag:Remove()
   end
   local tag = humanoid:FindFirstChild("creatorType1")
   if tag ~= nil then
    tag:Remove()
   end
   local tag = humanoid:FindFirstChild("creatorType2")
   if tag ~= nil then
    tag:Remove()
   end
  end
 end
 
 
 
 function CreateParts(Parent, Format)
 	if Parent == nil then return end
 	local Parts = Instance.new("Model")
 	Parts.Name = ModelName
 	if Format == 1 then
 		Parts.Name = Parts.Name.. " (Holstered)"
 	end
 	Parts.Parent = Parent
 
 	local MasterPart = Instance.new("Part")
 	MasterPart.Name = "Handle"
 	MasterPart.BrickColor = BrickColor.new("Really red")
 	MasterPart.TopSurface = 0
 	MasterPart.BottomSurface = 0
 	MasterPart.Shape = "Ball"
 	MasterPart.FormFactor = "Custom"
 	MasterPart.Size = Vector3.new(1, 1, 1)
 	MasterPart.Parent = Parts
 	local Mesh = Instance.new("SpecialMesh")
 	Mesh.MeshType = "Sphere"
 	Mesh.Scale = Vector3.new(0.8, 1, 0.8)
 	Mesh.Parent = MasterPart
 	local Weld = Instance.new("Weld")
 	Weld.Part0 = MasterPart
 	if Format == 1 then
 		Weld.Part1 = Player.Character:FindFirstChild("Left Leg")
 		Weld.C0 = CFrame.new(-0.45, 0, -0.8) * CFrame.fromEulerAnglesXYZ(0, 0, math.rad(90))
 	elseif Format == 2 then
 		Weld.Part1 = Player.Character:FindFirstChild("Right Arm")
 		Weld.C0 = CFrame.new(-1.2, 0, 0) * CFrame.fromEulerAnglesXYZ(math.rad(90), 0, math.rad(90))
 	end
 	Weld.Parent = Weld.Part0
 
 	local Part = Instance.new("Part")
 	Part.Name = "Pin Holder"
 	Part.BrickColor = BrickColor.new("Dark stone grey")
 	Part.TopSurface = 0
 	Part.BottomSurface = 0
 	Part.FormFactor = "Custom"
 	Part.Size = Vector3.new(1, 1, 1)
 	Part.Parent = Parts
 	local Mesh = Instance.new("CylinderMesh")
 	Mesh.Scale = Vector3.new(0.25, 0.4, 0.25)
 	Mesh.Parent = Part
 	local Weld = Instance.new("Weld")
 	Weld.Part0 = Part
 	Weld.Part1 = MasterPart
 	Weld.C0 = CFrame.new(0, -0.5, 0)
 	Weld.Parent = Weld.Part0
 
 	local MasterPart2 = Instance.new("Part")
 	MasterPart2.Name = "Pin"
 	MasterPart2.FormFactor = "Custom"
 	MasterPart2.Size = Vector3.new(1, 1, 1)
 	MasterPart2.BrickColor = BrickColor.new("Dark stone grey")
 	MasterPart2.Transparency = 0
 	MasterPart2.Locked = true
 	MasterPart2.TopSurface = 0
 	MasterPart2.BottomSurface = 0
 	MasterPart2.Parent = Parts
 	local Mesh = Instance.new("SpecialMesh")
 	Mesh.MeshType = "Brick"
 	Mesh.Scale = Vector3.new(0.1, 0.1, 0.2)
 	Mesh.Parent = MasterPart2
 	local Weld = Instance.new("Weld")
 	Weld.Part0 = MasterPart2
 	Weld.Part1 = MasterPart
 	Weld.C0 = CFrame.new(0, -0.6, 0.15)
 	Weld.Parent = Weld.Part0
 
 	local Part = Instance.new("Part")
 	Part.Name = "Pin Ring"
 	Part.BrickColor = BrickColor.new("Dark stone grey")
 	Part.TopSurface = 0
 	Part.BottomSurface = 0
 	Part.FormFactor = "Custom"
 	Part.Size = Vector3.new(1, 1, 1)
 	Part.Parent = Parts
 	local Mesh = Instance.new("SpecialMesh")
 	Mesh.MeshType = "Brick"
 	Mesh.Scale = Vector3.new(0.15, 0.15, 0.15)
 	Mesh.Parent = Part
 	local Weld = Instance.new("Weld")
 	Weld.Part0 = Part
 	Weld.Part1 = MasterPart2
 	Weld.C0 = CFrame.new(0, 0, 0.15)
 	Weld.Parent = Weld.Part0
 
 	for _, Part in pairs(Parts:GetChildren()) do
 		Part.Locked = true
 		Part.CanCollide = false
 	end
 end
 
 
 function RemoveParts(Parent, Format)
 	if Format == 1 then
 		pcall(function() Parent[ModelName.. " (Holstered)"]:Remove() end)
 	elseif Format == 2 then
 		pcall(function() Parent[ModelName]:Remove() end)
 	end
 end
 
 
 function SetAngle(Joint, Angle, Character)
 	if Character == nil then return false end
 	local Joints = {
 		Character.Torso:FindFirstChild("Right Shoulder 2"),
 		Character.Torso:FindFirstChild("Left Shoulder 2"),
 		Character.Torso:FindFirstChild("Right Hip 2"),
 		Character.Torso:FindFirstChild("Left Hip 2")
 	}
 	if Joints[Joint] == nil then return false end
 	if Joint == 1 or Joint == 3 then
 		Joints[Joint].DesiredAngle = Angle
 	end
 	if Joint == 2 or Joint == 4 then
 		Joints[Joint].DesiredAngle = -Angle
 	end
 end
 
 
 function ForceAngle(Joint, Angle, Character)
 	if Character == nil then return false end
 	local Joints = {
 		Character.Torso:FindFirstChild("Right Shoulder 2"),
 		Character.Torso:FindFirstChild("Left Shoulder 2"),
 		Character.Torso:FindFirstChild("Right Hip 2"),
 		Character.Torso:FindFirstChild("Left Hip 2")
 	}
 	if Joints[Joint] == nil then return false end
 	if Joint == 1 or Joint == 3 then
 		Joints[Joint].DesiredAngle = Angle
 		Joints[Joint].CurrentAngle = Angle
 	end
 	if Joint == 2 or Joint == 4 then
 		Joints[Joint].DesiredAngle = -Angle
 		Joints[Joint].CurrentAngle = -Angle
 	end
 end
 
 
 function SetSpeed(Joint, Speed, Character)
 	if Character == nil then return false end
 	local Joints = {
 		Character.Torso:FindFirstChild("Right Shoulder 2"),
 		Character.Torso:FindFirstChild("Left Shoulder 2"),
 		Character.Torso:FindFirstChild("Right Hip 2"),
 		Character.Torso:FindFirstChild("Left Hip 2")
 	}
 	if Joints[Joint] == nil then return false end
 	Joints[Joint].MaxVelocity = Speed
 end
 
 
 function DisableLimb(Limb, Character)
 	if Character == nil then return false end
 	if Character:FindFirstChild("Torso") == nil then return false end
 	local Joints = {
 		Character.Torso:FindFirstChild("Right Shoulder"),
 		Character.Torso:FindFirstChild("Left Shoulder"),
 		Character.Torso:FindFirstChild("Right Hip"),
 		Character.Torso:FindFirstChild("Left Hip")
 	}
 	local Limbs = {
 		Character:FindFirstChild("Right Arm"),
 		Character:FindFirstChild("Left Arm"),
 		Character:FindFirstChild("Right Leg"),
 		Character:FindFirstChild("Left Leg")
 	}
 	if Joints[Limb] == nil then return false end
 	if Limbs[Limb] == nil then return false end
 	local Joint = Instance.new("Motor6D")
 	Joint.Parent = Character.Torso
 	Joint.Part0 = Character.Torso
 	Joint.Part1 = Limbs[Limb]
 	if Limb == 1 then
 		Joint.C0 = CFrame.new(1.5, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 		Joint.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 		Joint.Name = "Right Shoulder 2"
 	elseif Limb == 2 then
 		Joint.C0 = CFrame.new(-1.5, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 		Joint.C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 		Joint.Name = "Left Shoulder 2"
 	elseif Limb == 3 then
 		Joint.C0 = CFrame.new(0.5, -1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 		Joint.C1 = CFrame.new(0, 1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 		Joint.Name = "Right Hip 2"
 	elseif Limb == 4 then
 		Joint.C0 = CFrame.new(-0.5, -1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 		Joint.C1 = CFrame.new(0, 1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 		Joint.Name = "Left Hip 2"
 	end
 	Joint.MaxVelocity = Joints[Limb].MaxVelocity
 	Joint.CurrentAngle = Joints[Limb].CurrentAngle
 	Joint.DesiredAngle = Joints[Limb].DesiredAngle
 	Joints[Limb]:Remove()
 end
 
 
 function ResetLimbCFrame(Limb, Character)
 	if Character == nil then return false end
 	if Character.Parent == nil then return false end
 	if Character:FindFirstChild("Torso") == nil then return false end
 	local Joints = {
 		Character.Torso:FindFirstChild("Right Shoulder 2"),
 		Character.Torso:FindFirstChild("Left Shoulder 2"),
 		Character.Torso:FindFirstChild("Right Hip 2"),
 		Character.Torso:FindFirstChild("Left Hip 2")
 	}
 	local Limbs = {
 		Character:FindFirstChild("Right Arm"),
 		Character:FindFirstChild("Left Arm"),
 		Character:FindFirstChild("Right Leg"),
 		Character:FindFirstChild("Left Leg")
 	}
 	if Joints[Limb] == nil then return false end
 	if Limbs[Limb] == nil then return false end
 	if Limb == 1 then
 		Joints[Limb].C0 = CFrame.new(1.5, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 		Joints[Limb].C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 	elseif Limb == 2 then
 		Joints[Limb].C0 = CFrame.new(-1.5, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 		Joints[Limb].C1 = CFrame.new(0, 0.5, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 	elseif Limb == 3 then
 		Joints[Limb].C0 = CFrame.new(0.5, -1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 		Joints[Limb].C1 = CFrame.new(0, 1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(90), 0)
 	elseif Limb == 4 then
 		Joints[Limb].C0 = CFrame.new(-0.5, -1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 		Joints[Limb].C1 = CFrame.new(0, 1, 0) * CFrame.fromEulerAnglesXYZ(0, math.rad(-90), 0)
 	end
 end
 
 
 function EnableLimb(Limb, Character)
 	if Character == nil then return false end
 	if Character:FindFirstChild("Torso") == nil then return false end
 	local Joints = {
 		Character.Torso:FindFirstChild("Right Shoulder 2"),
 		Character.Torso:FindFirstChild("Left Shoulder 2"),
 		Character.Torso:FindFirstChild("Right Hip 2"),
 		Character.Torso:FindFirstChild("Left Hip 2")
 	}
 	local Limbs = {
 		Character:FindFirstChild("Right Arm"),
 		Character:FindFirstChild("Left Arm"),
 		Character:FindFirstChild("Right Leg"),
 		Character:FindFirstChild("Left Leg")
 	}
 	if Joints[Limb] == nil then return false end
 	if Limbs[Limb] == nil then return false end
 	if Limb == 1 then
 		Joints[Limb].Name = "Right Shoulder"
 	elseif Limb == 2 then
 		Joints[Limb].Name = "Left Shoulder"
 	elseif Limb == 3 then
 		Joints[Limb].Name = "Right Hip"
 	elseif Limb == 4 then
 		Joints[Limb].Name = "Left Hip"
 	end
 	Animate = Character:FindFirstChild("Animate")
 	if Animate == nil then return false end
 	Animate = Animate:Clone()
 	Character.Animate:Remove()
 	Animate.Parent = Character
 end
 
 
 function onButton1Down(Mouse)
 	if Button1Down == true then return end
 	Button1Down = true
 	if CheckPlayer() == false or Primed == true or Thrown == true or CanUse == false then return end
 	CanUse = false
 	Primed = true
 	--SoundToServer("Pin", "http://www.roblox.com/Asset/?id=2697295", 5, 1, false, Player.Character.Torso)
 	pcall(function() Player.Character[ModelName].Pin.Weld:Remove() end)
 	for _, Part in pairs(Player.Character[ModelName]:GetChildren()) do
 		pcall(function()
 			if string.match(Part.Name, "Pin") then
 				Part.CanCollide = true
 			end
 		end)
 	end
 	tagHumanoid(Player.Character[ModelName].Handle)
 	Instance.new("Configuration", Player.Character[ModelName].Handle).Name = "CanExplode"
 	Player.Character[ModelName].Changed:connect(function(Property)
 		if Property == "Parent" then
 			while CanUse == false do wait() end
 			EnableLimb(1, Player.Character)
 			--UpdateFirstPerson()
 			script.Parent:Remove()
 		end
 	end)
 	CanUse = true
 end
 
 
 function onButton1Up(Mouse)
 	if Button1Down == false then return end
 	Button1Down = false
 	if CanUse == false then return end
 	if Player.Character:FindFirstChild(ModelName) ~= nil and Thrown == false then
 		Thrown = true
 		SetSpeed(1, 0.75, Player.Character)
 		SetAngle(1, 0, Player.Character)
 		wait()
 		pcall(function() Player.Character[ModelName].Handle.Weld:Remove() end)
 		for _, Part in pairs(Player.Character[ModelName]:GetChildren()) do
 			pcall(function() Part.CanCollide = true end)
 		end
 		local BodyVelocity = Instance.new("BodyVelocity")
 		BodyVelocity.maxForce = Vector3.new(math.huge, math.huge, math.huge)
 		BodyVelocity.velocity = (Mouse.Hit.p - Player.Character[ModelName].Handle.Position).unit * 75
 		BodyVelocity.Parent = Player.Character[ModelName].Handle
 		game:GetService("Debris"):AddItem(BodyVelocity, 0.1)
 		game:GetService("Debris"):AddItem(Player.Character[ModelName], 10)
 		Player.Character[ModelName].Parent = Workspace
 	end
 end
 
 
 function onKeyDown(Key, Mouse)
 	if Selected == false then return end
 	Key = Key:lower()
 	if Button1Down == false and CanUse == true and CheckPlayer() == true then
 		if Key == "q" then
 			if Mouse.Target == nil then return end
 			if CheckPlayer() == false then return end
 			local NewPlayer = game:GetService("Players"):GetPlayerFromCharacter(Mouse.Target.Parent)
 			if NewPlayer == nil then return end
 			if NewPlayer.Character == nil then return end
 			if NewPlayer.Character:FindFirstChild("Torso") == nil then return end
 			if (NewPlayer.Character.Torso.Position - Player.Character.Torso.Position).magnitude > 10 then return end
 			onDeselected(Mouse)
 			wait()
 			RemoveParts(Player.Character, 1)
 			script.Parent.Parent = NewPlayer.Backpack
 			Player = NewPlayer
 		elseif Key == "g" then
 			CanUse = false
 			--SoundToServer("Slash", "rbxasset://sounds/swordslash.wav", 2, 1, false, Player.Character.Torso)
 			SetSpeed(1, 0.75, Player.Character)
 			SetAngle(1, 0, Player.Character)
 			local HasHit = false
 			local _, HitConnection = pcall(function() return Player.Character[ModelName].Handle.Touched:connect(function(Hit)
 				if HasHit == true or Hit:IsDescendantOf(Player.Character) then return end
 				HasHit = true
 				--SoundToServer("Bash", "http://www.roblox.com/Asset/?id=46153268", 1, 0.25, false, Player.Character.Torso)
 				local Humanoid = Hit.Parent:FindFirstChild("Humanoid") or Hit.Parent.Parent:FindFirstChild("Humanoid")
 				if Humanoid ~= nil then
 					tagHumanoid(Humanoid)
 					Humanoid:TakeDamage(7)
 					wait()
 					pcall(function() untagHumanoid(Humanoid) end)
 				end
 			end) end)
 			--CameraSlide(math.rad(-15), 0, 0.2)
 			pcall(function() HitConnection:disconnect() end)
 			SetSpeed(1, 0.5, Player.Character)
 			SetAngle(1, math.rad(200), Player.Character)
 			--CameraSlide(math.rad(15), 0, 0.25)
 			CanUse = true
 		end
 	end
 end
 
 
 function onSelected(Mouse)
 	if Selected == true or CanUse == false then return end
 	CanUse = false
 	while true do
 		if CheckPlayer() == true then
 			if Player.Character.Torso:FindFirstChild("Right Shoulder") ~= nil then
 				break
 			end
 		end
 		wait(0.1)
 	end
 	Selected = true
 	RemoveParts(Player.Character, 1)
 	CreateParts(Player.Character, 2)
 	DisableLimb(1, Player.Character)
 	SetSpeed(1, 0.5, Player.Character)
 	SetAngle(1, math.rad(200), Player.Character)
 	Mouse.Icon = "rbxasset://textures\\GunCursor.png"
 	Mouse.Button1Down:connect(function() onButton1Down(Mouse) end)
 	Mouse.Button1Up:connect(function() onButton1Up(Mouse) end)
 	Mouse.KeyDown:connect(function(Key) onKeyDown(Key, Mouse) end)
 	CanUse = true
 end
 
 
 function onDeselected(Mouse)
 	if Selected == false or Primed == true then return end
 	Selected = false
 	while CanUse == false do wait() end
 	if Selected == true then return end
 	CanUse = false
 	RemoveParts(Player.Character, 2)
 	CreateParts(Player.Character, 1)
 	SetAngle(1, 0, Player.Character)
 	ResetLimbCFrame(1, Player.Character)
 	EnableLimb(1, Player.Character)
 	CanUse = true
 end
 
 
 if script.Parent.ClassName == "HopperBin" and Connected == false then
 	Connected = true
 	Player = script.Parent.Parent.Parent
-if script.Parent.ClassName ~= "HopperBin" then
+
-	if Player == nil then print("Error: Player not found!") return end
+
-	Tool = Instance.new("HopperBin")
+
-	Tool.Name = ModelName
+
-	Tool.Parent = Player.Backpack
+
-	script.Name = "Main"
+
-	script.Parent = Tool
+
-elseif script.Parent.ClassName == "HopperBin" and Connected == false then
+