Miners Haven

--[[
Morning Star/Neutron Star Quick loop V2a made by LuckyMMB @ v3rmillion.	Discord https://discord.gg/GKzJnUC

Thanks to footwears @v3rmillion for the tp loop script which I modified and put in to setups.

SMALL SETUP
You need a Symmetrium or Symmetryte Mine, 1 Nature's Grip furnace and 1 Morning Star. This will make NvD-Vgn
in about 2 minutes and is extremely efficient. The quickest ever method to get an Overlord Device.
MEDIUM SETUP
You need a Symmetrium or Symmetryte Mine, 1 Nature's Grip furnace and 1 Neutron Star. This will make UVg-DVg
in about 2 minutes and is extremely efficient. Use this if you don't have the Big Setup upgraders.
BIG SETUP
You need a Symmetrium or Symmetryte Mine, 1 Nature's Grip furnace, 1 Neutron Star, 1 Tesla Refuter, 3 Quantum
Clockwork, 3 True Overlord Devices, 1 The Final Upgrader, 1 Saturated Catalyst, 1 Catalyst, 2 Quantum Ore Polisher,
2 Azure Spore and a Sage King Furnace. This will get NVG and takes less than 3 minutes from start to rebirth.
CUSTOM SETUP
This can be used in public, private or solo games as it uses the Layouts feature. Place a good dropper and
a furnace and save it to Layout1 (in Base Settings, Layouts) and place a setup with 1 Morning Star OR 1
Neutron Star at the start and a furnace at the end and save it to Layout2. The setup will place down Layout1
for a few seconds, then buy some basic items (conveyors, pink/blue teleporters and ramps), clear the base
and place Layout2. This means you can use conveyors, teleporters and ramps in Layout2 that you may not have
in your inventory. The ore will then loop through the Star (automatically detected by the script which is why
you can only place 1) and carry on to the furnace. If you just want to use the preset setup then go a Solo
game and start the Big Setup, save it to Layout2 then you can go in any server and Layout2 will load.
You can tweak the setup or make your own its completely up to you.

Sometimes the ore may overload the star and come out early so it doesn't make enough money to rebirth or it may
not re-enable the ore when the setup restarts so the extra items wont buy and it will break the loop. If this
happens click the setup off/on to restart it or the setup will restart automatically after waiting 4 minutes.

You can change the numbers below to fine tune the ore going in (around 50-80 is a good number) and the
number of loops (1000 should be fine but you can take it up to 1200 if you really want to) to get the max
value from your ore.

B key brings all the ore to your location. Good for clearing blockages or just testing a certain upgrader.
N key toggles Ore Gates Open/Closed.
M key Toggles all the mines ON/OFF.
H key Remote Clicks the Lightningbolt Refiner Lightningbolt Predicter and Arcane Lightning Upgraders.
J key toggles Remote Clicking On/OFF.
K key toggles Reversible Conveyors.
]]

defaultdropper = "symmetrium" -- Mine used. Choose between symmetrium or symmetryte --
oretime = "30" -- Time in seconds ore drops before it starts looping. More time equals more ore --
loopnumber = "1000" -- Number of loops. About 850 is right but you can go higher --
turnminesoff = true -- Turn mines off when ores go to loop. Set to true or false --

smallsetupactive = false
mediumsetupactive = false
bigsetupactive = false
customsetupactive = false
rebirthactive = false
setuptimeactive = false
remoteclickstarted = false
remoteclickactive = false
oregatetoggleactive = false
upgraderclickstarted = false
upgraderclickactive = false

local player = game:GetService'Players'.LocalPlayer
local factorye = player.PlayerTycoon.Value
local Factory = tostring(factorye)

mouse = game.Players.LocalPlayer:GetMouse()

local MainGUI = Instance.new("ScreenGui")
local MainFrame = Instance.new("Frame")
local CloseMH = Instance.new("TextButton")
local Label = Instance.new("TextLabel")
local SmallSetup = Instance.new("TextButton")
local MediumSetup = Instance.new("TextButton")
local BigSetup = Instance.new("TextButton")
local SmallSetupText = Instance.new("TextLabel")
local MediumSetupText = Instance.new("TextLabel")
local BigSetupText = Instance.new("TextLabel")
local CustomSetup = Instance.new("TextButton")
local CustomSetupText = Instance.new("TextLabel")
local LoopFrame = Instance.new("Frame")
local LoopItem = Instance.new("TextBox")
local TPLoopNumber = Instance.new("TextBox")
local LoopButton = Instance.new("TextButton")
local Rebirth = Instance.new("TextButton")
local TPCrates = Instance.new("TextButton")
local CountTpCrates = Instance.new("TextLabel")

MainGUI.Name = "MainGUI"
MainGUI.Parent = game.CoreGui
local MainCORE = game.CoreGui["MainGUI"]

MainFrame.Name = "MainFrame"
MainFrame.Parent = MainGUI
MainFrame.BackgroundColor3 = Color3.new(1, 1, 1)
MainFrame.BorderColor3 = Color3.new(0, 0, 0)
MainFrame.Position = UDim2.new(1, -170, 0, 0)
MainFrame.Size = UDim2.new(0, 170, 0, 300)
MainFrame.Selectable = true
MainFrame.Active = true
MainFrame.Draggable = true

CloseMH.Name = "CloseMH"
CloseMH.Parent = MainFrame
CloseMH.BackgroundColor3 = Color3.new(0.5, 0.5, 0.5)
CloseMH.BorderColor3 = Color3.new(0, 0, 0)
CloseMH.Position = UDim2.new(0, 10, 0, 8)
CloseMH.Size = UDim2.new(0, 19, 0, 19)
CloseMH.Font = Enum.Font.SourceSans
CloseMH.Text = "X"
CloseMH.TextColor3 = Color3.new(1, 0, 0)
CloseMH.TextScaled = true
CloseMH.TextSize = 17

Label.Name = "Label"
Label.Parent = MainFrame
Label.BackgroundColor3 = Color3.new(1, 1, 1)
Label.BackgroundTransparency = 1
Label.BorderSizePixel = 0
Label.Position = UDim2.new(0, 31, 0, 4)
Label.Size = UDim2.new(0, 130, 0, 24)
Label.Font = Enum.Font.SourceSans
Label.Text = "Star Loop GUI"
Label.TextColor3 = Color3.new(0, 0, 0)
Label.TextSize = 22

SmallSetup.Name = "SmallSetup"
SmallSetup.Parent = MainFrame
SmallSetup.BackgroundColor3 = Color3.new(0.8, 0.8, 0.8)
SmallSetup.Position = UDim2.new(0, 10, 0, 35)
SmallSetup.Size = UDim2.new(0, 150, 0, 25)
SmallSetup.Font = Enum.Font.SourceSans
SmallSetup.Text = "SMALL SETUP: OFF\nMorning Star"
SmallSetup.TextColor3 = Color3.new(0, 0, 0)
SmallSetup.TextSize = 18
SmallSetup.TextWrapped = true

SmallSetupText.Name = "SmallSetupText"
SmallSetupText.Parent = MainFrame
SmallSetupText.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
SmallSetupText.Position = UDim2.new(0, 10, 0, 70)
SmallSetupText.Size = UDim2.new(0, 150, 0, 60)
SmallSetupText.Font = Enum.Font.SourceSans
SmallSetupText.Text = "Need Symmetrium Mine and a Morning Star. Everything is Automatic."
SmallSetupText.TextColor3 = Color3.new(1, 1, 1)
SmallSetupText.TextSize = 16
SmallSetupText.ZIndex = 6
SmallSetupText.Visible = false
SmallSetupText.TextWrapped = true

MediumSetup.Name = "MediumSetup"
MediumSetup.Parent = MainFrame
MediumSetup.BackgroundColor3 = Color3.new(0.8, 0.8, 0.8)
MediumSetup.Position = UDim2.new(0, 10, 0, 70)
MediumSetup.Size = UDim2.new(0, 150, 0, 25)
MediumSetup.Font = Enum.Font.SourceSans
MediumSetup.Text = "MEDIUM SETUP: OFF"
MediumSetup.TextColor3 = Color3.new(0, 0, 0)
MediumSetup.TextSize = 18
MediumSetup.TextWrapped = true

MediumSetupText.Name = "MediumSetupText"
MediumSetupText.Parent = MainFrame
MediumSetupText.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
MediumSetupText.Position = UDim2.new(0, 10, 0, 105)
MediumSetupText.Size = UDim2.new(0, 150, 0, 60)
MediumSetupText.Font = Enum.Font.SourceSans
MediumSetupText.Text = "Need Symmetrium Mine and a Neutron Star. Everything is Automatic."
MediumSetupText.TextColor3 = Color3.new(1, 1, 1)
MediumSetupText.TextSize = 16
MediumSetupText.ZIndex = 6
MediumSetupText.Visible = false
MediumSetupText.TextWrapped = true

BigSetup.Name = "BigSetup"
BigSetup.Parent = MainFrame
BigSetup.BackgroundColor3 = Color3.new(0.8, 0.8, 0.8)
BigSetup.Position = UDim2.new(0, 10, 0, 105)
BigSetup.Size = UDim2.new(0, 150, 0, 25)
BigSetup.Font = Enum.Font.SourceSans
BigSetup.Text = "BIG SETUP: OFF"
BigSetup.TextColor3 = Color3.new(0, 0, 0)
BigSetup.TextSize = 18
BigSetup.TextWrapped = true

BigSetupText.Name = "BigSetupText"
BigSetupText.Parent = MainFrame
BigSetupText.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
BigSetupText.Position = UDim2.new(0, 10, 0, 35)
BigSetupText.Size = UDim2.new(0, 150, 0, 60)
BigSetupText.Font = Enum.Font.SourceSans
BigSetupText.Text = "Need Symmetrium Mine Neutron Star and Reborn Items. Fully Automatic."
BigSetupText.TextColor3 = Color3.new(1, 1, 1)
BigSetupText.TextSize = 16
BigSetupText.ZIndex = 6
BigSetupText.Visible = false
BigSetupText.TextWrapped = true

CustomSetup.Name = "CustomSetup"
CustomSetup.Parent = MainFrame
CustomSetup.BackgroundColor3 = Color3.new(0.8, 0.8, 0.8)
CustomSetup.Position = UDim2.new(0, 10, 0, 140)
CustomSetup.Size = UDim2.new(0, 150, 0, 25)
CustomSetup.Font = Enum.Font.SourceSans
CustomSetup.Text = "CUSTOM SETUP: OFF"
CustomSetup.TextColor3 = Color3.new(0, 0, 0)
CustomSetup.TextSize = 18
CustomSetup.TextWrapped = true

CustomSetupText.Name = "CustomSetupText"
CustomSetupText.Parent = MainFrame
CustomSetupText.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
CustomSetupText.Position = UDim2.new(0, 10, 0, 35)
CustomSetupText.Size = UDim2.new(0, 150, 0, 95)
CustomSetupText.Font = Enum.Font.SourceSans
CustomSetupText.Text = "Save a good dropper and furnace to Layout1 and a setup with 1 Neutron Star OR 1 Morning Star to Layout2"
CustomSetupText.TextColor3 = Color3.new(1, 1, 1)
CustomSetupText.TextSize = 16
CustomSetupText.ZIndex = 6
CustomSetupText.Visible = false
CustomSetupText.TextWrapped = true

LoopFrame.Name = "LoopFrame"
LoopFrame.Parent = MainFrame
LoopFrame.BackgroundColor3 = Color3.new(0.3, 0.3, 0.9)
LoopFrame.BorderColor3 = Color3.new(0, 0, 0)
LoopFrame.Position = UDim2.new(0, 0, 0, 170)
LoopFrame.Size = UDim2.new(0, 170, 0, 55)

LoopItem.Name = "LoopItem"
LoopItem.Parent = MainFrame
LoopItem.BackgroundColor3 = Color3.new(0.7, 0.7, 0.7)
LoopItem.Position = UDim2.new(0, 10, 0, 175)
LoopItem.Size = UDim2.new(0, 150, 0, 20)
LoopItem.Font = Enum.Font.SourceSans
LoopItem.Text = "TYPE LOOP ITEM"
LoopItem.TextColor3 = Color3.new(0, 0, 0)
LoopItem.TextSize = 18
LoopItem.TextWrapped = true
LoopItem.ZIndex = 7

TPLoopNumber.Name = "TPLoopNumber"
TPLoopNumber.Parent = MainFrame
TPLoopNumber.BackgroundColor3 = Color3.new(0.7, 0.7, 0.7)
TPLoopNumber.Position = UDim2.new(0, 10, 0, 200)
TPLoopNumber.Size = UDim2.new(0, 50, 0, 20)
TPLoopNumber.Font = Enum.Font.SourceSans
TPLoopNumber.Text = "1000"
TPLoopNumber.TextColor3 = Color3.new(0, 0, 0)
TPLoopNumber.TextSize = 18
TPLoopNumber.TextWrapped = true
TPLoopNumber.ZIndex = 7

LoopButton.Name = "LoopButton"
LoopButton.Parent = MainFrame
LoopButton.BackgroundColor3 = Color3.new(0.7, 0.7, 0.7)
LoopButton.Position = UDim2.new(0, 65, 0, 200)
LoopButton.Size = UDim2.new(0, 95, 0, 20)
LoopButton.Font = Enum.Font.SourceSans
LoopButton.Text = "LOOP"
LoopButton.TextColor3 = Color3.new(0, 0, 0)
LoopButton.TextSize = 18
LoopButton.TextWrapped = true
LoopButton.ZIndex = 7

Rebirth.Name = "Rebirth"
Rebirth.Parent = MainFrame
Rebirth.BackgroundColor3 = Color3.new(0.8, 0.8, 0.8)
Rebirth.Position = UDim2.new(0, 10, 0, 230)
Rebirth.Size = UDim2.new(0, 150, 0, 25)
Rebirth.Font = Enum.Font.SourceSans
Rebirth.Text = "AUTO REBIRTH: OFF"
Rebirth.TextColor3 = Color3.new(0, 0, 0)
Rebirth.TextSize = 18
Rebirth.TextWrapped = true

TPCrates.Name = "TPCrates"
TPCrates.Parent = MainFrame
TPCrates.BackgroundColor3 = Color3.new(0.8, 0.8, 0.8)
TPCrates.Position = UDim2.new(0, 10, 0, 265)
TPCrates.Size = UDim2.new(0, 130, 0, 25)
TPCrates.Font = Enum.Font.SourceSans
TPCrates.Text = "TP TO CRATES: OFF"
TPCrates.TextColor3 = Color3.new(0, 0, 0)
TPCrates.TextSize = 18
TPCrates.TextWrapped = true

CountTpCrates.Name = "CountTpCrates"
CountTpCrates.Parent = MainFrame
CountTpCrates.BackgroundColor3 = Color3.new(0.8, 0.8, 0.8)
CountTpCrates.Position = UDim2.new(0, 140, 0, 265)
CountTpCrates.Size = UDim2.new(0, 20, 0, 25)
CountTpCrates.Font = Enum.Font.SourceSans
CountTpCrates.Text = "0"
CountTpCrates.TextColor3 = Color3.new(0, 0, 0)
CountTpCrates.TextSize = 18
CountTpCrates.TextWrapped = true

game.Lighting.Changed:connect(function()
	game.Lighting.TimeOfDay = "12:00:00"
	game.Lighting.FogEnd = 9999
	game.Lighting.Brightness = 1
	game.Lighting.ColorCorrection.Brightness = 0
	game.Lighting.ColorCorrection.Saturation = 0
	game.Lighting.Bloom.Intensity = 0
end)

local function addtptool()
	local Tele = Instance.new("Tool", game.Players.LocalPlayer.Backpack)
	Tele.RequiresHandle = false
	Tele.RobloxLocked = true
	Tele.Name = "TP Tool"
	Tele.ToolTip = "Teleport Tool"
	Tele.Equipped:connect(function(Mouse)
		Mouse.Button1Down:connect(function()
			if Mouse.Target then
				game.Workspace:FindFirstChild(game.Players.LocalPlayer.Name).HumanoidRootPart.CFrame = (CFrame.new(Mouse.Hit.x, Mouse.Hit.y + 5, Mouse.Hit.z))
			end
		end)
	end)
end
addtptool()

function notify(msg)
	game.StarterGui:SetCore('SendNotification', {
		Title = 'Miner\'s Haven';
		Text = msg;
		Duration = 5;
	})
end

CloseMH.MouseButton1Down:connect(function()
MainGUI:Destroy()
end)

SmallSetup.MouseEnter:connect(function()
	SmallSetupText.Visible = true
end)

SmallSetup.MouseLeave:connect(function()
	SmallSetupText.Visible = false
end)

MediumSetup.MouseEnter:connect(function()
	MediumSetupText.Visible = true
end)

MediumSetup.MouseLeave:connect(function()
	MediumSetupText.Visible = false
end)

BigSetup.MouseEnter:connect(function()
	BigSetupText.Visible = true
end)

BigSetup.MouseLeave:connect(function()
	BigSetupText.Visible = false
end)

CustomSetup.MouseEnter:connect(function()
	CustomSetupText.Visible = true
end)

CustomSetup.MouseLeave:connect(function()
	CustomSetupText.Visible = false
end)

spawn (function()
	while true do
		wait(0.1)
		if tpcratesactive == true then
			local player = game:GetService'Players'.LocalPlayer
			local children = game.Workspace:GetChildren()
			for i =1, #children do
				wait(0.1)
				if children[i] ~= nil then
					for x in string.gmatch(children[i].Name, "Crate") do
						if children[i].Parent then
							if children[i].Name ~= "GiftCrate" then
								player.Character:MoveTo(children[i].Position)
								wait(1)
							end
						end
					end
				end
			end
			local children = game.Workspace.Shadows:GetChildren()
			for i =1, #children do
				wait(0.1)
				if children[i] ~= nil then
					for x in string.gmatch(children[i].Name, "Crate") do
						if children[i].Parent then
							player.Character:MoveTo(children[i].Position)
							wait(1)
						end
					end
				end
			end
		game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(LocationX, LocationY, LocationZ)
		end
	end
end)

TPCrates.MouseButton1Down:connect(function()
	if tpcratesstarted == true then
		tpcratesstarted = false
		tpcratesactive = false
		TPCrates.Text = "TP TO CRATES: OFF"
		TPCrates.TextColor3 = Color3.new(0, 0, 0)
	else
		tpcratesstarted = true
		tpcratesactive = true
		TPCrates.Text = "TP TO CRATES: ON"
		TPCrates.TextColor3 = Color3.new(1, 0, 0)
		LocationX = game.Players.LocalPlayer.Character.HumanoidRootPart.Position.x
		LocationY = game.Players.LocalPlayer.Character.HumanoidRootPart.Position.y
		LocationZ = game.Players.LocalPlayer.Character.HumanoidRootPart.Position.z
	end
end)

SmallSetup.MouseButton1Down:connect(function()
	if smallsetupactive ~= true then
		smallsetupactive = true
		rebirthactive = true
		bigsetupactive = false
		layoutempty = false
		SmallSetup.Text = "SMALL SETUP: ON"
		mediumsetupactive = false
		MediumSetup.Text = "MEDIUM SETUP: OFF"
		MediumSetup.TextColor3 = Color3.new(0, 0, 0)
		BigSetup.Text = "BIG SETUP: OFF"
		SmallSetup.TextColor3 = Color3.new(1, 0, 0)
		BigSetup.TextColor3 = Color3.new(0, 0, 0)
		customsetupactive = false
		setupinuse = false
		CustomSetup.Text = "CUSTOM SETUP: OFF"
		CustomSetup.TextColor3 = Color3.new(0, 0, 0)
		Rebirth.Text = "AUTO REBIRTH: ON"
		Rebirth.TextColor3 = Color3.new(1, 0, 0)
		print("Morning Star Loop (SMALL) setup started on " ..Factory.. ", sit back and relax")

		loopsetupstart()
	else
		smallsetupactive = false
		rebirthactive = false
		setuptimeactive = false
		SmallSetup.Text = "SMALL SETUP: OFF"
		SmallSetup.TextColor3 = Color3.new(0, 0, 0)
		Rebirth.Text = "AUTO REBIRTH: OFF"
		Rebirth.TextColor3 = Color3.new(0, 0, 0)
	end
end)

MediumSetup.MouseButton1Down:connect(function()
	if mediumsetupactive ~= true then
		mediumsetupactive = true
		rebirthactive = true
		smallsetupactive = false
		bigsetupactive = false
		layoutempty = false
		mediumsetupactive = true
		setupinuse = false
		MediumSetup.Text = "MEDIUM SETUP: ON"
		MediumSetup.TextColor3 = Color3.new(1, 0, 0)
		SmallSetup.Text = "SMALL SETUP: OFF"
		BigSetup.Text = "BIG SETUP: OFF"
		SmallSetup.TextColor3 = Color3.new(0, 0, 0)
		customsetupactive = false
		CustomSetup.Text = "CUSTOM SETUP: OFF"
		CustomSetup.TextColor3 = Color3.new(0, 0, 0)
		BigSetup.TextColor3 = Color3.new(0, 0, 0)
		Rebirth.Text = "AUTO REBIRTH: ON"
		Rebirth.TextColor3 = Color3.new(1, 0, 0)
		print("Neutron Star Loop (MEDIUM) setup started on " ..Factory.. ", sit back and relax")

		loopsetupstart()
	else
		mediumsetupactive = false
		rebirthactive = false
		setuptimeactive = false
		MediumSetup.Text = "MEDIUM SETUP: OFF"
		MediumSetup.TextColor3 = Color3.new(0, 0, 0)
		Rebirth.Text = "AUTO REBIRTH: OFF"
		Rebirth.TextColor3 = Color3.new(0, 0, 0)
	end
end)

BigSetup.MouseButton1Down:connect(function()
	if bigsetupactive ~= true then
		bigsetupactive = true
		rebirthactive = true
		smallsetupactive = false
		layoutempty = false
		mediumsetupactive = false
		setupinuse = false
		MediumSetup.Text = "MEDIUM SETUP: OFF"
		MediumSetup.TextColor3 = Color3.new(0, 0, 0)
		SmallSetup.Text = "SMALL SETUP: OFF"
		BigSetup.Text = "BIG SETUP: ON"
		SmallSetup.TextColor3 = Color3.new(0, 0, 0)
		BigSetup.TextColor3 = Color3.new(1, 0, 0)
		customsetupactive = false
		CustomSetup.Text = "CUSTOM SETUP: OFF"
		CustomSetup.TextColor3 = Color3.new(0, 0, 0)
		Rebirth.Text = "AUTO REBIRTH: ON"
		Rebirth.TextColor3 = Color3.new(1, 0, 0)
		print("Neutron Star Loop {BIG) setup started on " ..Factory.. ", sit back and relax")

		loopsetupstart()
	else
		bigsetupactive = false
		rebirthactive = false
		setuptimeactive = false
		BigSetup.Text = "BIG SETUP: OFF"
		BigSetup.TextColor3 = Color3.new(0, 0, 0)
		Rebirth.Text = "AUTO REBIRTH: OFF"
		Rebirth.TextColor3 = Color3.new(0, 0, 0)
	end
end)

CustomSetup.MouseButton1Down:connect(function()
	if customsetupactive ~= true then
		customsetupactive = true
		rebirthactive = true
		smallsetupactive = false
		layoutempty = false
		CustomSetup.Text = "CUSTOM SETUP: ON"
		CustomSetup.TextColor3 = Color3.new(1, 0, 0)
		mediumsetupactive = false
		setupinuse = false
		MediumSetup.Text = "MEDIUM SETUP: OFF"
		MediumSetup.TextColor3 = Color3.new(0, 0, 0)
		SmallSetup.Text = "SMALL SETUP: OFF"
		BigSetup.Text = "BIG SETUP: OFF"
		SmallSetup.TextColor3 = Color3.new(0, 0, 0)
		BigSetup.TextColor3 = Color3.new(0, 0, 0)
		Rebirth.Text = "AUTO REBIRTH: ON"
		Rebirth.TextColor3 = Color3.new(1, 0, 0)
		print("Custom setup started using Layouts1/2 on " ..Factory.. ", sit back and relax")

		loopsetupstart()
	else
		customsetupactive = false
		CustomSetup.Text = "CUSTOM SETUP: OFF"
		CustomSetup.TextColor3 = Color3.new(0, 0, 0)
		rebirthactive = false
		setuptimeactive = false
		Rebirth.Text = "AUTO REBIRTH: OFF"
		Rebirth.TextColor3 = Color3.new(0, 0, 0)
		game.Players.LocalPlayer.PlayerGui.GUI.Menu.Menu.Sounds.Message.Volume = 0.5
		game.Players.LocalPlayer.PlayerGui.GUI.Notifications.Visible = true
	end
end)
Rebirth.MouseButton1Down:connect(function()
	if rebirthactive ~= true then
		rebirthactive = true
		Rebirth.Text = "AUTO REBIRTH: ON"
		Rebirth.TextColor3 = Color3.new(1, 0, 0)
	else
		rebirthactive = false
		Rebirth.Text = "AUTO REBIRTH: OFF"
		Rebirth.TextColor3 = Color3.new(0, 0, 0)
	end
end)

spawn(function()
	while true do
		wait(0.01)
		if remoteclickactive == true then
			while remoteclickactive == true do
				game:GetService("ReplicatedStorage").RemoteDrop:FireServer()
				wait(0.2)
			end
		end
	end
end)

spawn(function()
	while true do
		wait(0.01)
		if pulseclickactive == true then
			while pulseclickactive == true do
				game:GetService("ReplicatedStorage").Pulse:FireServer()
				wait(0.2)
			end
		end
	end
end)

spawn(function()
	while true do
		wait(0.25)
		if upgraderclickactive == true then
			while upgraderclickactive == true do
				local ClickEvent = game:GetService("ReplicatedStorage"):WaitForChild('Click');

				local CheckFactory = function()
					for i,v in pairs(workspace.Tycoons:GetChildren()) do
						if v:FindFirstChild('Owner') then
							if v.Owner.Value == game.Players.LocalPlayer.Name then
								return v
							end
						end
					end
				end

				local Factory = tostring(CheckFactory())
				local basepart = workspace.Tycoons[Factory]:GetChildren()

				for i,v in pairs(basepart) do
					if v.Name ~= "Ore Gate" then
						if v.Name ~= "Reversible Conveyor" then
							for _,desc in pairs(v:GetDescendants()) do
								if desc:IsA("ClickDetector") then
									if desc.Parent:IsA('Part') then
										ClickEvent:FireServer(desc.Parent)
									end
								end
							end
						end
					end
				end
				wait(0.2)
			end
		end
	end
end)

spawn(function()
	while true do
		wait(0.01)
		if customsetupactive == true then setuptimeout = "600" else setuptimeout = "300" end
		if rebirthactive == true then
			rebirthcashvalue = game.Players.LocalPlayer.leaderstats.Cash.Value
			rebirthcashvalue1 = tostring(rebirthcashvalue)
			game:GetService'ReplicatedStorage'.Rebirth:InvokeServer()
			wait(5)
			if bigsetupactive == true or customsetupactive == true then wait(5) end
			rebirthilfe = game.Players.LocalPlayer.leaderstats.Life.Value
			rebirthilfe = tostring(rebirthilfe)

			factoryitems = workspace.Tycoons[tostring(game.Players.LocalPlayer.PlayerTycoon.Value)]:GetChildren()
			for i =1, #factoryitems do
				if factoryitems[i].ClassName == "Model" then
					layoutempty = false
					break
				end
				layoutempty = true
			end
			--if layoutempty == true then print("base empty") else print("base not empty") end--

			if layoutempty == true then
				if game.Players.LocalPlayer.MinesActivated.Value ~= true then
					game:GetService("ReplicatedStorage").ToggleMines:InvokeServer()
					-- print("Turning mines back ON") --
				end
				if smallsetupactive == true or mediumsetupactive == true or bigsetupactive == true or customsetupactive == true then
					if setupinuse == true then
						print("ReBirthed to ".. rebirthilfe .. " Life at ".. rebirthcashvalue1)
						wait(0.5)
						loopsetupstart()
					end
				end
			end
			if setuptimeactive == true then
				if smallsetupactive == true or mediumsetupactive == true then
					setuptime = setuptime + 5
				end
				if bigsetupactive == true or customsetupactive == true then
					setuptime = setuptime + 10
				end
				if tonumber(setuptime) >= tonumber(setuptimeout) then
					print("Something went wrong with Setup or Ore. Restarting..")
					if smallsetupactive == true then
						smallsetupactive = false
						wait(1)
						smallsetupactive = true
						loopsetupstart()
					end
					if mediumsetupactive == true then
						mediumsetupactive = false
						wait(1)
						mediumsetupactive = true
						loopsetupstart()
					end
					if bigsetupactive == true then
						bigsetupactive = false
						wait(1)
						bigsetupactive = true
						loopsetupstart()
					end
					if customsetupactive == true then
						customsetupactive = false
						wait(1)
						customsetupactive = true
						loopsetupstart()
					end
				end
			end
		end
	end
end)

function loopsetupstart()
	setupinuse = false
	remoteclickactive = false
	upgraderclickactive = false
	setuptimeactive = true
	setuptime = 0
	if game.Players.LocalPlayer.MinesActivated.Value ~= true then
		game:GetService("ReplicatedStorage").ToggleMines:InvokeServer()
		-- print("Turning mines back ON") --
	end
	if layoutempty ~= true then
		game:GetService("ReplicatedStorage").DestroyAll:InvokeServer()
		wait(2)
	end
	setupinuse = true

	if tpcratesstarted == true then
		tpcratesactive = false
		wait(2)
	end
	if customsetupactive == true then
		game.Players.LocalPlayer.PlayerGui.GUI.Notifications.Visible = false
		game.Players.LocalPlayer.PlayerGui.GUI.Menu.Menu.Sounds.Message.Volume = 0
		game:GetService("ReplicatedStorage").Layouts:InvokeServer("Load", "Layout1")
	else
		if defaultdropper == "symmetrium" then
			local Tycoon = workspace.Tycoons:FindFirstChild(tostring(game.Players.LocalPlayer.PlayerTycoon.Value))
			local Event = game:GetService("ReplicatedStorage").PlaceItem
			local A_1 = CFrame.new(-15, 6.5, 67.4999847, 0.000140138043, 1.86660731e-09, 1, -4.3159529e-05, 1, 4.18168433e-09, -1, -4.3159529e-05, 0.000140138043) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Symmetrium Mine",  A_1)

			layoutempty = false

			local A_1 = CFrame.new(-18, 5, 53.9999847, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Nature's Grip",  A_1)

		end

		if defaultdropper == "symmetryte" then
			local Tycoon = workspace.Tycoons:FindFirstChild(tostring(game.Players.LocalPlayer.PlayerTycoon.Value))
			local Event = game:GetService("ReplicatedStorage").PlaceItem
			local A_1 = CFrame.new(-15, 6.5, 69, 5.34659193e-05, 9.31346444e-10, 1, -4.31585977e-05, 1, 1.37616774e-09, -1, -4.31585977e-05, 5.34659193e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Symmetryte Mine",  A_1)

			layoutempty = false

			local A_1 = CFrame.new(-18, 5, 50.9999847, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Nature's Grip",  A_1)

		end
	end

	if tpcratesstarted == true then
		tpcratesactive = true
	end

	wait(4)

	game.ReplicatedStorage.BuyItem:InvokeServer('Basic Conveyor', 99)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Raised Shielded Conveyor', 99)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Centering Conveyor', 40)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Conveyor Wall', 40)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Military-Grade Conveyor', 90)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Pink Teleporter (Receiver)', 1)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Pink Teleporter (Sender)', 4)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Ore Replicator', 2)
	wait(0.5)
	game.ReplicatedStorage.BuyItem:InvokeServer('Shrine of Penitence', 1)
	wait(0.5)

	if customsetupactive == true then
		game.ReplicatedStorage.BuyItem:InvokeServer('Raised Mini Conveyor', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Conveyor Converter', 10)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Basic Conveyor', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Teleporter (Receiver)', 1)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Teleporter (Sender)', 4)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Raised Mini Conveyor', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Walled Conveyor', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Raised-ier Conveyor', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Steel Wall', 20)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Metal Wall Segment', 30)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Slanted Wall', 20)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Controlled Gate', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Cannon', 2)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Pulsar', 1)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Satellite Beam', 1)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Spectral Upgrader', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Flaming Ore Scanner', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Endpoint Refiner', 1)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Elevator', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Hoister', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Winder', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Steamer', 4)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Portable Ore Advancer', 30)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Portable Ore Stopper', 30)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Industrial Ore Welder', 4)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Nuclear Conveyor', 20)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Freon-Blast Upgrader', 2)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Plasma Conveyor', 30)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Tiny Conveyor', 40)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ladder', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Advanced Ore Scanner', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Heat Condenser', 4)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Roaster', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Overhang Upgrader', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Overhang Upgrader', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Zapper', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Collider', 2)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Illuminator', 1)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Gate', 4)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Large Conveyor Ramp', 15)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Conveyor Ramp', 99)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Fine-Point Upgrader', 4)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Recliner', 5)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ore Zapper', 4)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Portable Ore Stopper', 30)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Orbitable Upgrader', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Coal Mine', 15)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Plasma Iron Polisher', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Ion Field', 1)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Way-Up-High Upgrader', 3)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Precision Refiner', 1)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Drone Upgrader', 2)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Flaming Ore Scanner', 2)
		wait(0.5)
		game.ReplicatedStorage.BuyItem:InvokeServer('Half Conveyor', 6)
		wait(0.5)
	end

	wait(4)
	loopsetupstart2()
end

function loopsetupstart2()
	setupinuse = false
	if smallsetupactive == true or mediumsetupactive == true or bigsetupactive == true or customsetupactive == true then

	game:GetService("ReplicatedStorage").DestroyAll:InvokeServer()
	wait(2)

	if game.Players.LocalPlayer.MinesActivated.Value ~= true then
		game:GetService("ReplicatedStorage").ToggleMines:InvokeServer()
		-- print("Turning mines back ON") --
	end

	if tpcratesstarted == true then
		tpcratesactive = false
		wait(2)
	end

	if customsetupactive == true then
		game.Players.LocalPlayer.PlayerGui.GUI.Notifications.Visible = false
		game.Players.LocalPlayer.PlayerGui.GUI.Menu.Menu.Sounds.Message.Volume = 0
		game:GetService("ReplicatedStorage").Layouts:InvokeServer("Load", "Layout2")
		starloopend()
	else
		if defaultdropper == "symmetrium" then
			local Tycoon = workspace.Tycoons:FindFirstChild(tostring(game.Players.LocalPlayer.PlayerTycoon.Value))
			local Event = game:GetService("ReplicatedStorage").PlaceItem
			local A_1 = CFrame.new(78, 6.5, 76.5, 0.000140138043, 1.86660731e-09, 1, -4.3159529e-05, 1, 4.18168433e-09, -1, -4.3159529e-05, 0.000140138043) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Symmetrium Mine",  A_1)

			local A_1 = CFrame.new(66, 6.5, 76.5, 0.000140138043, 1.86660731e-09, 1, -4.3159529e-05, 1, 4.18168433e-09, -1, -4.3159529e-05, 0.000140138043) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Symmetrium Mine",  A_1)

			local A_1 = CFrame.new(79.5, 5, 55.5, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Ore Replicator",  A_1)

			local A_1 = CFrame.new(67.5, 5, 55.5, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Ore Replicator",  A_1)

			local A_1 = CFrame.new(81, 2, 61.5, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Raised Shielded Conveyor",  A_1)

			local A_1 = CFrame.new(75, 2, 61.5, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Raised Shielded Conveyor",  A_1)

			local A_1 = CFrame.new(69, 2, 61.5, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Raised Shielded Conveyor",  A_1)

			local A_1 = CFrame.new(63, 2, 61.5, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Raised Shielded Conveyor",  A_1)

			local A_1 = CFrame.new(57, 2, 60, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)

			local A_1 = CFrame.new(51, 2, 60, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)

			local A_1 = CFrame.new(51, 2, 66, 0.000140138043, 1.86660731e-09, 1, -4.3159529e-05, 1, 4.18168433e-09, -1, -4.3159529e-05, 0.000140138043) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)

			local A_1 = CFrame.new(57, 2, 66, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)
		end
		if defaultdropper == "symmetryte" then
			local Tycoon = workspace.Tycoons:FindFirstChild(tostring(game.Players.LocalPlayer.PlayerTycoon.Value))
			local Event = game:GetService("ReplicatedStorage").PlaceItem
			local A_1 = CFrame.new(75, 6.5, 72, 5.34659193e-05, 9.31346444e-10, 1, -4.31585977e-05, 1, 1.37616774e-09, -1, -4.31585977e-05, 5.34659193e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Symmetryte Mine",  A_1)

			local A_1 = CFrame.new(78, 2, 57, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)

			local A_1 = CFrame.new(78, 2, 51, -3.26636873e-05, 4.31581502e-05, -1, 9.29513355e-10, 1, 4.31581502e-05, 1, 4.80190998e-10, -3.26636873e-05) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)

			local A_1 = CFrame.new(72, 2, 51, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)

			local A_1 = CFrame.new(72, 2, 57, 0.000140138043, 1.86660731e-09, 1, -4.3159529e-05, 1, 4.18168433e-09, -1, -4.3159529e-05, 0.000140138043) + Tycoon:FindFirstChild("Base").Position
			Event:InvokeServer("Basic Conveyor",  A_1)
		end
		if smallsetupactive == true then
			morningstarloop()
		end
		if mediumsetupactive == true then
			neutronstarloop1()
		end
		if bigsetupactive == true then
			neutronstarloop2()
		end
	end
	end
end

function morningstarloop()
	tptarget = "Morning Star"

	local Tycoon = workspace.Tycoons:FindFirstChild(tostring(game.Players.LocalPlayer.PlayerTycoon.Value))
	local Event = game:GetService("ReplicatedStorage").PlaceItem
	local A_1 = CFrame.new(27, 6.5, 62.9999847, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Morning Star",  A_1)

	local A_1 = CFrame.new(27, 2, 54, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Military-Grade Conveyor",  A_1)

	local A_1 = CFrame.new(27, 2, 48, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Military-Grade Conveyor",  A_1)

	local A_1 = CFrame.new(27, 5, 39, 5.34659193e-05, 9.31346444e-10, 1, -4.31585977e-05, 1, 1.37616774e-09, -1, -4.31585977e-05, 5.34659193e-05) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Shrine of Penitence",  A_1)

	starloopend()
end

function neutronstarloop1()
	tptarget = "Neutron Star"

	local Tycoon = workspace.Tycoons:FindFirstChild(tostring(game.Players.LocalPlayer.PlayerTycoon.Value))
	local Event = game:GetService("ReplicatedStorage").PlaceItem
	local A_1 = CFrame.new(21, 6.5, 78, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Neutron Star",  A_1)

	local A_1 = CFrame.new(21, 2, 69, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Military-Grade Conveyor",  A_1)

	local A_1 = CFrame.new(21, 2, 63, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Military-Grade Conveyor",  A_1)

	local A_1 = CFrame.new(21, 5, 54, 5.34659193e-05, 9.31346444e-10, 1, -4.31585977e-05, 1, 1.37616774e-09, -1, -4.31585977e-05, 5.34659193e-05) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Shrine of Penitence",  A_1)

	starloopend()
end

function neutronstarloop2()
	tptarget = "Neutron Star"

	local Tycoon = workspace.Tycoons:FindFirstChild(tostring(game.Players.LocalPlayer.PlayerTycoon.Value))
	local Event = game:GetService("ReplicatedStorage").PlaceItem
	local A_1 = CFrame.new(21, 6.5, 78, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Neutron Star",  A_1)

	local A_1 = CFrame.new(20.999939, 2, 69, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Centering Conveyor",  A_1)

	local A_1 = CFrame.new(21, 2, 63, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Centering Conveyor",  A_1)

	local A_1 = CFrame.new(25.500061, 1.89996338, 69, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(16.499939, 1.89996338, 69, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(25.500061, 1.89996338, 63, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(16.499939, 1.89996338, 63, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(21, 3.5, 54, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Quantum Clockwork",  A_1)

	local A_1 = CFrame.new(21, 5, 39, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("True Overlord Device",  A_1)

	local A_1 = CFrame.new(20.9999695, 8, 19.5, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Saturated Catalyst",  A_1)

	local A_1 = CFrame.new(21, 8, -6.10351563e-05, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Azure Spore",  A_1)

	local A_1 = CFrame.new(21.0000305, 3.5, -16.5, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Quantum Ore Polisher",  A_1)

	local A_1 = CFrame.new(21, 5, -31.5, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Tesla Refuter",  A_1)

	local A_1 = CFrame.new(21, 3.5, -45, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Quantum Clockwork",  A_1)

	local A_1 = CFrame.new(21, 5, -59.9999695, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("True Overlord Device",  A_1)

	local A_1 = CFrame.new(21, 3.5, -72, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Pink Teleporter (Sender)",  A_1)

	local A_1 = CFrame.new(-19.5, 3.5, -75, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Pink Teleporter (Receiver)",  A_1)

	local A_1 = CFrame.new(-21, 2.00006104, -66, 0.000226440417, 4.66035299e-09, 1, -4.31585977e-05, 1, 5.11249842e-09, -1, -4.31585977e-05, 0.000226440417) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Basic Conveyor",  A_1)

	local A_1 = CFrame.new(-15, 2, -66, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Centering Conveyor",  A_1)

	local A_1 = CFrame.new(-10.5, 1.90002441, -66, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(-25.5, 1.89996338, -66, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(-16.5, 5, -52.5, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("The Final Upgrader",  A_1)

	local A_1 = CFrame.new(-15, 2, -39, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Centering Conveyor",  A_1)

	local A_1 = CFrame.new(-21, 2.00006104, -39, 0.000140138043, 1.86660731e-09, 1, -4.3159529e-05, 1, 4.18168433e-09, -1, -4.3159529e-05, 0.000140138043) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Basic Conveyor",  A_1)

	local A_1 = CFrame.new(-25.5, 1.90002441, -39, -1, 3.05171125e-05, 3.05180438e-05, 3.05180438e-05, 1, 3.05171125e-05, -3.05171125e-05, 3.05180438e-05, -1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(-10.5, 1.90002441, -39, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Conveyor Wall",  A_1)

	local A_1 = CFrame.new(-15, 5, -27, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("True Overlord Device",  A_1)

	local A_1 = CFrame.new(-15, 3.5, -12, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Quantum Clockwork",  A_1)

	local A_1 = CFrame.new(-15, 8, 3, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Azure Spore",  A_1)

	local A_1 = CFrame.new(-15, 7.99993896, 21, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("The Catalyst",  A_1)

	local A_1 = CFrame.new(-15, 3.5, 37.5, 1, 3.05180438e-05, -3.05171125e-05, -3.05171125e-05, 1, 3.05180438e-05, 3.05180438e-05, -3.05171125e-05, 1) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Quantum Ore Polisher",  A_1)

	local A_1 = CFrame.new(-15, 12.5700073, 60, 0.000226440417, 4.66035299e-09, 1, -4.31585977e-05, 1, 5.11249842e-09, -1, -4.31585977e-05, 0.000226440417) + Tycoon:FindFirstChild("Base").Position
	Event:InvokeServer("Sage King",  A_1)

	starloopend()
end

function starloopend()
	setupinuse = true
	if tpcratesstarted == true then
		tpcratesactive = true
	end
	if remoteclickstarted == true then
		remoteclickactive = true
	end
	if upgraderclickstarted == true then
		 upgraderclickactive = true
	end
	wait(oretime)

	if smallsetupactive == true or mediumsetupactive == true or bigsetupactive == true or customsetupactive == true then

	if turnminesoff then
		if game.Players.LocalPlayer.MinesActivated.Value == true then
			game:GetService("ReplicatedStorage").ToggleMines:InvokeServer()
			-- print("Turning mines OFF") --
		end
	end

	if customsetupactive == true then
		local player = game:GetService'Players'.LocalPlayer
		local factorye = player.PlayerTycoon.Value
		local Factory = tostring(factorye)
		local basepart = workspace.Tycoons[Factory]:GetChildren()
		for i=1,#basepart do
			if basepart[i].Name == "Morning Star" then
				tptarget = "Morning Star"
				targeterror = false
				break
			end
			if basepart[i].Name == "Neutron Star" then
				tptarget = "Neutron Star"
				targeterror = false
				break
			end
			targeterror = true
		end
		if targeterror == true then
			print("Error. No Morning Star or Neutron Star found on base.")
			print("Restarting setup to try and fix the problem")
			wait(1)
			customsetupactive = false
			wait(1)
			customsetupactive = true
			loopsetupstart()
		else
			-- print("Target set: " ..tptarget) --
			starloopend2()
		end
	else
		starloopend2()
	end
	end
end

function starloopend2()
	local player = game:GetService'Players'.LocalPlayer
	local factorye = player.PlayerTycoon.Value
	local Factory = tostring(factorye)
	thing = game.Workspace.Tycoons[Factory][tptarget].Model.Upgrade

	for n = 1,loopnumber do
		wait(.04)
		for i,v in pairs(game.Workspace.DroppedParts[Factory]:getChildren()) do
			if v.Name ~= "Triple Coal Mine" then
				if v.Name ~= "Coal Mine" then
					local p= CFrame.new(thing.Position.x, thing.Position.y, thing.Position.z)
					v.CFrame = p
				end
				if smallsetupactive == true then
					SmallSetup.Text = "SMALL - LOOPS("..tostring(n)..")"
				elseif mediumsetupactive == true then
					MediumSetup.Text = "MEDIUM - LOOPS("..tostring(n)..")"
				elseif bigsetupactive == true then
					BigSetup.Text = "BIG - LOOPS("..tostring(n)..")"
				elseif customsetupactive == true then
					CustomSetup.Text = "CUSTOM - LOOPS("..tostring(n)..")"
				end
			end
		end
	end
	wait(3)
	if smallsetupactive == true then
		SmallSetup.Text = "SMALL SETUP: ON"
	elseif mediumsetupactive == true then
		MediumSetup.Text = "MEDIUM SETUP: ON"
	elseif bigsetupactive == true then
		BigSetup.Text = "BIG SETUP: ON"
	elseif customsetupactive == true then
		CustomSetup.Text = "CUSTOM SETUP: ON"
	end
end

LoopButton.MouseButton1Down:connect(function()
	local player = game:GetService'Players'.LocalPlayer
	local factorye = player.PlayerTycoon.Value
	local Factory = tostring(factorye)
	thing = game.Workspace.Tycoons[Factory][tostring(LoopItem.Text)].Model.Upgrade

	for n = 1,tonumber(TPLoopNumber.Text) do
		wait(.04)
		for i,v in pairs(game.Workspace.DroppedParts[Factory]:getChildren()) do
			if v.Name ~= "Triple Coal Mine" then
				if v.Name ~= "Coal Mine" then
					local p= CFrame.new(thing.Position.x, thing.Position.y, thing.Position.z)
					v.CFrame = p
				end
			end
		end
		LoopButton.Text = "LOOPS("..tostring(n)..")"
		LoopButton.TextColor3 = Color3.new(1, 0, 0)
	end
	wait(3)
		LoopButton.Text = "LOOP"
		LoopButton.TextColor3 = Color3.new(0, 0, 0)
end)

mouse.KeyDown:connect(function(key)
	if key == "b" then
		local player = game:GetService'Players'.LocalPlayer
		local factorynumber = player.PlayerTycoon.Value
		local Factory = tostring(factorynumber)
		for i,v in pairs(game.Workspace.DroppedParts[Factory]:getChildren()) do
			if v.Name ~= "Triple Coal Mine" then
				if v.Name ~= "Coal Mine" then
					local p= CFrame.new(game.Players.LocalPlayer.Character.Head.Position.x, game.Players.LocalPlayer.Character.Head.Position.y -1, game.Players.LocalPlayer.Character.Head.Position.z -1)
					v.CFrame = p
				end
			end
		end
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "m" then
		if game.Players.LocalPlayer.MinesActivated.Value == true then
			game:GetService("ReplicatedStorage").ToggleMines:InvokeServer()
			notify'Turning all mines OFF'
		else
			game:GetService("ReplicatedStorage").ToggleMines:InvokeServer()
			notify'Turning all mines ON'
		end
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "n" then
		local ClickEvent = game:GetService("ReplicatedStorage"):WaitForChild('Click');
		local CheckFactory = function()
			for i,v in pairs(workspace.Tycoons:GetChildren()) do
				if v:FindFirstChild('Owner') then
					if v.Owner.Value == game.Players.LocalPlayer.Name then
						return v
					end
				end
			end
		end

		local Factory = tostring(CheckFactory())
		local basepart = workspace.Tycoons[Factory]:GetChildren()

		if toggleoregate == true then
			toggleoregate = false
			notify'Closing ALL Ore Gates'
			for i,v in pairs(basepart) do
				if v.Name == "Ore Gate" then
					for _,desc in pairs(v:GetDescendants()) do
						if desc:IsA("ClickDetector") then
							if desc.Parent:IsA("Part") then
								ClickEvent:FireServer(desc.Parent)
								break
							end
						end
					end
				end
			end
		else
			toggleoregate = true
			notify'Opening ALL Ore Gates'
			for i,v in pairs(basepart) do
				if v.Name == "Ore Gate" then
					for _,desc in pairs(v:GetDescendants()) do
						if desc:IsA("ClickDetector") then
							if desc.Parent:IsA("Part") then
								ClickEvent:FireServer(desc.Parent)
							end
						end
					end
				end
			end
		end
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "k" then
		local ClickEvent = game:GetService("ReplicatedStorage"):WaitForChild('Click');
		local CheckFactory = function()
			for i,v in pairs(workspace.Tycoons:GetChildren()) do
				if v:FindFirstChild('Owner') then
					if v.Owner.Value == game.Players.LocalPlayer.Name then
						return v
					end
				end
			end
		end

		local Factory = tostring(CheckFactory())
		local basepart = workspace.Tycoons[Factory]:GetChildren()

		for i,v in pairs(basepart) do
			if v.Name == "Reversible Conveyor" then
				for _,desc in pairs(v:GetDescendants()) do
					if desc:IsA("ClickDetector") then
						if desc.Parent:IsA('Part') then
							ClickEvent:FireServer(desc.Parent)
						end
					end
				end
			end
		end
		notify'Switching ALL Reversible Conveyors'
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "j" then
		if remoteclickstarted == true then
			remoteclickstarted = false
			remoteclickactive = false
			notify'Remote Clicking turned OFF'
		else
			remoteclickstarted = true
			remoteclickactive = true
			notify'Remote Clicking turned ON'
		end
	end
end)

mouse.KeyDown:connect(function(key)
	if key == "h" then
		if upgraderclickstarted == true then
			upgraderclickstarted = false
			upgraderclickactive = false
			notify'Clicking Upgraders turned OFF'
		else
			upgraderclickstarted = true
			upgraderclickactive = true
			notify'Clicking Upgraders turned ON'
		end
	end
end)

function CountBricks()
  local count = 0
    for i,v in pairs(workspace:GetChildren()) do
		for x in string.gmatch(v.Name, "Crate") do
			if v.Name ~= "GiftCrate" then
				wait(0.1)
				count = count + 1
			end
        end
	end
    for i,v in pairs(workspace.Shadows:GetChildren()) do
		for x in string.gmatch(v.Name, "Crate") do
			wait(0.1)
            count = count + 1
        end
    end
   return count
end

spawn (function()
	while true do
		wait(0.1)
		CountTpCrates.Text = CountBricks()
	end
end)