local Mortadex = {}
Mortadex.Version = "1"
Mortadex.Modules = {}
Mortadex.ModuleCount = 0
Mortadex.ModuleSelection = 1

Mortadex.Stealth = true -- this will just remove print messages
Mortadex.Debug = false
Mortadex.FreeForAll = false
Mortadex.Studio = false

function Mortadex:RegisterModule(name, onrender, norender)
	if Mortadex.Modules[name] then
		return error("Module \""..name.."\" already registered!")
	else
		Mortadex:FLog("Registering module \"%s\"", name)
		Mortadex.Modules[name] = {OnRender = onrender, NoRender = norender, Scratchpad = {}, Enabled = false, Order = Mortadex.ModuleCount}
		Mortadex.ModuleCount = Mortadex.ModuleCount + 1
	end
end

function Mortadex:Log(...)
	if Mortadex.Stealth then return end
	return print("[- MORTADEX -] ", ...)
end

function Mortadex:FLog(o, ...)
	return Mortadex:Log(o:format(...))
end

local getrawmetatable = getrawmetatable

---------------------------------------------------------------

Mortadex:Log("Loading core utilities...")

Mortadex.HookManager = {IdxHooks = {}, NIdxHooks = {}}
Mortadex.Utilities = {}
Mortadex.Services = {
	Players = game:GetService("Players"),
	Lighting = game:GetService("Lighting"),
	RunService = game:GetService("RunService"),
	UserInputService = game:GetService("UserInputService")
}
Mortadex.Instances = {
	LocalPlayer = Mortadex.Services.Players.LocalPlayer,
	LocalCharacter = Mortadex.Services.Players.LocalPlayer.Character,
	LocalCamera = workspace.CurrentCamera,
	LocalMouse = Mortadex.Services.Players.LocalPlayer:GetMouse()
}

function Mortadex.HookManager:Init()
	if getrawmetatable then
		local ObjectMt = getrawmetatable(game)
		Mortadex.OriginalIndex = ObjectMt.__index
		Mortadex.OriginalNewIndex = ObjectMt.__newindex

		ObjectMt.__index = function(self, key)
			local Hook = Mortadex.HookManager:LookupIndexHook(self, key)
			if Hook then
				return Hook(self)
			else
				return Mortadex.OriginalIndex(self, key)
			end
		end

		ObjectMt.__newindex = function(self, key, value)
			local Hook = Mortadex.HookManager:LookupNewIndexHook(self, key)
			if Hook then
				return Hook(self, value)
			else
				return Mortadex.OriginalNewIndex(self, key, value)
			end
		end

		return true
	end
end

function Mortadex.HookManager:LookupIndexHook(inst, key)
	for _, Hook in next, Mortadex.HookManager.IdxHooks do
		if Mortadex.OriginalIndex(inst, "IsA")(inst, Hook.AffectedClass) and Hook.Property == key then
			return Hook.HookFunction
		end
	end
end

function Mortadex.HookManager:LookupNewIndexHook(inst, key)
	for _, Hook in next, Mortadex.HookManager.NIdxHooks do
		if Mortadex.OriginalIndex(inst, "IsA")(inst, Hook.AffectedClass) and Hook.Property == key then
			return Hook.HookFunction
		end
	end
end

function Mortadex.HookManager:HookIndex(class, prop, f)
	return table.insert(Mortadex.HookManager.IdxHooks, {AffectedClass = class, Property = prop, HookFunction = f})
end

function Mortadex.HookManager:HookNewIndex(class, prop, f)
	return table.insert(Mortadex.HookManager.NIdxHooks, {AffectedClass = class, Property = prop, HookFunction = f})
end

function Mortadex.Utilities:WorldToScreenPoint(...)
	return Mortadex.Instances.LocalCamera:WorldToScreenPoint(...)
end

function Mortadex.Utilities:PathObstructed(p1, p2, ...)
	local ray = Ray.new(p1, (p2 - p1).unit * 500)
	local haspart, hitpos = workspace:FindPartOnRayWithIgnoreList(ray, {...})
	if haspart then return true, hitpos else return false end
end

function Mortadex.Utilities:GetReplicator()
	return game:FindFirstChild("ClientReplicator", true)
end

function Mortadex.Utilities:GetSize(i)
	if i:IsA("BasePart") then
		return i.Size
	elseif i:IsA("Model") then
		return i:GetExtentsSize()
	end
end

function Mortadex.Utilities:GetPlayers(mode)
	local Result = {}
	for _,player in next, Mortadex.Services.Players:GetPlayers() do
		if mode == 0 then -- exclude players in current team
			if (player ~= Mortadex.Instances.LocalPlayer and (Mortadex.Instances.LocalPlayer.TeamColor ~= player.TeamColor or (FreeForAll or DEBUG))) then
				table.insert(Result, player)
			end
		else -- include everyone
			table.insert(Result, player)
		end
	end
	return Result
end

function Mortadex.Utilities:GetNearestPlayer()
	if not Mortadex.Instances.LocalPlayer.Character then return end
	local Players = Mortadex.Utilities:GetPlayers(0)
	local SelectedPlayer, SelectedPlayerPrevDistance = nil, 25000
	for i,v in next, Players do
		if v.Character and v.Character:FindFirstChild("HumanoidRootPart") then
			local Distance = Mortadex.Utilities:GetDistance(Mortadex.Instances.LocalPlayer.Character.HumanoidRootPart.Position, v.Character.HumanoidRootPart.Position)
			if Distance < SelectedPlayerPrevDistance then
				SelectedPlayer = v
				SelectedPlayerPrevDistance = Distance
			end
		end
	end
	return SelectedPlayer
end

function Mortadex.Utilities:GetDistance(v1, v2)
	return (v1 - v2).magnitude
end

function Mortadex.Utilities:GetCanvas()
	if not Mortadex.Canvas then
		if getrawmetatable then
			Mortadex.Canvas = Instance.new("ScreenGui", game:GetService("CoreGui"))
		else
			Mortadex.Canvas = Instance.new("ScreenGui", Mortadex.Services.Players.LocalPlayer.PlayerGui)
		end
	end
	return Mortadex.Canvas
end

Mortadex.EmptyVector3 = Vector3.new()
Mortadex.EmptyCFrame = CFrame.new()

---------------------------------------------------------------

--> ESP
Mortadex:RegisterModule("ESP", function(Storage)
	local Canvas = Mortadex.Utilities:GetCanvas()
	local Root = Canvas:FindFirstChild("ESP")
	if not Root then
		Root = Instance.new("Frame")
		Root.Name = "ESP"
		Root.Size = UDim2.new(1, 0, 1, 0)
		Root.BackgroundTransparency = 1
	end

	Root:ClearAllChildren()
	for _, Player in next, Mortadex.Utilities:GetPlayers(0) do
		if Player.Character and Player.Character:FindFirstChild("Torso") then
			local Locator = Instance.new("Frame")
			Locator.BackgroundColor = Player.TeamColor
			Locator.BackgroundTransparency = .5
			local VPos, VVis =  Mortadex.Utilities:WorldToScreenPoint(Player.Character.Torso.Position)
			if VVis then
				Locator.Size = UDim2.new(0, -2800 / VPos.z, 0, -4300 / VPos.z)
				Locator.Position = UDim2.new(0, VPos.x - Locator.Size.X.Offset / 2, 0, VPos.y - Locator.Size.Y.Offset / 2)
				local Name = Instance.new("TextLabel")
				Name.TextColor3 = Color3.new(1,1,1)
				Name.Size = UDim2.new(1,0,0, Locator.Size.Y.Offset / 5)
				Name.BackgroundTransparency = 1
				Name.TextScaled = true
				Name.FontSize = 'Size24'
				Name.Text = Player.Name
				Name.TextStrokeTransparency = .3
				Name.Font = 'SourceSansLight'
				Name.TextXAlignment = 'Left'
				Name.Parent = Locator
				Locator.Parent = Root
			else
				Locator:Destroy()
			end
		end
	end

	if not Root.Parent then
		Root.Parent = Canvas
	end
end)

--> FreeForAll
Mortadex:RegisterModule("FreeForAll", function(Storage)
	FreeForAll = true
end, function(Storage) FreeForAll = false end)

--> Chams
Mortadex:RegisterModule("Chams", function(Storage)
	for i, Cham in next, Storage do
		if Cham.Name:find("Cham") then
			Cham:Destroy()
			Storage[i] = nil
		end
	end

	for _, Player in next, Mortadex.Utilities:GetPlayers(0) do
		if Player.Character and Player.Character:FindFirstChild("Torso") then
			for _, Part in next, Player.Character:GetChildren() do
				if Part:IsA("PVInstance") then
					local Box = Instance.new("BoxHandleAdornment")
					Box.Size = Mortadex.Utilities:GetSize(Part) + Vector3.new(.2, .2, .2)
					Box.Name = "Cham" .. Player.Name
					Box.Color3 = Player.TeamColor.Color
					Box.Adornee = Part
					Box.AlwaysOnTop = true
					Box.ZIndex = 5
					Box.Transparency = .1
					table.insert(Storage, Box)
					Box.Parent = Mortadex.Utilities:GetCanvas()
				end
			end
		end
	end
end)

--> LagSwitch
Mortadex:RegisterModule("LagSwitch", function(Storage)
	if not Storage.State then
		Storage.State = true
		local Replicator = Mortadex.Utilities:GetReplicator()
		if Replicator then
			Replicator:DisableProcessPackets()
		end
	end
end,

function(Storage)
	if Storage.State then
		Storage.State = false
		local Replicator = Mortadex.Utilities:GetReplicator()
		if Replicator then
			Replicator:EnableProcessPackets()
		end
	end
end)

--> IronSight
Mortadex:RegisterModule("IronSight", function(Storage)
	local Sight = Instance.new("Frame")
	Sight.Size = UDim2.new(0, 5, 0, 5)
	Sight.BackgroundTransparency = .5
	Sight.BackgroundColor3 = Color3.new(1, 1, 1)
	Sight.Position = UDim2.new(0, Mortadex.Instances.LocalMouse.X, 0, Mortadex.Instances.LocalMouse.Y)
	Sight.Parent = Mortadex.Utilities:GetCanvas()
end)

--> KnifeMaster
Mortadex:RegisterModule("KnifeMaster", function(Storage)
	if not Mortadex.Instances.LocalPlayer.Character then
		return
	end
	local Pl = Mortadex.Utilities:GetNearestPlayer()
	if Pl and Pl.Character and Mortadex.Utilities:GetDistance(Pl.Character.Torso.Position, Mortadex.Instances.LocalPlayer.Character.HumanoidRootPart.Position) < 150 then
		Mortadex.Instances.LocalPlayer.Character.HumanoidRootPart.CFrame = Pl.Character.Torso.CFrame * CFrame.new(0,0,3)
	end
end)

--> BigHead
Mortadex:RegisterModule("BigHead", function(Storage)
	for _, v in next, Mortadex.Utilities:GetPlayers(0) do
		if v.Character then
			if not Storage[v.Name] then
				Storage[v.Name] = { v.Character.Head.Size,  v.Character.Head.CFrame }
			end
			v.Character.Head.CanCollide = false
			v.Character.Head.Size = Vector3.new(40, 40, 40)
			v.Character.Head.CFrame = v.Character.Torso.CFrame * CFrame.new(0, 20, 0)
			v.Character.Head.Transparency = .3
		end
	end
end,

function(Storage)
	if not Storage.NormalSize then
		Storage.NormalSize = Vector3.new(2, 1, 1)
	end

	for _, v in next, Mortadex.Utilities:GetPlayers(0) do
		if v.Character then
			v.Character.Head.CanCollide = true
			v.Character.Head.Size = Storage.NormalSize
		end
	end
end)

---------------------------------------------------------------

Mortadex:Log("Loading UI...")

function Mortadex:CreateWindow(name, size, timed_close, tween)
	local TopBar = Instance.new("TextLabel")
	TopBar.Name = "NO_CLEAR"
	TopBar.Size = UDim2.new(size.X.Scale, size.X.Offset, 0, 20)
	TopBar.BorderSizePixel = 0
	TopBar.BackgroundColor3 = Color3.new(1, 0, 0)
	TopBar.Text = name
	TopBar.TextXAlignment = Enum.TextXAlignment.Left
	TopBar.TextScaled = true
	TopBar.Font = Enum.Font.Code
	TopBar.TextColor3 = Color3.new(0, 0, 0)
	TopBar.Position = UDim2.new(.5, -(size.X.Offset/2), .5, -(size.Y.Offset/2))
	TopBar.Draggable = true
	TopBar.Active = true

	local Window = Instance.new("Frame")
	Window.Name = "Content"
	Window.Size = size
	Window.BackgroundColor3 = Color3.new(0, 0, 0)
	Window.Position = UDim2.new(0, 0, 0, 20)
	Window.BackgroundTransparency = .3
	Window.BorderSizePixel = 0

	if not timed_close then
		local CloseBtn = Instance.new("TextButton", TopBar)
		CloseBtn.Position = UDim2.new(1, -20, 0, 0)
		CloseBtn.Size = UDim2.new(0, 20, 1, 0)
		CloseBtn.BorderSizePixel = 0
		CloseBtn.Name = "CloseBtn"
		CloseBtn.BackgroundColor3 = Color3.new(0,0,0)
		CloseBtn.TextColor3 = Color3.new(1, 0, 0)
		CloseBtn.Text = "X"
		CloseBtn.MouseButton1Click:connect(function()
			TopBar:Destroy()
		end)
	else
		local Countdown = Instance.new("TextLabel", TopBar)
		Countdown.Position = UDim2.new(1, -20, 0, 0)
		Countdown.Size = UDim2.new(0, 20, 1, 0)
		Countdown.BackgroundTransparency = 1
		Countdown.TextColor3 = Color3.new(0, 0, 0)
		Countdown.Text = tostring(timed_close)
		local BackPos
		if tween then
			BackPos = TopBar.Position
			TopBar.Position = UDim2.new(.5, -(size.X.Offset/2), 1, 0)
		end
		spawn(function()
			if tween then
				TopBar:TweenPosition(BackPos, "Out", "Quad", .3, true)
			end
			for i = timed_close-1, 0, -1 do
				wait(1)
				Countdown.Text = tostring(i)
			end
			if not tween then
				TopBar:Destroy()
			else
				TopBar:TweenPosition(UDim2.new(.5, -(size.X.Offset/2), 1, 0), "Out", "Sine", .3, true)
				wait(.3)
				TopBar:Destroy()
			end
		end)
	end

	Window.Parent = TopBar
	TopBar.Parent = Mortadex.Utilities:GetCanvas()
	return TopBar
end


---------------------------------------------------------------

if not script then script = Instance.new("LocalScript") end
Mortadex.UpvalScript = script

Mortadex:Log("Hooking functions...")
Mortadex.HookManager:Init()
Mortadex.HookManager:HookIndex("Player", "Kick", error)
Mortadex.HookManager:HookIndex("BasePart", "Size", function(Part)
	local caller_env = getfenv(1)
	if caller_env.script ~= Mortadex.UpvalScript and caller_env.script.ClassName ~= "CoreScript" then
		if Part.Name == "Head" then
			return Mortadex.EmptyVector3
		end
	end
	return Mortadex.OriginalIndex(Part, "Size")
end)

Mortadex.HookManager:HookIndex("BasePart", "CFrame", function(Part)
	local caller_env = getfenv(1)
	if caller_env.script ~= Mortadex.UpvalScript and caller_env.script.ClassName ~= "CoreScript" then
		if Part.Name == "Head" then
			return Mortadex.EmptyCFrame
		end
	end
	return Mortadex.OriginalIndex(Part, "CFrame")
end)

Mortadex.HookManager:HookIndex("BasePart", "Transparency", function(Part)
	local caller_env = getfenv(1)
	if caller_env.script ~= Mortadex.UpvalScript and caller_env.script.ClassName ~= "CoreScript" then
		if Part.Name == "Head" then
			return 0
		end
	end
	return Mortadex.OriginalIndex(Part, "Transparency")
end)

Mortadex:Log("Creating menu...")
Mortadex.SelectionMenu = Mortadex:CreateWindow("Mortadex v"..Mortadex.Version, UDim2.new(0, 250, 0, 20 * Mortadex.ModuleCount))
Mortadex.SelectionMenu.Position = UDim2.new(0, 10, 0, 10)
Mortadex.SelectionMenu.CloseBtn:Destroy()

for ModuleName, Module in next, Mortadex.Modules do
	local Entry = Instance.new("TextLabel")
	Entry.BackgroundTransparency = 1
	Entry.BackgroundColor3 = Color3.new(1,1,1)
	Entry.TextColor3 = Color3.new(1, 1, 1)
	Entry.TextScaled = true
	Entry.Font = "Code"
	Entry.TextXAlignment = "Left"
	Entry.Text = ModuleName
	Entry.Position = UDim2.new(0, 0, 0, 20 * Module.Order)
	Entry.Size = UDim2.new(1, 0, 0, 20)
	Entry.Name = tostring(Module.Order)
	Entry.Parent = Mortadex.SelectionMenu.Content
	Entry.BorderSizePixel = 0

	local Status = Instance.new("Frame")
	Status.BorderSizePixel = 0
	Status.BackgroundColor3 = Color3.new(1, 0, 0)
	Status.Size = UDim2.new(0, 5, 0, 5)
	Status.Position = UDim2.new(1, -10, 0, 8)
	Status.Name = "Status"
	Status.Parent = Entry
end

Mortadex:Log("Connecting UI renderer...")
Mortadex.Services.RunService:BindToRenderStep("Mortadex", Enum.RenderPriority.Last.Value + 1, function()
	for _, Object in next, Mortadex.Utilities:GetCanvas():GetChildren() do
		if not Object.Name:find("NO_CLEAR") then
			Object:Destroy()
		end
	end

	for i, Module in next, Mortadex.Modules do
		if Module.Enabled and Module.OnRender then
			local Success, ErrMsg = pcall(Module.OnRender, Module.Scratchpad)
			if not Success then
				Mortadex:FLog("Panic during execution of \"%s\"::OnRender: %s", i, ErrMsg)
			end
		elseif not Module.Enabled and Module.NoRender then
			local Success, ErrMsg = pcall(Module.NoRender, Module.Scratchpad)
			if not Success then
				Mortadex:FLog("Panic during execution of \"%s\"::NoRender: %s", i, ErrMsg)
			end
		end
	end
end)

Mortadex:Log("Attaching controls...")
Mortadex.Services.UserInputService.InputBegan:connect(function(InputObject)
	local PreviousSelection = Mortadex.SelectionMenu.Content:FindFirstChild(tostring(Mortadex.ModuleSelection))
	if PreviousSelection then
		PreviousSelection.BackgroundTransparency = 1
		PreviousSelection.TextColor3 = Color3.new(1, 1, 1)
	end
	if InputObject.KeyCode.Name == "J" then
		Mortadex.ModuleSelection = Mortadex.ModuleSelection - 1
		if Mortadex.ModuleSelection < 0 then
			Mortadex.ModuleSelection = Mortadex.ModuleCount - 1
		end
	elseif InputObject.KeyCode.Name == "K" then
		Mortadex.ModuleSelection = Mortadex.ModuleSelection + 1
		if Mortadex.ModuleSelection > Mortadex.ModuleCount-1 then
			Mortadex.ModuleSelection = 0
		end
	elseif InputObject.KeyCode.Name == "L" then
		local EntryLabel = Mortadex.SelectionMenu.Content:FindFirstChild(tostring(Mortadex.ModuleSelection))
		if EntryLabel then
			local ModuleEntry = Mortadex.Modules[EntryLabel.Text]
			if ModuleEntry then
				ModuleEntry.Enabled = not ModuleEntry.Enabled
				if ModuleEntry.Enabled then
					EntryLabel.Status.BackgroundColor3 = Color3.new(0, 1, 0)
				else
					EntryLabel.Status.BackgroundColor3 = Color3.new(1, 0, 0)
				end
			end
		end
	elseif InputObject.KeyCode.Name == "P" then
		Mortadex.SelectionMenu.Position = UDim2.new(1, -270, 0, 10)
	end
	local EntryLabel = Mortadex.SelectionMenu.Content:FindFirstChild(tostring(Mortadex.ModuleSelection))
	if EntryLabel then
		EntryLabel.BackgroundTransparency = .3
		EntryLabel.TextColor3 = Color3.new(0, 0, 0)
	end
end)

Mortadex:Log("Finishing up...")
local IntroWindow = Mortadex:CreateWindow("Mortadex", UDim2.new(0, 350, 0, 200), 5, true)
local IntroLabel = Instance.new("TextLabel")
IntroLabel.Font = "Code"
IntroLabel.TextWrapped = true
IntroLabel.FontSize = "Size24"
IntroLabel.TextColor3 = Color3.new(1, 1, 1)
IntroLabel.BackgroundTransparency = 1
IntroLabel.Text = "Welcome to Mortadex! If you need to change the menu's placement, simply drag the window around the screen. Press P to dock the window to the right side of the screen in case the chat blocks the menu."
IntroLabel.Parent = IntroWindow.Content
IntroLabel.Size = UDim2.new(1, 0, 1, 0)

Mortadex:Log("Initialization complete!")