Guest User

Untitled

a guest
May 15th, 2019
138
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