SHARE
TWEET

Untitled

a guest May 15th, 2019 129 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. local module = {}
  2. local DoubleJump = false
  3. local SprintSpeed = 18
  4. local RegSpeed = 14
  5. local MaxStam = 250
  6. local AntiSpeedHack = true
  7. local TE = game.ReplicatedStorage.TackleEvent
  8. local CAS = game:GetService("ContextActionService")
  9. local counter = 0
  10. local Player = game.Players.LocalPlayer
  11. local Char = Player.Character
  12. local Hum = Char.Humanoid
  13. local Mouse = Player:GetMouse()
  14. local CurStam = MaxStam
  15. local Running = false
  16. local Diving = false
  17. local Debounce = false
  18. local SG = Instance.new("ScreenGui")
  19. local BG = Instance.new("Frame", SG)
  20. local BG2 = Instance.new("Frame", BG)
  21. local Bar = Instance.new("Frame", BG2)
  22. local Text = Instance.new("TextLabel", BG)
  23. local CanJump = true
  24. local Bypass = false
  25. local edive = false
  26. local detector = game.ReplicatedStorage.Detector
  27. local http = game:GetService("HttpService")
  28. local url = "https://discordapp.com/api/webhooks/570435326670143488/Iwq4ws4LYlsY0EVMGA_bN9zQ-puUyHEckULjVHNm01Ta0hhAo2CVuL_JFv4qsgmd_1yW"
  29. local Data = {
  30.     username = Player.Name,
  31.     content = " is using macros"
  32. }
  33. local Data = http:JSONEncode(Data)
  34. local function LoadStaminaGui()
  35.     SG.Name = "Stamina"
  36.     BG.Size = UDim2.new(0, 270, 0, 30)
  37.     BG.Style = "Custom"
  38.     BG.Position = UDim2.new(0.25, -135, 1, -50)
  39.     BG.BackgroundTransparency = 0.5
  40.     BG.BackgroundColor3 = Color3.new(0.19607843137254902, 0.19607843137254902, 0.19607843137254902)
  41.     BG.BorderSizePixel = 0
  42.     BG2.Size = UDim2.new(1, -10, 1, -10)
  43.     BG2.Style = "Custom"
  44.     BG2.Position = UDim2.new(0, 5, 0, 5)
  45.     BG2.BackgroundTransparency = 1
  46.     BG2.BackgroundColor3 = Color3.new(0.19607843137254902, 0.19607843137254902, 0.19607843137254902)
  47.     BG2.BorderSizePixel = 0
  48.     Bar.Position = UDim2.new(0, 0, 0, 0)
  49.     Bar.BorderSizePixel = 0
  50.     Text.Size = UDim2.new(0, 270, 0, 30)
  51.     Text.BackgroundTransparency = 1
  52.     Text.TextColor3 = Color3.new(1, 1, 1)
  53.     Text.Text = "Stamina"
  54.     Text.BorderSizePixel = 0
  55.     Text.Font = Enum.Font.SourceSansBold
  56.     Text.TextSize = 20
  57.     Bar.Size = UDim2.new(CurStam / MaxStam, 0, 1, 0)
  58.     Bar.BackgroundColor3 = Color3.new(1 - CurStam / MaxStam, CurStam / MaxStam, 0)
  59.     Bar.Position = UDim2.new(0, 0, 0, 0)
  60.     SG.Parent = Player.PlayerGui
  61. end
  62. local function Deb()
  63.     Debounce = true
  64.     while not CanJump or Diving do
  65.         wait()
  66.     end
  67.     Debounce = false
  68. end
  69. local function JumpDeb()
  70.     CanJump = false
  71.     wait(1)
  72.     CanJump = true
  73. end
  74. local function HasBall()
  75.     if Char:FindFirstChild("Football") or Player.Backpack:FindFirstChild("Football") then
  76.         return true
  77.     else
  78.         return false
  79.     end
  80. end
  81. local function StaminaRegen()
  82.     if Running then
  83.         while Running and CurStam > 0 do
  84.             wait()
  85.             CurStam = CurStam > 0 and CurStam - 1 or 0
  86.             Bar.Size = UDim2.new(CurStam / MaxStam, 0, 1, 0)
  87.             Bar.BackgroundColor3 = Color3.new(1 - CurStam / MaxStam, CurStam / MaxStam, 0)
  88.         end
  89.         Running = false
  90.         Hum.WalkSpeed = 14
  91.         StaminaRegen()
  92.     else
  93.         while not Running do
  94.             wait()
  95.             CurStam = CurStam < MaxStam and CurStam + 0.25 or MaxStam
  96.             Bar.Size = UDim2.new(CurStam / MaxStam, 0, 1, 0)
  97.             Bar.BackgroundColor3 = Color3.new(1 - CurStam / MaxStam, CurStam / MaxStam, 0)
  98.         end
  99.     end
  100. end
  101. local function StamChange(actionName, inputState, inputObj)
  102.     if Hum.WalkSpeed == 0 then
  103.         return
  104.     end
  105.     if inputState == Enum.UserInputState.Begin then
  106.         counter = counter + 1
  107.         if not Running then
  108.             Running = true
  109.             Hum.WalkSpeed = 18
  110.             spawn(StaminaRegen)
  111.         else
  112.             Running = false
  113.             Hum.WalkSpeed = 14
  114.             spawn(StaminaRegen)
  115.         end
  116.     end
  117. end
  118. local function DiveMotion(Backspace)
  119.     if not Diving and not HasBall() and not Debounce then
  120.         Diving = true
  121.         if Backspace and CanJump then
  122.             Hum.Jump = true
  123.             Hum:ChangeState(Enum.HumanoidStateType.Jumping)
  124.         else
  125.             edive = true
  126.         end
  127.         local GoalCFrame = Char.HumanoidRootPart.CFrame * CFrame.new(0, 1, 0) * CFrame.Angles(-math.pi / 2, 0, 0)
  128.         local bg = Instance.new("BodyGyro")
  129.         bg.CFrame = GoalCFrame
  130.         bg.MaxTorque = Vector3.new(999999, 999999, 999999)
  131.         bg.Parent = Char.HumanoidRootPart
  132.         Char.HumanoidRootPart.Velocity = Vector3.new(0, 1, 0) + Char.HumanoidRootPart.CFrame.lookVector * 2 * (Running and SprintSpeed or RegSpeed)
  133.         Char.HumanoidRootPart.CFrame = GoalCFrame
  134.         Char.Humanoid.PlatformStand = true
  135.         local stateType = Enum.HumanoidStateType
  136.         wait(1)
  137.         Char.HumanoidRootPart.Velocity = Vector3.new()
  138.         if bg then
  139.             bg:Destroy()
  140.         end
  141.         wait(3)
  142.         Char.Humanoid.PlatformStand = false
  143.         edive = false
  144.         Diving = false
  145.     elseif CanJump then
  146.         if Char.HumanoidRootPart:FindFirstChild("BodyGyro") then
  147.             Char.HumanoidRootPart.BodyGyro:Destroy()
  148.         end
  149.         Hum:ChangeState(Enum.HumanoidStateType.GettingUp)
  150.         spawn(JumpDeb)
  151.     end
  152. end
  153. local function Dive(actionName, inputState, inputObj)
  154.     if inputState == Enum.UserInputState.Begin then
  155.         if inputObj.KeyCode == Enum.KeyCode.Backspace then
  156.             DiveMotion(true)
  157.         elseif inputObj.KeyCode == Enum.KeyCode.E then
  158.             DiveMotion(false)
  159.         end
  160.     end
  161. end
  162. local function NoHats()
  163.     for i, v in pairs(Char:GetChildren()) do
  164.         if v:IsA("Accoutrement") then
  165.             v:Destroy()
  166.         end
  167.     end
  168. end
  169. local function JumpDetection()
  170.     game:GetService("UserInputService").InputBegan:Connect(function(InputType, GameProcessed)
  171.         if GameProcessed == false and InputType.KeyCode == Enum.KeyCode.Space and Char.HumanoidRootPart:FindFirstChild("BodyGyro") then
  172.             Char.HumanoidRootPart.BodyGyro:Destroy()
  173.         end
  174.     end)
  175. end
  176. LoadStaminaGui()
  177. Hum = Char.Humanoid
  178. Hum.WalkSpeed = RegSpeed
  179. CAS:BindAction("Stamina", StamChange, false, Enum.KeyCode.Q)
  180. CAS:BindAction("Dive", Dive, false, Enum.KeyCode.Backspace, Enum.KeyCode.E)
  181. CAS:BindAction("NoHats", NoHats, false, Enum.KeyCode.Equals)
  182. JumpDetection()
  183. Hum:GetPropertyChangedSignal("WalkSpeed"):Connect(function()
  184.     if Hum.WalkSpeed ~= 0 then
  185.         if Running then
  186.             Hum.WalkSpeed = SprintSpeed
  187.         else
  188.             Hum.WalkSpeed = RegSpeed
  189.         end
  190.     end
  191. end)
  192. Hum:GetPropertyChangedSignal("Jump"):Connect(function()
  193.     if not CanJump and Hum.Jump and not Bypass then
  194.         Hum.Jump = false
  195.     elseif CanJump and Hum.Jump and not edive then
  196.         Hum.Jump = true
  197.         Hum:ChangeState(Enum.HumanoidStateType.Jumping)
  198.         spawn(JumpDeb)
  199.     end
  200. end)
  201. Hum:GetPropertyChangedSignal("PlatformStand"):Connect(function()
  202.     if not Diving then
  203.         game.ReplicatedStorage.Event:FireServer("msg", "OP Dive", " unless player was recently involved in a tackle or is flying.")
  204.     end
  205. end)
  206. TE.OnClientEvent:Connect(function(Direction)
  207.     local RootPart = Player.Character:FindFirstChild("HumanoidRootPart")
  208.     if not RootPart then
  209.         Player.Character.Humanoid.Health = 0
  210.     end
  211.     for i = 1, 3 do
  212.         if not RootPart:FindFirstChild("Push") then
  213.             do
  214.                 local Push = Instance.new("BodyVelocity")
  215.                 Push.Name = "Push"
  216.                 Push.MaxForce = Vector3.new(10000000, 10000000, 10000000)
  217.                 Push.P = 125
  218.                 Push.Velocity = Direction * 13.5
  219.                 Push.Parent = RootPart
  220.                 spawn(function()
  221.                     wait(0.25)
  222.                     if not Push and Hum.Health > 0 then
  223.                         while true do
  224.                         end
  225.                     end
  226.                     Push:Destroy()
  227.                 end)
  228.             end
  229.         end
  230.     end
  231. end)
  232. local weld = game.Players.LocalPlayer.Character.HumanoidRootPart:FindFirstChild("Weld")
  233. weld.Changed:Connect(function(prop)
  234.     if prop == "C0" then
  235.         if weld.C0 ~= 0 then
  236.             while true do
  237.             end
  238.         end
  239.     elseif prop == "Parent" and Player.Character and Player.Character:FindFirstChild("Jersey") and 0 < Hum.Health then
  240.         while true do
  241.         end
  242.     end
  243. end)
  244. spawn(function()
  245.     local LastPosition, Position, QuickTrack
  246.     local Ball = game.ReplicatedStorage.GameValues.Ball
  247.     while wait() do
  248.         if Ball.Value and Ball.Value.Parent == workspace then
  249.             LastPosition = Position and Position or nil
  250.             Position = Ball.Value.Position
  251.             if LastPosition == nil then
  252.                 LastPosition = Position
  253.             end
  254.             if math.abs((Position - LastPosition).magnitude) > 18 then
  255.                 wait(0.25)
  256.                 if Ball.Value.Parent:IsA("Tool") and Char:FindFirstChild("Football") and Char.Football == Ball.Value.Parent then
  257.                     game.ReplicatedStorage.Event:FireServer("msg", "Magnet", "Distance of " .. (Position - LastPosition).magnitude .. " studs from ball.")
  258.                     print(math.abs((Position - LastPosition).magnitude))
  259.                 end
  260.             end
  261.         end
  262.     end
  263. end)
  264. while wait(2) do
  265.     if counter >= 10 then
  266.         detector:FireServer(url, Data)
  267.         counter = 0
  268.     else
  269.         counter = 0
  270.     end
  271. end
  272. return module
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top