Entities TP Anomic Roblox Gui

--By axelloft1
-- Instances:
local Byaxelloft1AN = Instance.new("ScreenGui")
local Ple = Instance.new("Frame")
local Des = Instance.new("Frame")
local Left = Instance.new("TextButton")
local Right = Instance.new("TextButton")
local Entities = Instance.new("TextLabel")
local OpenK = Instance.new("ImageButton")
local Title = Instance.new("TextLabel")
local Close = Instance.new("ImageButton")

--Properties:

Byaxelloft1AN.Name = "Byaxelloft1AN"
Byaxelloft1AN.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
Byaxelloft1AN.ResetOnSpawn = false
Ple.Name = "Ple"
Ple.Parent = Byaxelloft1AN
Ple.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Ple.Position = UDim2.new(0.0712616816, 0, 0.304985374, 0)
Ple.Size = UDim2.new(0, 100, 0, 30)
Ple.Style = Enum.FrameStyle.RobloxRound
Ple.Active = true
Ple.Draggable = true

Des.Name = "Des"
Des.Parent = Ple
Des.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Des.Position = UDim2.new(-0.099999994, 0, 2.16666675, 0)
Des.Size = UDim2.new(0, 100, 0, 100)
Des.Visible = false
Des.Style = Enum.FrameStyle.RobloxRound

Left.Name = "Left"
Left.Parent = Des
Left.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
Left.BackgroundTransparency = 0.500
Left.Position = UDim2.new(0.00400001509, 0, 0.525202036, 0)
Left.Size = UDim2.new(0, 40, 0, 40)
Left.Font = Enum.Font.SourceSans
Left.Text = "<"
Left.TextColor3 = Color3.fromRGB(255, 255, 255)
Left.TextScaled = true
Left.TextSize = 14.000
Left.TextStrokeTransparency = 0.000
Left.TextWrapped = true

Right.Name = "Right"
Right.Parent = Des
Right.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
Right.BackgroundTransparency = 0.500
Right.Position = UDim2.new(0.519439995, 0, 0.524287999, 0)
Right.Size = UDim2.new(0, 40, 0, 40)
Right.Font = Enum.Font.SourceSans
Right.Text = ">"
Right.TextColor3 = Color3.fromRGB(255, 255, 255)
Right.TextScaled = true
Right.TextSize = 14.000
Right.TextStrokeTransparency = 0.000
Right.TextWrapped = true

Entities.Name = "Entities"
Entities.Parent = Des
Entities.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Entities.Position = UDim2.new(0.010375753, 0, -0.00261810049, 0)
Entities.Size = UDim2.new(0, 83, 0, 41)
Entities.Font = Enum.Font.SourceSans
Entities.Text = "Entities Tp By axelloft1"
Entities.TextColor3 = Color3.fromRGB(0, 0, 0)
Entities.TextSize = 20.000
Entities.TextStrokeColor3 = Color3.fromRGB(255, 255, 255)
Entities.TextStrokeTransparency = 0.000
Entities.TextWrapped = true

OpenK.Name = "Open"
OpenK.Parent = Ple
OpenK.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
OpenK.BackgroundTransparency = 1.000
OpenK.Position = UDim2.new(0.689199984, 0, -0.435555518, 0)
OpenK.Size = UDim2.new(0, 25, 0, 25)
OpenK.Image = "rbxassetid://5228758862"

Title.Name = "Title"
Title.Parent = Ple
Title.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Title.BackgroundTransparency = 1.000
Title.Position = UDim2.new(-0.010640027, 0, -0.397313476, 0)
Title.Size = UDim2.new(0, 57, 0, 25)
Title.Font = Enum.Font.SourceSans
Title.Text = "Entities GUi"
Title.TextColor3 = Color3.fromRGB(255, 255, 255)
Title.TextSize = 13.000
Title.TextStrokeTransparency = 0.000
Title.TextWrapped = true

Close.Name = "Close"
Close.Parent = Ple
Close.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
Close.BackgroundTransparency = 1.000
Close.Position = UDim2.new(0.689199984, 0, -0.435555518, 0)
Close.Size = UDim2.new(0, 25, 0, 25)
Close.Visible = false
Close.Image = "rbxassetid://5228759315"

local Entitiesx = {}
local Arrow = 0
local Ra = 0
function Check()
Entities.Text = "Entities Tp By axelloft1"
Entitiesx = {}
for i,v in pairs(game.Workspace.Entities:GetChildren()) do
table.insert(Entitiesx,#Entitiesx + 1,v)
end
end

function Tp()
local part = Entitiesx[Arrow]
game.Players.LocalPlayer.Character:MoveTo(part:FindFirstChildOfClass("Part").Position)

end
OpenK.MouseButton1Down:connect(function()
OpenK.Visible = false
Close.Visible = true
Des.Visible = true
end)
Close.MouseButton1Down:connect(function()

Close.Visible = false
OpenK.Visible = true
Des.Visible = false
end)
Right.MouseButton1Down:connect(function()
Check()
Arrow = Arrow + 1
if Arrow > #Entitiesx then
Arrow = 1
end
Tp()
end)
Left.MouseButton1Down:connect(function()
Check()
Arrow = Arrow - 1
if Arrow < 1 then
Arrow = #Entitiesx
end
Tp()
end)