Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- local adminname1 = script.Name
- script.Parent = game.ServerStorage
- --// SETTINGS
- local settinsgubications = game:GetService("ServerStorage")
- local setting1 = Instance.new("Folder", settinsgubications)
- setting1.Name = adminname1.."Settings"
- local admins1 = Instance.new("Folder", setting1)
- admins1.Name = adminname1.."AdminsList"
- local bans1 = Instance.new("Folder", setting1)
- bans1.Name = adminname1.."BansList"
- local admin = Instance.new("NumberValue", admins1)
- admin.Name = owner.Name
- admin.Value = owner.UserId
- local setupfinish1 = true
- local prefix1 = "?"
- --// ACTUAL PLAYERS FUNCTIONS
- for _,plr in pairs(game.Players:GetChildren()) do
- plr.Chatted:Connect(function(msg)
- if admins1:FindFirstChild(plr.Name) then --// ADMINS SCANS
- --// RANKS SCANS & COMMANDS
- if admins1[plr.Name].Value == plr.UserId then --// RANK SCAN START
- if msg:sub(1,6) == prefix1.."kill " then --// COMMANDS START
- local target1 = msg:sub(7)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if game.Players:FindFirstChild(target1) then
- game.Players[target1].Character:BreakJoints()
- print(adminname1..":\n"..target1.." now its DEAD!")
- end
- for _,plrs in pairs(game.Players:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name then
- plrs.Character:BreakJoints()
- print(adminname1..":\n"..plrs.Name.." now its DEAD!")
- end
- end
- if target1:lower() == "all" then
- plrs.Character:BreakJoints()
- print(adminname1..":\n"..plrs.Name.." now its DEAD!")
- end
- end
- end --// COMMAND END
- if msg:sub(1,6) == prefix1.."kick " then --// COMMANDS START
- local target1 = msg:sub(7)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if game.Players:FindFirstChild(target1) and target1 ~= owner.Name then
- game.Players[target1]:Destroy()
- print(adminname1..":\n"..target1.." now its KICKED!")
- end
- for _,plrs in pairs(game.Players:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name and plrs.Name ~= owner.Name then
- plrs.Character:Destroy()
- print(adminname1..":\n"..plrs.Name.." now its KICKED!")
- end
- end
- if target1:lower() == "all" then
- if plrs.Name ~= owner.Name then
- plrs.Character:Destroy()
- print(adminname1..":\n"..plrs.Name.." now its KICKED!")
- end
- end
- end
- end --// COMMAND END
- if msg:sub(1,3) == prefix1.."m " then --// COMMANDS START
- local target1 = msg:sub(4)
- local MEESSAGE1 = Instance.new("Message", workspace)
- MEESSAGE1.Text = "["..plr.Name.."]: "..target1
- wait(8)
- MEESSAGE1:Destroy()
- end --// COMMAND END
- if msg:sub(1,3) == prefix1.."h " then --// COMMANDS START
- local target1 = msg:sub(4)
- local MEESSAGE1 = Instance.new("Hint", workspace)
- MEESSAGE1.Text = "["..plr.Name.."]: "..target1
- wait(8)
- MEESSAGE1:Destroy()
- end --// COMMAND END
- if msg:sub(1,7) == prefix1.."admin " and admins1[plr.Name].Value == owner.UserId then --// COMMANDS START
- local target1 = msg:sub(8)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if game.Players:FindFirstChild(target1) and not admins1:FindFirstChild(target1) then
- local nadmin1 = Instance.new("NumberValue", admins1)
- nadmin1.Name = target1
- nadmin1.Value = game.Players[target1].UserId
- print(adminname1..":\n"..target1.." now its ADMIN!")
- end
- for _,plrs in pairs(game.Players:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name and not admins1:FindFirstChild(plrs.Name) then
- local nadmin1 = Instance.new("NumberValue", admins1)
- nadmin1.Name = plrs.Name
- nadmin1.Value = plrs.UserId
- print(adminname1..":\n"..plrs.Name.." now its ADMIN!")
- end
- end
- if target1:lower() == "all" and not admins1:FindFirstChild(plrs.Name) then
- local nadmin1 = Instance.new("NumberValue", admins1)
- nadmin1.Name = plrs.Name
- nadmin1.Value = plrs.UserId
- print(adminname1..":\n"..plrs.Name.." now its ADMIN!")
- end
- end
- end --// COMMAND END
- if msg:sub(1,9) == prefix1.."unadmin " and admins1[plr.Name].Value == owner.UserId then --// COMMANDS START
- local target1 = msg:sub(10)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if admins1:FindFirstChild(target1) and target1 ~= plr.Name then
- admins1[target1]:Destroy()
- print(adminname1..":\n"..target1.." now its GUEST!")
- end
- for _,plrs in pairs(admins1:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name then
- plrs:Destroy()
- print(adminname1..":\n"..plrs.Name.." now its GUEST!")
- end
- end
- end
- end --// COMMAND END
- if msg:sub(1,8) == prefix1.."prefix " then --// COMMANDS START
- local target1 = msg:sub(9)
- prefix1 = target1
- print(adminname1..":\n New prefix has set: "..prefix1)
- end --// COMMAND END
- ---------------------------
- if setupfinish1 == false then
- if msg:sub(1,4) == ">new" and plr.Name == owner.Name then
- local setting1 = Instance.new("Folder", settinsgubications)
- setting1.Name = adminname1.."Settings"
- local admins1 = Instance.new("Folder", setting1)
- admins1.Name = adminname1.."AdminsList"
- local bans1 = Instance.new("Folder", setting1)
- bans1.Name = adminname1.."BansList"
- local admin = Instance.new("NumberValue", admins1)
- admin.Name = owner.Name
- admin.Value = owner.UserId
- local setupfinish1 = true
- end
- end
- ---------------------------
- end --// RANK SCAN & COMMANDS END
- end
- end)
- end
- --// NEW PLAYERS FUNCTIONS
- game.Players.PlayerAdded:Connect(function(plr)
- plr.Chatted:Connect(function(msg)
- if admins1:FindFirstChild(plr.Name) then --// ADMINS SCANS
- --// RANKS SCANS & COMMANDS
- if admins1[plr.Name].Value == plr.UserId then --// RANK SCAN START
- if msg:sub(1,6) == prefix1.."kill " then --// COMMANDS START
- local target1 = msg:sub(7)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if game.Players:FindFirstChild(target1) then
- game.Players[target1].Character:BreakJoints()
- print(adminname1..":\n"..target1.." now its DEAD!")
- end
- for _,plrs in pairs(game.Players:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name then
- plrs.Character:BreakJoints()
- print(adminname1..":\n"..plrs.Name.." now its DEAD!")
- end
- end
- if target1:lower() == "all" then
- plrs.Character:BreakJoints()
- print(adminname1..":\n"..plrs.Name.." now its DEAD!")
- end
- end
- end --// COMMAND END
- if msg:sub(1,6) == prefix1.."kick " then --// COMMANDS START
- local target1 = msg:sub(7)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if game.Players:FindFirstChild(target1) and target1 ~= owner.Name then
- game.Players[target1]:Destroy()
- print(adminname1..":\n"..target1.." now its KICKED!")
- end
- for _,plrs in pairs(game.Players:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name and plrs.Name ~= owner.Name then
- plrs.Character:Destroy()
- print(adminname1..":\n"..plrs.Name.." now its KICKED!")
- end
- end
- if target1:lower() == "all" then
- if plrs.Name ~= owner.Name then
- plrs.Character:Destroy()
- print(adminname1..":\n"..plrs.Name.." now its KICKED!")
- end
- end
- end
- end --// COMMAND END
- if msg:sub(1,3) == prefix1.."m " then --// COMMANDS START
- local target1 = msg:sub(4)
- local MEESSAGE1 = Instance.new("Message", workspace)
- MEESSAGE1.Text = "["..plr.Name.."]: "..target1
- wait(8)
- MEESSAGE1:Destroy()
- end --// COMMAND END
- if msg:sub(1,3) == prefix1.."h " then --// COMMANDS START
- local target1 = msg:sub(4)
- local MEESSAGE1 = Instance.new("Hint", workspace)
- MEESSAGE1.Text = "["..plr.Name.."]: "..target1
- wait(8)
- MEESSAGE1:Destroy()
- end --// COMMAND END
- if msg:sub(1,7) == prefix1.."admin " and admins1[plr.Name].Value == owner.UserId then --// COMMANDS START
- local target1 = msg:sub(8)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if game.Players:FindFirstChild(target1) and not admins1:FindFirstChild(target1) then
- local nadmin1 = Instance.new("NumberValue", admins1)
- nadmin1.Name = target1
- nadmin1.Value = game.Players[target1].UserId
- print(adminname1..":\n"..target1.." now its ADMIN!")
- end
- for _,plrs in pairs(game.Players:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name and not admins1:FindFirstChild(plrs.Name) then
- local nadmin1 = Instance.new("NumberValue", admins1)
- nadmin1.Name = plrs.Name
- nadmin1.Value = plrs.UserId
- print(adminname1..":\n"..plrs.Name.." now its ADMIN!")
- end
- end
- if target1:lower() == "all" and not admins1:FindFirstChild(plrs.Name) then
- local nadmin1 = Instance.new("NumberValue", admins1)
- nadmin1.Name = plrs.Name
- nadmin1.Value = plrs.UserId
- print(adminname1..":\n"..plrs.Name.." now its ADMIN!")
- end
- end
- end --// COMMAND END
- if msg:sub(1,9) == prefix1.."unadmin " and admins1[plr.Name].Value == owner.UserId then --// COMMANDS START
- local target1 = msg:sub(10)
- if target1:lower() == "me" then
- target1 = plr.Name
- end
- if admins1:FindFirstChild(target1) and target1 ~= plr.Name then
- admins1[target1]:Destroy()
- print(adminname1..":\n"..target1.." now its GUEST!")
- end
- for _,plrs in pairs(admins1:GetChildren()) do
- if target1:lower() == "others" then
- if plrs.Name ~= plr.Name then
- plrs:Destroy()
- print(adminname1..":\n"..plrs.Name.." now its GUEST!")
- end
- end
- end
- end --// COMMAND END
- if msg:sub(1,8) == prefix1.."prefix " then --// COMMANDS START
- local target1 = msg:sub(9)
- prefix1 = target1
- print(adminname1..":\n New prefix has set: "..prefix1)
- end --// COMMAND END
- ---------------------------
- if setupfinish1 == false then
- if msg:sub(1,4) == ">new" and plr.Name == owner.Name then
- local setting1 = Instance.new("Folder", settinsgubications)
- setting1.Name = adminname1.."Settings"
- local admins1 = Instance.new("Folder", setting1)
- admins1.Name = adminname1.."AdminsList"
- local bans1 = Instance.new("Folder", setting1)
- bans1.Name = adminname1.."BansList"
- local admin = Instance.new("NumberValue", admins1)
- admin.Name = owner.Name
- admin.Value = owner.UserId
- local setupfinish1 = true
- end
- end
- ---------------------------
- end --// RANK SCAN & COMMANDS END
- end
- end)
- end)
- --// SMART SCANNER
- settinsgubications.ChildRemoved:Connect(function(obj)
- if obj.Name == adminname1.."Settings" then
- setupfinish1 = false
- warn(adminname1..":\nPleas type '>new' in the chat.")
- end
- end)
Add Comment
Please, Sign In to add comment