Flings Things And People Script | ANTI GRAB, INCREASED REACH, INSANE THROW & MORE!

Png-78.png

Created by TheUniqueZYX

Features:

  • basically this features anti-explosions (prevents rocket from flinging you)
  • anti grab (prevents players from picking you up)
  • Increased reach
  • increased scroll distance (pick up and item and using the mouse wheel to scroll)
  • Insane throw (just pick up any player or object and right click to throw them far)
--[[ 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)

  

ENJOY!

 

Warning: DO NOT DOWNLOAD anything from this page, you’re only here to copy the script or Get it from Pastebin!

About Us

What is arponag.xyz? arponag.xyz is a website focused on releasing safe exploits, we only release the best and most trusted exploits on our website, guaranteed to satisfy you. Contact us [email protected]

Safety

Is this safe to use? Everything on the website has been scanned and tested by professionals and the community, we only release the best exploits for our users, so we make sure that our exploits won’t harm your devices, everything here is clean.

Copyright © 2018 – 2020 Arpon AG | All rights reserved |
Privacy Policy | Terms of Service