Untitled

<!DOCTYPE html>
	<html>
		<head>
			<title>  </title>
		</head>
	<body>

		<style>
		img[src="https://cdn.rawgit.com/000webhost/logo/e9bd13f7/footer-powered-by-000webhost-white2.png"] {
		    display: none;}
		</style>

		<pre style="word-wrap: break-word; white-space: pre-wrap;">
plr = owner
plrs = game:service'Players'
char = plr.Character
lk = {}
db = {}
muted = {}

function mre(a)
    local pos = a.Character:FindFirstChild('HumanoidRootPart').CFrame
    a:LoadCharacter()
    wait(.05)
    a.Character:FindFirstChild('HumanoidRootPart').CFrame = pos
end

function scan(d)
	for _, a in pairs(d:children()) do
		if a:IsA'Sound' then
			a:Destroy()
		end
	scan(a)
	end
end

function rre(a)
    a:LoadCharacter()
end

plr.Chatted:connect(function(m)
if string.sub(m:lower(),1,4) == "!res" then
    for _,v in pairs(plrs:GetPlayers()) do
        if string.find(v.Name:lower(),string.sub(m:lower(),6,-1)) then
            if not v.Character then
                rre(v)
            elseif v.Character then
                mre(v)
            end
        end
    end
end

if string.sub(m:lower(),1,5) == "!mute" then
    for i,v in pairs(plrs:GetChildren()) do
        if string.find(v.Name:lower(),string.sub(m:lower(),7,-1)) then
            table.insert(muted,1,v.Name)
        end
    end
end


if string.sub(m:lower(),1,7) == "!unmute" then
    for i,v in pairs(muted) do
        if string.find(muted[i]:lower(),string.sub(m:lower(),9,-1)) then
            table.remove(muted,i)
        end
    end
end

if string.sub(m:lower(),1,4) == "!dis" then
    for i,v in pairs(plrs:GetChildren()) do
        if string.find(v.Name:lower(),string.sub(m:lower(),6,-1)) then
            table.insert(db,1,v.Name)
        end
    end
end


if string.sub(m:lower(),1,6) == "!undis" then
    for i,v in pairs(db) do
        if string.find(db[i]:lower(),string.sub(m:lower(),8,-1)) then
            table.remove(db,i)
        end
    end
end

if string.sub(m:lower(),1,3) == "!lk" then
    for i,v in pairs(plrs:GetChildren()) do
        if string.find(v.Name:lower(),string.sub(m:lower(),5,-1)) then
            table.insert(lk,1,v.Name)
        end
    end
end


if string.sub(m:lower(),1,5) == "!unlk" then
    for i,v in pairs(lk) do
        if string.find(lk[i]:lower(),string.sub(m:lower(),7,-1)) then
            table.remove(lk,i)
        end
    end
end
end)

while wait() do
for i,v in pairs(lk) do
    if plrs:FindFirstChild(lk[i]) and plrs[lk[i]].Character then
        plrs[lk[i]].Character:BreakJoints()
    end
end
for i,v in pairs(muted) do
    if plrs:FindFirstChild(muted[i]) and plrs[muted[i]].Character then
        scan(plrs[muted[i]].Character)
    end
end
for i,v in pairs(db) do
    if plrs:FindFirstChild(db[i]) then
        if plrs[db[i]].Character then
        for _, b in pairs(plrs[db[i]].Character:children()) do
            if b:IsA('LocalScript') and b.Name ~= "Animate" then
                b:Destroy()
            end
        end
    end
    end
    end
end
		</pre>
	</body>
</html>