Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[Metal Detecting Simulator - Farm, Rebirth, Shop
- Created by LuckyMMB @ V3rmillion.net
- Discord https://discord.gg/GKzJnUC
- Credits to Deidara @ v3rmillion for the dig script
- ]]
- plr=game:GetService('Players').LocalPlayer
- farmactive = false
- rebirthactive = false
- local MainGUI = Instance.new("ScreenGui")
- local MainFrame = Instance.new("Frame")
- local Farm = Instance.new("TextButton")
- local Shop = Instance.new("TextButton")
- local Rebirth = Instance.new("TextButton")
- MainGUI.Name = "MainGUI"
- MainGUI.Parent = game.CoreGui
- local MainCORE = game.CoreGui["MainGUI"]
- MainFrame.Name = "MainFrame"
- MainFrame.Parent = MainGUI
- MainFrame.BackgroundColor3 = Color3.new(0.5, 0.5, 0.5)
- MainFrame.BackgroundTransparency = 0
- MainFrame.BorderColor3 = Color3.new(0.1, 0.1, 0.1)
- MainFrame.Active = true
- MainFrame.Selectable = true
- MainFrame.Draggable = true
- MainFrame.Position = UDim2.new(0, 5, 0.75, 0)
- MainFrame.Size = UDim2.new(0, 140, 0, 115)
- MainFrame.Visible = true
- Farm.Name = "Farm"
- Farm.Parent = MainFrame
- Farm.BackgroundColor3 = Color3.new(0, 0, 0)
- Farm.BorderColor3 = Color3.new(0.1, 0.1, 0.1)
- Farm.Position = UDim2.new(0, 10, 0, 10)
- Farm.Size = UDim2.new(0, 120, 0, 25)
- Farm.Font = Enum.Font.Fantasy
- Farm.TextColor3 = Color3.new(1, 1, 1)
- Farm.Text = "AUTO FARM"
- Farm.TextSize = 17
- Farm.TextWrapped = true
- Rebirth.Name = "Rebirth"
- Rebirth.Parent = MainFrame
- Rebirth.BackgroundColor3 = Color3.new(0, 0, 0)
- Rebirth.BorderColor3 = Color3.new(0.1, 0.1, 0.1)
- Rebirth.Position = UDim2.new(0, 10, 0, 45)
- Rebirth.Size = UDim2.new(0, 120, 0, 25)
- Rebirth.Font = Enum.Font.Fantasy
- Rebirth.TextColor3 = Color3.new(1, 1, 1)
- Rebirth.Text = "AUTO REBIRTH"
- Rebirth.TextSize = 17
- Rebirth.TextWrapped = true
- Shop.Name = "Shop"
- Shop.Parent = MainFrame
- Shop.BackgroundColor3 = Color3.new(0, 0, 0)
- Shop.BorderColor3 = Color3.new(0.1, 0.1, 0.1)
- Shop.Position = UDim2.new(0, 10, 0, 80)
- Shop.Size = UDim2.new(0, 120, 0, 25)
- Shop.Font = Enum.Font.Fantasy
- Shop.TextColor3 = Color3.new(1, 1, 1)
- Shop.Text = "GO TO SHOP"
- Shop.TextSize = 17
- Shop.TextWrapped = true
- function notify(msg)
- game.StarterGui:SetCore('SendNotification', {
- Title = 'Metal Detecting Simulator';
- Text = msg;
- Duration = 5;
- })
- end
- Farm.MouseButton1Click:connect(function()
- if farmactive == true then
- farmactive = false
- Farm.BackgroundColor3 = Color3.new(0, 0, 0)
- Farm.Text = "AUTO FARM"
- else
- farmactive = true
- Farm.BackgroundColor3 = Color3.new(0, 0.5, 0)
- Farm.Text = "STOP FARMING"
- game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-1203.73, 70.55, 398.512)
- for i=1,8 do
- spawn(function()
- game:GetService('RunService').RenderStepped:connect(function()
- if farmactive == true then
- workspace['__REMOTES'].Dig:FireServer('Stop','Bronze Relic', 2)
- workspace['__REMOTES'].Sell:FireServer()
- end
- end)
- end)
- end
- end
- end)
- Rebirth.MouseButton1Click:connect(function()
- if rebirthactive == true then
- rebirthactive = false
- Rebirth.BackgroundColor3 = Color3.new(0, 0, 0)
- Rebirth.Text = "AUTO REBIRTH"
- game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-264, 71.806, 451.9)
- else
- rebirthactive = true
- Rebirth.BackgroundColor3 = Color3.new(0, 0.5, 0)
- Rebirth.Text = "STOP REBIRTH"
- while rebirthactive == true do
- game:GetService("Workspace")["__REMOTES"].Rebirth:InvokeServer()
- if plr.leaderstats.Level.Value < 12 then
- game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-1203.73, 70.55, 398.512)
- end
- wait(2)
- end
- end
- end)
- Shop.MouseButton1Click:connect(function()
- game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(-256.373, 71.787, 366.732)
- notify'Teleported to the Shop'
- end)
- 2do script
- --Deidara V3rm
- local rem=workspace['__REMOTES']
- local rs = game:GetService('RunService')
- level=125
- plr=game:GetService('Players').LocalPlayer
- for i=1,10 do
- spawn(function()
- rs.RenderStepped:connect(function()
- if plr.leaderstats.Level.Value<level then
- wait()
- rem.Dig:FireServer('Stop','Dark Matter', 2)
- rem.Sell:FireServer()
- end
- end)
- end)
- end
Advertisement
Add Comment
Please, Sign In to add comment