R2DA Aimbot

-- MORTADEX
-- WRITTEN BY LOUKA @ V3RMILLION
-- DON'T JEW THE LOCALSCRIPT IF YOU DON'T KNOW HOW TO SCRIPT

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!")