Magnet Simulator gui

Bacot1 = 0
Bacot2 = 0
Bacot3 = 0
Bacot4 = 0


-- Objects

plr = game:GetService('Players').LocalPlayer
Bocah = game.Players.LocalPlayer.Character.HumanoidRootPart
local Magnet = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local Ar = Instance.new("TextButton")
local Credit = Instance.new("TextLabel")
local Af = Instance.new("TextButton")
local NamaEgg = Instance.new("TextBox")
local As = Instance.new("TextButton")
local Ab = Instance.new("TextButton")
local PetName = Instance.new("TextBox")
local Dupe = Instance.new("TextButton")
local Jumlah = Instance.new("TextBox")
local title = Instance.new("TextLabel")
local X = Instance.new("TextButton")

-- Properties

Magnet.Name = "Magnet"
Magnet.Parent = game.CoreGui

Frame.Archivable = false
Frame.Parent = Magnet
Frame.Active = true
Frame.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
Frame.BorderColor3 = Color3.new(0, 0.666667, 1)
Frame.BorderSizePixel = 5
Frame.Position = UDim2.new(0.183547065, 0, 0.191689655, 0)
Frame.Size = UDim2.new(0, 422, 0, 320)
Frame.Draggable = true

Ar.Name = "Ar"
Ar.Parent = Frame
Ar.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
Ar.BorderColor3 = Color3.new(0, 0.666667, 1)
Ar.BorderSizePixel = 5
Ar.Position = UDim2.new(0.0664502159, 0, 0.304287851, 0)
Ar.Size = UDim2.new(0, 142, 0, 44)
Ar.Font = Enum.Font.SciFi
Ar.Text = "Auto Rebirth 100"
Ar.TextColor3 = Color3.new(0.666667, 0, 0)
Ar.TextScaled = true
Ar.TextSize = 14
Ar.TextWrapped = true

Credit.Name = "Credit"
Credit.Parent = Frame
Credit.BackgroundColor3 = Color3.new(1, 0, 0)
Credit.BackgroundTransparency = 1
Credit.Position = UDim2.new(0.113744088, 0, 1.02499986, 0)
Credit.Size = UDim2.new(0, 200, 0, 24)
Credit.Font = Enum.Font.GothamBold
Credit.Text = "Credits: Script Maker, ScRipt HunTer"
Credit.TextColor3 = Color3.new(1, 0, 0)
Credit.TextSize = 20
Credit.TextXAlignment = Enum.TextXAlignment.Left
Credit.TextYAlignment = Enum.TextYAlignment.Top

Af.Name = "Af"
Af.Parent = Frame
Af.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
Af.BorderColor3 = Color3.new(0, 0.666667, 1)
Af.BorderSizePixel = 5
Af.Position = UDim2.new(0.60199523, 0, 0.304287851, 0)
Af.Size = UDim2.new(0, 142, 0, 44)
Af.Font = Enum.Font.SciFi
Af.Text = "AutoFarm"
Af.TextColor3 = Color3.new(0.666667, 0, 0)
Af.TextScaled = true
Af.TextSize = 14
Af.TextWrapped = true

NamaEgg.Name = "NamaEgg"
NamaEgg.Parent = Frame
NamaEgg.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
NamaEgg.BorderColor3 = Color3.new(0, 0.666667, 1)
NamaEgg.BorderSizePixel = 5
NamaEgg.Position = UDim2.new(0.225118488, 0, 0.065624997, 0)
NamaEgg.Size = UDim2.new(0, 233, 0, 50)
NamaEgg.Font = Enum.Font.SciFi
NamaEgg.Text = "Egg Name"
NamaEgg.TextColor3 = Color3.new(0.666667, 0, 0)
NamaEgg.TextScaled = true
NamaEgg.TextSize = 14
NamaEgg.TextWrapped = true

As.Name = "As"
As.Parent = Frame
As.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
As.BorderColor3 = Color3.new(0, 0.666667, 1)
As.BorderSizePixel = 5
As.Position = UDim2.new(0.0664502159, 0, 0.529287815, 0)
As.Size = UDim2.new(0, 142, 0, 44)
As.Font = Enum.Font.SciFi
As.Text = "AutoSell"
As.TextColor3 = Color3.new(0.666667, 0, 0)
As.TextScaled = true
As.TextSize = 14
As.TextWrapped = true

Ab.Name = "Ab"
Ab.Parent = Frame
Ab.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
Ab.BorderColor3 = Color3.new(0, 0.666667, 1)
Ab.BorderSizePixel = 5
Ab.Position = UDim2.new(0.601995289, 0, 0.529287815, 0)
Ab.Size = UDim2.new(0, 142, 0, 44)
Ab.Font = Enum.Font.SciFi
Ab.Text = "Auto Buy Egg"
Ab.TextColor3 = Color3.new(0.666667, 0, 0)
Ab.TextScaled = true
Ab.TextSize = 14
Ab.TextWrapped = true

PetName.Name = "PetName"
PetName.Parent = Frame
PetName.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
PetName.BorderColor3 = Color3.new(0, 0.666667, 1)
PetName.BorderSizePixel = 5
PetName.Position = UDim2.new(0.0663507134, 0, 0.721875012, 0)
PetName.Size = UDim2.new(0, 185, 0, 27)
PetName.Font = Enum.Font.SciFi
PetName.Text = "Pet name here"
PetName.TextColor3 = Color3.new(0.666667, 0, 0)
PetName.TextScaled = true
PetName.TextSize = 14
PetName.TextWrapped = true

Dupe.Name = "Dupe"
Dupe.Parent = Frame
Dupe.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
Dupe.BorderColor3 = Color3.new(0, 0.666667, 1)
Dupe.BorderSizePixel = 5
Dupe.Position = UDim2.new(0.56881994, 0, 0.773037791, 0)
Dupe.Size = UDim2.new(0, 142, 0, 44)
Dupe.Font = Enum.Font.SciFi
Dupe.Text = "Dupe Pet"
Dupe.TextColor3 = Color3.new(0.666667, 0, 0)
Dupe.TextScaled = true
Dupe.TextSize = 14
Dupe.TextWrapped = true

Jumlah.Name = "Jumlah"
Jumlah.Parent = Frame
Jumlah.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
Jumlah.BorderColor3 = Color3.new(0, 0.666667, 1)
Jumlah.BorderSizePixel = 5
Jumlah.Position = UDim2.new(0.0663507134, 0, 0.875, 0)
Jumlah.Size = UDim2.new(0, 185, 0, 27)
Jumlah.Font = Enum.Font.SciFi
Jumlah.Text = "How Many You Want?"
Jumlah.TextColor3 = Color3.new(0.666667, 0, 0)
Jumlah.TextScaled = true
Jumlah.TextSize = 14
Jumlah.TextWrapped = true

title.Name = "title"
title.Parent = Frame
title.BackgroundColor3 = Color3.new(0, 0, 0)
title.BorderColor3 = Color3.new(0, 0.666667, 1)
title.BorderSizePixel = 5
title.Position = UDim2.new(-0.0253578648, 0, -0.0338308662, 0)
title.Size = UDim2.new(0, 443, 0, 40)
title.Font = Enum.Font.SciFi
title.Text = "MAGNET SIMULATOR GUI"
title.TextColor3 = Color3.new(0.666667, 0, 0)
title.TextSize = 25
title.TextWrapped = true

X.Name = "X"
X.Parent = title
X.BackgroundColor3 = Color3.new(0, 0, 0)
X.BorderColor3 = Color3.new(0, 0.666667, 1)
X.BorderSizePixel = 5
X.Position = UDim2.new(0.899318576, 0, -0.0343750007, 0)
X.Size = UDim2.new(0, 42, 0, 41)
X.Font = Enum.Font.SciFi
X.Text = "X"
X.TextColor3 = Color3.new(0.666667, 0, 0)
X.TextScaled = true
X.TextSize = 14
X.TextWrapped = true

-- Script

Ar.MouseButton1Click:connect(function()
    if Bacot1 == 1 then
        Bacot1 = 0
        Fiture1 = false
        Ar.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
    else
        Bacot1 = 1
        Fiture1 = true
        Ar.BackgroundColor3 = Color3.new(0, 255, 0)
        if Fiture1 == true then
              while Fiture1 do
              wait(5)
              game:GetService("ReplicatedStorage").RebirthEvents.requestRebirthBoard:FireServer("5_100Rebirths")
          end
               end
        end
end)

Af.MouseButton1Click:connect(function()
    if Bacot2 == 1 then
        Bacot2 = 0
        Fiture2 = false
        Af.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
    else
        Bacot2 = 1
        Fiture2 = true
        Af.BackgroundColor3 = Color3.new(0, 255, 0)
        farm()
    end
end)

Awal = Bocah.CFrame
As.MouseButton1Click:connect(function()
    if Bacot3 == 1 then
        Bacot3 = 0
        Fiture3 = false
        As.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
    else
        Bacot3 = 1
        Fiture3 = true
        As.BackgroundColor3 = Color3.new(0, 255, 0)
        if Fiture3 == true then
            while Fiture3 do
                game:GetService('RunService').Stepped:wait()
                Bocah.CFrame = CFrame.new(136.73712158203, 13.362461090088, -52.908908843994)
               wait()
               Bocah.CFrame = CFrame.new(136.83712158203, 13.362461090088, -52.908908843994)
               wait()
            end
            Bocah.CFrame = Awal
            end
        end

end)

Ab.MouseButton1Click:connect(function()
    if Bacot4 == 1 then
        Bacot4 = 0
        Fiture4 = false
        Ab.BackgroundColor3 = Color3.new(0.776471, 0.784314, 0.772549)
    else
        Bacot4 = 1
        Fiture4 = true
        Ab.BackgroundColor3 = Color3.new(0, 255, 0)
            if Fiture4 == true then
        while Fiture4 do
            wait()
                    game.ReplicatedStorage.PetEvents.requesthatch:FireServer(NamaEgg.Text)
       end
    end
    end
end)

Dupe.MouseButton1Click:connect(function()
local A_1   = PetName.Text
local A_2   = -Jumlah.Text
local Event = game:GetService("ReplicatedStorage").PetEvents.requestDelete
Event:FireServer(A_1, A_2)
end)

X.MouseButton1Click:connect(function()
    Magnet:Destroy()
end)

-- Pls Dont Edit THis ;)
Fiture1 = false
Fiture2 = false
Fiture3 = false
Fiture4 = false

function farm()
       if Fiture2 == true then
while Fiture2 do
game:GetService('RunService').Stepped:wait()
for i = 1,25 do
local tool = game.ReplicatedStorage.Tools["Galaxy Rebirth Magnet"]
if tool then
   local A_1 = "72000"
local A_2 = tool
local Event = game:GetService("ReplicatedStorage").Events.MagnetEvents.requestGrab
Event:FireServer(A_1, A_2)
else
local tool = game.ReplicatedStorage.Tools["Galaxy Rebirth Magnet"]
if tool then
   local A_1 = "72000"
local A_2   = tool
local Event = game:GetService("ReplicatedStorage").Events.MagnetEvents.requestGrab
Event:FireServer(A_1, A_2)
end
end
end
end
   end
end

if Credit.Text == "Credits: Script Maker, ScRipt HunTer" then
    Magnet.Parent = game.CoreGui
else
    Magnet:Destroy()
end