SLX R2DA Farm

local zombiefolder = game:GetService'Workspace':FindFirstChild'Characters':FindFirstChild'Zombies'
local client = game:GetService'Players'.LocalPlayer
local primary = client:FindFirstChild'Settings':FindFirstChild'Primary'
local secondary = client:FindFirstChild'Settings':FindFirstChild'Secondary'
local RepStorage = game:GetService'ReplicatedStorage'
local remotes = RepStorage:FindFirstChild'RemoteEvents'
local FX = remotes:FindFirstChild'FX'
local bullet = remotes:FindFirstChild'BulletHit'
local nofall = remotes:FindFirstChild'SelfDamage'
local transform = 10.3 --quality-security.com
local running = false
local zconn = nil
local codes = {}

local Part = Instance.new("Part")
Part.Anchored = true
Part.Size = Vector3.new(100, 2, 100)
Part.Transparency = 0.7

local meta = getrawmetatable(game)

if setreadonly then
	setreadonly(meta, false)
elseif make_writeable then
	make_writeable(meta)
end

local backup = __namecall or meta.__namecall

local function KillZombie(zchar)
	local id = (primary.Value ~= "" and codes[primary.Value] or codes[secondary.Value])
	local enum = 1
	if id == nil then return nil end
	local t = {}
	t.Hit = zchar:WaitForChild'Head'
	t.Humanoid = zchar:WaitForChild'Humanoid'
	t.Perc = 1
	t.Position = zchar:WaitForChild'Head'.Position
	t.Headshot = true
	repeat
		bullet:FireServer(t, enum, id)
		wait()
	until t.Humanoid.Health < 1
end

local function MakePart(on)
	local root = client.Character:FindFirstChild'HumanoidRootPart'
	if root == nil then return end
	Part.CanCollide = on
	Part.Parent = workspace
	Part.CFrame = root.CFrame + Vector3.new(0, 100, 0)

	if on then
		root.CFrame = Part.CFrame + Vector3.new(0, 5, 0)
	end
end

meta.__namecall = function(self, ...)
	local args = {...}
	local method = table.remove(args, #args)

	--[[
	if method == "GetChildren" and tostring(self.Name) == primary.Value then
		print(debug.getlocal(2, "CODE"))
		print('a')
	end
	]]

	if method == "InvokeServer" and tostring(self) == "GetCodes" then
		local name = args[#args]
		local ret = backup(self, ...)
		codes[name] = (ret + transform)
		return ret
	elseif method == "FireServer" then
		if self == nofall then
			return wait(9e9)
		elseif self == FX then
			pcall(function() print("Potential ban from script: " .. getfenv(2).script:GetFullName()) end)
			return wait(9e9)
		end
	end
	return backup(self, ...)
end

local typecon = game:GetService'UserInputService'.InputBegan:Connect(function(key, ingui)
	if key.KeyCode == Enum.KeyCode.Q and not ingui then
		running = not running
		warn("RUNNING:", running)
		MakePart(running)

		if running then
			zconn = zombiefolder.ChildAdded:Connect(function(c)
				KillZombie(c)
			end)

			for i, v in pairs(zombiefolder:GetChildren()) do
				KillZombie(v)
			end
		else
			if zconn then
				zconn:Disconnect()
			end
		end
	end
end)