--[[ Settings ]] local DefaultReachLimit = 33 local IncreasedReachDistance = 100 local PowerTable = { ["BombMissile"] = 1200, ["Others"] = 600, ["Players"] = 1600, } --[[ Variables ]] local PS = game:GetService("Players") local Player = PS.LocalPlayer local Character = Player.Character or Player.CharacterAdded:Wait() local RS = game:GetService("ReplicatedStorage") local CE = RS:WaitForChild("CharacterEvents") local BeingHeld = Player:WaitForChild("IsHeld") local PlayerScripts = Player:WaitForChild("PlayerScripts") --[[ Remotes ]] local StruggleEvent = CE:WaitForChild("Struggle") --[[ Anti-Explosion ]] workspace.DescendantAdded:Connect(function(v) if v:IsA("Explosion") then v.BlastPressure = 0 end end) --[[ Anti-grab ]] local RS = game:GetService("RunService") BeingHeld.Changed:Connect(function(C) if C == true then if BeingHeld.Value == true then local Event; Event = RS.RenderStepped:Connect(function() if BeingHeld.Value == true then StruggleEvent:FireServer(Player) elseif BeingHeld.Value == false then Event:Disconnect() end end) end end end) local Counter = 0 function DoubleCounter(Passed) if Passed == "Add" then Counter = Counter + 1 elseif Passed == "Check" then return Counter elseif Passed == "Reset" then Counter = 0 end end function Reconnect() --[[ Local variables ]] local Character = Player.Character or Player.CharacterAdded:Wait() local Humanoid = Character:FindFirstChildWhichIsA("Humanoid") or Character:WaitForChild("Humanoid") local HumanoidRootPart = Character:WaitForChild("HumanoidRootPart") local GS = Character:WaitForChild("GrabbingScript") HumanoidRootPart:WaitForChild("FirePlayerPart"):Remove() local Held = Player:WaitForChild("IsHeld") local Connections = getconnections(Held.Changed) for i,v in pairs (Connections) do if v.Function then local Script = getfenv(v.Function).script if Script == Character:WaitForChild("HumanoidStateTypeByGettingFlung") then v:Disable() end end end Humanoid.Changed:Connect(function(C) if C == "Sit" and Humanoid.Sit == true then if Humanoid.SeatPart ~= nil and tostring(Humanoid.SeatPart.Parent) == "CreatureBlobman" then elseif Humanoid.SeatPart == nil then Humanoid:SetStateEnabled(Enum.HumanoidStateType.Jumping, true) Humanoid.Sit = false end end end) repeat wait() for Num,Func in pairs(debug.getregistry()) do if type(Func) == "function" and not is_synapse_function(Func) and islclosure(Func) then local Values = debug.getupvalues(Func) local Constants = getconstants(Func) for a,b in pairs(Values) do --[[ Reach ]] if type(b) == "number" and b == 20 then debug.setupvalue(Func, a, DefaultReachLimit) DoubleCounter("Add") end end if table.find(Constants, "make") and debug.getinfo(Func).name == "grab" then for a,b in pairs (Constants) do --[[ Makes it so even when you die you can still fling others ]] if b == "Health" then setconstant(Func, a, "JumpPower") DoubleCounter("Add") end end end end end until DoubleCounter("Check") == 2 DoubleCounter("Reset") end Player.CharacterAdded:Connect(function() Reconnect() end) Reconnect() function ChangeThrow(Number) --[[ Variables ]] Character = Player.Character or Player.CharacterAdded:Wait() local GS = Character:WaitForChild("GrabbingScript") for i,v in pairs(getreg()) do if type(v) == "function" then local Script = getfenv(v).script if Script == GS and tostring(debug.getinfo(v).name) == "throw" then local Debug = debug.getconstants(v) for cn,cv in pairs (Debug) do if cn == 22 then debug.setconstant(v, cn, Number) end if cn == 24 then debug.setconstant(v, cn, Number) end end end end end end function InstanceCheck(Instance) local NotInPlayer = false for _,v in pairs (PS:GetPlayers()) do if v.Character then if v.Character:FindFirstChild(Instance.Name) then NotInPlayer = true break end end end return NotInPlayer end function Reach(Number) for Num,Func in pairs(getreg()) do if type(Func) == "function" and islclosure(Func) and not is_synapse_function(Func) then local Constants = getconstants(Func) local Values = getupvalues(Func) if table.find(Constants, "make") and debug.getinfo(Func).name == "grab" then for c,d in pairs (Values) do if c == 17 then setupvalue(Func,c, Number) end end break end end end end local OldNameCall; OldNameCall = hookmetamethod(game, "__namecall", function(...) local NameCallMethod = getnamecallmethod() local Args = {...} local Self = Args[1] if not checkcaller() and NameCallMethod == "FireServer" and tostring(Self.Name) == "Beam" then if tostring(Args[2]) == "make" then Reach(IncreasedReachDistance) local Instance = Args[3] if InstanceCheck(Instance) == false then if PowerTable[Instance.Parent.Name] then local Power = PowerTable[Instance.Parent.Name] ChangeThrow(Power) elseif PowerTable[Instance.Parent.Name] == nil then local OtherPower = PowerTable["Others"] ChangeThrow(OtherPower) end end if InstanceCheck(Instance) == true then local PlayerPower = PowerTable["Players"] ChangeThrow(PlayerPower) end return; elseif tostring(Args[2]) == "destroy" then Reach(DefaultReachLimit) end return OldNameCall(...) end return OldNameCall(...) end)