aimbot gui

-- Farewell Infortality.
-- Version: 2.82
-- Instances:
local MainFrame = Instance.new("Frame")
local credits = Instance.new("TextLabel")
local speed = Instance.new("TextButton")
local aimbot = Instance.new("TextButton")
local how = Instance.new("TextLabel")
local use = Instance.new("TextLabel")
--Properties:
MainFrame.Name = "MainFrame"
MainFrame.Parent = game.StarterGui.ScreenGui
MainFrame.BackgroundColor3 = Color3.new(0.666667, 0, 0)
MainFrame.Position = UDim2.new(0.088397786, 0, 0.261613697, 0)
MainFrame.Size = UDim2.new(0, 402, 0, 275)
MainFrame.Active = true
MainFrame.Draggble = true
credits.Name = "credits"
credits.Parent = MainFrame
credits.BackgroundColor3 = Color3.new(0.0588235, 0.0588235, 0.0588235)
credits.Size = UDim2.new(0, 402, 0, 50)
credits.Font = Enum.Font.SciFi
credits.Text = "RBWorld2GUI [Created By ExploitGodz]"
credits.TextColor3 = Color3.new(1, 1, 1)
credits.TextSize = 20

speed.Name = "speed"
speed.Parent = MainFrame
speed.BackgroundColor3 = Color3.new(0.0588235, 0.0588235, 0.0588235)
speed.Position = UDim2.new(0.25124377, 0, 0.229090914, 0)
speed.Size = UDim2.new(0, 200, 0, 50)
speed.Font = Enum.Font.SciFi
speed.Text = "Speed"
speed.TextColor3 = Color3.new(1, 1, 1)
speed.TextSize = 20
speed.MouseButton1Down:connect(function()
down = false
velocity = Instance.new("BodyVelocity")
velocity.maxForce = Vector3.new(100000, 0, 100000)
---vv Use that to change the speed v
local speed = 59
gyro = Instance.new("BodyGyro")
gyro.maxTorque = Vector3.new(100000, 0, 100000)

local hum = game.Players.LocalPlayer.Character.Humanoid

function onButton1Down(mouse)
down = true
velocity.Parent = game.Players.LocalPlayer.Character.UpperTorso
velocity.velocity = (hum.MoveDirection) * speed
gyro.Parent = game.Players.LocalPlayer.Character.UpperTorso
while down do
if not down then break end
velocity.velocity = (hum.MoveDirection) * speed
local refpos = gyro.Parent.Position + (gyro.Parent.Position - workspace.CurrentCamera.CoordinateFrame.p).unit * 5
gyro.cframe = CFrame.new(gyro.Parent.Position, Vector3.new(refpos.x, gyro.Parent.Position.y, refpos.z))
wait(0.1)
end
end

function onButton1Up(mouse)
velocity.Parent = nil
gyro.Parent = nil
down = false
end
--To Change the key in those 2 lines, replace the "q" with your desired key
function onSelected(mouse)
mouse.KeyDown:connect(function(k) if k:lower()=="q"then onButton1Down(mouse)end end)
mouse.KeyUp:connect(function(k) if k:lower()=="q"then onButton1Up(mouse)end end)
end

onSelected(game.Players.LocalPlayer:GetMouse())
end)
aimbot.Name = "aimbot"
aimbot.Parent = MainFrame
aimbot.BackgroundColor3 = Color3.new(0.0588235, 0.0588235, 0.0588235)
aimbot.Position = UDim2.new(0.25124377, 0, 0.618181825, 0)
aimbot.Size = UDim2.new(0, 200, 0, 50)
aimbot.Font = Enum.Font.SciFi
aimbot.Text = "Aimbot"
aimbot.TextColor3 = Color3.new(1, 1, 1)
aimbot.TextSize = 20
aimbot.MouseButton1Down:connect(function()
local check = game:GetService("ReplicatedStorage").gameplay.ball:WaitForChild("check")
function check.OnClientInvoke()
return true
end

--[[
Written by A1_exe
Edited by Shrektella
L to Use the Aimbot
Q to toggle between 100/99 accuracy
]]

local player = game:GetService('Players').LocalPlayer
local mouse = player:GetMouse()

local range_min, range_max = 99, 100;
mouse.KeyDown:connect(function(key)
if key == "q" then
if range_min == 99 and range_max == 99 then
range_min = 100
range_max = 100
print("100")
else if range_min == 100 and range_max == 100 then
range_min = 99
range_max = 99
print("99")
end
end
end
end)

local playerData = player:FindFirstChild('System')
local onTeam = playerData and playerData:FindFirstChild('OnTeam')

local storage = game:GetService('ReplicatedStorage')
local gp = storage.gameplay
local char = gp.character
local val = char.value

local function find(t,i)
  for index, val in next, (t) do
      if (index == i) then
          return true, index, val
      elseif (val == i) then
          return true, index, val
      end
  end
end

local hoops = (function()
  local hs = {},{};

  local rec do
      rec = function(o)
          for __, child in next, (o:GetChildren()) do
              if string.lower(child['Name']):match('hoop') and child:FindFirstChild('Goal') then
                  table.insert(hs, child)
              elseif #child:GetChildren() > 0 then
                  rec(child)
              end
          end
      end
  end

  rec(game.Workspace)

  return hs
end)()

local getShoot = function()
  local c = player.Character or player.CharacterAdded:wait()
  local hrp = c:WaitForChild('HumanoidRootPart',5)
  if not hrp then print('No humanoid root part.')  return end


  local ball;
  for __, obj in next, (workspace:GetChildren()) do
      if obj.Name:lower() == 'basketball'  and obj.controller.Value == player.Name then
          return obj.shoot
      end
  end
end

local getHoop = function()
  local c = player.Character or player.CharacterAdded:wait()
  local hrp = c:WaitForChild('HumanoidRootPart',5)
  if not hrp then print('No humanoid root part.') return end

  local last, closest = math.huge;
  for __, hoop in next, (hoops) do
      local goal = hoop:FindFirstChild('Goal')

      if goal then
          local dist = (hrp.Position-goal.Position).magnitude
          if dist < last then
              last = dist
              closest = hoop
          end
      end
  end
  return closest
end

local Attack = function(shoot, hoop)
  if shoot and hoop then
     val:FireServer("shooting", true)
     shoot:FireServer(hoop, math.random(range_min,range_max), true)
  end
end

mouse.KeyDown:connect(function(key)
  if key == "l" then
      local shoot = getShoot()
      local hoop = getHoop()

      court = hoop.Parent
      local data = court:FindFirstChild('GameData')
      local teamball = data and data:FindFirstChild('TeamBall')

      local h1 = court:FindFirstChild('_Hoop1')
      local h2 = court:FindFirstChild('_Hoop2')

      if OnTeam and OnTeam.Value == 1 and h1 then
          Attack(shoot,h1)
          return
      elseif OnTeam and OnTeam.Value == 2  and h2 then
          Attack(shoot,h2)
          return
      end

      if teamball and teamball.Value == 1 and h1 then
          Attack(shoot,h1)
          return
      elseif teamball and teamball.Value == 2  and h2 then
          Attack(shoot,h2)
          return
      end


     Attack(shoot,hoop)
  end
end)
end)
how.Name = "how"
how.Parent = MainFrame
how.BackgroundColor3 = Color3.new(0.0588235, 0.0588235, 0.0588235)
how.Position = UDim2.new(0.298507452, 0, 0.454545438, 0)
how.Size = UDim2.new(0, 162, 0, 24)
how.Font = Enum.Font.SciFi
how.Text = "Press Q to use speed"
how.TextColor3 = Color3.new(1, 1, 1)
how.TextSize = 14

use.Name = "use"
use.Parent = MainFrame
use.BackgroundColor3 = Color3.new(0.0588235, 0.0588235, 0.0588235)
use.Position = UDim2.new(0.298507452, 0, 0.861818194, 0)
use.Size = UDim2.new(0, 162, 0, 24)
use.Font = Enum.Font.SciFi
use.Text = "Press L to use aimbot"
use.TextColor3 = Color3.new(1, 1, 1)
use.TextSize = 14
-- Scripts: