local ScreenGui = Instance.new('ScreenGui')
local Frame = Instance.new('Frame')
local Monster = Instance.new('TextBox')
local TextLabel = Instance.new('TextLabel')
local ChangeM = Instance.new('TextButton')
local StartStop = Instance.new('TextButton')
local RemoveDoors = Instance.new('TextButton')
local FType = Instance.new('TextButton')
local TextLabel_2 = Instance.new('TextLabel')

--Properties:
ScreenGui.Parent = game.CoreGui
ScreenGui.ResetOnSpawn = false

Frame.Parent = ScreenGui
Frame.Active = true
Frame.Draggable = true
Frame.BackgroundColor3 = Color3.new(0.266667, 0.266667, 0.266667)
Frame.BackgroundTransparency = 0.55
Frame.Position = UDim2.new(0.5, -100, 0.5, -100)
Frame.Selectable = true
Frame.Size = UDim2.new(0, 200, 0, 200)

Monster.Name = 'Monster'
Monster.Parent = Frame
Monster.BackgroundColor3 = Color3.new(0.32549, 0.32549, 0.32549)
Monster.BackgroundTransparency = 0.5
Monster.Position = UDim2.new(0.0467410274, 0, 0.224623337, 0)
Monster.Size = UDim2.new(0, 111, 0, 25)
Monster.Font = Enum.Font.SourceSans
Monster.Text = 'Slime'
Monster.TextColor3 = Color3.new(1, 1, 1)
Monster.TextScaled = true
Monster.TextSize = 20
Monster.TextStrokeTransparency = 0
Monster.TextWrapped = true

TextLabel.Parent = Frame
TextLabel.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel.BackgroundTransparency = 1
TextLabel.Position = UDim2.new(0.12, 0, -0.003, 0)
TextLabel.Size = UDim2.new(0, 150, 0, 40)
TextLabel.Font = Enum.Font.Code
TextLabel.Text = 'Magic Simulator GUI!'
TextLabel.TextColor3 = Color3.new(1, 1, 1)
TextLabel.TextSize = 16
TextLabel.TextStrokeTransparency = 0

ChangeM.Name = 'ChangeM'
ChangeM.Parent = Frame
ChangeM.BackgroundColor3 = Color3.new(0.278431, 0.278431, 0.278431)
ChangeM.BackgroundTransparency = 0.60000002384186
ChangeM.Position = UDim2.new(0.645, 0, 0.225, 0)
ChangeM.Size = UDim2.new(0, 60, 0, 25)
ChangeM.Font = Enum.Font.SourceSans
ChangeM.Text = 'Change'
ChangeM.TextColor3 = Color3.new(1, 1, 1)
ChangeM.TextSize = 20
ChangeM.TextStrokeTransparency = 0

StartStop.Name = 'Start/Stop'
StartStop.Parent = Frame
StartStop.BackgroundColor3 = Color3.new(0.278431, 0.278431, 0.278431)
StartStop.BackgroundTransparency = 0.6
StartStop.Position = UDim2.new(0.048, 0, 0.42, 0)
StartStop.Size = UDim2.new(0, 180, 0, 25)
StartStop.Font = Enum.Font.SourceSans
StartStop.Text = 'Start Auto-Farming'
StartStop.TextColor3 = Color3.new(1, 1, 1)
StartStop.TextSize = 20
StartStop.TextStrokeTransparency = 0

RemoveDoors.Name = 'RemoveDoors'
RemoveDoors.Parent = Frame
RemoveDoors.BackgroundColor3 = Color3.new(0.278431, 0.278431, 0.278431)
RemoveDoors.BackgroundTransparency = 0.6
RemoveDoors.Position = UDim2.new(0.048, 0, 0.8, 0)
RemoveDoors.Size = UDim2.new(0, 180, 0, 25)
RemoveDoors.Font = Enum.Font.SourceSans
RemoveDoors.Text = 'Remove Doors'
RemoveDoors.TextColor3 = Color3.new(1, 1, 1)
RemoveDoors.TextSize = 20
RemoveDoors.TextStrokeTransparency = 0

FType.Name = 'FType'
FType.Parent = Frame
FType.BackgroundColor3 = Color3.new(0.278431, 0.278431, 0.278431)
FType.BackgroundTransparency = 0.60000002384186
FType.Position = UDim2.new(0.048, 0, 0.61, 0)
FType.Size = UDim2.new(0, 180, 0, 25)
FType.Font = Enum.Font.SourceSans
FType.Text = 'Farming Type: Single'
FType.TextColor3 = Color3.new(1, 1, 1)
FType.TextSize = 20
FType.TextStrokeTransparency = 0

TextLabel_2.Parent = Frame
TextLabel_2.BackgroundColor3 = Color3.new(1, 1, 1)
TextLabel_2.BackgroundTransparency = 1
TextLabel_2.Position = UDim2.new(0.045, 0, 0.869, 0)
TextLabel_2.Size = UDim2.new(0, 175, 0, 40)
TextLabel_2.Font = Enum.Font.Code
TextLabel_2.Text = '-- By SernyPoptart'
TextLabel_2.TextColor3 = Color3.new(1, 1, 1)
TextLabel_2.TextSize = 10
-- Scripts:

_G.Monster = Monster.Text
_G.Farming = false
_G.Single = true

Skills = {}
Messages = {}

local function fixCoeficient (vector, coef)
	return Vector3.new(vector.X/coef, vector.Y/coef, vector.Z/coef)
end

local message = function(msg, once)
	if Messages[msg] == nil then
		if once then
			Messages[msg] = true
		end

		local StarterGui = game:GetService('StarterGui')

		repeat
			wait()
			local Success = pcall(function()
				StarterGui:SetCore('ChatMakeSystemMessage', {
					Text = msg;
					Color = Color3.fromRGB(math.random(1,255), math.random(1,255), math.random(1,255));
					Font = Enum.Font.SourceSansBold;
					TextSize = 24
				})
			end)
		until Success
	end
end

local player = game.Players.LocalPlayer

for _,v in pairs(player.Inventory:GetChildren()) do
	if v.Equipped.Value then
		table.insert(Skills, v.Name)
	end
end

Meta = getrawmetatable(game)
make_writeable(Meta)
NameCall = Meta.__namecall

_G.Spell = nil
_G.Hit = nil

FType.MouseButton1Down:connect(function()
	_G.Single = not _G.Single

	if _G.Single then
		FType.Text = 'Farming Type: Single'
	else
		FType.Text = 'Farming Type: Multiple'
	end
end)

ChangeM.MouseButton1Down:connect(function()
	_G.Monster = Monster.Text
	message('Changed monster to ''.._G.Monster..''!', false)
end)

StartStop.MouseButton1Down:connect(function()
	if _G.Started and _G.Spell == nil and _G.Hit == nil or _G.Started and _G.Spell == nil and _G.Hit == nil then
		message('Use your ''.. Skills[1] ..'' magic until I find all the remotes ' .. player.Name .. '!!', false)
	end

	if _G.Started == nil then
		_G.Started = true

		message('Use your ''.. Skills[1] ..'' magic until I find all the remotes ' .. player.Name .. '!!', false)

		spawn(function()
			Meta.__namecall = function(rc, ...)
			    args = {...}

				if _G.Spell == nil and Skills[1] == args[1] and typeof(args[2]) == 'Vector3' then
					if not spellMessage then
						spellMessage = false
						message('SPELL REMOTE FOUND!', true)
					end

					_G.Spell = rc
				end

				if _G.Spell ~= nil and _G.Hit == nil and _G.Spell ~=rc and Skills[1] == args[1] and typeof(args[3]) == 'Vector3' then
					if not hitMessage then
						hitMessage = false
						message('HIT REMOTE FOUND!', true)
					end

					_G.Hit = rc
				end

			    return NameCall(rc, ...)
			end
		end)

		repeat wait(1) print(_G.Spell, _G.Hit) until _G.Spell ~= nil and _G.Hit ~= nil

		message('All set up!', true)
	end

	if _G.Spell ~= nil and _G.Hit ~= nil then
		_G.Farming = not _G.Farming

		if _G.Farming then
			StartStop.Text = 'Stop Auto-Farming'
			message('Farming is activated!', false)
		else
			StartStop.Text = 'Start Auto-Farming'
			message('Farming is deactivated!', false)
		end

	    while _G.Farming and wait(1) do
            pcall(function()
	            for _,v in pairs(workspace.Monsters:GetChildren()) do
	                if v:FindFirstChild('HumanoidRootPart') and v.Name == _G.Monster then
						if _G.Single then
		                    for _,n in pairs(player.Inventory:GetChildren()) do
							    if n.Equipped.Value then
			                        _G.Spell:FireServer(n.Name, v:FindFirstChild('HumanoidRootPart').Position)
			                        wait()
									local pos = fixCoeficient(v:FindFirstChild('HumanoidRootPart').Position, 10)
			                        _G.Hit:FireServer(n.Name, nil, pos)
								end
		                    end
						else
							for _,n in pairs(player.Inventory:GetChildren()) do
							    if n.Equipped.Value and n.Cooldown.Value == false then
			                        _G.Spell:FireServer(n.Name, v:FindFirstChild('HumanoidRootPart').Position)
			                        wait()
									local pos = fixCoeficient(v:FindFirstChild('HumanoidRootPart').Position, 10)
			                        _G.Hit:FireServer(n.Name, nil, pos)
									break
								end
		                    end
						end
	                end
	            end
            end)
        end
    end
end)

RemoveDoors.MouseButton1Down:connect(function()
	for _, v in pairs(workspace.Doors:GetChildren()) do
		v:Destroy()
	end
end)