magnet sim scrrtt

--// DarkDevs - https://discord.gg/k8weRMV
--// GUI by Dissapear#6969
--// Free Script/GUI, Credits for people made that script!
-- Objects

local DarkDevs = Instance.new("ScreenGui")
local Main = Instance.new("Frame")
local HeaderMain = Instance.new("Frame")
local HeaderShadow = Instance.new("Frame")
local TextLabel = Instance.new("TextLabel")
local TextLabel_2 = Instance.new("TextLabel")
local ScrollingFrame = Instance.new("ScrollingFrame")
local Changelog = Instance.new("TextLabel")
local Infinitereach = Instance.new("TextButton")
local tpallcoins = Instance.new("TextButton")
local tprandomcoins = Instance.new("TextButton")
local autograbcoins = Instance.new("TextButton")
local soon = Instance.new("TextLabel")

-- Properties

DarkDevs.Name = "DarkDevs"
DarkDevs.Parent = game.CoreGui

Main.Name = "Main"
Main.Parent = DarkDevs
Main.BackgroundColor3 = Color3.new(0.137255, 0.137255, 0.137255)
Main.BorderSizePixel = 0
Main.Position = UDim2.new(0.22121048, 0, 0.237292588, 0)
Main.Size = UDim2.new(0, 546, 0, 286)
Main.Active = true
Main.Draggable = true

HeaderMain.Name = "HeaderMain"
HeaderMain.Parent = Main
HeaderMain.BackgroundColor3 = Color3.new(0.0941177, 0.0941177, 0.0941177)
HeaderMain.BorderSizePixel = 0
HeaderMain.Position = UDim2.new(0, 0, -0.125874132, 0)
HeaderMain.Size = UDim2.new(0, 546, 0, 36)

HeaderShadow.Name = "HeaderShadow"
HeaderShadow.Parent = HeaderMain
HeaderShadow.BackgroundColor3 = Color3.new(0.0705882, 0.0705882, 0.0705882)
HeaderShadow.BorderSizePixel = 0
HeaderShadow.Position = UDim2.new(0, 0, 0.800000012, 0)
HeaderShadow.Size = UDim2.new(0, 546, 0, 6)

TextLabel.Parent = HeaderMain
TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel.BackgroundTransparency = 1
TextLabel.Position = UDim2.new(0.0109890103, 0, 0, 0)
TextLabel.Size = UDim2.new(0, 33, 0, 30)
TextLabel.Font = Enum.Font.GothamBold
TextLabel.Text = "D"
TextLabel.TextColor3 = Color3.new(1, 0, 0)
TextLabel.TextSize = 22

TextLabel_2.Parent = HeaderMain
TextLabel_2.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel_2.BackgroundTransparency = 1
TextLabel_2.Position = UDim2.new(0.0457875505, 0, 0, 0)
TextLabel_2.Size = UDim2.new(0, 119, 0, 30)
TextLabel_2.Font = Enum.Font.GothamBold
TextLabel_2.Text = "ARK DEVS"
TextLabel_2.TextColor3 = Color3.new(1, 1, 1)
TextLabel_2.TextSize = 22

ScrollingFrame.Parent = Main
ScrollingFrame.BackgroundColor3 = Color3.new(0.0941177, 0.0941177, 0.0941177)
ScrollingFrame.BorderSizePixel = 0
ScrollingFrame.Position = UDim2.new(0.652014673, 0, 0.0244755242, 0)
ScrollingFrame.Size = UDim2.new(0, 176, 0, 268)


Changelog.Name = "Changelog"
Changelog.Parent = ScrollingFrame
Changelog.BackgroundColor3 = Color3.new(1, 1, 1)
Changelog.BackgroundTransparency = 1
Changelog.Position = UDim2.new(0.0340909101, 0, 0, 0)
Changelog.Size = UDim2.new(0, 162, 0, 268)
Changelog.Font = Enum.Font.SourceSans
Changelog.Text = "[+] New Update!"
Changelog.TextColor3 = Color3.new(1, 1, 1)
Changelog.TextSize = 14
Changelog.TextXAlignment = Enum.TextXAlignment.Left
Changelog.TextYAlignment = Enum.TextYAlignment.Top

Infinitereach.Name = "Infinitereach"
Infinitereach.Parent = Main
Infinitereach.BackgroundColor3 = Color3.new(0.0941177, 0.0941177, 0.0941177)
Infinitereach.BorderSizePixel = 0
Infinitereach.Position = UDim2.new(0.0238095243, 0, 0.0454545468, 0)
Infinitereach.Size = UDim2.new(0, 165, 0, 50)
Infinitereach.Font = Enum.Font.SourceSans
Infinitereach.Text = "Infinite Reach"
Infinitereach.TextColor3 = Color3.new(1, 1, 1)
Infinitereach.TextSize = 14

tpallcoins.Name = "tpallcoins"
tpallcoins.Parent = Main
tpallcoins.BackgroundColor3 = Color3.new(0.0941177, 0.0941177, 0.0941177)
tpallcoins.BorderSizePixel = 0
tpallcoins.Position = UDim2.new(0.336996347, 0, 0.0454545468, 0)
tpallcoins.Size = UDim2.new(0, 165, 0, 50)
tpallcoins.Font = Enum.Font.SourceSans
tpallcoins.Text = "Teleport All Coins"
tpallcoins.TextColor3 = Color3.new(1, 1, 1)
tpallcoins.TextSize = 14

tprandomcoins.Name = "tprandomcoins"
tprandomcoins.Parent = Main
tprandomcoins.BackgroundColor3 = Color3.new(0.0941177, 0.0941177, 0.0941177)
tprandomcoins.BorderSizePixel = 0
tprandomcoins.Position = UDim2.new(0.336996347, 0, 0.244755253, 0)
tprandomcoins.Size = UDim2.new(0, 165, 0, 50)
tprandomcoins.Font = Enum.Font.SourceSans
tprandomcoins.Text = "Teleport to Random Coins"
tprandomcoins.TextColor3 = Color3.new(1, 1, 1)
tprandomcoins.TextSize = 14

autograbcoins.Name = "autograbcoins"
autograbcoins.Parent = Main
autograbcoins.BackgroundColor3 = Color3.new(0.0941177, 0.0941177, 0.0941177)
autograbcoins.BorderSizePixel = 0
autograbcoins.Position = UDim2.new(0.0238095243, 0, 0.244755253, 0)
autograbcoins.Size = UDim2.new(0, 165, 0, 50)
autograbcoins.Font = Enum.Font.SourceSans
autograbcoins.Text = "Auto Grab Coins"
autograbcoins.TextColor3 = Color3.new(1, 1, 1)
autograbcoins.TextSize = 14

soon.Name = "soon"
soon.Parent = Main
soon.BackgroundColor3 = Color3.new(1, 1, 1)
soon.BackgroundTransparency = 1
soon.Position = UDim2.new(0.0238095243, 0, 0.783216774, 0)
soon.Size = UDim2.new(0, 336, 0, 51)
soon.Font = Enum.Font.SourceSansSemibold
soon.Text = "All Credits to people who made that script, i dont know his name, but thanks for the script also join our discord server for getting more information about Dark Devs GUI"
soon.TextColor3 = Color3.new(1, 1, 1)
soon.TextSize = 14
soon.TextWrapped = true
soon.TextXAlignment = Enum.TextXAlignment.Left
soon.TextYAlignment = Enum.TextYAlignment.Top


-- script
autograbcoins.MouseButton1Down:connect(function()
while wait() do
local plr = game:GetService("Players").LocalPlayer.Character.HumanoidRootPart
local Humanoid = game:GetService("Players").LocalPlayer.Character.Humanoid
Humanoid:UnequipTools()
local tool = game:GetService("Players").LocalPlayer.Backpack:FindFirstChildOfClass("Tool")
local path = game.Workspace.GlobalCoins
for i,v in pairs(path:GetChildren()) do
if v.ClassName == 'Part' then
v.CFrame = plr.CFrame
wait()
game:GetService("ReplicatedStorage").Events.MagnetEvents.requestGrab:FireServer(v, tool)
end
end
end
end)

tprandomcoins.MouseButton1Down:connect(function()
local plr = game:GetService("Players").LocalPlayer.Character.HumanoidRootPart
local path = game.Workspace.GlobalCoins
for i,v in pairs(path:GetChildren()) do
if v.ClassName == 'Part' then
v.CFrame = plr.CFrame
end
end
end)

tpallcoins.MouseButton1Down:connect(function()
local plr = game:GetService("Players").LocalPlayer.Character.HumanoidRootPart
local path = game.Workspace.GlobalCoins
for i,v in pairs(path:GetChildren()) do
if v.ClassName == 'Part' then
v.CFrame = plr.CFrame
end
end
end)

Infinitereach.MouseButton1Down:connect(function()
local plrnamed = game.Players.LocalPlayer.Name
local plr = game.Players.LocalPlayer
local s = game.workspace.Rings.Sell
local tool = game.workspace[plr.Name]:FindFirstChildWhichIsA("Tool")
while wait() do
local Hecc = game:GetService("Workspace").plrnamed[tool.Name]
local Remote = game:GetService("ReplicatedStorage").Events.MagnetEvents.requestGrab
s.CanCollide = false
s.CFrame = plr.Character.HumanoidRootPart.CFrame
Remote:FireServer("1250", Hecc)
end
end)

local opened = false
local mouse = game:GetService("Players").LocalPlayer:GetMouse()

mouse.KeyDown:connect(function(key)
if key:lower() == "v" then
	if opened == false then
	Main:TweenPosition(UDim2.new(0.221, 0, 0.237, 0), 'In', 'Back', 1, true)
	opened = true
	else
	Main:TweenPosition(UDim2.new(-0.55, 0, 0.257, 0), 'In', 'Back', 1, true)
	opened = false
	end
	end
end)