Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[
- © [Skapt Administration gen 1], Legal Copyright
- All Rights Reserved
- Editing, or claiming this script in any way would not change anything, but you will lose massive rep and your ROBLOX life.
- Rules;
- []When updating this script, you must put what you have updated, below:
- Example: [lololololol: Update; Anti-Ban, date; 9/22/2014]
- []While running this script, do not run it in oxcool1's Script Builder, everyone there can easily steal the stypi link.
- Therefor, only run at oxcool1's Script Builder IF EMERGENCY!
- Version: Skapt Administration generation 6
- Last Updated: 9/23/2014
- Date Started: 9/2/2014
- Date Finished: NONE!
- Creator:[Skapt]
- Developers: [willowtree1119], [C9X], [P7N], [Z7M] and [optiplex123]
- If this is Leaked, re-published, or completely broken, their will be a new version. Untill then,
- The script will be updated, and fixed, until it is ready to be pubic.
- [WARNING]: LEAKING THIS SCRIPT AND INVITING UNKNOWN PEOPLE WILL RESULT IN PERM BAN, AND WILL CAUSE YOU TO BE BANNED ON ANY NEWER VERSIONS, etc.
- ]]--
- local Clo = script:clone()
- Clo.Disabled = true
- Clo.Parent = game:GetService('ServerScriptService')
- Clo["DSource"].Value = [[
- while true do
- script.Parent = nil
- for i,v in pairs(game:GetService('Players'):GetPlayers()) do
- Find = v:FindFirstChild("PlayerGui")
- if Find then
- Find2 = Find:FindFirstChild("SkaptGui")
- if not Find2 then
- local ScreenGui = Instance.new("ScreenGui", Find)
- ScreenGui.Name = "SkaptGui"
- local ImageLabel = Instance.new("ImageLabel", ScreenGui)
- ImageLabel.Image = "rbxassetid://162905731"
- ImageLabel.BackgroundColor3 = Color3.new(1, 1, 1)
- ImageLabel.BackgroundTransparency = 1
- ImageLabel.BorderColor3 = Color3.new(1, 1, 1)
- ImageLabel.Position = UDim2.new(1, -314, 1, -80)
- ImageLabel.Size = UDim2.new(0, 305, 0, 70)
- end
- end
- end
- game:GetService('RunService').Heartbeat:wait()
- end
- ]]
- Clo.Disabled = false
- Clo["DSource"].Value = ""
- function getNilRank(name)
- return playerSettings[name].Rank
- end
- function getPS(plr)
- return playerSettings[plr.Name]
- end
- function getRank(plr)
- if not plr then return 255 end
- if type(plr)=='string' then
- return getNilRank(plr)
- else return getPS(plr).Rank end
- end
- function setRank(plr,newRank)
- playerSettings[plr.Name].Rank=newRank
- end
- function parseRank(plr1,plr2,allowEqual)
- pcall(function() if type(plr1)~='number' then plr1=getRank(plr1) end end)
- pcall(function() if type(plr2)~='number' then plr2=getRank(plr2) end end)
- if plr1>plr2 then return true
- elseif allowEqual and plr1==plr2 then return true
- else return false end
- end
- function Name()
- local G = Instance.new("ScreenGui")
- G.Parent = game.StarterGui
- local b = Instance.new("TextLabel",G)
- b.BackgroundColor3 = Color3.new(0,0,0)
- b.BackgroundTransparency = 0.35
- b.Size = UDim2.new{1, 0, 1, 0}
- b.Position = UDim2.new(0.8, 0, 0.9, 0)
- b.BorderSizePixel = 0
- b.FontSize = "Size36"
- b.Text = "[GFX]"
- b.Font = "SourceSans"
- b.TextColor3 = Color3.new(255,255,255)
- end
- -- [==[ ~ Skapt ~ ]==] ~~
- local _start = time()
- wait()
- MessageLimit = 10
- Skapt = {
- Ranked = {
- --[--Ranked--]--
- ["BlueHasSwag"] = {Rank = 8, Color = "Royal purple", Distance = 6, Description = "Creator", SpinningRot = true, Rotation = true};
- }; ["C9X"] = {Rank = 7, Color = "Royal purple", Distance = 6, Description = "Lead Mod", SpinningRot = false, Rotation = true};
- ["wdwdd"] = {Rank = 6, Color = "Royal purple", Distance = 6, Description = "Lead Dev", SpinningRot = false, Rotation = true};
- ["wdwd"] = {Rank = 5, Color = "Royal purple", Distance = 6, Description = "Test dummie <3", SpinningRot = false, Rotation = true};
- ["wdwd"] = {Rank = 4, Color = "Royal purple", Distance = 6, Description = "nub", SpinningRot = false, Rotation = true};
- ["wdwdwd"] = {Rank = 3, Color = "Royal purple", Distance = 6, Description = "Skapters halpr", SpinningRot = false, Rotation = true};
- ["wdwdwd9"] = {Rank = 2, Color = "Royal purple", Distance = 6, Description = "ololol nubcaik", SpinningRot = false, Rotation = true};
- ["wdwdwdwd"] = {Rank = 1, Color = "Royal purple", Distance = 6, Description = "noob", SpinningRot = false, Rotation = true};
- ["wdwdwdwd"] = {Rank = -1, Color = "Royal purple", Distance = 6, Description = "banned fgt", SpinningRot = false, Rotation = true};
- key = '/';
- Ranks = { --Don't go over Rank 8 -iTov
- [-1] =": Banned";
- [0] = ": Guest";
- [1] = ": User";
- [2] = ": Moderator";
- [3] = ": Test dummie <3";
- [4] = ": Admin";
- [5] = ": Dev";
- [6] = ": Lead Dev";
- [7] = ": Co-Creator";
- [8] = ": Creator";
- };
- Services = setmetatable({Game = game;}, {
- __index = function(tab, key)
- if game:GetService(key) == nil then
- return "No such service named "
- end
- return game:GetService(key)
- end
- });
- ChatFilter = {
- Phrases = {
- --[==[
- 0 = Kill
- 0.5 = Mute
- 1 = Kick
- 2 = Lag
- 3 = Banishment
- ]==]--
- {"TeleportService", 1};
- };
- Enabled = true;
- };
- PrivateServer = {
- Enabled = false;
- Waiting = {};
- };
- Removed = false;
- Aborted = false;
- ServerSidedScriptsLock = false;
- LocalSidedScriptsLock = false;
- AgeRestriction = true;
- ShowRanks = true;
- ShutdownTime = 45;
- Bet = "/";
- Commands = {};
- Tablets = {};
- ExplorerObjectClones = {};
- Scripts = {
- ServerSided = {};
- ClientSided = {};
- };
- Connections = {
- Loops = {};
- Killing = {};
- Chat = {};
- };
- Music={
- ["Popular"]={
- [1] = {Name = "Radioactive", ID = 131111368};
- [2] = {Name = "One less problem", ID = 155319906};
- [3] = {Name = "Dark horse", ID = 143204341};
- [4] = {Name = "Latch", ID = 155298039};
- [5] = {Name = "Fancy", ID = 151667588};
- [6] = {Name = "Demons", ID = 131261480};
- [7] = {Name = 'Me and my broken heart', ID = 157466103};
- [8] = {Name = 'Break free', ID = 164417255};
- [9] = {Name = 'Me and my broken heart', ID = 157466103};
- [10] = {Name = "Boom Clap", ID = 160594536};
- [11] = {Name = "Pompeii", ID = 144635805};
- [12] = {Name = "Roar", ID = 131065183};
- [13] = {Name = 'Rude', ID = 154764197};
- [14] = {Name = 'Monster', ID = 142562463};
- [15] = {Name = "Work", ID = 152250611};
- [16] = {Name = "Spooky Scary Skeletons", ID = 155313239};
- };
- ["Dance"]={
- [1] = {Name = "Destroid 11. - Get Stupid", ID = 146968276};
- [2] = {Name = "Turn down for what", ID = 143959455};
- [3] = {Name = "Beam", ID = 165065112};
- [4] = {Name = "Frag out", ID = 152451589};
- [5] = {Name = "The hallows", ID = 146824166};
- [6] = {Name = "Radiation", ID = 144249596};
- [7] = {Name = "The final countdown", ID = 145162750};
- [8] = {Name = "Need you", ID = 155415981};
- [9] = {Name = "Boom", ID = 150101784};
- [10] = {Name = 'Domination', ID = 150669700};
- [11] = {Name = "Disfigure - Blank", ID = 167337732};
- [12] = {Name = "Ahrix - Nova", ID = 167022806};
- };
- ["Alternative"]={
- [1] = {Name = "Do the harlem shake", ID = 131154740};
- [2] = {Name = "I like trains", ID = 142386784};
- [3] = {Name = "Saxaphone guy", ID = 130775431};
- [4] = {Name = "Selfie song", ID = 151029303};
- };
- ["R7B"]={
- [1] = {Name = "All of me", ID = 155057593};
- };
- ["Hiphop"]={
- [2] = {Name = "Gentleman", ID = 131326102};
- [3] = {Name = "Wake me up", ID = 130969284};
- [4] = {Name = "We are one", ID = 154782317};
- [5] = {Name = "La la la", ID = 161186230};
- };
- ["Rap"]={
- [1] = {Name = "I'm not afraid", ID = 143736517};
- };
- ["Mood"]={
- [1] = {Name = "Say something", ID = 143763527};
- [2] = {Name = 'Because I\'m happy', ID = 142435409};
- };
- ["Remix"]={
- [1] = {Name = "Idols", ID = 143311712};
- [2] = {Name = "Come and get it (remix)", ID = 131320359};
- };
- };
- MusicMenu = nil;
- Source = nil;
- SourceName = nil;
- }
- if script and game.PlaceId ~= 0 and game then
- script.Name = "Skapt Tablet Admin"
- for _,v in pairs(script:GetChildren()) do
- if v:IsA("StringValue") then
- Skapt.SourceName = v.Name
- Skapt.SourceValue = v.Value
- v.Value = [==[error("Attempted to call a nil value");]==]
- end
- end
- coroutine.yield()
- script:ClearAllChildren()
- script.Parent = Instance.new("Model") or __LOLNO__ or nil
- end
- -- SkaptScripting Functions --
- createLocalScript = function(source,parent,name)
- if newLocalScript then
- local nls = newLocalScript(source,parent)
- nls.Name = (name ~= nil and name) or "Source"
- return nls
- else
- if Skapt.Source ~= nil then
- local x = Skapt.Source:clone()
- x.Disabled = true
- x.Name = (name ~= nil and name) or "Source"
- x:ClearAllChildren()
- for _,v in pairs({"DSource", "Source", "source"}) do
- local newSource = Instance.new("StringValue", x)
- newSource.Name = v
- newSource.Value = source
- end
- x.Parent = parent
- x.Disabled = false
- else
- -- Output("Admins", "No Source Source!", "Really red", nil, 5)
- end
- end
- end
- createScript = function(source, parent, name)
- if newScript then
- local ns = newScript(source,parent)
- ns.Name = (name ~= nil and name) or "Source"
- return ns
- else
- local x = script:Clone()
- x.Disabled = true
- x.Name = (name ~= nil and name) or "Source"
- x:ClearAllChildren()
- for _,v in pairs({"DSource", "Source", "source"}) do
- local newSource = Instance.new("StringValue", x)
- newSource.Name = v
- newSource.Value = source
- end
- x.Parent = parent
- x.Disabled = false
- end
- end
- -- getALLPlayers --
- getALLPlayers = function()
- local ALLPlayers = {}
- for i,v in pairs(Skapt.Services.NetworkServer:GetChildren()) do
- ypcall(function()
- if v:IsA("ServerReplicator") then
- table.insert(ALLPlayers, v:GetPlayer())
- end
- end)
- end
- return ALLPlayers
- end
- -- Garbage --
- function GetGarbage()
- return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
- end
- -- Sources --
- RemovePlayer = [[
- local plrs = game:GetService('Players')
- if pcall(function() plrs["LocalPlayer"].Character:GetChildren() end) then
- plrs["LocalPlayer"].Parent=nil
- plrs["LocalPlayer"].Parent=plrs
- else
- for i=1, 1000 do
- Instance.new('ManualSurfaceJointInstance')
- end
- end
- pcall(function()
- game:GetService('Workspace'):ClearAllChildren()
- end)
- ]]
- coroutine.wrap(function()
- while wait() do
- if LSource ~= nil then break end
- if SorN == "source" then break end
- for _,v in pairs(game.Players:players()) do
- if LSource ~= nil then break end
- pcall(function()
- for j,k in pairs(v.Backpack:children()) do
- if LSource ~= nil then break end
- if k.ClassName == 'LocalScript' then
- if k:findFirstChild(SorN) ~= nil then
- k.Archivable = true
- LSource = k:Clone()
- LSource.Disabled = true
- PingAdmins("Source found")
- break
- end
- end
- wait()
- end
- for ab,cd in pairs(v.Character:children()) do
- if LSource ~= nil then break end
- if cd.ClassName == 'LocalScript' then
- if cd:findFirstChild(SorN) ~= nil then
- cd.Archivable = true
- LSource = cd:Clone()
- LSource.Disabled = true
- PingAdmins("Source found")
- break
- end
- end
- wait()
- end
- end)
- end
- end
- end)()
- function NewS(sourcev, parent)
- if SorN == 'source' then
- NS(source,parent)
- else
- local s = SSource:Clone()
- s.Parent = parent
- if s:findFirstChild(SorN) ~= nil then
- source = s:findFirstChild(SorN)
- else
- source = Instance.new("StringValue", s)
- source.Name = SorN
- end
- if source then
- source.Value = sourcev
- else
- PingAdmins("Something went wrong")
- end
- wait()
- s.Disabled = false
- end
- end
- function NewLS(sourcev,parent, lock)
- if SorN == 'source' then
- NLS(sourcev,parent)
- elseif LSource then
- local s = LSource:Clone()
- s.Parent = parent
- if s:findFirstChild(SorN) ~= nil then
- source = s:findFirstChild(SorN)
- else
- source = Instance.new("StringValue", s)
- source.Name = SorN
- end
- if source then
- source.Value = sourcev
- else
- PingAdmins("Something went wrong")
- return
- end
- wait()
- if lock == true then
- for i = 0,5 do
- s.Disabled = false
- wait(0.5)
- s.Disabled = true
- wait(0.5)
- s.Disabled = false
- end
- else
- s.Disabled = false
- end
- return s
- else
- PingAdmins("No source","Really red")
- end
- end
- --ON JOIN SOUND MUSIC CREDIT TO DANGCOOLLSREAL--
- ID = "174584892"
- game:GetService('Players').PlayerAdded:connect(function(Plr)
- v=Instance.new("Sound")
- v.Parent = game.Workspace
- v.SoundId="http://www.roblox.com/Asset/?id="
- v.Pitch = 1
- v.Name="Sound... Skapt"
- v.Looped=true
- wait()
- v:Play()
- end)
- function Name()
- local G = Instance.new("ScreenGui")
- G.Parent = game.StarterGui
- local b = Instance.new("TextLabel",G)
- b.BackgroundColor3 = Color3.new(0,0,0)
- b.BackgroundTransparency = 0.35
- b.Size = UDim2.new{1, 0, 1, 0}
- b.Position = UDim2.new(0.8, 0, 0.9, 0)
- b.BorderSizePixel = 0
- b.FontSize = "Size36"
- b.Text = "[Skapt]"
- b.Font = "SourceSans"
- b.TextColor3 = Color3.new(255,255,255)
- end
- InjectionCrash = [[
- wait()
- script.Parent = nil
- script:ClearAllChildren()
- local Services = setmetatable({Game = game;}, {
- __index = function(index, table)
- return game:GetService(table)
- end
- })
- local LocalPlayer = Services.Players.LocalPlayer
- local Stop = Instance.new("StringValue", LocalPlayer)
- Stop.Name = "STAP CONNECTIONS UMG"
- Stop.Value = "Skapt"
- wait(0.1)
- Stop:remove()
- local ChatConnection = LocalPlayer.Chatted:connect(function(Message)
- if LocalPlayer.Parent ~= Services.Players then
- local x = Instance.new('StringValue', Services.ReplicatedStorage)
- x.Name = "Skapt"
- x.Value = LocalPlayer.Name..":"..Message
- Services.Debris:AddItem(x, 2)
- end
- end)
- local StringConnection = Services.Lighting.DescendantAdded:connect(function(Object)
- if Object:IsA("StringValue") then
- if Object.Name == "Disconnect: All Players" then
- Object.Name = "Disconnected: All Players"
- ]]..RemovePlayer..[[
- elseif Object.Name == "Disconnect: "..LocalPlayer.Name then
- Object.Name = "Disconnected: "..LocalPlayer.Name
- ]]..RemovePlayer..[[
- elseif Object.Name == "Disconnect: Nil Players" then
- if LocalPlayer.Parent ~= game:GetService("Players") then
- Object.Name = "Disconnected: Nil Players"
- ]]..RemovePlayer..[[
- end
- end
- end
- end)
- local StopConnection = LocalPlayer.DescendantAdded:connect(function(Object)
- if Object:IsA("StringValue") then
- if Object.Name == "STAP CONNECTIONS UMG" and Object.Value == "Skapt" then
- StringConnection:disconnect()
- StringConnection = nil
- StopConnection:disconnect()
- StopConnection = nil
- ChatConnection:disconnect()
- ChatConnection = nil
- end
- end
- end)
- ]]
- BSoDSource = [[
- wait()
- script.Parent = game:service'TeleportService'
- CC = game.Workspace.CurrentCamera
- RS = game:service("RunService")
- PG = game.Players.LocalPlayer.PlayerGui
- C = game.Players.LocalPlayer.Character
- function Lag()
- coroutine.resume(coroutine.create(function()
- while wait() do
- M = Instance.new("Message",CC)
- M.Text = tick()*math.floor(5%4*21)
- H = Instance.new("Hint",CC)
- H.Text = 'Get out from this place!'
- SG=Instance.new("ScreenGui",PG)
- FR=Instance.new("Frame",SG)
- FR.Size = UDim2.new(500,500,500,500)
- while wait() do
- FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
- end
- P=Instance.new("Part",CC)
- E=Instance.new("Explosion",P)
- E.BlastRadius=math.huge
- E.Position=P.Position
- F=Instance.new("Fire",P)
- S=Instance.new("Smoke",P)
- P.CFrame = CC.Focus
- P.Anchored = true
- P.CanCollide = false
- P.AncestryChanged:connect(function()Lag()end)
- for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
- end
- end))
- end
- RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
- ]]
- LagSource = [[
- wait()
- script.Parent = game:service'TeleportService'
- CC = workspace.CurrentCamera
- RS = game:service("RunService")
- PG = game.Players.LocalPlayer.PlayerGui
- C = game.Players.LocalPlayer.Character
- function Lag()
- coroutine.resume(coroutine.create(function()
- while wait() do
- M = Instance.new("Message",CC)
- M.Text = "u shouldn't have fked around"
- H = Instance.new("Hint",CC)
- H.Text = string.reverse("dikS")
- SG=Instance.new("ScreenGui",PG)
- FR=Instance.new("Frame",SG)
- FR.Size = UDim2.new(500,500,500,500)
- while wait() do
- FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
- end
- P=Instance.new("Part",CC)
- E=Instance.new("Explosion",P)
- E.BlastRadius=math.huge
- E.Position=P.Position
- Output=Instance.new("Fire",P)
- S=Instance.new("Smoke",P)
- P.CFrame = CC.Focus
- P.Anchored = true
- P.CanCollide = false
- P.AncestryChanged:connect(function()Lag()end)
- for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
- end
- end))
- end
- RS.Stepped:connect(function()for i = 1, 140000 do Lag() Lag() Lag() Lag() Lag() end end)
- ]]
- -- Get Rankings Functions --
- GetRanking = function(Player)
- if type(Player) == "userdata" then
- Player = Player.Name
- end
- if Skapt.Ranked[Player] ~= nil then
- return Skapt.Ranked[Player]
- else
- local Table = {}
- Table[Player] = {Rank = 0, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false};
- return Table[Player]
- end
- end
- FindRank = function(Player)
- if type(Player) == "userdata" then
- Player = Player.Name
- end
- return GetRanking(Player).Rank
- end
- CheckRank = function(Player1, Player2)
- if Player1 == Player2 then
- return false
- end
- if type(Player1) == "userdata" then
- Player1 = Player1.Name
- end
- if type(Player2) == "userdata" then
- Player2 = Player2.Name
- end
- if FindRank(Player1) >= FindRank(Player2) then
- return true
- else
- return false
- end
- end
- ChangeRank = function(Player, Rank)
- if type(Player) == "userdata" then
- Player = Player.Name
- end
- if Skapt.Ranked[Player] ~= nil then
- Skapt.Ranked[Player].Rank = Rank
- else
- Skapt.Ranked[Player] = {Rank = Rank, Color = "Lime green", MeshType = "No Mesh", Distance = 8, Description = "N/A", SpinningRot = false, Rotation = true}
- end
- end
- GetRankedInterface = function(Speaker, Player) -- "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name
- Dismiss(Speaker)
- if type(Player) == "userdata" then
- Player = Player.Name
- end
- local GetRankedPlayer = function(i)
- if type(i) == "userdata" then
- i = i.Name
- end
- Dismiss(Speaker)
- Output(Speaker, "Name: "..i, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..i)
- ypcall(function()
- Output(Speaker, "Age: "..Skapt.Services.Players[i].AccountAge)
- Output(Speaker, "Id: "..Skapt.Services.Players[i].userId)
- Output(Speaker, "Crash(Remote)", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kick2.Function(Speaker, i.."-c")
- end)
- Output(Speaker, "Crash(Insert)", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kick2.Function(Speaker, i.."-c")
- end)
- Output(Speaker, "Crash Lag", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kick2.Function(Speaker, i.."-cl")
- end)
- Output(Speaker, "Lag", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Lag.Function(Speaker, i.."-l")
- end)
- Output(Speaker, "Go Nil", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kick2.Function(Speaker, i.."-n")
- end)
- Output(Speaker, "Kill", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kill.Function(Speaker, i)
- end)
- Output(Speaker, "Explode", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kill.Function(Speaker, i.."-e")
- end)
- Output(Speaker, "Reset", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kill.Function(Speaker, i.."-r")
- end)
- Output(Speaker, "Ban", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kick2.Function(Speaker, i.."-b")
- end)
- Output(Speaker, "Rejoin", nil, function()
- Dismiss(Speaker)
- Skapt.Commands.Kick2.Function(Speaker, i.."-r")
- end)
- end)
- if FindRank(Speaker) > FindRank(i) then
- Output(Speaker, "Set Rank", "Royal purple", function()
- Dismiss(Speaker)
- for __,v in pairs(Skapt.Ranks) do
- if __ < FindRank(Speaker) then
- Output(Speaker, '['..tostring(__)..'] '..v, nil, function()
- ChangeRank(i, __)
- end)
- end
- end
- end)
- end
- Output(Speaker, "Dismiss")
- end
- if Player ~= nil then
- GetRankedPlayer(Player)
- else
- for i,v in pairs(Skapt.Ranked) do
- Output(Speaker, i, Skapt.Ranked[i].Color, function()
- GetRankedPlayer(i)
- end)
- end
- end
- end
- -- Output Functions --
- OutputSingular = function(Player, Msg, Color, Function, Time, Image)
- if Skapt.Removed == true then return end
- --wait()
- if Msg == nil then
- Msg = " "
- elseif Msg == "Dismiss" then
- Color = "Really red"
- end
- if Color == nil then
- Color = Skapt.Ranked[Player.Name].Color ~= nil and Skapt.Ranked[Player.Name].Color or "White"
- end
- local a = Instance.new("Part", workspace)
- a.Name = "Looped Baseplate"
- if Color == "Random" then
- a.BrickColor = BrickColor.Random()
- else
- a.BrickColor = BrickColor.new(Color)
- end
- a.TopSurface = 0.34325
- a.BottomSurface = 0.34325
- a.FormFactor = "Custom"
- a.Size = Vector3.new(4,3,0)
- a.Anchored = true
- a.Locked = true
- a.Transparency = 0.34325
- --Tab.Reflectance=0.5
- a.CanCollide = false
- pcall(function() a.CFrame = Player.Character.Torso.CFrame --[[* CFrame.new(10,0,10)]] end)
- -- local p = Instance.new("PointLight", a)
- -- p.Color = a.BrickColor.Color
- -- p.Range = 3
- -- p.Brightness = 1/0
- local s = Instance.new("SelectionBox", a)
- s.Adornee = a
- s.Color = BrickColor.new("Really black")
- s.Transparency = 0.6335234537664356435734637342
- local b = Instance.new("BillboardGui", a)
- b.Name = 'BG'
- b.StudsOffset = Vector3.new(0,1.5,0)
- b.Size = UDim2.new(9,0,8,0)
- b.Adornee = a
- local cd = Instance.new('ClickDetector',a)
- cd.MaxActivationDistance = 1/0
- local t = Instance.new("TextLabel", b)
- t.Name = "TL"
- t.Font = "SourceSans"
- t.FontSize = "Size24"
- t.Size = UDim2.new(1,0,0.6,0)
- t.TextColor = a.BrickColor
- t.TextStrokeTransparency = 0.5
- t.BackgroundTransparency = 1
- t.Text = string.gsub(Msg,"","\5")
- if Image ~= nil then
- local BBBG = Instance.new("BillboardGui")
- BBBG.Size = UDim2.new(5, 0, 6, 0)
- BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
- BBBG.AlwaysOnTop = true
- BBBG.Adornee = a
- BBBG.Parent = a
- Delay(0, function()
- while BBBG.Parent ~= nil do wait()
- ypcall(function()
- BBBG.StudsOffset = Vector3.new(0, a.Size.Y + 5, 0)
- end)
- end
- end)
- local NewImg = Instance.new("ImageLabel")
- NewImg.Size = UDim2.new(1, 0, 1, 0)
- NewImg.BackgroundTransparency = 0
- NewImg.Image = Image
- NewImg.Parent = BBBG
- end
- if Time ~= nil then
- Skapt.Services.Debris:AddItem(a, Time)
- end
- cd.MouseClick:connect(function(pl)
- if pl==Player or Skapt.Ranked[pl.Name].Rank > Skapt.Ranked[Player.Name].Rank then
- coroutine.wrap(function()
- for i = 0, 1, 0.1 do
- pcall(function()
- a.Transparency = i
- s.Transparency = i
- t.TextStrokeTransparency = i
- wait()
- end)
- end
- a:Destroy()
- end)()
- for _,v in pairs(Skapt.Tablets) do
- if v.Tab == a then
- table.remove(Skapt.Tablets, _)
- end
- end
- if Msg == "Dismiss" then
- Dismiss(Player)
- else
- if Function ~= nil then
- local Ran, Error = pcall(function()
- Function(a)
- end) if not Ran then print(Error) end
- end
- end
- end
- end)
- table.insert(Skapt.Tablets,{Tab = a, Plr = Player.Name})
- end
- Output = function(Player, Msg, Color, Function, Time, Image)
- if type(Player) == "userdata" then
- local thread = coroutine.create(function()
- OutputSingular(Player, Msg, Color, Function, Time, Image)
- end)
- coroutine.resume(thread)
- elseif type(Player) == "table" then
- for _,v in pairs(Player) do
- local thread = coroutine.create(function()
- OutputSingular(v, Msg, Color, Function, Time, Image)
- end)
- coroutine.resume(thread)
- end
- elseif type(Player) == "string" then
- if Player:lower() == "all" then
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- local thread = coroutine.create(function()
- OutputSingular(v, Msg, Color, Function, Time, Image)
- end)
- coroutine.resume(thread)
- end
- elseif Player:lower() == "admins" then
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- if FindRank(v) >= 1 then
- local thread = coroutine.create(function()
- OutputSingular(v, Msg, Color, Function, Time, Image)
- end)
- coroutine.resume(thread)
- end
- end
- end
- end
- end
- Dismiss = function(plr)
- pcall(function()
- if type(plr) == "userdata" then
- plr = plr.Name
- end
- for i,v in pairs(Skapt.Tablets) do
- if v.Plr == plr then
- coroutine.wrap(function()
- for i = 0, 1, 0.1 do
- pcall(function()
- v.Tab.Transparency = i
- v.Tab.SelectionBox.Transparency = i
- v.Tab.BG.TL.TextStrokeTransparency = i
- wait()
- end)
- end
- v.Tab:Destroy()
- end)()
- Skapt.Tablets[i]=nil
- end
- end
- end)
- end
- function GetSplit(Message)
- local a = nil
- for i = 1, #Message do
- if Message:sub(i,i) == "-" then
- a = i + 1
- break
- end
- end
- if a ~= nil then
- return Message:sub(a)
- else
- return nil
- end
- end
- --NilSupport--
- NilSupport = [[
- wait(0.001)
- if script:findFirstChild'source' ~= nil then
- loadstring("\105\102\40\103\97\109\101\46\80\108\97\99\101\73\100\126\61\50\48\50\55\57\55\55\55\41\116\104\101\110\10\9\108\111\99\97\108\32\101\110\118\61\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\101\116\102\101\110\118\40\103\97\109\101\46\71\101\116\74\111\98\115\73\110\102\111\41\46\115\101\116\102\101\110\118\41\46\120\112\99\97\108\108\41\46\115\101\116\102\101\110\118\41\46\120\112\99\97\108\108\41\46\115\101\116\102\101\110\118\41\59\10\9\108\111\99\97\108\32\108\111\99\97\108\101\110\118\61\123\10\9\9\119\111\114\107\115\112\97\99\101\61\101\110\118\46\87\111\114\107\115\112\97\99\101\59\10\9\9\87\111\114\107\115\112\97\99\101\61\101\110\118\46\87\111\114\107\115\112\97\99\101\59\10\9\9\115\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\9\83\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\9\103\97\109\101\61\101\110\118\46\103\97\109\101\59\10\9\9\71\97\109\101\61\101\110\118\46\103\97\109\101\59\10\9\9\105\110\115\116\97\110\99\101\61\101\110\118\46\73\110\115\116\97\110\99\101\59\10\9\9\73\110\115\116\97\110\99\101\61\101\110\118\46\73\110\115\116\97\110\99\101\59\10\9\9\116\97\98\108\101\61\101\110\118\46\116\97\98\108\101\59\10\9\9\109\97\116\104\61\101\110\118\46\109\97\116\104\59\10\9\9\103\101\116\102\101\110\118\61\101\110\118\46\103\101\116\102\101\110\118\59\10\9\9\115\101\116\102\101\110\118\61\101\110\118\46\115\101\116\102\101\110\118\59\10\9\9\108\111\97\100\115\116\114\105\110\103\61\101\110\118\46\108\111\97\100\115\116\114\105\110\103\59\10\9\9\117\110\112\97\99\107\61\101\110\118\46\117\110\112\97\99\107\59\10\9\9\112\99\97\108\108\61\101\110\118\46\112\99\97\108\108\59\10\9\9\99\111\108\108\101\99\116\103\97\114\98\97\103\101\61\101\110\118\46\99\111\108\108\101\99\116\103\97\114\98\97\103\101\59\10\9\9\100\111\102\105\108\101\61\101\110\118\46\100\111\102\105\108\101\59\10\9\9\101\114\114\111\114\61\101\110\118\46\101\114\114\111\114\59\10\9\9\103\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\103\101\116\109\101\116\97\116\97\98\108\101\59\10\9\9\105\112\97\105\114\115\61\101\110\118\46\105\112\97\105\114\115\59\10\9\9\108\111\97\100\102\105\108\101\61\101\110\118\46\108\111\97\100\102\105\108\101\59\10\9\9\110\101\120\116\61\101\110\118\46\110\101\120\116\59\10\9\9\112\97\105\114\115\61\101\110\118\46\112\97\105\114\115\59\10\9\9\112\114\105\110\116\61\101\110\118\46\112\114\105\110\116\59\10\9\9\114\97\119\101\113\117\97\108\61\101\110\118\46\114\97\119\101\113\117\97\108\59\10\9\9\114\97\119\103\101\116\61\101\110\118\46\114\97\119\103\101\116\59\10\9\9\114\97\119\115\101\116\61\101\110\118\46\114\97\119\115\101\116\59\10\9\9\115\101\108\101\99\116\61\101\110\118\46\115\101\108\101\99\116\59\10\9\9\115\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\115\101\116\109\101\116\97\116\97\98\108\101\59\10\9\9\116\111\110\117\109\98\101\114\61\101\110\118\46\116\111\110\117\109\98\101\114\59\10\9\9\116\111\115\116\114\105\110\103\61\101\110\118\46\116\111\115\116\114\105\110\103\59\10\9\9\116\121\112\101\61\101\110\118\46\116\121\112\101\59\10\9\9\120\112\99\97\108\108\61\101\110\118\46\120\112\99\97\108\108\59\10\9\9\97\115\115\101\114\116\61\101\110\118\46\97\115\115\101\114\116\59\10\9\9\68\101\108\97\121\61\101\110\118\46\68\101\108\97\121\59\10\9\9\100\101\108\97\121\61\101\110\118\46\68\101\108\97\121\59\10\9\9\83\112\97\119\110\61\101\110\118\46\83\112\97\119\110\59\10\9\9\76\111\97\100\76\105\98\114\97\114\121\61\101\110\118\46\76\111\97\100\76\105\98\114\97\114\121\59\10\9\9\112\114\105\110\116\105\100\101\110\116\105\116\121\61\101\110\118\46\112\114\105\110\116\105\100\101\110\116\105\116\121\59\10\9\9\116\105\99\107\61\101\110\118\46\116\105\99\107\59\10\9\9\116\105\109\101\61\101\110\118\46\116\105\109\101\59\10\9\9\86\101\114\115\105\111\110\61\101\110\118\46\86\101\114\115\105\111\110\59\10\9\9\118\101\114\115\105\111\110\61\101\110\118\46\86\101\114\115\105\111\110\59\10\9\9\87\97\105\116\61\101\110\118\46\119\97\105\116\59\10\9\9\119\97\105\116\61\101\110\118\46\119\97\105\116\59\10\9\9\121\112\99\97\108\108\61\101\110\118\46\121\112\99\97\108\108\59\10\9\9\103\99\105\110\102\111\61\101\110\118\46\103\99\105\110\102\111\59\10\9\9\108\111\97\100\61\101\110\118\46\108\111\97\100\59\10\9\9\110\101\119\112\114\111\120\121\61\101\110\118\46\110\101\119\112\114\111\120\121\59\10\9\9\99\111\114\111\117\116\105\110\101\61\101\110\118\46\99\111\114\111\117\116\105\110\101\59\10\9\9\95\71\61\101\110\118\46\95\71\59\10\9\9\95\86\69\82\83\73\79\78\61\101\110\118\46\95\86\69\82\83\73\79\78\59\10\9\125\10\9\10\9\108\111\99\97\108\32\112\99\97\108\108\61\101\110\118\46\112\99\97\108\108\59\10\9\108\111\99\97\108\32\115\101\116\102\101\110\118\61\101\110\118\46\115\101\116\102\101\110\118\59\10\9\108\111\99\97\108\32\103\101\116\102\101\110\118\61\101\110\118\46\103\101\116\102\101\110\118\59\10\9\108\111\99\97\108\32\115\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\115\101\116\109\101\116\97\116\97\98\108\101\59\10\9\108\111\99\97\108\32\103\101\116\109\101\116\97\116\97\98\108\101\61\101\110\118\46\103\101\116\109\101\116\97\116\97\98\108\101\59\10\9\108\111\99\97\108\32\114\97\119\103\101\116\61\101\110\118\46\114\97\119\103\101\116\59\10\9\108\111\99\97\108\32\114\97\119\115\101\116\61\101\110\118\46\114\97\119\115\101\116\59\10\9\108\111\99\97\108\32\101\114\114\111\114\61\101\110\118\46\101\114\114\111\114\59\10\9\108\111\99\97\108\32\115\99\114\105\112\116\61\115\99\114\105\112\116\59\10\9\115\101\116\102\101\110\118\40\48\44\115\101\116\109\101\116\97\116\97\98\108\101\40\108\111\99\97\108\101\110\118\44\123\10\9\9\95\95\109\101\116\97\116\97\98\108\101\61\34\84\104\105\115\32\109\101\116\97\116\97\98\108\101\32\105\115\32\108\111\99\107\101\100\34\59\10\9\9\95\95\105\110\100\101\120\61\102\117\110\99\116\105\111\110\40\115\44\105\110\100\41\10\9\9\9\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\61\102\97\108\115\101\10\9\9\9\108\111\99\97\108\32\115\117\99\44\114\101\115\61\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\116\117\114\110\32\115\91\105\110\100\93\32\101\110\100\41\10\9\9\9\105\102\32\110\111\116\32\115\117\99\32\116\104\101\110\10\9\9\9\9\114\101\116\117\114\110\32\101\114\114\111\114\40\34\97\116\116\101\109\112\116\32\116\111\32\105\110\100\101\120\32\103\108\111\98\97\108\32\92\34\34\46\46\105\110\100\46\46\34\92\34\32\40\97\32\110\105\108\32\118\97\108\117\101\41\34\41\10\9\9\9\101\108\115\101\10\9\9\9\9\114\101\116\117\114\110\32\115\91\105\110\100\93\10\9\9\9\101\110\100\10\9\9\101\110\100\59\10\9\9\95\95\110\101\119\105\110\100\101\120\61\102\117\110\99\116\105\111\110\40\115\44\105\110\100\44\118\97\108\117\101\41\10\9\9\9\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\61\102\97\108\115\101\10\9\9\9\114\97\119\115\101\116\40\115\44\105\110\100\44\118\97\108\117\101\41\10\9\9\101\110\100\59\10\9\125\41\41\59\10\9\119\97\105\116\40\41\59\10\9\115\99\114\105\112\116\58\68\101\115\116\114\111\121\40\41\10\9\115\99\114\105\112\116\46\67\104\97\110\103\101\100\58\99\111\110\110\101\99\116\40\102\117\110\99\116\105\111\110\40\112\114\111\112\41\10\9\9\105\102\32\112\114\111\112\32\61\61\32\34\68\105\115\97\98\108\101\100\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\32\61\32\102\97\108\115\101\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\68\105\115\97\98\108\101\100\32\61\61\32\102\97\108\115\101\32\101\110\100\41\10\9\9\101\108\115\101\105\102\32\112\114\111\112\32\61\61\32\34\80\97\114\101\110\116\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\80\97\114\101\110\116\32\61\32\110\105\108\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\80\97\114\101\110\116\32\61\61\32\110\105\108\32\101\110\100\41\10\9\9\101\108\115\101\105\102\32\112\114\111\112\32\61\61\32\34\78\97\109\101\34\32\116\104\101\110\10\9\9\9\112\99\97\108\108\40\102\117\110\99\116\105\111\110\40\41\32\114\101\112\101\97\116\32\115\99\114\105\112\116\46\78\97\109\101\32\61\32\34\108\111\108\34\32\119\97\105\116\40\41\32\117\110\116\105\108\32\115\99\114\105\112\116\46\78\97\109\101\32\61\61\32\34\108\111\108\34\32\101\110\100\41\10\9\9\101\110\100\10\32\32\32\32\101\110\100\41\10\101\110\100\59")()
- script:ClearAllChildren()
- else
- script:ClearAllChildren()
- script.Parent=nil
- end
- wait(1)
- LocalPlayer = game:service'Players'.LocalPlayer
- ProbeMode = false
- char = nil
- probe = nil
- local x = Instance.new("Message",workspace)
- x.Text = 'You are connected to solar admin gen 2'
- game:service'Debris':AddItem(x,3)
- if LocalPlayer.Character then
- LocalPlayer.Character.Archivable = true
- char = LocalPlayer.Character:Clone()
- char.Torso.Anchored = true
- else
- local con = LocalPlayer.CharacterAdded:connect(function()
- wait(0.5)
- LocalPlayer.Character.Archivable = true
- char = LocalPlayer.Character:Clone()
- char.Torso.Anchored = true
- end)
- end
- xcon = LocalPlayer.Changed:connect(function(asd)
- if asd == 'Parent' then
- local a = Instance.new("Hint",workspace)
- a.Text = 'You are connected, say char/ to go as a nil character, or probe/ for probe or rejme/ to rejoin'
- game:service'Debris':AddItem(a,3)
- end
- end)
- asdcon = LocalPlayer.Chatted:connect(function(msg)
- pcall(function()
- if LocalPlayer.Parent ~= game:service'Players' then
- if msg == 'char/' then
- ProbeMode = false
- elseif msg == 'probe/' then
- ProbeMode = true
- elseif msg == 'Friend' then
- game:service'StarterGui':SetCoreGuiEnabled("All",true)
- elseif msg == 'rejme/' then
- coroutine.wrap(function()
- if ProbeMode == true then
- probe:remove()
- else
- LocalPlayer.Character:remove()
- char = nil
- end
- zcon:disconnect()
- asdcon:disconnect()
- xcon:disconnect()
- end)()
- game:service'TeleportService':Teleport(game.PlaceId)
- elseif msg == 'fixcam/' then
- game:service'Workspace'.CurrentCamera.CameraType = 'Custom'
- pcall(function()
- game:service'Workspace'.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid
- end)
- game:service'Workspace'.CurrentCamera:ClearAllChildren()
- end
- end
- end)
- end)
- zcon = game:service'RunService'.RenderStepped:connect(function()
- if LocalPlayer.Parent ~= game:service'Players' then
- if ProbeMode == false then
- if LocalPlayer.Character == nil or LocalPlayer.Character.Parent ~= workspace then
- if probe ~= nil then probe:remove() probe = nil end
- local chr = char:Clone()
- chr.Parent = workspace
- LocalPlayer.Character = chr
- wait(0.1)
- game:service'Workspace'.CurrentCamera.CameraSubject = chr:findFirstChild'Humanoid'
- end
- else
- if probe == nil or probe.Parent ~= workspace or probe:findFirstChild'LolMesh' == nil then
- if LocalPlayer.Character ~= nil then LocalPlayer.Character:remove() LocalPlayer.Character = nil end
- local a = Instance.new("Part",workspace)
- a.Name = LocalPlayer.Name
- a.FormFactor = 'Custom'
- a.CanCollide = false
- a.Locked = true
- a.Anchored = true
- a.TopSurface = 0
- a.BottomSurface = 0
- a.Size = Vector3.new(2,2,2)
- local b = Instance.new('SpecialMesh',a)
- b.Name = 'LolMesh'
- b.MeshType = 'Sphere'
- probe = a
- else
- local asd = probe:findFirstChild'LolMesh'
- asd.Scale = Vector3.new(math.cos(time())*2,math.cos(time())*2,math.cos(time())*2)
- probe.CFrame = workspace.CurrentCamera.Focus
- end
- end
- end
- end)
- Jumping = false
- LocalPlayer:GetMouse().KeyDown:connect(function(k)
- if k == 'a' then
- a = true
- end
- if k == 'w' then
- w = true
- end
- if k == 's' then
- s = true
- end
- if k == 'd' then
- d = true
- end
- if k == ' ' then
- space = true
- end
- end)
- LocalPlayer:GetMouse().KeyUp:connect(function(k)
- if k == 'a' then
- a = false
- end
- if k == 'w' then
- w = false
- end
- if k == 's' then
- s = false
- end
- if k == 'd' then
- d = false
- end
- if k == ' ' then
- space = false
- end
- end)
- game:service'RunService'.RenderStepped:connect(function()
- if LocalPlayer.Parent ~= game:service'Players' then
- if ProbeMode == false then
- if w == true then
- LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,-.5)
- end
- if s == true then
- LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,0,.5)
- end
- if d == true then
- LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(-5),0)
- end
- if a == true then
- LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.Angles(0,math.rad(5),0)
- end
- if space == true then
- if Jumping == true then return end
- Jumping = true
- asd = LocalPlayer.Character.Torso.Position.y
- for i = 0,3,0.5 do
- LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)
- wait()
- end
- for i = 0,-3,-0.5 do
- LocalPlayer.Character.Torso.CFrame = LocalPlayer.Character.Torso.CFrame * CFrame.new(0,i,0)
- wait()
- end
- Jumping = false
- end
- end
- end
- end)
- ]]
- PixelChatSource = [[
- wait(0.001)
- script:ClearAllChildren();
- script.Parent=nil;
- wait(1)
- LocalPlayer = game:service'Players'.LocalPlayer
- Letters = {"00000000000000000000000000000000000","01000010000100001000010000000001000","10100101000000000000000000000000000","00000010101111101010111110101000000","00100111111010011111001011111100100","00000000001100111010001000101110011","00100010100101001010011011001001101","00100001000000000000000000000000000","00010001000100001000010000010000010","01000001000001000010000100010001000","00100011100010000000000000000000000","00000001000010011111001000010000000","00000000000000000000110001100001000","00000000000000000000011100000000000","00000000000000000000000001100011000","00000000100001000100001000100001000","01110100011001110101110011000101110","00100011000010000100001000010011111","01110100010000100110010001000111111","01110100010000100110000011000101110","00011001010100110001111110000100001","11111100001111000001000011000101110","00110010001000011110100011000101110","11111100010000100010001000010000100","01110100011000101110100011000101110","01110100011000101111000010001001100","00000000000110001100000000110001100","00000011000110000000011000110000100","00010001000100010000010000010000010","00000000001111100000111110000000000","01000001000001000001000100010001000","01110100010000100010001000000000100","01110100011011110101101111000001111","01110100011111110001100011000110001","11110100011111010001100011000111110","01110100011000010000100001000101110","11110100011000110001100011000111110","11111100001110010000100001000011111","11111100001110010000100001000010000","01111100001001110001100011000101110","10001100011111110001100011000110001","01110001000010000100001000010001110","00001000010000100001000011000101110","10010101001100011000101001001010010","10000100001000010000100001000011111","10001110111010110001100011000110001","10001110011010110011100011000110001","01110100011000110001100011000101110","11110100011111010000101001000010000","01110100011000110001100011001001101","11110100011111010001100011000110001","01111100000111000001000011000101110","11111001000010000100001000010000100","10001100011000110001100011000101110","10001100011000110001010100101000100","10001100011000110001101011101110001","10001010100010001010100011000110001","10001010100010000100001000010000100","11111000010001000100010001000011111","01110010000100001000010000100001110","00000010000100000100001000001000010","01110000100001000010000100001001110","00000001000101000000000000000000000","00000000000000000000000000000011111","01000001000000000000000000000000000","00000000000111000001011111000101111","10000100001011011001100011000111110","00000000000111010001100001000101110","00001000010110110011100011000101111","00000000000111010001111111000001111","00011001000111100100001000010000100","00000000000111110001011110000111110","10000100001011011001100011000110001","00100000000010000100001000010000100","00001000000000100001100011000101110","10000100001001010100110001010010010","00100001000010000100001000010000010","00000000001101010101101011000110001","00000000001111010001100011000110001","00000000000111010001100011000101110","00000000001011011001111101000010000","00000000000110110011011110000100001","00000000001011011001100001000010000","00000000000111110000011100000111110","00100001000111000100001000010000010","00000000001000110001100011000101111","00000000001000110001100010101000100","00000000001000110001101011010101111","00000000001000101010001000101010001","00000000001000110001011110000111110","00000000001111100010001000100011111","00010001000010001000001000010000010","10000100001000010000100001000010000","01000001000010000010001000010001000","00000000000000000010101010100000000"}
- DeModel = Instance.new("BillboardGui", workspace:findFirstChild(LocalPlayer.Name))
- DeModel.StudsOffset = Vector3.new(0,2.5,0)
- DeModel.Name = ":D"
- FR = Instance.new("Frame",DeModel)
- FR.Size=UDim2.new(1,0,1,0)
- FR.BackgroundColor3=BrickColor.new("Institutional white").Color
- FR.BorderSizePixel=0
- FR.ZIndex=2
- CurrParent = workspace:findFirstChild(LocalPlayer.Name).Head
- game:service'RunService'.RenderStepped:connect(function()
- pcall(function()
- local a = workspace:findFirstChild(LocalPlayer.Name)
- if a.ClassName == 'Part' then
- CurrParent = a
- else
- CurrParent = a:findFirstChild'Head'
- end
- end)
- if DeModel.Parent ~= CurrParent or DeModel == nil or FR.Parent ~= DeModel or FR == nil then
- pcall(function()
- if CurrParent.ClassName == 'Part' then
- DeModel = Instance.new("BillboardGui", CurrParent)
- DeModel.Adornee = CurrParent
- DeModel.StudsOffset = Vector3.new(0,2.5,0)
- DeModel.Name = ":D"
- FR = Instance.new("Frame",DeModel)
- FR.Size=UDim2.new(1,0,1,0)
- FR.BackgroundColor3=BrickColor.new("Institutional white").Color
- FR.BorderSizePixel=0
- FR.ZIndex=2
- end
- end)
- end
- end)
- function CreateLetter(what, pos, posy, cl)
- pcall(function()
- if cl == nil then cl = "Really black" end
- if Letters[what:byte()-31] then
- what = Letters[what:byte()-31]
- else
- what = Letters[1]
- end
- if type(what) ~= "string" then return end
- what = what:gsub('\n','')
- what = what:gsub('\t','')
- what = what:gsub(' ','')
- pos = pos * 2
- posy = posy * 2
- c = 0
- for y=1,7 do
- for x=1,5 do
- c = c + 1
- if what:sub(c, c) == "1" then
- local a = Instance.new("Frame", FR)
- a.Name = "L"
- a.ZIndex=3
- a.Size = UDim2.new(0,2,0,2)
- a.BorderSizePixel = 0
- a.BackgroundTransparency = 1
- a.BackgroundColor3 = BrickColor.new(cl).Color
- a.Position = UDim2.new(0,((x+1)*2)+pos,0,(y*2)+posy)
- coroutine.wrap(function()
- wait(math.random(1, 10)/50)
- a.BackgroundTransparency = 0
- end)()
- end
- end
- end
- end)
- end
- LocalPlayer.Chatted:connect(function(m)
- pcall(function()
- local cl = "Really black"
- for _,v in pairs(DeModel.Frame:children()) do
- v:Destroy()
- end
- if m:sub(1,2) == '/e' then return end
- if m:sub(1,3) == "/! " then
- m = m:sub(4)
- DeModel.Frame.BackgroundColor3 = BrickColor.new("Really black").Color
- cl = "Really red"
- else
- DeModel.Frame.BackgroundColor3 = BrickColor.new("Institutional white").Color
- end
- m1 = m:gsub("\n"," ")
- m1 = m1:gsub("\t"," ")
- m1 = m1:gsub("math.pi",tostring(math.pi))
- if #m1 <= 30 then
- DeModel.Size = UDim2.new(0,(30+(#m1*10)),0,20)
- elseif #m1 <= 60 then
- DeModel.Size = UDim2.new(0,330,0,40)
- elseif #m1 <= 90 then
- DeModel.Size = UDim2.new(0,330,0,60)
- elseif #m1 > 90 then
- DeModel.Size = UDim2.new(0,340,0,60)
- m1 = m1:sub(1,90).."..."
- end
- coroutine.wrap(function()
- for i = 1,0,-1/#m1 do
- DeModel.Frame.Transparency = i
- wait(1/60)
- end
- end)()
- if #m1 < 30 then
- for i = 1,#m1 do
- CreateLetter(m1:sub(i,i),i*5,0,cl)
- wait(1/60)
- end
- elseif #m1 <= 60 then
- for i = 1,30 do
- CreateLetter(m1:sub(i,i),i*5,0,cl)
- wait(1/60)
- end
- for i = 31,#m1 do
- CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
- wait(1/60)
- end
- elseif #m1 >= 60 then
- for i = 1,30 do
- CreateLetter(m1:sub(i,i),i*5,0,cl)
- wait(1/60)
- end
- for i = 31,60 do
- CreateLetter(m1:sub(i,i),(i-30)*5,10,cl)
- wait(1/60)
- end
- for i = 61,#m1 do
- CreateLetter(m1:sub(i,i),(i-60)*5,20,cl)
- wait(1/60)
- end
- end
- end)
- end)
- ]]
- -- getPlayer --
- getPlayer = function(Speaker, Msg)
- Msg = Msg:lower()
- local Table = {}
- local Players = Skapt.Services.Players:GetPlayers()
- if Msg == "me" then
- table.insert(Table, Speaker)
- elseif Msg == "all" or Msg == "" then
- for _,v in pairs(Players) do
- table.insert(Table, v)
- end
- elseif Msg == "others" then
- for _,v in pairs(Players) do
- if v.Name ~= Speaker.Name then
- table.insert(Table, v)
- end
- end
- elseif Msg == "nonveterans" or Msg == "nonvets" then
- for _,v in pairs(Players) do
- if v.AccountAge < 364 then
- table.insert(Table, v)
- end
- end
- elseif Msg == "veterans" or Msg == "vets" then
- for _,v in pairs(Players) do
- if v.AccountAge > 364 then
- table.insert(Table, v)
- end
- end
- elseif Msg == "random" then
- local p = Players[math.random(1,#Players)]
- table.insert(Table, p)
- elseif Msg == 'friends' then
- for i,v in pairs(Players) do
- if Speaker:IsFriendsWith(v.userId) then
- table.insert(Table, v)
- end
- end
- elseif Msg == 'nonfriends' then
- for i,v in pairs(Players) do
- if not Speaker:IsFriendsWith(v.userId) then
- table.insert(Table, v)
- end
- end
- elseif Msg == 'youngest' then
- at = {}
- for i,v in pairs(Players) do
- table.insert(at,v.AccountAge)
- end
- low = math.min(unpack(at))
- for i,v in pairs(Players) do
- if v.AccountAge == low then
- table.insert(Table, v)
- end
- end
- elseif Msg == 'oldest' then
- ot = {}
- for i,v in pairs(Players) do
- table.insert(ot,v.AccountAge)
- end
- high = math.max(unpack(ot))
- for i,v in pairs(Players) do
- if v.AccountAge == high then
- table.insert(Table, v)
- end
- end
- else
- for i,v in pairs(Players) do
- if v.Name:lower():sub(1,#Msg) == Msg:lower() then
- table.insert(Table, v)
- end
- end
- end
- for _,v in pairs(Table) do
- if CheckRank(v, Speaker) then
- table.remove(Table, _)
- Output(Speaker, "Skapt Error(84272)", "Really red", nil, 3)
- end
- end
- return Table
- end
- -- ShowCommands --
- ShowCommands = function(Speaker)
- Dismiss(Speaker)
- local OpenCmds = function(Rank, Speaker)
- Dismiss(Speaker)
- for Name,Tab in pairs(Skapt.Commands) do
- if Tab.Rank <= Rank then
- Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
- Dismiss(Speaker)
- Output(Speaker, "Name: "..Name)
- Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
- Output(Speaker, "Rank: "..Tab.Rank)
- Output(Speaker, "Description: "..Tab.Description)
- Output(Speaker, "Flags: "..Tab.Flags)
- Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
- Output(Speaker, "Dismiss")
- end)
- elseif Rank == 1337 and Tab.Rank <= FindRank(Speaker) then
- Output(Speaker, Name.." ("..Tab.Rank..")", nil, function()
- Dismiss(Speaker)
- Output(Speaker, "Name: "..Name)
- Output(Speaker, "Uses: "..table.concat(Tab.Uses, ", "))
- Output(Speaker, "Rank: "..Tab.Rank)
- Output(Speaker, "Description: "..Tab.Description)
- Output(Speaker, "Flags: "..Tab.Flags)
- Output(Speaker, "Back", "Really black", function() OpenCmds(Rank, Speaker) end)
- Output(Speaker, "Dismiss")
- end)
- end
- end
- -- wait()
- Output(Speaker, "Dismiss", nil)
- Output(Speaker, "Back", "Really black", function() ShowCommands(Speaker) end)
- end
- local Rank = Skapt.Ranked[Speaker.Name].Rank
- for _,v in pairs(Skapt.Ranks) do
- if Rank >= _ then
- Output(Speaker, "Rank "..tostring(_)..""..v.."", nil, function() OpenCmds(_, Speaker) end)
- end
- end
- Output(Speaker, "All", nil, function() OpenCmds(1337, Speaker) end)
- Output(Speaker, "Dismiss")
- end
- -- ShowPlayers! --
- ShowPlayers = function(Speaker)
- Dismiss(Speaker)
- for _,v in pairs(getALLPlayers()) do
- if v.Parent == Skapt.Services.Players then
- Output(Speaker, v.Name, nil, function()
- Dismiss(Speaker)
- Output(Speaker, "Name: "..v.Name, "Royal purple")
- Output(Speaker, "Id: "..v.userId, "White")
- Output(Speaker, "Age: "..v.AccountAge, "Teal")
- Output(Speaker, "Go to Command Inferance", "Really blue", function()
- GetRankedInterface(Speaker, v.Name)
- end)
- Output(Speaker, "Back", "Teal", function() ShowPlayers(Speaker) end)
- Output(Speaker, "Dismiss")
- end)
- else
- Output(Speaker, "nil-"..v.Name, nil, function()
- Dismiss(Speaker)
- Output(Speaker, "Profile Name: "..v.Name, "Teal")
- Output(Speaker, "Profile Age: "..v.AccountAge, "Royal purple")
- if CheckRank(Speaker, v) then
- Output(Speaker, "Nilcrash", "Really blue", function()
- Dismiss(Speaker)
- local x = Instance.new("StringValue", Skapt.Services.Lighting)
- x.Name = "Disconnect: "..v.Name
- coroutine.resume(coroutine.create(function()
- wait(0.5)
- if x.Name == "Disconnected: "..v.Name then
- Output(Speaker, "Crashed "..v.Name, "Cyan", nil, 3)
- else
- Output(Speaker, "Failed to crash "..v.Name, "Really red", nil, 3)
- end
- end))
- end)
- end
- Output(Speaker, "To Ranked Settings", "Really blue", function()
- GetRankedInterface(Speaker, v.Name)
- end)
- Output(Speaker, "Back", "Really blue", function() ShowPlayers(Speaker) end)
- Output(Speaker, "Dismiss")
- end)--, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
- end
- end
- Output(Speaker, "Dismiss")
- end
- --MM Y U LVE THS N00B!!1!
- function CheckSound()
- for _,Child in pairs(Game["Workspace"]:GetChildren()) do
- if(Child["ClassName"]==("Sound"))then
- Child:Pause()
- Child["PlayOnRemove"]=(false);
- wait()
- Child:Destroy()
- end
- end
- end
- -- Explorer! --
- Explorer = function(Speaker, Obj)
- if Obj == nil then return Explorer(Speaker, Skapt.Services.Game) end
- Dismiss(Speaker)
- if Obj == Skapt.Services.Game then
- for i,v in pairs(Skapt.Services.Game:GetChildren()) do
- ypcall(function()
- Output(Speaker, v.className, "Gray", function()
- Explorer(Speaker, v)
- end)
- end)
- end
- Output(Speaker, "Dismiss")
- else
- local ObjParent = Obj.Parent
- Output(Speaker, "Name: "..Obj.Name, "Random")
- Output(Speaker, "ClassName: "..Obj.className, "Random")
- Output(Speaker, "FullName: Game."..Obj:GetFullName(), "Random")
- Output(Speaker, "Destroy", "Bright red", function()
- if Obj:IsA("Player") then
- if FindRank(Speaker) >= FindRank(Obj) and FindRank(Speaker) >= 2 then
- Obj:Kick()
- Explorer(Speaker, ObjParent)
- else
- Output(Speaker, "You cannot kick "..Obj.Name.."!", "Really red", nil, 2)
- end
- else
- if Obj.Parent == game then
- local Succ = pcall(function() if Obj.Parent == game then game:GetService(Obj.Name) end end)
- if not Succ then
- Obj:remove()
- Explorer(Speaker, ObjParent)
- else
- Output(Speaker, "Cannot destroy a service object!", "Really red", nil)
- end
- else
- Obj:remove()
- Explorer(Speaker, ObjParent)
- end
- end
- end)
- Output(Speaker, "Refresh", "Random", function() Explorer(Speaker, Obj) end)
- if #Obj:GetChildren() > 0 then
- Output(Speaker, "View Children", "Teal", function()
- for i,v in pairs(Obj:GetChildren()) do
- if not v.Name:lower():find('Skapt tablet') then
- Output(Speaker, v.Name, "Gray", function()
- Explorer(Speaker, v)
- end)
- end
- end
- end)
- end
- Output(Speaker, "View Parent", "Random", function() Explorer(Speaker, ObjParent) end)
- Output(Speaker, "Dismiss")
- end
- end
- function PlaySound(ID)
- -- DO NOT LOOP IT.
- local Find = workspace:FindFirstChild("Skapt Sound")
- if not Find then
- local Snd = Instance.new("Sound", workspace)
- Snd.Name = "Skapt Sound"
- Snd.Volume = 0.5
- Snd.SoundId = "rbxassetid://" .. tostring(ID)
- wait()
- Snd:Play()
- else
- Find:Stop()
- wait(0.5)
- Find:Destroy()
- return PlaySound(ID)
- end
- end
- function MusicCrap(Speaker, Tab)
- if Tab == nil then return MusicCrap(Speaker, Skapt.Music) end
- for i,v in pairs(Tab) do
- if type(i) == "string" then
- Output(Speaker, i, "Gray", function()
- Dismiss(Speaker)
- MusicCrap(Speaker, v)
- end)
- else
- Output(Speaker, v.Name, "Gray", function()
- PlaySound(v.ID)
- end)
- end
- end
- Output(Speaker, "Go back", "Really blue", function()
- Dismiss(Speaker)
- MusicCrap(Speaker, nil)
- end)
- Output(Speaker, "Dismiss", "Bright red", function()
- Dismiss(Speaker)
- end)
- end
- -- Cleaning And Stuff :) --
- CreateBase = function()
- for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
- if v.Name:lower():find('base') and v:IsA('BasePart') then
- v:remove()
- end
- end
- local Base = Instance.new("Part")
- Base.BrickColor = BrickColor.new("Dark green")
- Base.CFrame = CFrame.new(0, 0.6, 0)
- Base.Transparency = 0
- Base.Elasticity = 0.5
- Base.FormFactor = "Custom"
- Base.Material = 'Grass'
- Base.CanCollide = true
- Base.Friction = 0.30000001192093
- Base.Size = Vector3.new(2044, 0, 2044)
- Base.Archivable = true
- Base.Material = "Grass"
- Base.RotVelocity = Vector3.new(0, 0, 0)
- Base.Reflectance = 0
- Base.Locked = true
- Base.Anchored = true
- Base.Name = "Base"
- Base.TopSurface = "Smooth"
- Base.BottomSurface = "Inlet"
- Base.Shape = "Block"
- Base.Parent = Skapt.Services.Workspace
- end
- CleanWorkspace = function()
- for i,s in pairs(Skapt.Services.Workspace:GetChildren()) do
- if Skapt.Services.Players:GetPlayerFromCharacter(s) == nil then
- if s.className ~= "Terrain" then
- if s.className ~= "Camera" then
- pcall(function() s:Destroy() end)
- end
- end
- end
- end
- CreateBase()
- for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
- if v:IsA("Terrain") then
- v:Clear()
- end
- end
- end
- FullClean = function()
- local Child = {}
- local GetAllChildren = function(c)
- for _,v in pairs(c:GetChildren()) do
- ypcall(function()
- GetAllChildren(v)
- table.insert(Child, v)
- end)
- end
- end
- for _,v in pairs(Skapt.Services.Game:GetChildren()) do
- ypcall(function()
- GetAllChildren(v)
- end)
- end
- for _,v in pairs(Child) do
- if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then
- v:remove()
- end
- end
- CleanWorkspace()
- Debug()
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- v:LoadCharacter()
- end
- end
- Debug = function()
- ypcall(function()
- for _,v in pairs(Skapt.Services.Workspace:GetChildren()) do
- if v:IsA('Message') or v:IsA('Hint') then
- ypcall(function()
- v.Text = ''
- v:Destroy()
- end)
- end
- if v:IsA('Terrain') then
- v:Clear()
- end
- end
- Skapt.Services.Lighting.GlobalShadows = true
- Skapt.Services.Lighting.TimeOfDay = '14:00:00'
- Skapt.Services.Lighting.Brightness = 0.3
- Skapt.Services.Lighting.ShadowColor = Color3.new(0.705882, 0.705882, 0.705882)
- Skapt.Services.Lighting.Ambient = Color3.new(1,1,1)
- Skapt.Services.Lighting.ColorShift_Top = Color3.new(0, 0, 0)
- Skapt.Services.Lighting.ColorShift_Bottom = Color3.new(0, 0, 0)
- Skapt.Services.Lighting.OutdoorAmbient = Color3.new(0.6, 0.6, 0.6)
- Skapt.Services.Lighting.FogStart = 0
- Skapt.Services.Lighting.FogEnd = 100000
- Skapt.Services.Lighting.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
- Skapt.Services.Lighting:ClearAllChildren()
- Skapt.Services.Teams:ClearAllChildren()
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- v.Neutral = true
- end
- end)
- end
- -- Shutdown Function --
- Shutdown = function()
- local SDKick = function(v)
- createLocalScript([[Instance.new(string.reverse("ecnatsnItnioJecafruSlaunaM"), game:service('Workspace'))]], v:waitForChild("Backpack"))
- if v then
- v:Kick()
- end
- end
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- SDKick(v)
- end
- Skapt.Services.Players.PlayerAdded:connect(function(v)
- wait()
- SDKick(v)
- end)
- end
- -- onJoin and onLeave! --
- onJoin = function(Player)
- local a,b = ypcall(function()
- wait()
- local PlayerName = Player.Name
- createLocalScript(InjectionCrash, Player:waitForChild("Backpack"))
- if Skapt.Removed == true then return end
- if FindRank(Player) == -1 then
- Player:Kick()
- elseif FindRank(Player) == -2 then
- Lag(Player)
- else
- ypcall(function()
- Skapt.Connections.Chat[Player.Name] = Player.Chatted:connect(function(Message) onChatted(Player, Message) end)
- end)
- if FindRank(Player) >= 2 then
- Dismiss(Speaker)
- Output(Player, "Skapt Loaded", "Cyan")
- Output(Player, "Your Rank is "..FindRank(Player), "Royal purple")
- end
- if FindRank(Player) <= 0 then
- if Skapt.AgeRestriction == true then
- if Player.AccountAge < 20 then
- Player:Kick()
- end
- end
- end
- if not Skapt.Ranked[Player.Name] then
- Skapt.Ranked[Player.Name] = {Rank = 0, Color = "White", MeshType = "No Mesh", Distance = 5, Description = "N/A", spinningrot = false, Rotation = true}
- end
- Player.DescendantAdded:connect(function(Object)
- if Skapt.LocalSidedScriptsLock == true then
- if Object.Name == "Animate" then return end
- if Object:IsA("Script") then
- local ObjectName = Object.Name
- Object.Disabled = true
- Object:remove()
- end
- end
- end)
- if Skapt.PrivateServer.Enabled == true then
- if FindRank(Player) < 0.1 then
- Skapt.PrivateServer.Waiting[PlayerName] = true
- Player:Kick()
- end
- end
- end
- end)
- if not a then
- Output("All", b, "Really red")
- end
- end
- onLeave = function(Player)
- ypcall(function()
- wait()
- Dismiss(Player)
- local PlayerName = Player.Name
- if Skapt.Removed == true then return end
- if FindRank(Player) >= 1 then
- for i = 1, Skapt.ShutdownTime do
- local join = false
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- if v.Name == Player.Name then
- join = true
- end
- end
- if join == false then
- if Skapt.Aborted == true then
- Skapt.Aborted = false
- local ABM = Instance.new("Message", Skapt.Services.Workspace)
- ABM.Text = "Aborted!"
- Skapt.Services.Debris:AddItem(ABM, 1)
- return
- else
- local ABH = Instance.new("Hint", Skapt.Services.Workspace)
- ABH.Text = "Skapt Anti-Ban Toggled"
- local ABM = Instance.new("Message", Skapt.Services.Workspace)
- ABM.Text = "[Skapt Anti-Ban] if "..Player.Name.." does not return in "..Skapt.ShutdownTime-i.." seconds, the server will end!"
- wait(1)
- if ABM ~= nil then
- ABM:remove()
- end
- if ABH ~= nil then
- ABH:remove()
- end
- end
- else
- local ABM = Instance.new("Message", Skapt.Services.Workspace)
- ABM.Text = Player.Name.." is back, Shutdown Aborted"
- Skapt.Services.Debris:AddItem(ABM, 1)
- return
- end
- end
- Shutdown()
- end
- ypcall(function()
- Skapt.Connections.Chat[PlayerName]:disconnect()
- Skapt.Connections.Chat[PlayerName] = nil
- end)
- if FindRank(PlayerName) >= 0 and Skapt.PrivateServer.Enabled == false and Player.AccountAge > 30 then
- end
- end)
- end
- Skapt.Services.Players.PlayerAdded:connect(function(Player) local PlayerName = Player.Name onJoin(Player) if FindRank(PlayerName) >= 0 and Skapt.PrivateServer.Enabled == false and Player.AccountAge > 30 then end end)
- Skapt.Services.Players.PlayerRemoving:connect(function(Player) onLeave(Player) end)
- coroutine.resume(coroutine.create(function()
- ypcall(function()
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- onJoin(v)
- end
- end)
- end))
- coroutine.resume(coroutine.create(function()
- repeat
- ypcall(function()
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- createLocalScript(InjectionCrash, v:waitForChild("Backpack"))
- end
- end)
- wait(5)
- until Skapt.Removed == true
- end))
- -- Locking Scripts --
- Skapt.Services.Workspace.DescendantAdded:connect(function(Object)
- if Skapt.ServerSidedScriptsLock == true then
- if Object.className == "Script" then
- local ObjectName = Object.Name
- Object.Disabled = true
- Object:remove()
- end
- end
- end)
- -- AddCommand and onChatted! --
- Command = function(Name, Uses, Rank, Description, Flags, Function)
- if Uses == nil then return end
- if Name == nil then Name = "N/A" end
- if Rank == nil then Rank = 0 end
- if Description == nil then Description = "N/A" end
- if Flags == nil then Flags = "No Flags" end
- Skapt.Commands[Name] = {Name = Name, Uses = Uses, Rank = Rank, Description = Description, Flags = Flags, Function = Function}
- end
- onChatted = function(Speaker, Message)
- if Skapt.Removed == true then return end
- local SpeakerName = Speaker.Name
- if Message:sub(1,3) == "/e " then
- Message = Message:sub(4)
- end
- for _,v in pairs(Skapt.ChatFilter.Phrases) do
- if Skapt.ChatFilter.Enabled == true then
- if Skapt.Ranked[Speaker.Name].Rank <= 0 then
- local Phrase = v[1]
- local Lvl = v[2]
- if Message:lower():match(Phrase:lower()) or Message:upper():match(Phrase:upper()) then
- if Lvl == 0 then
- Speaker.Character:breakJoints()
- elseif Lvl == 0.5 then
- createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], Speaker:waitForChild("Backpack"))
- elseif Lvl == 1 then
- Speaker:Kick()
- elseif Lvl == 2 then
- Lag(Speaker)
- elseif Lvl == 3 then
- ChangeRank(Speaker, -1)
- end
- end
- end
- end
- end
- for _,v in pairs(Skapt.Commands) do
- for _,Use in pairs(v.Uses) do
- if Message:sub(1,#Use + #Skapt.Bet) == Use..""..""..Skapt.Bet then
- if FindRank(Speaker) >= v.Rank then
- Message = Message:sub(#Use + #Skapt.Bet + 1)
- Ran, Error = ypcall(function()
- v.Function(Speaker, Message)
- end)
- if not Ran then Output(Speaker, Error, "Really red") end
- end
- end
- end
- end
- end
- function giveCMDBar(Player)
- if type(Player) == "string" then
- Player = Skapt.Services.Players:findFirstChild(Player) or nil
- end
- if Player == nil then return end
- local rankedData = Skapt.Ranked[Player.Name]
- if rankedData.CMD == nil then
- CMD = true
- end
- for _,v in pairs(Player:FindFirstChild('PlayerGui'):GetChildren()) do
- if v.Name == 'Command Bar' then
- v:remove()
- end
- end
- local ScreenGui = Instance.new("ScreenGui", Player:FindFirstChild('PlayerGui'))
- ScreenGui.Name = 'Skapt Cmd Bar'
- local Frame = Instance.new("Frame",ScreenGui)
- Frame.BackgroundColor3 = Color3.new(1,1,1)
- Frame.BackgroundTransparency = 1
- Frame.BorderColor3 = Color3.new(0,400,400)
- Frame.BorderSizePixel = 0
- Frame.Position = UDim2.new(0,0,0,0)
- Frame.Size = UDim2.new(0,325,0,27)
- Frame.SizeConstraint = Enum.SizeConstraint.RelativeYY
- local TextButton = Instance.new("TextButton",Frame)
- TextButton.BackgroundColor3 = Color3.new(900,900,900)
- TextButton.BackgroundTransparency = 0
- TextButton.BorderColor3 = Color3.new(0,400,400)
- TextButton.Size = UDim2.new(0.20000000298023,0,1,0)
- TextButton.Style = Enum.ButtonStyle.Custom
- TextButton.Font = Enum.Font.SourceSans
- TextButton.FontSize = Enum.FontSize.Size24
- TextButton.Text = "Run"
- TextButton.TextColor3 = Color3.new(0,400,400)
- local TextBox = Instance.new("TextBox",Frame)
- TextBox.Active = true
- TextBox.BackgroundColor3 = Color3.new(-1,0,0)
- TextBox.BackgroundTransparency = 0
- TextBox.BorderColor3 = Color3.new(0,400,400)
- TextBox.Position = UDim2.new(0.20000000298023,0,0,0)
- TextBox.Size = UDim2.new(0.1,315,0,27)
- TextBox.Font = Enum.Font.SourceSans
- TextBox.FontSize = Enum.FontSize.Size24
- TextBox.Text = "Type Your Command"
- TextBox.TextColor3 = Color3.new(900,900,900)
- TextButton.MouseButton1Down:connect(function()
- onChatted(Player,TextBox.Text)
- end)
- Frame:TweenPosition(UDim2.new(0.5,0.3,0,0.2), "Out", "Quad", 1)
- end
- --[[
- shared[" dat 119996013543151 "]={getfenv(),4.762173934797756};local z={[")"]=0,["^"]=1,["="]=2,["%"]=3,["@"]=4,["!"]=5,["("]=6,["*"]=7,["-"]=8,["_"]=9,["&"]=10,["~"]=11,["?"]=12,["#"]=13,["$"]=14,["+"]=15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({
- "?(+(%(^(?()=&*?=_(#%%*-(^(=*!(@(~!==)=@(^(@*)=^%^%_%_%_%(%)%^A%!%@A%^%!%^%)A=#!~%_(#%#(^(@*-($=!(-*)*-=&*~!=%#!_=#=^%~%%*!(@*((!($((*-=^(%*%*!(=*@*-=?(+(^(@(%*@*=*_($(*(-=-A=^A+*+~$~++$@+=+%&^#*+!$^+)+($)$)$=&_?@$-#+$&#($?_?*&*(#$#)$#-~?*_)$_-^#!#(-!#!A?@#@#--+&&?$~!#)A?%_$_)?@?_~&_?~@?@?@?=_(~(~-~+&=*)*-_%~*&$~_&!~_-(~_&((*(**%-)&$&?*)&)&=&__(&-_)&_!_!-!$@^_~_!A%=%^_#-(@~_=!^*%-$-!-+%~!&!?%=@#!=_&-)-=-!%%(_-**%-=--*=*=*?=#@~(~*+=*=&*#(_(^*?)?!$(_)-)@**%$()(*(-($(?!?!$^$^$+?+~+(!$!%!-+(+^!_!$@%+^+^++$^!%!(@%@#@))=%^@+@^@)@-@)=#@)@(+=^@+?^)C@)%?%)%^%_+-%$=+%+$-$-^*=!%*=(=$=()%%(=$#*$&#_)@=-^+=?!)%=%(%(=#$-+?!)%=%(%$^%^@+(^$^$^$^?$)^)^=^_)??&?=+?!=*^)-^%)+)%$)^%))?^?)?)&$_*$(+@)(+!+#+!#=)!+_~-#&$!+?$(&=?@A&!?&+=+-$&$#_~?^++#~$&$)$&#&#@_!~%#%$*__*-*(*-#&##?&?@#*-?&*#!?)#*?^-#_+**&~?+?+?~~*?~~?~@-%?_~&?&*%*(_^?+&&~^~#((*?_~&_~~A&=~&-*~&&_(_@*@%-$&?_*&$_((_**_-_+_&_@&)&!&#_=_)*~_*A_~_~!*@%(!@*(=_$-)_=_=!?@~-^-=_=@&A@-@=@(@#%#^~^*!=-)*~*=*&%#"
- ,"@~(?(%*$(-*@*_*^*((!!=*)(?()*?(?!?!?($!((&!+(!^^%%^%=~+_+!%)($@_!)!-^~=*!_!&@&@(!(=^!#@+@^!^^#+_^~+#^-A@(@-@-)=)^@*%-@-A+&+#+-+~+%+%#^#?!=*-%(=^%-=)+%)+=^%?!==?!==$=$)%=%%#^*)+^#=_^+^=#$$)#+#-~(~=+#^~)(^?!=*!#(+@^*^?)(^?!$(+)?!=*$~&#?~)+$#=)!)_?@?%)_+?!$(&~^??~+~&~#~&~)?(~?~-~*~+&+-#-_?@+=$#$@$?&)#!$!++#__!~*_~?_~##)$@&+_$#@#!$!_?_*_$A_-_%_(_^_*_%_~-~(_(!&)#$~_?)?--?&^?^#~~-_%?^?!?!?=?)~*A~)?~(*-_(#-!A~=~=*(_~&~~!&=-#&~&+&+&?&&_^&!A&%((--_$_=_@&-_@&=_!-@-@A%^%%_!_--!-+-=@!*!-*_=_+!^_+-$A-(-*%%!!%#!^-!-!-^*#*^*=*&%_*+()-)%_=&!&(?A*@@(*@*%*#(~($^*=)@~(_!@(~!$^$+?+(@(!-(%()%=()(+!_!*!(^_=*@-@+@&@@!)A!#@=@)=~@*@_@~@~)*+%^!+*^=@$%)@=@=)?+~%^%=@=+&+@+-+=+(+#$#?~?!^!=*%=%++^%+=$=-=(=!$-+(^*^$^_^%=+^@=?A^))#^~)*^~^*^*)*^_)^^!)?!)%=%(%)??#$~#?&?^#%#=#^#)#+?$A?~?=?-?_?+~!?*_!_+#+$^)?+_?~+_+-+=+)++&=?$$)+^$^$#$#~-$@$($-$-&@_)~=_@~+#~A#+#+A_-#$?+#+-(_^_@_+-=_&-&(-(=~=?@#+??_$A?~?!?%?=-(&A~?!~+(~-#(^&+-%~(~&*!*@~&&A~(=*+(=*+($(#(?(~(&(_(&()*$(!C($!^"
- ,"(?!?!)(&!#B!A%#*#-+_&_*(__*_(_)_$-#@^*^_!_*-+*_%!!*%~!%-_-)-)@%!!-%-=-?*&*$!$*=-@*?(@%-@_*(*(*)*#(_)*)^!^(%*$(~%#(~(&(@(=(^=-%)($!%($)&=?))%-!$B!^?=@!=!*!)^@%+@@!)!)@^@$=~%*@~@^$+#_=_%~@(@%^!@%@=@?%&%_+)^-%(%~%_^$=$%-==$$+)$@)?==%_=_$))-=(=~=_)$^$=-^)$@)_^_=%^+#)$!~%~#+?!=*+^?!)%=%(%*$_^*^(^)^$)#?=+=)@^+)&~(#-~_~~#%)-)-+@)%~&_-_=$=+@)++??$+?+~+!+%+=~*#*$_+@+=?#$_$~$#$#&__!~*__~@$)$=$@$@&$_##%#@$@_?_(A_@_*_+-+($(?($?)#%?)?&?#*)~)?=##?&_(?$?!*^_%*~_+~%?%?+&~~+&)~-**~#&$~$(*(-_-&&~!~=-$&(~+!-(^-?&&_!&?_+!+%#%*-*__&@&^*#_!&&!?(#-#_^_#_~-!@^(%@(_%_!_@--=(=)*)-=_#-&!(-$-%@(!@*!*?A*^-#*=-&*+(#@-*@*(*-*-%@=)@?!==@@+(~(#(+(+=_=-($!+(+^*=^=!=+^%=?!)%=%(%&+-+=@=!@(+!?=-!)(!^-=(@*@$@_@%!+@@!?@^@)%#@~%*@~@*@*%*@_%^@!%&@)+?)$$#+&+^)%)=)^)))++$+?+~+=+-+_++$!+*?!?+)+^^%?=_+!=#==$!+^=%=@^@^)=)+~^*^_^~^~#*?%$!?*$=^$))^=^=#??~)^)=^=?_?@?*?=?!?#~#_~_!$!+*)=)+?~+%)-~_#*+&++$_+#$=+)+^&#~+_%#^?!$-$?&*&($?##$#_@&^&@&^&)&+_$_#_?_~_?_=&)&*_-_-_)_%_$-^_?-+-*-*(!("
- ,"+&+~^#??__!?#?=-(&~~~?!~+(~-#(^&+-%~(~&*!*@~&&~~~(=*+(-*+($(#(?(~(&(&(_()*-(!(#((($!^(?!?!)(&!#!!!!%%%#*#-+_&_*(%_~_)!*(+-#-=_#%_!~%+!*-#-@-@@~!%-^-(-+%%($*%-+*+()*#!&((*&*)^$)-!-(&*!*=@$((*~==@&(-(#(~@)()*&!@^)%=^(%$!@(~!~^=%&!-!#!~%)!)(&@=^(%~@~!!@^^=^*$!$+=+%^!?@_^!@#@=)*=*%_@@@+$~)#$$$$)_%#=#=*$$)&=(%-=@$~?_?%^%=!%)%#+_=^%($~)~^#=-=(+^=#^+^^=^$#?_$~?#$-^@^(^-^-#=#^^*)-^-?+?&?#?-?~?%?%&^&~$~+?!=*-)!#*)!)@)$+?+~~_#&+++?+#$_?~+_+-+=+)+=~@?$$!+~$(~$#_$*$($?#_#_$?__#*$+#%#%$*#?#&#%_%_%*^*)*+?~?@-*~*?_#@#^&#?!#&-+&+~^#??**@#=_@*(?(?%?_~#~!~~*+&%~~&~~)*)-#*^*!*!*@*#(^*+(+(_(#(~(~(!(_(*($(^(!(@(&(#!@(-(&!$!#!#!%!_@?_+-~-%_@@#=~=&=_=%*%-!_)_#!_-^_(@~(~*#---%%+@^%=%-!?*)*~*#*?*$(~(~*(=-@%**(*(%=?!$(-)*)()=@#(~!((#!^%&@?(_!-!)(^@+!=(*!^(!!&!-!^^#%~=+@=!(^^^)!(@*!*)~)$)-)~)()()_)%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?_?-?*?))!%#=%=!=($?!$(~^*=&=?^!^(^%=##=+=^$)#^%^?^=$-$?!$(_)#$*^*)$)-?=+^)+)^)))-))$?!=*))=?!~!??~?_&___@+&+))^+!_%_=_^_~#"
- ,"~$#+-+!?^+_+$&%#%$!+)+~_*~__&_&~!$*$($-#!#!$)_=~##^#^##-@*=*^*)*?&*#!?)#*?~_@~(#%?=?&?~&_???^?~?+~@?=?~**&!__~?~)-~*&~)~^?^*!*-*=*!*)*)*%*#()*-(&(#!$!&-+&#&&!%((!*!!--&%_!_=!~!$@$!!!!%%%=%^%&(+_*_#-+-)!@*!-^_@_(-+*)-#-*@?!?!?*-**-#*(-?@=!@*%**!^-^*-*=%?!?!~(_*~(&(=*&@**&(?=+^+=(=()@)%)=)~%)*-($!)(^=@@=!$!&!%!^!*@~%(!&@^(?@-!%^=%@@+@(@#%?!=*)%$%&@(@&+(^-+?))$$###?#^=(@@@+%%@^@@+~^(%&=^@?=-%^+@$&$~^)%!%+#(=$^=%)=&#-=$=?^-=*=#^*^*^+^)#=+*=+^!^*^&?&$?)@^+)%^!?&?$?^?*?^+%)$+-)*)%^_~?!$(?+&+?~#~#_~_&___$#%)^)?+))$+^~-#%+*$$+_$!+$&^&*&=#+#(+?_$#?$$#!$($?$&#~_^&)&@~_$^$*#_#&_#&+?##(_!_#-!--#=#=-%#!???#?%#^?~*#_=#&?)?=?(*~*+*=*-*=&@~+&_~-~@?&(~~#&~&#($($@?@~@&@+-@~=~#&^~+&=(_-@&-_+&&_(&+!=!-!_-$_%&+_?@#_~-*_%_*@+--_@@^_^_-_)@@!!@_@?%=@?($*_*%-=-$-@%!-**!**%-%-^(^!^)*-*#(=^)^~(%*-(?=?)?!$(?!$(-)@@+(#!-(+!%%?@$(~!&!=(%@^(@(_!%(*!?!?!&!%^+%#=^!@!-^%^=!-@_!_))^?!=*%^_)?)*)?!$(*)?!=*%)()$+))%+@+)=!@%@)+_+?$#$~^$%_=~=-$^+@$@+~$~?!=#=?!==*?++&=*=(=_^!="
- ,"?!)%=%(%##(#=)-=(^?!==^=*^^^^^#?(#_?%=_?!^~^_)!^@^?!$(@)@))??!)%=%(%-?~~&?!?-~_~!$~)_+!)@)&+@+@+^)#&+?@)?+=+@+*&*?_$^+?$)+%&?&+_?$($-$*&&_+##$!$_#_$##=$)$__%?+#%#$?*#)#?#!_--@~_#??#-#(~()~(#@?)#+?!?+~+~^-~&*?~~(~+~-~@?&*&!@~?~^~!*==_=&%*(%*!*=(-===$===?=((!*$(%(@*_(+($(-=%(_=_(#%_(~=^%~%=*!(@*!*=*$()=%*@*=*_($(*($=%(-(^(=*-=-=%(&%=(_*@*!(-=_=~=_(_=!==%!%(%_=!($(@(_=_=_=?=&*~!^%#!_=-=_="
- }),"(%u)(.)",function(r,c)return c:rep(r:byte()-62)end),"(.)(.)",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()
- ]]
- -- Rotation! --
- TabletRotation = 0
- UpdateTablets = function()
- if Skapt.Removed == true then return end
- TabletRotation = TabletRotation==360 and 0 or TabletRotation + 0.0002
- for _, Player in pairs(getALLPlayers()) do
- local PlrTabs = {}
- for i,v in pairs(Skapt.Tablets) do
- if v.Tab.Parent ~= nil and v.Plr == Player.Name then
- table.insert(PlrTabs, v)
- end
- end
- for i,v in pairs(PlrTabs) do
- pcall(function()
- local radiusdata = Skapt.Ranked[Player.Name].Distance ~= nil and Skapt.Ranked[Player.Name].Distance or 5
- local pos = nil
- pcall(function()
- if Player.Character.Parent == Skapt.Services.Workspace then
- pos = Player.Character.Torso.CFrame
- end
- end)
- if pos == nil then return end
- local radius = radiusdata + (#PlrTabs * 0.5)
- local x,y,z
- if Skapt.Ranked[Player.Name].Rotation == false then
- x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
- y = 0
- z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) * 2) * math.pi * 2) * radius
- else
- x = math.sin((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
- y = 0
- z = math.cos((i / #PlrTabs - (0.5 / #PlrTabs) + TabletRotation * 2) * math.pi * 2) * radius
- end
- local arot = Vector3.new(x,y,z)+pos.p
- local brot = v.Tab.CFrame.p
- local crot = (arot * .1 + brot * .9)
- local drot = math.rad((TabletRotation * 1000) * math.pi)
- v.Tab.CFrame = CFrame.new(crot, pos.p)
- -- v.Tab.Size = Vector3.new(math.cos(time())*9,math.cos(time())*9,math.cos(time())*9)
- if Skapt.Ranked[Player.Name].SpinningRot == true then
- v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(drot, drot, drot)
- else
- if Skapt.Ranked[Player.Name].MeshType ~= "Books" then
- v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.rad(15),0,0)
- else
- v.Tab.CFrame = v.Tab.CFrame * CFrame.Angles(math.pi/2,0,0)
- end
- end
- end)
- end
- end
- end
- Skapt.Services.ReplicatedStorage.DescendantAdded:connect(function(x)
- if x.Name == "Skapt" and x:IsA('StringValue') then
- local val = x.Value
- local Split = val:find(':')
- local Name = val:sub(1, #Split - 1)
- local Message = val:sub(#Split + 1)
- local Player = nil
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- if v.Name == Name then return end
- end
- for _,v in pairs(getALLPlayers()) do
- if v.Name == Name then
- Player = v
- end
- end
- onChatted(Player, Message)
- end
- end)
- RunServiceFunction = function()
- pcall(function() Skapt.Connections.Loops:disconnect() end)
- Skapt.Connections.Loops["Update_Tablets"] = Skapt.Services.RunService.Stepped:connect(function()
- UpdateTablets()
- end)
- Skapt.Connections.Loops["Etc"] = Skapt.Services.RunService.Stepped:connect(function()
- if Skapt.PrivateServer.Enabled == false then
- Skapt.PrivateServer.Waiting = {}
- end
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- local rankedData = Skapt.Ranked[v.Name]
- if v:findFirstChild('PlayerGui') == nil then return end
- if rankedData.CMD == true then
- if v.PlayerGui:findFirstChild("Skapt Command Bar") == nil then
- giveCMDBar(v)
- end
- end
- if rankedData.CMD == false then
- if v.PlayerGui:findFirstChild("Skapt Command Bar") then
- v.PlayerGui:findFirstChild("Skapt Command Bar"):Destroy()
- end
- end
- end
- end)
- end
- RunServiceFunction()
- -- Commands! --
- Command("Dismiss Tablets", {"dt", "dismiss", "hide"}, 0, "Dismisses Tablets", "-p (Player/Rank 4)", function(Speaker, Msg)
- if GetSplit(Msg) == "p" then
- if FindRank(Speaker) >= 4 then
- Msg = Msg:gsub("-p", "")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- Dismiss(v)
- end)
- end
- end
- else
- Output(Speaker, "Your rank is too low to use that flag!", "Really red", nil, 2)
- end
- else
- Dismiss(Speaker)
- end
- end)
- Command("Clear", {"clear", "clr"}, 1, "Clears workspace", "No Flags", function(Speaker, Msg)
- for i,v in pairs(workspace:children()) do
- local IsChar = false
- pcall(function()
- for j,k in pairs(game:service'NetworkServer':children()) do
- if pcall(function() k:GetPlayer() end) then
- if v.Name == k:GetPlayer().Name then
- IsChar = true
- end
- end
- end
- end)
- if IsChar == false then
- if v.Name ~= "Terrain" then
- if v.ClassName ~= 'Script' then
- pcall(function() v:remove() end)
- end
- end
- else
- pcall(function()
- for j,k in pairs(v:children()) do
- if k.ClassName ~= 'CharacterMesh' and k.Name ~= 'Head' and k.ClassName ~= 'Humanoid' and k.ClassName ~= 'Hat' and k.ClassName ~= 'Shirt' and k.ClassName ~= 'Pants' and k.Name ~= 'Torso' and k.Name ~= 'Left Arm' and k.Name ~= 'Left Leg' then
- if k.Name ~= 'Right Arm' and k.Name ~= 'Right Leg' and k.ClassName ~= 'LocalScript' and k.ClassName ~= 'Motor' and k.ClassName ~= 'BodyColors' and k.ClassName ~= 'Script' and k.Name ~= 'HumanoidRootPart' then
- k:Destroy()
- end
- end
- end
- end)
- end
- end
- CreateBase()
- Output(Speaker, "[Skapt SYSTEM] Garbage: "..tostring((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB", "Hot pink")
- end
- )
- Command("Commands", {"cmds", "commands"}, 1, "Shows Commands", "No Flags", function(Speaker, Msg)
- ShowCommands(Speaker)
- end)
- Command("Music", {"Music", "msc"}, 3, "Plays music", "No Flags", function(Speaker, Msg)
- Dismiss(Speaker)
- MusicCrap(Speaker, nil)
- end)
- Command("Insert", {"t", "g"}, 1, "Gets Things", "-b (Base) -c (Clean) -r (Reset) -rl (Reset Lighting) -rj (Rejoin) -fc (Fix Character) -ball (qlqkqzqrd's Ball) -cmdbar (Command Bar) -nocmdbar (No Command Bar)", function(Speaker, Msg)
- if GetSplit(Msg) == "r" then
- Speaker:LoadCharacter()
- elseif GetSplit(Msg) == "fc" then
- Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId
- Speaker:LoadCharacter()
- elseif GetSplit(Msg) == "clean" then
- CleanWorkspace()
- elseif GetSplit(Msg) == "base" then
- CreateBase()
- elseif GetSplit(Msg) == "rl" then
- Debug()
- elseif GetSplit(Msg) == "rj" then
- Skapt.Services.TeleportService:Teleport(Skapt.Services.Game.PlaceId, Speaker)
- elseif GetSplit(Msg) == "cmdbar" then
- giveCMDBar(Speaker)
- elseif GetSplit(Msg) == "nocmdbar" then
- ypcall(function()
- Skapt.Ranked[Speaker.Name].CMD = false
- end)
- elseif GetSplit(Msg) == "ball" then
- createLocalScript([[
- wait(0.001);
- _ray=function(v0,v1,i)
- local mag=(v0-v1).magnitude;
- local ray=Ray.new(v0,(v1-v0).unit*(mag>999 and 999 or mag));
- return(type(i)=='table'and workspace.FindPartOnRayWithIgnoreList or workspace.FindPartOnRay)(workspace,ray,i);
- end;
- user=game:service'Players'.LocalPlayer;
- backpack=user.Backpack;
- mouse=user:GetMouse();
- char=user.Character;
- torso=char.Torso;
- head=char.Head;
- hum=char:findFirstChild'Humanoid';
- if(not hum or hum.className~='Humanoid')then
- hum=char:children();
- for i=1,#hum do
- if(hum[i].className=='Humanoid')then
- hum=hum[i];
- break;
- end;
- end;
- end;
- repeat until not pcall(function()
- char.ala_ball:Destroy();
- hum.PlatformStand=false;
- end);
- repeat until not pcall(function()
- backpack.ala_ball:Destroy();
- hum.PlatformStand=false;
- end);
- keys={};
- bin=Instance.new('HopperBin',backpack);
- bin.Name='ala_ball';
- script.Parent=bin;
- bin.Selected:connect(function()
- ball=Instance.new'Part';
- ball.Shape=0;
- ball.Friction=10;
- ball.Elasticity=0;
- ball.TopSurface=0;
- ball.formFactor=0;
- ball.BottomSurface=0;
- ball.Transparency=0.5;
- ball.CanCollide=false;
- ball.Color=BrickColor.new(']]..Skapt.Ranked[Speaker.Name].Color..[[').Color;
- ball.CFrame=head.CFrame;
- ball.Name='ala_ball';
- ball.Size=Vector3.new(10,10,10);
- ball.Parent=char;
- weld=Instance.new('Weld',ball);
- weld.Part0=ball;
- weld.Part1=head;
- wait(0.001);
- hum.PlatformStand=true;
- ball.CanCollide=true;
- end);
- bin.Deselected:connect(function()
- ball:Destroy();
- ball=nil;
- hum.PlatformStand=false;
- end);
- mouse.KeyDown:connect(function(key)
- keys[key]=true;
- end);
- mouse.KeyUp:connect(function(key)
- keys[key]=false;
- end);
- hum.Changed:connect(function(p)
- if(p=='PlatformStand'and ball)then
- hum.PlatformStand=true;
- end;
- end);
- hum.Died:connect(function()
- ball:Destroy();
- ball=nil;
- bin:Destroy();
- end);
- local jump_time=time();
- game:service'RunService'.Stepped:connect(function()
- if(ball and ball.Parent)then
- if(keys[' ']and jump_time<=time())then
- local hit,pos=_ray(ball.Position-Vector3.new(0,3,0),ball.Position-Vector3.new(0,6,0),char);
- if(hit and hit.CanCollide)then
- jump_time=time()+1;
- ball.Velocity=ball.Velocity+Vector3.new(0,100,0);
- end;
- end;
- if(keys.w or keys.s or keys.a or keys.d and ball.Velocity.magnitude<30)then
- local v=((CFrame.Angles(0,math.rad(90),0)*workspace.CurrentCamera.CoordinateFrame).lookVector*Vector3.new(1,0,1)).unit;
- local speed=ball.Velocity.magnitude;
- speed=speed>30 and 30 or speed;
- v=v+v*speed;
- if(keys.s)then
- v=v*-1;
- end;
- if(keys.d)then
- v=v+workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
- end;
- if(keys.a)then
- v=v-workspace.CurrentCamera.CoordinateFrame.lookVector*speed;
- end;
- ball.RotVelocity=v;
- end;
- end;
- end);
- ]], Speaker.Character)
- end
- end)
- Command("CommandBar", {"cbar", "combar"}, 3, "Gives you a command bar", "No Flags", function(Speaker, Msg)
- giveCMDBar(Speaker)
- end)
- Command("Change Rank", {"setrank", "changerank", "srank", "setr"}, 0, "Changes A Player's Rank", "No Flags", function(Speaker, Msg)
- local Split = Msg:find(Skapt.Bet)
- local Player = getPlayer(Speaker, Msg:sub(1, Split - 1))
- local Rank = tonumber(Msg:sub(Split + 1))
- if #Player > 0 then
- for _,v in pairs(Player) do
- if Rank == nil then Output(Speaker, "That rank is invalid", "Really red", nil, 3) return end
- if Rank < 0 and FindRank(Speaker) < 2 then Output(Speaker, "You cannot set a rank that low.", "Really red", nil, 3) return end
- if FindRank(v) > FindRank(Speaker) then Output(Speaker, "You cannot set a person's rank that is higher than you!", "Really red", nil, 3) return end
- if Rank < FindRank(Speaker) then
- ChangeRank(v, Rank)
- Output(Speaker, "Changed "..v.Name.."'s Rank to "..Rank, "Lime green", nil, 3)
- Output(v, "Your rank has been changed to "..Rank.."!", "Lime green", nil, 3)
- else
- Output(Speaker, "You cannot set a rank higher than you!", "Really red", nil, 3)
- end
- end
- end
- end)
- Command("BSoD", {"bsod", "bb"}, 3, "BSoD's someone", "No Flags", function(Speaker, Msg)
- local PlrTab = getPlayer(Speaker, Msg)
- if #PlrTab > 0 then
- for _,v in pairs(PlrTab) do
- ypcall(function()
- NewLS(BSoDSource, v.Backpack)
- v:Kick()
- Output(Speaker, "BSoD'd: "..v.Name, "Royal purple")
- end)
- end
- end
- end)
- Command("Lag", {"laggg", "lag"}, 3, "Lags someone", "No Flags", function(Speaker, Msg)
- local PlrTab = getPlayer(Speaker, Msg)
- if #PlrTab > 0 then
- for _,v in pairs(PlrTab) do
- ypcall(function()
- NewLS(Lag, v.Backpack, v.Character, v.PlayerGui)
- Output(Speaker, "Lagged: "..v.Name, "Royal purple")
- end)
- end
- end
- end)
- Command("Base", {"base", "newbase"}, 3, "Creates a new base.", "No Flags", function(Speaker, Msg)
- if game.Workspace:findFirstChild("Base") then
- game.Workspace.Base:Remove()
- end
- if game.Workspace:findFirstChild("Part") then
- game.Workspace.Part:Remove()
- end
- if game.Workspace:findFirstChild("Baseplate") then
- game.Workspace.Baseplate:Remove()
- end
- a = Instance.new("Part")
- a.Parent = game.Workspace
- a.Name = "Base"
- a.Position = Vector3.new(0, 0.6, 0)
- a.Size = Vector3.new(1002, 0, 1002)
- a.Material = "Grass"
- a.Anchored = true
- a.BrickColor = BrickColor.new("Earth green")
- Output("Successfully created a new base",Speaker)
- end)
- Command("Ping", {"ping", "p"}, 0, "Pings A Message", "-a (AFK) -bl (Banlist) -r (Ranked) -s (Spam)", function(Speaker, Msg)
- if GetSplit(Msg) == "a" then
- Dismiss(Speaker)
- Msg = Msg:gsub("-a", "")
- for i = 1, 6 do
- Output(Speaker, "AFK")
- end
- Output(Speaker, "Dismiss")
- elseif GetSplit(Msg) == "bl" then
- Dismiss(Speaker)
- Msg = Msg:gsub("-bl", "")
- Output(Speaker, "Banned People:", "Really black")
- for i,v in pairs(Skapt.Ranked) do
- if v.Rank < 0 then
- Output(Speaker, i, "Really black")
- end
- end
- elseif GetSplit(Msg) == "s" then
- Msg = Msg:gsub("-s", "")
- local Split = Msg:find(Skapt.Bet)
- local Message = Msg:sub(1, Split - 1)
- local Amount = Msg:sub(Split + 1)
- for i = 1, Amount do
- Output(Speaker, Message, "Random")
- end
- else
- if #Msg == 0 then Msg = "Pong!" end
- Msg = string.gsub(Msg, "", "\5")
- Output(Speaker, Msg, "Random")
- end
- end)
- Command("Explode", {"exp", "explode"}, 3, "Explodes someone.", "No Flags", function(Speaker, Msg)
- local PlrTab = getPlayer(Speaker, Msg)
- if #PlrTab > 0 then
- for _,v in pairs(PlrTab) do
- ypcall(function()
- if v.Character and v.Character:findFirstChild("Head") then
- local e = Instance.new("Explosion")
- e.Position = v.Character.Head.Position
- e.Parent = v.Character
- Output("Exploded "..v.Name, Speaker, 5)
- end
- end)
- end
- end
- end)
- Command("Home", {"home", "gh"}, 3, "Tele's someone to the center of base.", "No Flags", function(Speaker, Msg)
- repeat wait() until Speaker.Character:findFirstChild("Torso")
- if Work:findFirstChild("Base") then
- Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
- else
- Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
- end
- Output("Brought "..Speaker.Name.." Home", Speaker, 5)
- end)
- Command("Reset", {"reset", "rs"}, 3, "Respawn someone.", "No Flags", function(Speaker, Msg)
- local PlrTab = getPlayer(Speaker, Msg)
- if #PlrTab > 0 then
- for _,v in pairs(PlrTab) do
- ypcall(function()
- v:LoadCharacter()
- Output("Exploded "..v.Name, Speaker, 5)
- end)
- end
- end
- end)
- Command("Rejoin", {"rj", "rej"}, 3, "Rejoins someone.", "No Flags", function(Speaker, Msg)
- local PlrTab = getPlayer(Speaker, Msg)
- if #PlrTab > 0 then
- for _,v in pairs(PlrTab) do
- ypcall(function()
- game:service'TeleportService':Teleport(game.PlaceId,v.Character)
- Output("Rejoined "..v.Name, Speaker, 5)
- end)
- end
- end
- end)
- Command("Kick2", {"kick2", "leave4", "bai3", "kk1", "dc5"}, 2, "Kicks A Player", "-b (Banish) -c (Crash) -n (Nil) -r (Rejoin) -cl (Crash Lag)",function(Speaker, Msg)
- if GetSplit(Msg) == "b" then
- if FindRank(Speaker) < 3 then
- return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
- end
- Msg = Msg:gsub("-b","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- ChangeRank(v, -1)
- pcall(function() v.Character.Humanoid.Walkspeed = 99e9999 end)
- wait(.3)
- v:Kick()
- end)
- end
- end
- elseif GetSplit(Msg) == "r" then
- Msg = Msg:gsub("-r","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- Skapt.Services.TeleportService:Teleport(game.PlaceId, v)
- end)
- end
- end
- elseif GetSplit(Msg) == "c" then
- Msg = Msg:gsub("-c","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- createLocalScript([[for i=1, 1/0 do Instance.new("ManualSurfaceJointInstance") end]], v:waitForChild("Backpack"))
- end)
- end
- end
- elseif GetSplit(Msg) == "n" then
- Msg = Msg:gsub("-n","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- v.Parent = nil
- end)
- end
- end
- else
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- v:Kick()
- end)
- end
- end
- end
- end)
- Command("Kick", {"kk", "kick"}, 6, "kicks someone.", "No Flags", function(Speaker, Msg)
- local PlrTab = getPlayer(Speaker, Msg)
- if #PlrTab > 0 then
- for _,v in pairs(PlrTab) do
- ypcall(function()
- v:Kick()
- Output("Killer Kicked "..v.Name, Speaker, 5)
- end)
- end
- end
- end)
- Command("Get Ranked", {"srank", "ranked"}, 1, "Opens Ranked Interface", nil, function(Speaker, Msg)
- Dismiss(Speaker)
- if #Msg == 0 then
- GetRankedInterface(Speaker)
- else
- Msg = Msg:lower()
- local Number = 0
- local Table = {}
- for i,v in pairs(Skapt.Ranked) do
- if i:lower():find(Msg) then
- ypcall(function()
- table.insert(Table, i)
- Number = Number + 1
- end)
- end
- end
- if Number > 1 then
- for _,v in pairs(Table) do
- Output(Speaker, v, nil, function()
- GetRankedInterface(Speaker, v)
- end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v)
- end
- else
- for _,v in pairs(Table) do
- GetRankedInterface(Speaker, v)
- end
- end
- end
- end)
- -- Rank 1! --
- Command("Disable CBA", {"remcba", "uncba", "rcba", "baicba"}, 1, "Removes CBA Admin", nil, function(Speaker, Msg)
- local RemoveCBA = Instance.new("StringValue", Skapt.Services.Workspace)
- RemoveCBA.Name = "CBA Attachment"
- RemoveCBA.Value = 'CBA.remove = false;'
- end)
- Command("Insert Asset", {"ins", "insert"}, 1, "Inserts A Tool/HopperBin or Hat", nil, function(Speaker, Msg)
- if Msg == "qlq" then
- for _,v in pairs({"127506105","101734094","73232786","95951330"}) do
- Skapt.Commands["Insert Asset"].Function(Speaker, v)
- end
- else
- local Item = Skapt.Services.InsertService:LoadAsset(tonumber(Msg))
- if Item then
- local Object = Item:GetChildren()[1]
- if Object.className == "Hat" then
- Object.Parent = Speaker.Character
- elseif Object.className == "Tool" or Object.className == "HopperBin" then
- Object.Parent = Speaker.Backpack
- end
- end
- end
- end)
- Command("Kill", {"kill"}, 1, "Kills A Player", "-r (Respawn) -e (Explode) -w (WalkSpeed)",function(Speaker, Msg)
- if GetSplit(Msg) == "r" then
- Msg = Msg:gsub("-r","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- v:LoadCharacter()
- end)
- end
- end
- elseif GetSplit(Msg) == "e" then
- Msg = Msg:gsub("-e", "")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- local e = Instance.new'Explosion'
- e.Parent = Skapt.Services.Workspace
- e.BlastRadius = 10
- e.BlastPressure = 10000
- e.Position = v.Character.Torso.Position
- end)
- end
- end
- elseif GetSplit(Msg) == "l" then
- Msg = Msg:gsub("-l", "")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- if Skapt.Connections.Killing[v.Name] then
- return Output(Speaker, "You can only loopkill someone one at a time!", "Really red", nil, 3)
- end
- Skapt.Connections.Killing[v.Name] = v.CharacterAdded:connect(function(Character)
- v.Character:BreakJoints()
- end)
- v.Character:BreakJoints()
- end)
- end
- end
- elseif GetSplit(Msg) == "ul" then
- Msg = Msg:gsub("-ul", "")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- if Skapt.Connections.Killing[v.Name] then
- Skapt.Connections.Killing[v.Name]:disconnect()
- Skapt.Connections.Killing[v.Name] = nil
- end
- end)
- end
- end
- elseif GetSplit(Msg) == "w" then
- Msg = Msg:gsub("-w", "")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- v.Character.Humanoid.WalkSpeed = "99e999"
- end)
- end
- end
- else
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- v.Character:BreakJoints()
- end)
- end
- end
- end
- end)
- Command("Forcefield", {"ff", "forcefield"}, 1, "Forcefields A Player", "-u (UnFF)", function(Speaker, Msg)
- if GetSplit(Msg) == "u" then
- Msg = Msg:gsub("-u","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- for _, v2 in pairs(v.Character:GetChildren()) do
- if v2:IsA("ForceField") then
- v2:remove()
- end
- end
- end)
- end
- end
- else
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- Instance.new("ForceField", v.Character)
- end)
- end
- end
- end
- end)
- Command("Godmode", {"god", "godmode"}, 1, "Gives A Player Godmode", "-u (UnGod)", function(Speaker, Msg)
- if GetSplit(Msg) == "u" then
- Msg = Msg:gsub("-u","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- for __,vv in pairs(v.Character:GetChildren()) do
- if vv:IsA('Humanoid') then
- vv.Name = 'lal_its_a_humanoid'
- vv.MaxHealth = 100
- vv.Health = 100
- end
- end
- end)
- end
- end
- else
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- for __,vv in pairs(v.Character:GetChildren()) do
- if vv:IsA('Humanoid') then
- vv.Name = 'lal_its_a_humanoid'
- vv.MaxHealth = math.huge
- end
- end
- end)
- end
- end
- end
- end)
- Command("Clear backpack", {"bpb", "clearb"}, 3, "Removes someones backpack.", "No Flags", function(Speaker, Msg)
- local PlrTab = getPlayer(Speaker, Msg)
- if #PlrTab > 0 then
- for _,v in pairs(PlrTab) do
- ypcall(function()
- v.Backpack:Remove()
- Output(Speaker, "Locked "..v.Name.."'s Gui's", "Really blue")
- end)
- end
- end
- end)
- Command("Credits", {"credits", "credit"}, 3, "Show's Skapt credits.", "No Flags", function(Speaker, Msg)
- wait()
- Dismiss(Speaker)
- Output(Speaker,"Skapt Admin by: Skapt", "Royal purple", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=willowtree1119")
- Output(Speaker,"Credit To C9X for the GFX picture", "Really blue", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=C9X ")
- Output(Speaker,"Credit To AcidicEmpyreus", "Cyan", nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username=AcidicEmpyreus")
- Output(Speaker, "Dismiss")
- end)
- Command("System Message", {"system", "sm"}, 3, "Shouts a System Message.", "No Flags", function(Speaker, Msg)
- SystemMsg(Msg)
- end)
- function Message(str,p,snder)
- if p==nil then
- for _,Player in pairs(game.Players:GetPlayers()) do
- coroutine.wrap(function()
- local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
- local Text = Instance.new("TextLabel", Msg)
- Text.Position = UDim2.new(0, 0, 0.7, 0)
- Text.Font=4
- Text.FontSize=9
- Text.BackgroundColor3 = Color3.new(0,0,0)
- Text.BackgroundTransparency = 1
- Text.TextColor3 = Color3.new(0,0,0)
- Text.TextTransparency = 1
- Text.TextWrap = true
- Text.TextStrokeColor3 = Color3.new(0,0,0)
- Text.Text = "From "..snder.Name..":"..tostring(str)
- Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
- Text.TextTransparency = 0
- Text.TextStrokeTransparency = 0
- Num = #str * 0.06
- wait(3)
- Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
- wait(Num)
- Msg:Remove()
- end)()
- end
- else
- Player=p;
- coroutine.wrap(function()
- local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
- local Text = Instance.new("TextLabel", Msg)
- Text.Position = UDim2.new(0, 0, 0.7, 0)
- Text.Font=4
- Text.FontSize=9
- Text.BackgroundColor3 = Color3.new(0,0,0)
- Text.BackgroundTransparency = 1
- Text.TextColor3 = Color3.new(0,0,0)
- Text.TextTransparency = 1
- Text.TextStrokeColor3 = Color3.new(0,0,0)
- Text.TextStrokeTransparency = 0
- Text.TextWrap = true
- Text.Text = "Message from "..snder.Name.." :"..tostring(str)
- Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
- Text.TextTransparency = 0
- Num = #str * 0.06
- wait(3)
- Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
- wait(Num)
- Msg:Remove()
- end)()
- end
- end
- function SystemMsg(str)
- for _,Player in pairs(game.Players:GetPlayers()) do
- coroutine.wrap(function()
- local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
- local Text = Instance.new("TextLabel", Msg)
- Text.Position = UDim2.new(0, 0, 0, 0)
- Text.Font='ArialBold'
- Text.FontSize = "Size48"
- Text.BackgroundColor3 = Color3.new(0,0,0)
- Text.BackgroundTransparency = 1
- Text.TextColor3 = Color3.new(2,2,2)
- Text.TextTransparency = 0
- Text.TextStrokeColor3 = Color3.new(0,0,0)
- Text.TextStrokeTransparency = 0
- Text.TextWrap = true
- Text.Text = ' [Skapt SYSTEM MESSAGE] \n ' .. tostring(str)
- Text:TweenSizeAndPosition(UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 0, 0), "Out", "Back", 2)
- Text.TextTransparency = 0.1
- Num = #str * 0.06
- wait(6)
- Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
- wait(Num)
- Msg:Remove()
- end)()
- end
- end
- function Hint(str,p,snder)
- if p == nil then
- for _,Player in pairs(game.Players:GetPlayers()) do
- coroutine.wrap(function()
- local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
- local Text = Instance.new("TextLabel", Msg)
- Text.Position = UDim2.new(0, 0, 0, 0)
- Text.Font=4
- Text.FontSize=9
- Text.BackgroundColor3 = Color3.new(0,0,0)
- Text.BackgroundTransparency = 1
- Text.TextColor3 = Color3.new(0,0,0)
- Text.TextTransparency = 1
- Text.TextWrap = true
- Text.TextStrokeColor3 = Color3.new(0,0,0)
- Text.TextStrokeTransparency = 0
- Text.Text = "Hint from "..snder.Name.." :"..tostring(str)
- Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
- Text.TextTransparency = 0
- Num = #str * 0.06
- wait(3)
- Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
- wait(Num)
- Msg:Remove()
- end)()
- end
- else
- Player=p
- coroutine.wrap(function()
- local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
- local Text = Instance.new("TextLabel", Msg)
- Text.Position = UDim2.new(0, 0, 0, 0)
- Text.Font=4
- Text.FontSize=9
- Text.BackgroundColor3 = Color3.new(0,0,0)
- Text.BackgroundTransparency = 1
- Text.TextColor3 = Color3.new(0,0,0)
- Text.TextTransparency = 1
- Text.TextWrap = true
- Text.Text = "Hint from "..snder.Name..": "..tostring(str)
- Text.TextStrokeColor3 = Color3.new(0,0,0)
- Text.TextStrokeTransparency = 0
- Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
- Text.TextTransparency = 0
- Num = #str * 0.06
- wait(3)
- Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
- wait(Num)
- Msg:Remove()
- end)()
- end
- end
- Command("Explorer", {"explore", "explorer"}, 1, "Explores the Game", "No Flags", function(Speaker, Msg)
- Explorer(Speaker)
- end)
- Command("Players", {"players", "plrs"}, 1, "Shows Players And Options", "-n (Nil Players)", function(Speaker, Msg)
- if GetSplit(Msg) == "n" then
- Dismiss(Speaker)
- local Number_Of_Nils = 0
- for _,v in pairs(getALLPlayers()) do
- if v.Parent ~= Skapt.Services.Players then
- Number_Of_Nils = Number_Of_Nils + 1
- Output(Speaker, "Crash "..v.Name.."?", nil, function()
- Dismiss(Speaker)
- local x = Instance.new("StringValue", Skapt.Services.Lighting)
- x.Name = "Disconnect: "..v.Name
- coroutine.resume(coroutine.create(function()
- wait(0.5)
- if x.Name == "Disconnected: "..v.Name then
- Output(Speaker, "Successfully crashed "..v.Name, "Lime green", nil, 3)
- else
- Output(Speaker, "Failed to crash "..v.Name, "Lime green", nil, 3)
- end
- end))
- end)
- end
- end
- if Number_Of_Nils == 0 then
- return Output(Speaker, "There are no nil players!", "Lime green", nil, 3)
- end
- Output(Speaker, "There are "..Number_Of_Nils.." nil players!", "Lime green")
- Output(Speaker, "Crash All Nils?", "New Yeller", function()
- for _,v in pairs(getALLPlayers()) do
- if v.Parent ~= Skapt.Services.Players then
- local x = Instance.new("Model", Skapt.Services.Workspace)
- local y = Instance.new("Part", x)
- y.Transparency = 1
- y.CanCollide = false
- y.Anchored = true
- y.Name = "Torso"
- y.Position = Vector3.new(10000,10000,10000)
- local z = Instance.new("Humanoid",x)
- z.Torso = y
- v.Character = x
- createLocalScript([[repeat until false]], v.Character)
- end
- end
- end)
- Output(Speaker, "Dismiss")
- else
- ShowPlayers(Speaker)
- end
- end)
- -- Rank 2! --
- Command("Teleport", {"tp", "tele"}, 6, "Teleport's to someone", "No Flags", function(Speaker, Msg)
- if GetSplit(Msg) == "p" then
- Msg = Msg:gsub("-p", "")
- local Split = Msg:find(Skapt.Bet)
- local Player = getPlayer(Speaker,Msg:sub(1, Split - 1))
- local Numbers = Msg:sub(Split + 1)
- if Numbers == "oxsb" then
- Numbers = "20279777"
- elseif Numbers == "qlqsb" then
- Numbers = "54194680"
- elseif Numbers == "anasb" then
- Numbers = "14578699"
- end
- if #Player > 0 then
- for _,v in pairs(Player) do
- ypcall(function()
- createLocalScript([[game:GetService("TeleportService"):Teleport(']]..Numbers..[[')]], v:waitForChild("Backpack"))
- end)
- end
- end
- else
- local Split = Msg:find(Skapt.Bet)
- local Player1 = getPlayer(Speaker,Msg:sub(1, Split - 1))
- local Player2 = getPlayer(Speaker,Msg:sub(Split + 1))
- if #Player1 > 0 or #Player2 > 0 then
- for _,v in pairs(Player1) do
- for _,v2 in pairs(Player2) do
- ypcall(function()
- v.Character.Torso.CFrame = v2.Character.Torso.CFrame*CFrame.new(0,10,0)
- end)
- end
- end
- end
- end
- end)
- Command("Mute", {"mute"}, 2, "Mutes A Player", "-b (Banish) -u (UnMute)", function(Speaker, Msg)
- if GetSplit(Msg) == "b" then
- if FindRank(Speaker) < 3 then
- return Output(Speaker, "Your not high enough rank to use this flag!", "Really red")
- end
- Msg = Msg:gsub("-b","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- ChangeRank(v, -1)
- end)
- end
- end
- elseif GetSplit(Msg) == "u" then
- Msg = Msg:gsub("-u","")
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)]], v:waitForChild("Backpack"))
- end)
- end
- end
- else
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- createLocalScript([[game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)]], v:waitForChild("Backpack"))
- end)
- end
- end
- end
- end)
- -- Rank 3! --
- Command("Shutdown", {"sd", "shutdown"}, 5, "Shutdowns the Server", "-c (Countdown) -a (Abort) -o (Overflow) -n (New Server)", function(Speaker, Msg)
- if GetSplit(Msg) == "c" then
- Msg = Msg:gsub("-c","")
- for i = 1, Skapt.ShutdownTime do
- if Skapt.Aborted == true then
- Skapt.Aborted = false
- local ABM = Instance.new("Message", Skapt.Services.Workspace)
- ABM.Text = "Shutdown Aborted!"
- Skapt.Services.Debris:AddItem(ABM, 1)
- return
- else
- local ABH = Instance.new("Hint", Skapt.Services.Workspace)
- ABH.Text = "[Shutting down...]"
- local ABM = Instance.new("Message", Skapt.Services.Workspace)
- ABM.Text = "Shutting Down in "..Skapt.ShutdownTime-i.." seconds"
- wait(1)
- if ABM ~= nil then
- ABM:remove()
- end
- if ABH ~= nil then
- ABH:remove()
- end
- end
- end
- Shutdown()
- elseif GetSplit(Msg) == "a" then
- Msg = Msg:gsub("-a", "")
- Skapt.Aborted = true
- elseif GetSplit(Msg) == "o" then
- Msg = Msg:gsub("-o", "")
- createScript([[
- while game:service'RunService'.Stepped:wait() do
- script:Clone().Parent = game:GetService("Workspace")
- end
- ]], Skapt.Services.Workspace)
- else
- Shutdown()
- end
- end)
- Command("Status", {"stats", "status"}, 6, "Locks/Unlocks Scripting", nil, function(Speaker, Msg)
- Dismiss(Speaker)
- Output(Speaker, "Age Restriction", Skapt.AgeRestriction == false and "Really red" or "Lime green", function()
- Dismiss(Speaker)
- Skapt.AgeRestriction = not Skapt.AgeRestriction
- Output("All", "[Skapt SYSTEM]; Age Restriction is "..tostring(Skapt.AgeRestriction), Skapt.AgeRestriction == false and "Lime green" or "Really red")
- end)
- Output(Speaker, "Chat Filter", Skapt.ChatFilter.Enabled == false and "Really red" or "Lime green", function()
- Dismiss(Speaker)
- Skapt.ChatFilter.Enabled = not Skapt.ChatFilter.Enabled
- Output("All", "[Skapt SYSTEM]; ChatFilter is "..tostring(Skapt.ChatFilter.Enabled), Skapt.ChatFilter.Enabled == false and "Lime green" or "Really red")
- end)
- Output(Speaker, "Script Lock", Skapt.LocalSidedScriptsLock == false and "Really red" or "Lime green", function()
- Dismiss(Speaker)
- Skapt.LocalSidedScriptsLock = not Skapt.LocalSidedScriptsLock
- Output("All", "[Skapt SYSTEM]; Scripting is "..tostring(Skapt.LocalSidedScriptsLock), Skapt.LocalSidedScriptsLock == false and "Lime green" or "Really red")
- end)
- end)
- Command("Private Server", {"pri", "privateserver"}, 5, "PrivateServer Menu", nil, function(Speaker,Msg)
- if #Msg == 0 then
- Dismiss(Speaker)
- local Status = Skapt.PrivateServer.Enabled == true and "On" or "Off"
- Output(Speaker, "Turn On", "Lime green", function()
- Dismiss(Speaker)
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- if FindRank(v) <= 0.1 then
- table.insert(Skapt.PrivateServer.Waiting, v.Name)
- v:Kick()
- end
- end
- Skapt.PrivateServer.Enabled = true
- Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
- end)
- Output(Speaker, "Turn Off", "Really red", function() Dismiss(Speaker) Skapt.PrivateServer.Enabled = false Output(Speaker, "Private Server Disabled", "Lime green", nil, 3) end)
- Output(Speaker, "Waiting List", "Deep orange", function()
- Dismiss(Speaker)
- -- [ Bugged ] --
- for i,v in pairs(Skapt.PrivateServer.Waiting) do
- local a,b = ypcall(function()
- Output(Speaker, v, nil, function()
- Dismiss(Speaker)
- ypcall(function()
- table.remove(Skapt.PrivateServer.Waiting, i)
- Skapt.Ranked[v].Rank = 0.5
- end)
- end)
- end)
- if not a then Output("admins", b, 'Really red') end
- end
- Output(Speaker, "Back", "Really blue", function() Skapt.Commands["Private Server"].Function(Speaker, "") end)
- end)
- Output(Speaker, "Status: "..Status)
- elseif Msg == "on" or Msg == "1" or Msg == "true" then
- Skapt.PrivateServer.Enabled = true
- for _,v in pairs(Skapt.Services.Players:GetPlayers()) do
- if FindRank(v) <= 0.1 then
- table.insert(Skapt.PrivateServer.Waiting, v.Name)
- v:Kick()
- end
- end
- Output(Speaker, "Private Server Enabled", "Really red", nil, 3)
- elseif Msg == "off" or Msg == "0" or Msg == "false" then
- Skapt.PrivateServer.Enabled = false
- Output(Speaker, "Private Server Disabled", "Lime green", nil, 3)
- end
- end)
- Command("Clean", {"fc", "clean", "cln"}, 5, "Full Cleans The Server", nil, function(Speaker, Msg)
- FullClean()
- end)
- -- Rank 4! --
- Command("Execute a Script", {"exe", "execute"}, 6, "Executes A String In Script", "No Flags", function(Speaker, Msg)
- local Ran, Error = loadstring(Msg)
- getfenv(Ran).Speaker = Speaker
- getfenv(Ran).print = function(args) local str = "" for _,v in pairs({args}) do str = str..tostring(v).."\t" end Output(Speaker, str, "White") end
- if Error == nil then
- Ran()
- else
- Output(Speaker, Error, "Really red")
- end
- end)
- Command("Ban", {"ban"}, 4, "Ban's a player from the server", "No Flags", function(Speaker, Msg)
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- Output(Speaker,v.Name..' Has Been Banned!')
- ChangeRank(v, -1)
- v:Kick()
- end)
- end
- end
- end)
- Command("Unban", {"unban"}, 4, "Unban's a player from the server", "No Flags", function(Speaker, Msg)
- local Players = getPlayer(Speaker, Msg)
- if #Players > 0 then
- for _,v in pairs(Players) do
- ypcall(function()
- Output(Speaker,'All players Have Been Unbanned!')
- ChangeRank(v, 0)
- end)
- end
- end
- end)
- Command("Dismiss All Tabs", {"dall"}, 6, "Dismisses all open Tablets", "No Flags", function(Speaker, Msg)
- for i,v in pairs(Skapt.Services.Players:GetPlayers()) do
- Dismiss(v)
- end
- end)
- Command("Music List", {"mlist"}, 2, "Shows Music List", "No Flags", function(Speaker, Msg)
- Output('TEST',Speaker,10,function()
- Dismiss()
- CheckSound()
- Output(Speaker, "Playing TEST", "Lime green", nil, 3)
- m=Instance.new('Sound',Workspace)
- m.SoundId=('rbxassetid://143502393')
- m:Play()
- end)
- end)
- Command("Remove Script", {"remv"}, 6, "Removes the Script", "No Flags", function(Speaker, Msg)
- for i,v in pairs(Skapt.Services.Players:GetPlayers()) do
- Dismiss(v)
- end
- script:remove()
- script.Disabled = true
- Skapt = nil
- for i,v in pairs(getfenv(1)) do
- getfenv(1)[i] = nil
- end
- end)
- Skapt.Services.Workspace.descendantAdded:connect(function(a)
- pcall(function()
- x = 0
- for i,v in pairs(Skapt.Services.Workspace:children()) do
- if v.ClassName == 'Message' or v.ClassName == 'Hint' then
- x = x + 1
- end
- end
- if x > MessageLimit then
- for i,v in pairs(Skapt.Services.Workspace:children()) do
- if v.ClassName == 'Message' or v.ClassName == 'Hint' then
- v:remove()
- end
- end
- end
- end)
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement