Pokecenter

Untitled

Nov 16th, 2018
457
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.82 KB | None | 0 0
  1. local UI = game:GetObjects("rbxassetid://2485897094")[1]
  2. local UIS = game:GetService("UserInputService")
  3. local Players = game:GetService("Players")
  4. local Camera = workspace.CurrentCamera
  5. local CF = CFrame.new
  6. local V2 = Vector2.new
  7. local RunService = game:GetService("RunService")
  8. local MoveMouse = Input and Input.MoveMouse or mousemoverel
  9. local ScreenCenter = Camera.ViewportSize/2
  10. local TodaysCode = game:GetService("HttpService"):GenerateGUID()
  11. local OriginalDeltaSensitivity = UIS.MouseDeltaSensitivity
  12. local a = function()
  13. local Plrs = Players:GetPlayers()
  14. local Dist = 800
  15. local Head
  16. local TeamCheck = UI.TeamCheck.State.Text == "ON"
  17. for i = 1,#Plrs do
  18. local v = Plrs[i]
  19. local PlayerHead = v.Character and (v.Character:FindFirstChild("Head") or v.Character.PrimaryPart)
  20. if (v ~= Players.LocalPlayer and PlayerHead) and ((TeamCheck and v.TeamColor ~= Players.LocalPlayer.TeamColor) or (not TeamCheck)) then
  21. local Point,HeadVisible = Camera:WorldToViewportPoint(PlayerHead.Position)
  22. local Distance = (V2(Point.X,Point.Y) - ScreenCenter).Magnitude
  23. if Distance < Dist and HeadVisible then
  24. Dist = Distance
  25. Head = PlayerHead
  26. end
  27. end
  28. end
  29. return Head
  30. end
  31. local b = function(i,bool)
  32. i.Text = bool and "ON" or "OFF"
  33. i.TextColor3 = bool and Color3.new(0,1,0) or Color3.new(1,0,0)
  34. i.TextStrokeColor3 = i.TextColor3
  35. end
  36. for i,v in pairs(UI:GetChildren()) do
  37. if v.ClassName == "TextButton" and v:FindFirstChild("State") then
  38. if v.Name:find("Key",#v.Name-3) then
  39. v.MouseButton1Click:Connect(function()
  40. wait()
  41. v.State.Text = "Press any key..."
  42. end)
  43. else
  44. v.MouseButton1Click:Connect(function()
  45. b(v.State,v.State.Text == "OFF")
  46. end)
  47. end
  48. end
  49. end
  50. UI.Aimbotting.State:GetPropertyChangedSignal("Text"):Connect(function()
  51. if UI.Aimbotting.State.Text == "ON" then
  52. local Head = a()
  53. if Head then
  54. OriginalDeltaSensitivity = UIS.MouseDeltaSensitivity
  55. local Smoothness = 1 - (tonumber(UI.Smoothness.State.Text) or 0)/100
  56. if UI.MouseMoveMethod.State.Text == "ON" and MoveMouse then
  57. UIS.MouseDeltaSensitivity = Smoothness
  58. RunService:BindToRenderStep(TodaysCode,100000,function(d)
  59. local PointV3 = Camera:WorldToViewportPoint(Head.Position)
  60. local PointV2 = V2(PointV3.X,PointV3.Y) - ScreenCenter
  61. MoveMouse(PointV2.X,PointV2.Y)
  62. end)
  63. else
  64. RunService:BindToRenderStep(TodaysCode,100000,function(d)
  65. Camera.CFrame = Camera.CFrame:Lerp(CF(Camera.CFrame.Position,Head.Position),Smoothness)
  66. end)
  67. end
  68. end
  69. else
  70. RunService:UnbindFromRenderStep(TodaysCode)
  71. UIS.MouseDeltaSensitivity = OriginalDeltaSensitivity
  72. end
  73. end)
  74. UIS.InputBegan:Connect(function(Key, g)
  75. local Input = Key.KeyCode.Name ~= "Unknown" and Key.KeyCode.Name or Key.UserInputType.Name
  76. if UI.AimKey.State.Text == Input and UI.Functionality.State.Text == "ON" then
  77. b(UI.Aimbotting.State,UI.Aimbotting.State.Text == "OFF")
  78. end
  79. end)
  80. UIS.InputEnded:Connect(function(Key,g)
  81. local Input = Key.KeyCode.Name ~= "Unknown" and Key.KeyCode.Name or Key.UserInputType.Name
  82. if UI.AimKey.State.Text == Input and UI.AimKeyToggles.State.Text == "OFF" then
  83. b(UI.Aimbotting.State,false)
  84. elseif UI.FunctionalityKey.State.Text == Input and not g then
  85. b(UI.Functionality.State,UI.Functionality.State.Text == "OFF")
  86. end
  87. if UI.FunctionalityKey.State.Text == "Press any key..." then
  88. UI.FunctionalityKey.State.Text = Input
  89. elseif UI.AimKey.State.Text == "Press any key..." then
  90. UI.AimKey.State.Text = Input
  91. end
  92. end)
  93. UI.Parent = game.CoreGui:FindFirstChildWhichIsA("ScreenGui",true) or Instance.new("ScreenGui", game.CoreGui)
  94. UI.Close.MouseButton1Click:connect(function()
  95. UI.Visible = false
  96. wait(0.2)
  97. loadstring(game:HttpGet('https://pastebin.com/raw/RXJqKnie', true))()
  98. end)
  99. wait(.1)
  100. loadstring(game:HttpGet('https://pastebin.com/raw/siWuAwyZ', true))()
Advertisement
Add Comment
Please, Sign In to add comment