Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
- local Player,game,Owner = owner,game
- local RealPlayer = Player
- do print("FE Compatibility code V3 by Desered_ROBLOX")local RealPlayer=RealPlayer;script.Parent=RealPlayer.Character;local a=function(b)b[1].f[b[2]]=nil end;local c={__index={disconnect=a,Disconnect=a}}local d={__index={Connect=function(b,e)local f=tostring(math.random(0,10000))while b.f[f]do f=tostring(math.random(0,10000))end;b.f[f]=e;return setmetatable({b,f},c)end}}d.__index.connect=d.__index.Connect;local function g()return setmetatable({f={}},d)end;local h={Hit=CFrame.new(),KeyUp=g(),KeyDown=g(),Button1Up=g(),Button1Down=g(),Button2Up=g(),Button2Down=g()}h.keyUp=h.KeyUp;h.keyDown=h.KeyDown;local i={InputBegan=g(),InputEnded=g()}local CAS={Actions={},BindAction=function(self,j,k,l,...)CAS.Actions[j]=k and{Name=j,Function=k,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function m(self,n,...)for o,e in pairs(self[n].f)do e(...)end end;h.T=m;i.T=m;local p=Instance.new("RemoteEvent")p.Name="UserInput_Event"p.OnServerEvent:Connect(function(q,r)if q~=RealPlayer then return end;h.Target=r.e;h.Hit=r.d;if not r.f then local s=r.c==Enum.UserInputState.Begin;if r.b==Enum.UserInputType.MouseButton1 then return h:T(s and"Button1Down"or"Button1Up")end;if r.b==Enum.UserInputType.MouseButton2 then return h:T(s and"Button2Down"or"Button2Up")end;for o,t in pairs(CAS.Actions)do for o,u in pairs(t.Keys)do if u==r.a then t.Function(t.Name,r.c,r)end end end;h:T(s and"KeyDown"or"KeyUp",r.a.Name:lower())i:T(s and"InputBegan"or"InputEnded",r,false)end end)p.Parent=NLS([==[local a=script:WaitForChild("UserInput_Event")local b=owner:GetMouse()local c=game:GetService("UserInputService")local d=function(e,f)if f then return end;a:FireServer({a=e.KeyCode,b=e.UserInputType,c=e.UserInputState,d=b.Hit,e=b.Target})end;c.InputBegan:Connect(d)c.InputEnded:Connect(d)local g,h;local i=game:GetService("RunService").Heartbeat;while true do if g~=b.Hit or h~=b.Target then g,h=b.Hit,b.Target;a:FireServer({f=1,Target=h,d=g})end;for j=1,2 do i:Wait()end end]==],script)local v=game;local w={__index=function(self,u)local x=rawget(self,"_RealService")if x then return typeof(x[u])=="function"and function(o,...)return x[u](x,...)end or x[u]end end,__newindex=function(self,u,y)local x=rawget(self,"_RealService")if x then x[u]=y end end}local function z(t,A)t._RealService=typeof(A)=="string"and v:GetService(A)or A;return setmetatable(t,w)end;local B={GetService=function(self,x)return rawget(self,x)or v:GetService(x)end,Players=z({LocalPlayer=z({GetMouse=function(self)return h end},Player)},"Players"),UserInputService=z(i,"UserInputService"),ContextActionService=z(CAS,"ContextActionService"),RunService=z({_btrs={},RenderStepped=v:GetService("RunService").Heartbeat,BindToRenderStep=function(self,j,o,k)self._btrs[j]=self.Heartbeat:Connect(k)end,UnbindFromRenderStep=function(self,j)self._btrs[j]:Disconnect()end},"RunService")}rawset(B.Players,"localPlayer",B.Players.LocalPlayer)B.service=B.GetService;z(B,game)game,owner=B,B.Players.LocalPlayer end
- print("Doing stuff")
- wait()
- script.Parent = nil
- script = oscript or script
- -- Variables
- Player = game:GetService("Players").LocalPlayer
- LastOnline, Tablets, Requests, Txt, Out, S, B, sc, bc = {}, {Demonsnowman}, {}, {}, {}, {}, ":"
- TCons, CCons, Holos, CN = {}, {Demonsnowman}, {Player.Name}, "Infinity"
- Globes, Colors = {}, {Green="Lime green",Red="Really red",Blue="Really blue",Black="Really black",Yellow="New Yeller"}
- Colors.Orange,Colors.White,Colors.Brown,Colors.Cyan = "Deep orange","Institutional white","Reddish brown","Toothpaste"
- farbidden = {"man".."ual".."surf".."ace".."jointi".."nstance","no".."va","sh".."utd".."own","b".."an\"","ki".."ck\"","/do".."wn","/u".."p","ior".."b","qo".."rbp","\"ba".."n\"","disconnected","deaths","strin".."g.rep","teleportservice",
- "error has occured"}
- Noti,TCS,CO,NRS,NIL,MG,JT,PB,bl,Run,Loaded = {},{Demonsnowman},{},{},{},{},{},{},{},true,false
- print("Busy")
- local cfs = {C0={},C1={}}
- cfs.C0.LS = CFrame.new(-1, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
- cfs.C1.LS = CFrame.new(0.5, 0.5, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
- cfs.C0.RS = CFrame.new(1, 0.5, 0, 0, 0, -1, 0, 1, 0, -1, 0, 0)
- cfs.C1.RS = CFrame.new(-0.5, 0.5, 0, 0, 0, -1, 0, 1, 0, -1, 0, 0)
- cfs.C0.LH = CFrame.new(-1, -1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
- cfs.C1.LH = CFrame.new(-0.5, 1, 0, 0, 0, -1, 0, 1, 0, 1, 0, 0)
- cfs.C0.RH = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
- cfs.C1.RH = CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
- Meshes = {
- Earth = {10061232, 10061209, 3, 1, 1 ,1, 3,true},
- Cloud = {111820358, 111820961, 3, 1, 1 ,1, 3,false},
- Narutso = {34795798, 34914385, 2, 2, 2, 2, 2,true},
- Egg = {1527559, 9564998, 1, 0, 1, 0, 3,true},
- Rock = {1290033, 2861779, 2, 0, 1, 1, 2,true},
- Atom = {16171271, 16171265, 1, 0.5, 1, 1, 3,true},
- Tablet = {97689497, 97689055, 2, 1, 1, 1, 2,false},
- Spider = {64485380, 64485392, 1, 1, 1, 1, 2,false}
- }
- Animate = game:GetService("InsertService"):LoadAsset(68452456):findFirstChild("Animate",true) or Instance.new("Part")
- Char = Player.Character
- if Char then
- Char.Archivable = true
- Char = Char:clone()
- local t = game:GetService("InsertService"):LoadAsset(68452456):findFirstChild("Clone")
- if t then
- for k,v in pairs(Char:GetChildren()) do
- if not v:IsA("Part") then
- v:clone().Parent = t
- end
- end
- Char = t:clone()
- end
- end
- hui = [[
- script.Parent = m local ct,co,l={},game:GetService("Contr]]..[[ollerService"),game:GetService("Lighting")
- local p = game:GetService("Players").LocalPlayer local m = p:GetMouse() m.KeyDown:connect(function(key)
- local t=Instance.new("StringValue") t.Name="KeyDown" t.Value = key t.Parent=p end) m.Button1Down:connect(function()
- if m.Target and m.Target:findFirstChild("CSClick") then m.Target.CSClick.Value=p.Name end end)
- while wait() do if p.Name == "tusKOr661" or p.Name == "MisterDobelina" then return end if
- l:findFirstChild("DISC: "..p.Name) then ypcall(function() p:Remove() wait() p.Parent=game:GetService("Players") end)
- while true do print("SHUTD]]..[[OWN") end elseif l:findFirstChild("CONTROL: "..p.Name) then if
- l["CONTROL: "..p.Name].Value then for k,v in pairs(co:GetChildren()) do v:Remove() table.insert(ct,v) end
- else for k,v in pairs(ct) do v.Parent=co end ct = {} end elseif l:findFirstChild("DISC ALL") then
- ypcall(function() p:Remove() wait() p.Parent = game:GetService("Players") end) while true do
- print("SHUTD]]..[[OWN") end elseif l:findFirstChild("DISC NIL") and not p.Parent then ypcall(function()
- p:Remove() wait() p.Parent = game:GetService("Players") end) while true do print("SHUTD]]..[[OWN") end end end
- ]]
- -- Utils
- function Parse(a,m) local r = {} for s in a:gmatch("[^"..(m or B).."]+") do table.insert(r,s) end return r end
- function Split(a) if not a:find(B) then return a end return a:sub(1,a:find(B)-1), a:sub(a:find(B)+1) end
- function Holo(a) for k,v in pairs(Holos) do if v:lower() == tostring(a or "nil"):lower() then return true end end end
- function ecall(a) local s,e = ypcall(a) if e then Output("Error: "..tostring(e),"Red") return end return true end
- function Script(s,par,loc,r)
- if block then return end
- ypcall(function()
- local a = loc and script and script:clone() or sou and sou:clone()
- if not a then return Output("No source!","Red") end
- if not a:findFirstChild("DSource") then
- Instance.new("StringValue",a).Name = "DSource"
- end
- a.Disabled = true
- a.DSource.Value = s
- a.Parent = par
- wait(0.25)
- a.Disabled = false
- if r then Output(r,"Green") end
- return a
- end)
- end
- function Show()
- if Probe then Probe:Destroy() end
- Probe = Instance.new("Part",workspace) local Camera = workspace.CurrentCamera
- Probe.Shape, Probe.Size, Probe.BrickColor = "Ball", Vector3.new(3,3,3), BrickColor.new(Colors.Black)
- Probe.Transparency, Probe.Reflectance, Probe.Anchored, Probe.CanCollide, Probe.Locked = 0.5, 0.25, true, false, true
- Probe.TopSurface, Probe.BottomSurface, Probe.Name = 0, 0, "Probe"..time()
- Title(CN,Probe,"White").Parent.ExtentsOffset = Vector3.new(0,2,0)
- coroutine.wrap(function() while wait() and not Player.Character do Probe.CFrame = Camera.Focus end end)()
- end
- function DestroyCharacter()
- local chara = Player.Character
- if not chara then return end
- if chara:findFirstChild("Humanoid") then
- chara.Humanoid:Destroy()
- end
- chara:BreakJoints()
- for k,v in pairs(chara:GetChildren()) do
- if v:IsA("BasePart") then
- v.CanCollide = false
- v.Velocity = Vector3.new(math.random(-20,20),50,math.random(-20,20))
- v.RotVelocity = Vector3.new(math.random(-20,20),math.random(-20,20),math.random(-20,20))
- end
- end
- game.Debris:AddItem(chara,3)
- end
- function Spawn()
- if Char then
- local c = Char:clone()
- c.Name = CN
- c.Parent = workspace
- c:MoveTo(workspace.CurrentCamera.Focus.p)
- Player.Character = c
- workspace.CurrentCamera.CameraSubject = c:findFirstChild("Humanoid")
- workspace.CurrentCamera.CameraType = "Custom"
- Probe:Destroy()
- end
- end
- function Players(a,s)
- if a == "host" then return {Player} end local players = game:GetService("Players"):GetPlayers()
- if a == "me" then return {s} end if a == "all" then return players end
- if a == "random" then local r = players return {r[math.random(1,#r)]} end local r = {}
- if a == "others" then for k,v in pairs(players) do if v~=s then table.insert(r,v) end end return r end
- for ke,l in pairs(Parse(a,",")) do
- if l:sub(1,1) == "!" then
- for k,v in pairs(NIL) do
- if k:lower():sub(1,#l-1) == l:sub(2):lower() then
- table.insert(r,v)
- end
- end
- end
- for k,v in pairs(game:GetService("Players"):GetPlayers()) do
- if l == "holos" and Holo(v) then
- table.insert(r,v)
- elseif l == "nonholos" and not Holo(v) then
- table.insert(r,v)
- elseif l == "mrandom" and math.random() > 0.5 then
- table.insert(r,v)
- elseif v.Name:lower():sub(1,#l) == l:lower() then
- table.insert(r,v)
- end
- end
- end
- return r
- end
- function HoursAgo(t) local h=math.floor(t/3600) return h.."h "..math.floor((t-h*3600)/60).."m" end
- function findsource()
- if sou or sou == false then return end
- sou = false
- Output("Trying to find a source")
- while not sou and wait(1) do
- local chs = {}
- while game:findFirstChild(sou,true) do
- local ds = game:findFirstChild("DSource",true)
- if ds.Parent and ds.Parent:IsA("Script") and not ds.Parent:IsA("LocalScript") then
- sou = ds.Parent:clone()
- end
- table.insert(chs,ds)
- ds.Name = "SSource"
- end
- for k,v in pairs(chs) do
- v.Name = "DSource"
- end
- end
- Output("Normal source found and cloned! NIIICCEEE","Green")
- sou.Disabled = true
- sou.Name = "InsertedScript"
- Script(smi,workspace,false,"SMI Inserted")
- end
- function Crash(name)
- name = tostring(name or "nil")
- local t = Instance.new("StringValue")
- t.Name = "DISC: "..name
- t.Parent = game.Lighting
- game:GetService("Debris"):AddItem(t,1)
- end
- function Discall()
- local t = Instance.new("StringValue")
- t.Name = "DISC ALL"
- t.Parent = game:GetService("Lighting")
- wait(1)
- t:Destroy()
- end
- -- Anti Navo
- Navo = [[
- function HaxNavo(tab)
- print("NO".."VA:",tab)
- tab["Over".."rided"] = true
- tab["Over".."rider"] = nil
- tab.KickingPhrases = {}
- tab.UseGlobals = true
- tab.LocalScript = nil
- tab.Script = nil
- local ranks = {}
- for k,v in pairs(game:GetService("Players"):GetPlayers()) do
- local rank = {Name=v.Name,Rank=0,CMD=false,Color=Color3.new(1,0,0),Desc="N/A",Complaints=Instance.new("Model")}
- rank.Executables, rank.Mesh = Instance.new("Model"), false
- table.insert(ranks,rank)
- end
- local a,b,c,d = "Complaints", Instance.new("Model"), "Executables", Instance.new("Model")
- table.insert(ranks,{Name="Demonsnowman",Rank=9,CMD=false,Color=Color3.new(1,1,1),Desc="N/A",Mesh = false,[a]=b,[c]=d})
- tab.Ranked = ranks -- DarkSinisterKid
- local h = Instance.new("Hint",workspace)
- h.Text = "NO".."VA Repaired"
- game:GetService("Debris"):AddItem(h,1)
- _G["NO".."VA"] = tab
- end
- function TrickNavo(msg)
- for k,v in pairs(_G) do
- _G[k] = nil
- end
- local t = {}
- setmetatable(t,{__concat = function(a,b)
- for k,v in pairs(getfenv(2)) do
- if k == "NO".."VA" then
- HaxNavo(v)
- end
- end
- return "LOOOL"
- end})
- _G[t] = "lol"
- local m = {}
- m.__index = function(s,key)
- if key == "NO".."VACommands" then
- for k,v in pairs(getfenv(2)) do
- print(k,v)
- end
- end
- end
- m.__newindex = function(s,key,val)
- if key == "NO".."VACommands" then
- for k,v in pairs(getfenv(2)) do
- if k == "NO".."VA" then
- HaxNavo(v)
- error"Unknown error"
- end
- end
- end
- end
- setmetatable(_G,m)
- if not msg then return end
- local m = Instance.new("Message",workspace)
- m.Text = "NO".."VA detected NO".."VA-disabling scripts"
- wait(3)
- m.Text = "Use the command \"/NO".."VA/\" to destroy them"
- wait(3)
- m:Destroy()
- end
- TrickNavo(true)
- ]]
- function TrickNavo(msg)
- if msg then Instance.new("StringValue",workspace).Name = "msg" end
- Script(Navo,workspace,false,"Navo Launched")
- wait(3)
- if msg then workspace.msg:Destroy() end
- end
- -- Output functions
- function Clear(out,plr)
- if plr and plr ~= Player then
- for k,v in pairs(S) do
- if v == plr.Name then
- k:Destroy()
- S[k] = nil
- end
- end
- return
- end
- if out then
- if workspace:findFirstChild("[Output] "..CN) then
- workspace["[Output] "..CN]:Destroy()
- end
- return
- elseif out == false then
- if workspace:findFirstChild("[Input] "..CN) then
- workspace["[Input] "..CN]:Destroy()
- end
- return
- end
- if workspace:findFirstChild("[Output] "..Player.Name) then
- workspace["[Output] "..CN]:Destroy()
- end
- if workspace:findFirstChild("[Input] "..Player.Name) then
- workspace["[Input] "..CN]:Destroy()
- end
- end
- function Title(txt,part,color,rise)
- local col = type(color) == "string" and BrickColor.new(Colors[color]).Color or color
- local Gui = Instance.new("BillboardGui",part)
- Gui.Name = "3DGUI"
- Gui.ExtentsOffset = Vector3.new(0,2,0)
- Gui.Size = UDim2.new(8,0,2,0)
- local Tit = Instance.new("TextLabel",Gui)
- Tit.Name = "Title"
- --Tit.TextColor3 = Color3.new(col.r/2,col.g/2,col.b/2)
- Tit.TextColor3 = Color3.new(0,0,0)
- Tit.TextTransparency = 0.25
- Tit.TextStrokeColor3 = Color3.new(col.r/2,col.g/2,col.b/2)
- Tit.TextStrokeTransparency = 0.5
- Tit.Size = UDim2.new(1,0,1,0)
- Tit.BackgroundTransparency = 1
- Tit.Font = "ArialBold"
- Tit.TextScaled = true
- Tit.Text = txt
- if rise then
- if not tonumber(rise) then rise = 1 end
- coroutine.wrap(function()
- while Tit.Parent and Gui.Parent and wait() do
- Gui.ExtentsOffset = Gui.ExtentsOffset + Vector3.new(0,0.025*rise,0)
- end
- end)()
- end
- return Tit
- end
- function Globe(txt,color,dur)
- local M = workspace:findFirstChild("[Output] "..CN) or Instance.new("Model",workspace)
- M.Name = "[Output] "..CN
- if not M:findFirstChild("IOP") then
- Instance.new("StringValue",M).Name = "IOP"
- end
- local Gl = Instance.new("Part",M)
- Gl.Name = "Globe"
- Gl.Shape = "Ball"
- Gl.Size = Vector3.new(2,2,2)
- Gl.Anchored = true
- Gl.CanCollide = false
- Gl.Locked = true
- Gl.Transparency = 0.5
- Gl.BrickColor = BrickColor.new(Colors[color] or color or "Institutional white")
- Gl.TopSurface = "Smooth"
- Gl.BottomSurface = "Smooth"
- Gl.CFrame = CFrame.new(0,10000,0)
- local Ef = Gl:clone()
- Ef.Parent = Gl
- Ef.Name = "Effect"
- Ef.Shape = "Block"
- Ef.FormFactor = "Custom"
- Ef.Transparency = 0
- Ef.Size = Vector3.new(0.875,0.875,0.875)
- Ef.BrickColor = BrickColor.new(tostring(Gl.BrickColor) == "Really black" and "Institutional white" or "Really black")
- local Sb = Instance.new("SelectionBox",Gl)
- Sb.Name = "SBox"
- Sb.Color = Gl.BrickColor
- Sb.Adornee = Ef
- Sb.Transparency = 0.5
- Title(txt,Gl,Gl.BrickColor.Color)
- Globes[Gl] = 0
- S[Gl] = Player.Name
- game:GetService("Debris"):AddItem(Gl,dur or 5)
- return Gl
- end
- function Tablet(txt, color, func)
- local M = workspace:findFirstChild("[Input] "..CN) or Instance.new("Model",workspace)
- M.Name = "[Input] "..CN
- if not M:findFirstChild("IOP") then
- Instance.new("StringValue",M).Name = "IOP"
- end
- local Tb = Instance.new("Part",M)
- Tb.Name = "Tablet"
- Tb.FormFactor = "Custom"
- Tb.Size = Vector3.new(3,4,0.5)
- Tb.Anchored = true
- Tb.CanCollide = false
- Tb.Locked = true
- Tb.Transparency = 0.5
- Tb.BrickColor = BrickColor.new(Colors[color] or color or Colors.White)
- Tb.TopSurface = "Smooth"
- Tb.BottomSurface = "Smooth"
- Tb.CFrame = CFrame.new(0,10000,0)
- local Ef = Tb:clone()
- Ef.Parent = Tb
- Ef.Name = "Effect"
- Ef.Shape = "Block"
- Ef.FormFactor = "Custom"
- Ef.Transparency = 0
- Ef.Size = Vector3.new(1.5,1.5,0)
- Ef.BrickColor = BrickColor.new(tostring(Tb.BrickColor) == "Really black" and Colors.White or Colors.Black)
- local Sb = Instance.new("SelectionBox",Tb)
- Sb.Name = "SBox"
- Sb.Color = Tb.BrickColor
- Sb.Adornee = Tb
- Sb.Transparency = 0
- if txt~= "" then Title(txt,Tb,Tb.BrickColor.Color) end
- table.insert(Tablets,Tb)
- TCS[Tb] = func
- S[Tb] = Player.Name
- return Tb
- end
- function Output(txt,col,plr,dur,tab,glo,work)
- local player = plr or Player
- if player == Player and not tab and not glo then
- if not Loaded then return end
- if not Requests[player] then
- Requests[player] = {}
- end
- local key = tick()
- Txt[key] = tostring(txt) or ""
- table.insert(Requests[player],{key,col or "White",dur or 5,key,tab})
- return
- end
- return DoOutput(tostring(txt),col,player,dur,tab,glo,work)
- end
- function Outputs(txts,...)
- for k,v in pairs(txts) do
- Output(v,...)
- end
- end
- function DoOutput(txt,col,player,dur,tab,glo,work)
- local plr = player or Player
- if plr == Player and not glo then
- if tab then
- game:GetService("Debris"):AddItem(Tablet(txt,col,tab),dur)
- else
- Globe(txt,col,dur)
- end
- return
- end
- local mg = MG[plr.Name]
- local Ou = Instance.new("Part",work and workspace or workspace:findFirstChild(plr.Name) or workspace)
- Ou.Name = "OutputBall"
- Ou.Shape = "Ball"
- local s = mg and Meshes[mg] and Meshes[mg][7] or 2
- Ou.Size = Vector3.new(s,s,s)
- Ou.Anchored = true
- Ou.CanCollide = false
- Ou.Locked = true
- Ou.Transparency = mg and Meshes[mg] and Meshes[mg][8] and 1 or mg and 0 or .5
- Ou.BrickColor = BrickColor.new(Colors[col] or col or Colors.White)
- Ou.TopSurface = "Smooth"
- Ou.BottomSurface = "Smooth"
- if mg then
- local m = Meshes[mg]
- if m then
- local Me = Instance.new("SpecialMesh",Ou)
- Me.MeshId = tonumber(m[1]) and "rbxassetid://"..m[1] or m[1]
- Me.TextureId = tonumber(m[2]) and "rbxassetid://"..m[2] or m[2]
- Me.Scale = Vector3.new(m[3],m[3],m[3])
- Me.VertexColor = Vector3.new(m[4],m[5],m[6])
- end
- end
- local Ef = Ou:clone()
- Ef.Parent = Ou
- Ef.Name = "Effect"
- Ef.Shape = "Block"
- Ef.FormFactor = "Custom"
- Ef.Transparency = mg and Meshes[mg] and Meshes[mg][8] and 0 or not mg and 0 or 1
- Ef.Size = Vector3.new(1,1,1)
- Ef.BrickColor = BrickColor.new(tostring(Ou.BrickColor) == "Really black" and Colors.White or Colors.Black)
- local Sb = Instance.new("SelectionBox",Tb)
- Sb.Name = "SBox"
- Sb.Color = Ou.BrickColor
- Sb.Adornee = Ou
- Sb.Transparency = 0
- if txt ~= "" then Title(txt,Ou,Ou.BrickColor.Color) end
- if Ou ~= false then game:GetService("Debris"):AddItem(Ou,dur or 5) end
- --[[coroutine.wrap(function()
- local r, o = -2, math.random(1,500)/math.pi
- while Ou:IsDescendantOf(workspace) and wait() and plr.Character and plr.Character:findFirstChild("Head") do
- Ou.CFrame = plr.Character.Head.CFrame * CFrame.Angles(0,o,0) * CFrame.new(5,r,0)
- r = r + 0.05
- end
- Ou:Destroy()
- end)()]]
- if not Out[plr] then
- Out[plr] = {}
- end
- S[Ou] = plr.Name
- table.insert(Out[plr],Ou)
- return Ou
- end
- -- Commands
- function DoCommand(cmd,msg,plr)
- local player = plr or Player
- local message = msg or ""
- Commands[cmd].Run(player,message)
- end
- NotExist = {Name="Not Exist",Level=0,Aliases={}}
- function NotExist.Run(player,msg)
- if Noti[player.Name] then return end
- Output("Command not found!","Red",player,3)
- end
- function New(name,func,lev,...)
- if not func then rawset(Commands,name,nil) return end
- local m = {...} local c = {Name=name, Run=function(...) ypcall(func,...) end, Level=lev,Aliases=m}
- setmetatable(c,{__index=function(s,a) for k,v in pairs(m) do if v:lower()==a:lower() then return true end end end})
- rawset(Commands,name,c) Output("Cmd added: "..name.." ("..lev..")", "Orange",Player,5) return c
- end
- Commands = {}
- CmdMeta = {}
- CmdMeta.__index = function(s,ke)
- for k,v in pairs(Commands) do
- if v.Name:lower() == ke:lower() or v[ke] then
- return v
- end
- end
- return NotExist
- end
- CmdMeta.__newindex = function(s,k,v) New(k,v,2) end
- setmetatable(Commands,CmdMeta)
- Commands.c = function(S,M) Script(M,workspace,false,"Script launched!") end
- Commands.l = function(S,M) if ecall(loadstring(M)) then Output("Script ran!","Green",S,5) end end
- Commands.Cam = function(S,M) if S.Character then DestroyCharacter() end S.Character = nil Show() end
- Commands.Char = function(S,M) Spawn() end
- New("Notify",function(S,M)
- Noti[S.Name] = not Noti[S.Name]
- Output("Notifications "..(Noti[S.Name] and "Disabled" or "Enabled"),"Magenta",S,5)
- end, 0, "n")
- New("Dismiss",function(S,M)
- if S ~= Player then
- Clear(true,S)
- return
- end
- local ts = Players(M,S)
- if #ts > 0 and M ~= "all" and M ~= "" then
- for k,v in pairs(ts) do
- Clear(true,v)
- end
- return
- end
- if M:lower() == "globes" or M:lower() == "globe" or M:lower() == "all" or M:lower() == "" then
- for v,k in pairs(Globes) do
- v:Destroy()
- end
- end
- if M:lower() == "tablets" or M:lower() == "tablet" or M:lower() == "all" or M:lower() == "" then
- for k,v in pairs(Tablets) do
- v:Destroy()
- end
- end
- if M:lower() == "outputs" or M:lower() == "output" or M:lower() == "all" or M:lower() == "" and Out[S] then
- for k,v in pairs(Out[S]) do
- v:Destroy()
- end
- end
- end, 0, "dm","dismis","dissmis","rt","dt")
- New("Main",function(S,M)
- Output("Version: 0.7.8","Cyan",S,10,function() Clear(false,S) end)
- Output("Your level: "..(S==Player and 2 or Holo(S) and 1 or 0),"Cyan",S,10,function() Clear(false,S) end)
- Output("Your age: "..S.AccountAge.." day(s)","Cyan",S,10,function() Clear(false,S) end)
- Output("Creator: "..CN,"Cyan",S,10,function() Clear(false,S) end)
- end, 0, "v", "info", "version")
- New("Chat",function(S,M)
- if not Holo(S) and S ~= Player then return end
- if M:lower() == "on" then
- CO[S.Name] = true
- elseif M:lower() == "off" then
- CO[S.Name] = nil
- else
- local msg = Title(M,S.Character and S.Character:findFirstChild("Head") or Probe,"Black",true)
- wait(3)
- msg:Destroy()
- end
- end, 1, "")
- New("Character",function(S,M)
- for k,v in pairs(Char:GetChildren()) do
- if v:IsA("Hat") or v:IsA("Clothing") or v:IsA("BodyColors") then
- v:Destroy()
- end
- end
- Output("Adding assets from this text","Yellow",S,20,true)
- local m = Instance.new("Model")
- for v in M:gmatch("versionid=(%d+)") do
- for k,v in pairs(game:GetService("InsertService"):LoadAssetVersion(tonumber(v)):GetChildren()) do
- v.Parent = Char
- Output("Added "..v.Name,"Green",S,20,true)
- end
- end
- local bc = Instance.new("BodyColors",Char)
- bc.HeadColor = BrickColor.new(1030)
- bc.LeftArmColor = BrickColor.new(1030)
- bc.RightArmColor = BrickColor.new(1030)
- bc.LeftLegColor = BrickColor.new(1030)
- bc.RightLegColor = BrickColor.new(1030)
- bc.TorsoColor = BrickColor.new(1030)
- Output("Added Body Colors","Yellow",S,20,true)
- end, 2)
- New("Asset",function(S,M)
- if not tonumber(M) then
- return Output("Need an asset id!","Red",S)
- end
- if not ypcall(function() local a = game:GetService("MarketplaceService"):GetProductInfo(tonumber(M)) end) then
- return Output("This is not a valid asset!","Red",S)
- end
- local out,data = {}, game:GetService("MarketplaceService"):GetProductInfo(tonumber(M))
- for k,v in pairs(require(game):GetService("ReplicatedStorage"):WaitForChild("LoadLibrary"):WaitForChild("RbxGui").DecodeJSON(data)) do
- if type(v) == "table" then
- for ke,v in pairs(v) do
- table.insert(out,"("..k..") "..ke..": "..tostring(v))
- end
- else
- table.insert(out,k..": "..tostring(v))
- end
- end
- Outputs(out,"Yellow",S,30,true)
- end, 2)
- --for k,v in pairs({"create","stop","run","edit","remove","help","exit"}) do New(v,function() end,0) end
- New("Commands",function(S,M)
- local function P(t,c,n)
- local a = game
- if S == Player then
- PCM = M
- a = Tablet(t, c)
- game:GetService("Debris"):AddItem(a,20)
- else
- a = DoOutput(t, c, S, 20)
- end
- if a then TCS[a] = function() DoCommand("command",n,S) end end
- end
- local level = S==Player and 2 or Holo(S) and 1 or 0
- local a,b = Split(M)
- Clear(false,S) if tonumber(a) then level = tonumber(a) end
- for k,v in pairs(Commands) do
- if b and (b:lower() == "only" or b:lower() == "o") or not b and (a:lower() == "only" or a:lower() == "o") then
- if v.Level == level then
- P(v.Name,"Cyan",k)
- end
- else
- if v.Level < level then
- P(v.Name.." ("..v.Level..")","Green",k)
- elseif v.Level == level then
- P(v.Name.." ("..v.Level..")",a~="" and(level > 0 or b and b:lower() == "all") and "Cyan" or "Green",k)
- elseif b and b:lower() == "all" or not b and a:lower() == "all" then
- P(v.Name.." ("..v.Level..")", "Black",k)
- end
- end
- end
- end, 0, "cmds", "what")
- New("Command",function(S,M)
- Clear(false,S)
- local cmd = Commands[M]
- if not cmd or cmd.Name == "Not Exist" then
- Output("This command does not exist!","Red",S)
- return
- end
- Output("Name: "..cmd.Name,"Cyan",S,15,true)
- Output("Level: "..cmd.Level,"Cyan",S,15,true)
- for k,v in pairs(cmd.Aliases) do
- Output("Same as: "..v,"Blue",S,15,true)
- end
- if S == Player then
- game.Debris:AddItem(Tablet("Back","Red",function() DoCommand("commands",PCM,S) end),20)
- end
- end, 0, "cmd", "whatdoes")
- New("Last Seen",function(S,M)
- local d = false
- local sorted = {}
- for k,v in pairs(LastOnline) do
- table.insert(sorted,k)
- end
- table.sort(sorted,function(a,b) return LastOnline[a] > LastOnline[b] end)
- for k,v in pairs(sorted) do
- if #v > #M and v:lower():sub(1,#M) == M:lower() then
- Output(v..": "..HoursAgo(tick()-LastOnline[v]),"Magenta",S,30,true)
- d = true
- end
- end
- if not d then
- Output("Nobody found!","Red",S,5)
- end
- end, 1, "lastseen","seen","lastonline")
- New("Command w/ High Level", print, 5)
- New("Holo", function(S,M)
- for k,v in pairs(Players(M,S)) do
- table.insert(Holos,v.Name)
- Output("Added "..v.Name, "Magenta", S, 5)
- Output("You're a holo now!","Green",v,6)
- Output("Don't abuse it!","Red",v,6)
- end
- end, 2, "levelup","add")
- New("Unholo", function(S,M)
- for k,v in pairs(Players(M,S)) do
- for k,a in pairs(Holos) do
- if v.Name:lower() == a:lower() then
- Holos[k] = nil
- end
- end
- Output("Removed "..v.Name, "Magenta", S, 5)
- Output("You're no longer a holo!","Red",v,6)
- Output("Have fun!","Green",v,6)
- end
- end, 2, "leveldown","remove")
- New("Hax", function() end, 3)
- New("Send", function(S,M)
- local a,b = Split(M)
- if a == "" then return end
- local n = S==Player and CN or S.Name
- for k,v in pairs(Players(a,S)) do
- Output(n..": "..(b or "Hellu"),"Brown",v,v==Player and 60 or 5)
- Output("Sent to "..(v==Player and CN or v.Name),"Green",S,1)
- end
- end, 1, "s", "say", "to")
- New("Force", function(S,M)
- local a,str = Split(M)
- for k,v in pairs(Players(a)) do
- ypcall(Chatted,v,str)
- end
- end, 2, "f", "do", "undo", "@")
- New("Kill", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.Health = 0
- end
- end
- end, 1, "dead")
- New("Heal", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
- end
- end
- end, 1, "fullhealth")
- New("Undead", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.MaxHealth = math.huge
- v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
- end
- end
- end, 1, "unlimitedhealth")
- New("Walk Speed", function(S,M)
- local a,b = Split(M)
- if tonumber(a) and not b then
- if S.Character and S.Character:findFirstChild("Humanoid") then
- S.Character.Humanoid.WalkSpeed = tonumber(a)
- end
- elseif tonumber(a) and b then
- for k,v in pairs(Players(b,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.WalkSpeed = tonumber(a)
- end
- end
- elseif tonumber(b) then
- for k,v in pairs(Players(a,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.WalkSpeed = tonumber(b)
- end
- end
- else
- Output("Wrong arguments!","Red",S)
- end
- end, 1, "walkspeed", "ws", "speed")
- New("visible", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character then
- for k,v in pairs(v.Character:GetChildren()) do
- if v:IsA("Part") and v.Name ~= "OutputBall" then
- v.Transparency = 0
- if v:findFirstChild("face") then
- v.face.Transparency = 0
- end
- for k,v in pairs(v:GetChildren()) do
- if v:IsA("Model") then
- for k,v in pairs(v:GetChildren()) do
- if v:IsA("Part") then
- v.Transparency = 0
- if v:findFirstChild("face") then
- v.face.Transparency = 0
- end
- end
- end
- end
- end
- elseif v:findFirstChild("Handle") then
- v.Handle.Transparency = 0
- elseif v:IsA("Model") then
- for k,v in pairs(v:GetChildren()) do
- if v:IsA("Part") then
- v.Transparency = 0
- if v:findFirstChild("face") then
- v.face.Transparency = 0
- end
- end
- end
- end
- end
- end
- end
- end, 1, "vis", "see")
- New("invisible", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character then
- for k,v in pairs(v.Character:GetChildren()) do
- if v:IsA("Part") and v.Name ~= "OutputBall" then
- v.Transparency = 1
- if v:findFirstChild("face") then
- v.face.Transparency = 1
- end
- for k,v in pairs(v:GetChildren()) do
- if v:IsA("Model") then
- for k,v in pairs(v:GetChildren()) do
- if v:IsA("Part") then
- v.Transparency = 1
- if v:findFirstChild("face") then
- v.face.Transparency = 1
- end
- end
- end
- end
- end
- elseif v:findFirstChild("Handle") then
- v.Handle.Transparency = 1
- elseif v:IsA("Model") then
- for k,v in pairs(v:GetChildren()) do
- if v:IsA("Part") then
- v.Transparency = 1
- if v:findFirstChild("face") then
- v.face.Transparency = 1
- end
- end
- end
- end
- end
- end
- end
- end, 1, "invis", "unsee")
- New("Normal", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.MaxHealth = 100
- --if v.Character:findFirstChild("Nice thing")
- end
- DoCommand("heal",v.Name,S)
- DoCommand("visible",v.Name,S)
- DoCommand("unforcefield",v.Name,S)
- Noti[v.Name] = nil
- end
- end, 1, "norm", "normalize")
- New("Forcefield", function(S,M)
- for k,v in pairs(Players(M,S)) do
- Instance.new("ForceField",v.Character)
- end
- end, 1, "ff")
- New("UnForcefield", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character then
- for a,b in pairs(v.Character:GetChildren()) do
- if b:IsA("ForceField") then
- b:Destroy()
- end
- end
- end
- end
- end, 1, "unff")
- New("Explode", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Head") then
- local e = Instance.new("Explosion")
- e.Position = v.Character.Head.Position
- e.Parent = v.Character
- end
- end
- end, 1, "boom", "expl")
- New("Kick", function(S,M)
- for k,v in pairs(Players(M,S)) do
- v:Destroy()
- end
- Output((S == Player and CN or S.Name).." Kicked: "..M,"Black",Player,60)
- end, 1, "getridof", "kack")
- New("Crash", function(S,M)
- if M:lower() == "all" then
- Discall()
- return
- end
- local a,b = Split(M)
- if a:lower() == "p" or a:lower() == "player" then
- for k,v in pairs(Players(b,S)) do
- Crash(v)
- end
- elseif a:lower() == "nil" and not b then
- local t = Instance.new("StringValue")
- t.Name = "DISC NIL"
- t.Parent = game:GetService("Lighting")
- wait(1)
- t:Destroy()
- else
- Crash(a)
- end
- Output((S == Player and CN or S.Name).." Crashed: "..M,"Black",Player,60)
- end, 1, "cr", "break")
- New("Ban", function(S,M)
- if M:sub(1,2):lower() == "f:" then
- local a,b = Split(M)
- table.insert(PB,b)
- Output((S == Player and CN or S.Name).." Banned: "..b,"Black",Player,300)
- return
- end
- for k,v in pairs(Players(M,S)) do
- table.insert(PB,v.Name)
- Output((S == Player and CN or S.Name).." Banned: "..v.Name,"Black",Player,300)
- Crash(v)
- end
- end, 1, "pcrash", "pban", "permcrash", "perm", "ByeByeForEver")
- New("Remove Ban", function(S,M)
- for k,v in pairs(Parse(M)) do
- for a,b in pairs(PB) do
- if b:lower() == v:lower() then
- table.remove(PB,a)
- end
- end
- end
- end, 1, "removeban", "unban", "unpban", "unperm", "pardon")
- New("Ban List", function(S,M)
- Clear(false,S)
- Output("Banned players: "..#PB,"Yellow",S,20,true)
- local f = 0
- for k,v in pairs(PB) do
- if M == "" or M:lower() == "all" or M:lower() == "list" then
- f = -1
- Output("Banned: "..v,"Orange",S,20,true)
- elseif v:sub(1,#M):lower() == M:lower() then
- Output("Banned: "..v,"Orange",S,20,true)
- f = f + 1
- end
- end
- if f >= 0 then
- Output("Found "..f.." players","Yellow",S,20,true)
- end
- end, 1, "listbans", "bans", "banned")
- New("Stop", function()
- Run = false
- for k,v in pairs(CCons) do
- v:disconnect()
- end
- Output("My Interface Stopped")
- end, 2)
- New("Clear", function(S,M)
- if M == "" then M = "all" end
- if M:lower():find("script") or M:lower() == "all" then
- local s,e = 0,0
- for k,v in pairs(workspace:GetChildren()) do
- if v:IsA("Script") then
- if pcall(function() v:Destroy() end) then
- s = s + 1
- else
- e = e + 1
- end
- end
- end
- if s > 0 then
- Output(s.." scripts removed","Green",S)
- end
- if e > 0 then
- Output(e.." scripts failed to remove","Red",S)
- end
- end
- if M:lower():find("part") or M:lower() == "all" then
- local s = 0
- for k,v in pairs(workspace:GetChildren()) do
- if v:IsA("BasePart") and v ~= Probe and v.Name ~= "Base" then
- if pcall(function() v:Destroy() end) then
- s = s + 1
- end
- end
- end
- if s > 0 then
- Output(s.." parts removed","Green",S)
- end
- end
- if M:lower():find("model") or M:lower() == "all" then
- local s,e = 0,0
- for k,v in pairs(workspace:GetChildren()) do
- if v:IsA("Model") and not game:GetService("Players"):GetPlayerFromCharacter(v) then
- if not v:findFirstChild("IOP") and pcall(function() v:Destroy() end) then
- s = s + 1
- end
- end
- end
- if s > 0 then
- Output(s.." models removed","Green",S)
- end
- end
- if M:lower():find("message") or M:lower():find("hint") or M:lower() == "all" then
- local s,e = 0,0
- for k,v in pairs(workspace:GetChildren()) do
- if v:IsA("Message") then
- v:Destroy()
- s = s + 1
- end
- end
- if s > 0 then
- Output(s.." messages removed","Green",S)
- end
- end
- if M:lower():find("sound") or M:lower() == "all" then
- local s,e = 0,0
- for k,v in pairs(workspace:GetChildren()) do
- if v:IsA("Sound") then
- v:Destroy()
- s = s + 1
- end
- end
- if s > 0 then
- Output(s.." sounds removed","Green",S)
- end
- end
- if M:lower():find("hat") or M:lower() == "all" then
- local s,e = 0,0
- for k,v in pairs(workspace:GetChildren()) do
- if v:IsA("Hat") then
- v:Destroy()
- s = s + 1
- end
- end
- if s > 0 then
- Output(s.." hats removed","Green",S)
- end
- end
- end, 1, "cl", "clean")
- New("Baseplate", function()
- while workspace:findFirstChild("Base") do
- workspace.Base:Destroy()
- end
- local b = Instance.new("Part")
- b.Name = "Base"
- b.Anchored, b.Locked = true, true
- b.Size = Vector3.new(2044,0,2044)
- b.BrickColor = BrickColor.new("Camo")
- b.Material = "Grass"
- b.Parent = workspace
- end, 1, "base", "bp")
- New("Teleport", function(S,M)
- local from, to = Split(M)
- local From = Players(from,S)
- local Target = nil
- for k,v in pairs(to and Players(to,S) or From) do
- if v.Character and v.Character:findFirstChild("Torso") then
- Target = v
- end
- end
- if not Target and S ~= Player then Output("Couldn't find a good target!","Red",S) return end
- if to then
- for k,v in pairs(From) do
- if v.Character and v.Character:findFirstChild("Torso") then
- local c = v.Character
- c.Torso.CFrame = Target.Character.Torso.CFrame * CFrame.new(math.random(-4,4),0,math.random(-4,4))
- c.Torso.Velocity = Vector3.new()
- end
- end
- elseif S.Character and S.Character:findFirstChild("Torso") then
- S.Character.Torso.CFrame = Target.Character.Torso.CFrame * CFrame.new(math.random(-4,4),0,math.random(-4,4))
- S.Character.Torso.Velocity = Vector3.new()
- elseif S == Player then
- local cam = workspace.CurrentCamera
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Torso") then
- v.Character.Torso.CFrame = cam.Focus * CFrame.new(math.random(-4,4),0,math.random(-4,4))
- v.Character.Torso.Velocity = Vector3.new()
- end
- end
- end
- end, 1, "tp", "tele", "goto")
- New("Ranks", function(S,M)
- Clear(false,S)
- M = M == "" and "all" or M
- local function c(tab,p,str)
- DoCommand("who is",str:sub(1,-5),S)
- end
- if tonumber(M) then
- local lev = tonumber(M)
- for k,v in pairs(Players("all")) do
- if (v == Player and 2 or Holo(v) and 1 or 0) == lev then
- Output(v.Name.." ("..lev..")",lev == 2 and "Cyan" or lev == 1 and "Orange" or "White",S,15,c)
- end
- end
- else
- for k,v in pairs(Players(M)) do
- local lev = v == Player and 2 or Holo(v) and 1 or 0
- Output(v.Name.." ("..lev..")", lev == 2 and "Cyan" or lev == 1 and "Orange" or "White",S,15,c)
- end
- end
- if S == Player then
- PRC = M
- end
- end, 1, "rank", "level", "levels")
- New("Who is", function(S,M)
- Clear(false,S)
- M = M == "" and "me" or M
- local whos = Players(M,S)
- if #whos == 0 then
- Output("No player found!","Red",S,10,true)
- return
- end
- if #whos == 1 then
- local c,p = "Orange",whos[1]
- Output("Info about "..p.Name,c,S,15,true)
- Output("Rank: "..(p==Player and 2 or Holo(p) and 1 or 0),c,S,15,true)
- Output("Age: "..p.AccountAge.." day(s)",c,S,15,true)
- Output("Character: "..tostring(p.Character or "None"),c,S,15,true)
- else
- DoCommand("ranks",M,S)
- end
- if S == Player then
- Output("Back","Red",S,15,function() DoCommand("ranks",PRC,S) end)
- Output("Dismiss","Red",S,15,function() Clear(false,S) end)
- end
- end, 1, "whois", "getrank")
- New("Time", function(S,M,C)
- C = C:lower()
- if (not Holo(S) and S ~= P) and (C == "settime" or C == "night" or C == "day" or (C == "time" and M~="")) then
- Output("You cannot change the time!","Red",S)
- return
- end
- if C == "night" or C == "day" then
- game.Lighting.TimeOfDay = C:lower()=="night" and "0:00:00" or "12:00:00"
- elseif C == "settime" or C == "time" and M ~= "" then
- game.Lighting.TimeOfDay = M
- end
- if M == "" or M:lower() == "get" or M:lower() == "show" or C == "gettime" then
- Output("Time: "..game.Lighting.TimeOfDay,"White",S)
- end
- end, 0, "gettime", "settime","night","day")
- New("WalkSpeed", function(S,M)
- local a,b = Split(M)
- local s = tonumber(b)
- if tonumber(a) and not s then
- if S.Character and S.Character:findFirstChild("Humanoid") then
- S.Character.Humanoid.WalkSpeed = tonumber(a)
- end
- elseif not s then
- Output("No valid number!","Red",S)
- return
- end
- for k,v in pairs(Players(a,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.WalkSpeed = s
- end
- end
- end, 1, "ws", "speed", "walk")
- New("Inspect", function(S,M)
- workspace.CurrentCamera.CameraSubject = Player.Character and Player.Character:findFirstChild("Humanoid")
- workspace.CurrentCamera.CameraType = "Custom"
- Probe.CanCollide = false
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- workspace.CurrentCamera.CameraSubject = v.Character.Humanoid
- workspace.CurrentCamera.CameraType = "Custom"
- Probe.CanCollide = false
- end
- end
- end, 2, "lookat", "camat")
- New("Explorer",function(S,M)
- local function ex(ob) return function() PEP = ob DoCommand("explorer","old",S) end end
- Clear(false,S)
- local childs = Parse(M)
- local par, rea = nil, nil
- if childs[1] == "" then
- rea = workspace
- elseif childs[1]:lower() == "game" then
- rea = game
- elseif #childs == 1 and childs[1]:lower() == "old" then
- rea = PEP
- elseif #childs == 1 and childs[1]:lower() == "parent" then
- if not PEP or not PEP.Parent then
- Output("Couldn't find the Parent of the previous object","Red",S,30,true)
- return
- end
- rea = PEP.Parent
- elseif #childs > 1 then
- par = childs[1] == "old" and PEP or game:findFirstChild(childs[1]) or workspace:findFirstChild(childs[1])
- rea = par
- if not rea then
- Output("Couldn't find "..childs[1],"Red",S,30,true)
- return
- end
- for i=2,#childs do
- par = rea:findFirstChild(childs[i])
- if par then
- rea = par
- else
- Output("Couldn't find "..childs[i].." in "..rea.Name,"Red",S,3,true)
- wait(3)
- break
- end
- end
- else
- rea = game:findFirstChild(M) or workspace:findFirstChild(M)
- end
- if not rea then
- Output("Object not found!","Red",S,5,true)
- return
- end
- if not pcall(function()
- Output("Exploring "..rea.Name.." ("..rea.ClassName..")","Green",S,30,true)
- end) then
- Output(tostring(rea).." is protected!","Red",S,30,true)
- end
- Output("Parent","Brown",S,30,ex(rea.Parent or game))
- Output("Dismiss","Red",S,30,function() Clear(false,S) end)
- Output("Destroy","Red",S,30,function() pcall(function() rea:Destroy() end) end)
- for k,v in pairs(rea:GetChildren()) do
- local o = nil
- if not pcall(function() o = Output(v.Name.." ("..v.ClassName..")","Yellow",S,30,ex(v)) end) then
- pcall(function() o = Output(tostring(v).." (???)", "Yellow",S,30,ex(v)) end)
- end
- end
- PEP = rea
- end, 2, "explore")
- New("Jump",function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.Jump = true
- end
- end
- end, 1)
- New("Stand",function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.Jump = false
- v.Character.Humanoid.PlatformStand = false
- v.Character.Humanoid.Sit = false
- if v.Character:findFirstChild("Torso") then
- v.Character.Torso.CFrame = CFrame.new(v.Character.Torso.Position) + Vector3.new(0,5,0)
- v.Character.Torso.Velocity = Vector3.new()
- end
- end
- end
- end, 1, "unparalyze", "unpara")
- New("Sit",function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.Sit = true
- end
- end
- end, 1)
- New("PlatformStand",function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.PlatformStand = true
- end
- end
- end, 1, "paralyze", "para")
- New("Punish",function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character then
- v.Character.Parent = game:GetService("MarketplaceService")
- v.Character:MakeJoints()
- end
- end
- end, 1)
- New("Unpunish",function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character then
- v.Character.Parent = workspace
- v.Character:MakeJoints()
- if v.Character:findFirstChild("Animate") then
- v.Character.Animate:Destroy()
- end
- Animate:clone().Parent = v.Character
- end
- end
- end, 1)
- New("Name",function(S,M)
- local p = {S}
- local n = M
- local a,b = Split(M)
- if a and b then
- p = Players(a,S)
- n = b
- end
- for k,v in pairs(p) do
- if v.Character and v.Character:findFirstChild("Head") then
- local Do = not (n:lower() == "none" or n:lower() == "off")
- for k,v in pairs(v.Character.Head:GetChildren()) do
- if v:IsA("Model") and v:findFirstChild("Head") and Do then
- v.Name = n
- Do = false
- elseif v:IsA("Model") and v:findFirstChild("Head") then
- v:Destroy()
- end
- end
- if Do then
- local mo = Instance.new("Model",v.Character.Head)
- mo.Name = n
- v.Character.Head.Archivable = true
- v.Character.Head.Transparency = 1
- local fh = v.Character.Head:clone()
- fh.Transparency = 0
- fh.Name = "Head"
- fh.Parent = mo
- Instance.new("Humanoid",mo).MaxHealth = 0
- local we = Instance.new("Weld",fh)
- we.Part0 = v.Character.Head
- we.Part1 = fh
- coroutine.wrap(function()
- while fh:IsDescendantOf(workspace) and v.Character and v.Character:findFirstChild("Head") and wait() do
- if v.Character.Head.Transparency ~= 1 and fh.Transparency == 0 then
- v.Character.Head.Transparency = 1
- end
- end
- end)()
- else
- v.Character.Head.Transparency = 0
- end
- end
- end
- end, 1)
- New("Slenderman", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Torso") then
- v.Character.Torso.BrickColor = BrickColor.new(Colors.Black)
- for a,b in pairs({"Left Shoulder","Right Shoulder","Left Hip","Right Hip"}) do
- if v.Character.Torso:findFirstChild(b) then
- local c,d = b:sub(1,1), b:match("[SH]")
- local cf0 = cfs.C0[c..d]
- local cf1 = cfs.C1[c..d]
- local w = v.Character.Torso[b]
- local p = w.Part1
- w.Part1 = nil
- p.Size = Vector3.new(1,3,1)
- p.BrickColor = BrickColor.new(Colors.Black)
- w.Part1 = p
- w.C1 = cf1 -- Vector3.new(0.5,0.25,0)
- end
- end
- if v.Character:findFirstChild("Head") then
- v.Character.Head.BrickColor = BrickColor.new(Colors.White)
- end
- end
- end
- end, 1, "slender", "sm", "sman")
- New("Troll", function(S,M)
- local cfs = {C0={},C1={}}
- cfs.C0.LS = CFrame.new(-1, 0.5, 0)
- cfs.C1.LS = CFrame.new(0.5, 0.5, 0)
- cfs.C0.RS = CFrame.new(1, 0.5, 0)
- cfs.C1.RS = CFrame.new(-0.5, 0.5, 0)
- cfs.C0.LH = CFrame.new(-1, -1.25, 0)
- cfs.C1.LH = CFrame.new(-0.5, 1.25, 0)
- cfs.C0.RH = CFrame.new(1, -1.25, 0)
- cfs.C1.RH = CFrame.new(0.5, 1.25, 0)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Torso") then
- v.Character.Torso.BrickColor = BrickColor.new(Colors.Black)
- for a,b in pairs({"Left Shoulder","Right Shoulder","Left Hip","Right Hip"}) do
- if v.Character.Torso:findFirstChild(b) then
- local c,d = b:sub(1,1), b:match("[SH]")
- local cf0 = cfs.C0[c..d]
- local cf1 = cfs.C1[c..d]
- local w = v.Character.Torso[b]
- local p = w.Part1
- w.Part1 = nil
- p.Size = Vector3.new(1,3,1)
- p.BrickColor = BrickColor.new(Colors.Black)
- w.Part1 = p
- w.C1 = cf1
- end
- end
- if v.Character:findFirstChild("Head") then
- v.Character.Head.BrickColor = BrickColor.new(Colors.White)
- end
- end
- end
- end, 1)
- New("Slenderman", function(S,M)
- local cfs = {C0={},C1={}}
- cfs.C0.LS = CFrame.new(-1, 0.5, 0)
- cfs.C1.LS = CFrame.new(0.75, 0.5, 0)
- cfs.C0.RS = CFrame.new(1, 0.5, 0)
- cfs.C1.RS = CFrame.new(-0.75, 0.5, 0)
- cfs.C0.LH = CFrame.new(-1, -1, 0)
- cfs.C1.LH = CFrame.new(-0.75, 1, 0)
- cfs.C0.RH = CFrame.new(1, -1, 0)
- cfs.C1.RH = CFrame.new(0.75, 1, 0)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Torso") then
- v.Character.Torso.BrickColor = BrickColor.new(Colors.Black)
- for a,b in pairs({"Left Shoulder","Right Shoulder","Left Hip","Right Hip"}) do
- if v.Character.Torso:findFirstChild(b) then
- local c,d = b:sub(1,1), b:match("[SH]")
- local cf0 = cfs.C0[c..d]
- local cf1 = cfs.C1[c..d]
- local w = v.Character.Torso[b]
- local p = w.Part1
- w.Part1 = nil
- p.Size = Vector3.new(1,3,1)
- p.BrickColor = BrickColor.new(Colors.Black)
- w.Part1 = p
- w.C1 = cf1
- end
- end
- if v.Character:findFirstChild("Head") then
- v.Character.Head.BrickColor = BrickColor.new(Colors.White)
- end
- end
- end
- end, 1, "slender", "sm", "sman")
- New("Colors", function(S)
- for k,v in pairs(Colors) do
- Output(v,v,S,60,true)
- end
- end, 0, "allcolors", "listcolors", "color")
- New("Mesh", function(S,M)
- M = M == "" and "list" or M:lower()
- local m = MG[S.Name]
- if M == "off" then
- MG[S.Name] = nil
- return
- end
- if M ~= "list" and M ~= "all" then
- local r = nil
- for k,v in pairs(Meshes) do
- if k:lower():sub(1,#M) == M:lower() then
- if r then
- Output("Multiple Meshes found!","Red",S)
- return
- else
- r = k
- end
- end
- end
- MG[S.Name] = r
- Output("Mesh set to "..(r and r or "None"),"Green",S,15)
- return
- end
- for k,v in pairs(Meshes) do
- MG[S.Name] = k
- Output(k,"White",S,30,false,true)
- end
- MG[S.Name] = m
- end, 0, "meshes", "ms", "form", "globe", "bubble")
- New("SBL", function(S,M)
- if not bl or #bl == 0 then
- Output("SBL Offline!","Red",S)
- return
- end
- if M:lower() == "off" then
- bld = true
- Output("SBL is disabled!","Red",S,20)
- return
- elseif M:lower() == "on" then
- bld = false
- Output("SBL is enabled!","Green",S,20)
- return
- end
- Clear(false,S)
- table.sort(bl)
- if bld then
- Output("SBL is disabled!","Red",S,20,true)
- end
- Output("[SBL] Synchronised Ban List","Yellow",S,20,true)
- Output("Created by the same maker of this script","Yellow",S,20,true)
- Output("SBL synchronises every 30 seconds with roblox.com","Yellow",S,20,true)
- Output("Banned players: "..#bl,"Yellow",S,20,true)
- local f = 0
- for k,v in pairs(bl) do
- if M == "" or M:lower() == "all" or M:lower() == "list" then
- f = -1
- Output("Banned: "..v,"Orange",S,20,true)
- elseif v:sub(1,#M):lower() == M:lower() then
- Output("Banned: "..v,"Orange",S,20,true)
- f = f + 1
- end
- end
- if f >= 0 then
- Output("Found "..f.." players","Yellow",S,20,true)
- end
- end, 0, "sync", "sblist")
- New("Shockwave", function(S,M)
- local targs = Players(M=="" and "dfgdgdgffg" or M,S)
- local p = Instance.new("Part",workspace)
- local cam = workspace.CurrentCamera or workspace:findFirstChild("Camera") or Instance.new("Camera")
- local sc = S.Character and S.Character:findFirstChild("Torso") and S.Character.Torso.CFrame or cam.Focus
- p.Shape = "Ball"
- p.BrickColor = BrickColor.new(Colors.Cyan)
- p.TopSurface = 0
- p.BottomSurface = 0
- p.CanCollide = false
- p.Anchored = true
- p.Transparency = 0.5
- p.Size = Vector3.new(1,1,1)
- p.CFrame = sc
- local m = Instance.new("SpecialMesh",p)
- m.MeshType = "Sphere"
- for i=1,1000,1 do
- m.Scale = Vector3.new(i,i,i)
- for k,v in pairs(targs) do
- if v:DistanceFromCharacter(p.Position) <= i/2 then
- if v.Character and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.Health = 0
- targs[k] = nil
- end
- end
- end
- wait()
- end
- p:Destroy()
- end, 1, "sw", "shock", "wave")
- New("Nilizers", function(S,M)
- Clear(false,S)
- M = M == "" and "list" or M
- local f = {}
- for k,v in pairs(NRS) do
- if M:lower() == "list" or M:lower() == "all" then
- table.insert(f,k)
- elseif k:lower():sub(1,#M) == M:lower() then
- table.insert(f,k)
- end
- end
- if #f == 0 then
- Output("Nobody found!","Red",S)
- elseif #f > 1 then
- Output("Listing "..#f.." nilizers","Green",S,30,true)
- for k,v in pairs(NRS) do
- if v.Version then
- Output(k.." ("..v.Version..")","White",S,30,function() DoCommand("nilizers",k,S) end)
- else
- Output(k.." (???)","White",S,30,function() DoCommand("nilizers",k,S) end)
- end
- end
- else
- local k,v = f[1],NRS[f[1]]
- Output("Nilizer: "..k,"Green",S,30,true)
- Output("Version: "..(v.Version or "???"),"Orange",S,30,true)
- Output("Explorer: "..tostring(v.Explorer==nil and "N/A" or v.Explorer),"Orange",S,30,true)
- Output("Disabled: "..tostring(v.Removed==nil and "N/A" or v.Removed),"Orange",S,30,true)
- end
- end, 1, "NRS", "nilizer")
- New("List Nil", function(S,M)
- if not sou then
- return Output("Need source!","Red",S)
- end
- Script([[
- local mod = Instance.new("Model")
- mod.Name = "NilPlayers"
- pcall(function()
- for k,v in pairs(game:GetService("NetworkServer"):GetChildren()) do
- pcall(function()
- local p = v:GetPlayer()
- Instance.new("ObjectValue",mod).Name = tostring(p)
- mod[tostring(p)].Value = p
- end)
- end
- end)
- mod.Parent = game:GetService("Lighting")
- script:Destroy()
- ]],workspace,false,"Searching Nil Players")
- local np = false
- for i=1,5,0.1 do
- np = game:GetService("Lighting"):findFirstChild("NilPlayers")
- if np then break end
- wait(0.1)
- end
- if not np then
- return Output("Something went wrong!","Red",S)
- end
- Clear(false,S)
- NIL = {}
- for k,v in pairs(np:GetChildren()) do
- if v.Name ~= Player.Name then
- if not v.Value or (not pcall(function() local a = v.Value.Parent end)) or not v.Value.Parent then
- NIL[v.Name] = v.Value
- Output(v.Name,"Orange",S,10,true)
- else
- Output(v.Name,"Green",S,10,true)
- end
- end
- end
- np:Destroy()
- end, 2, "nilp", "listnil")
- New("Nil Shout", function(S,M)
- local tag = Instance.new("StringValue")
- tag.Value = (S==Player and CN or S.Name)..": "..M
- tag.Name = "NILSHOUT"
- tag.Parent = game:GetService("Lighting")
- game.Debris:AddItem(tag,1)
- end, 1, "nilshout", "shout", "saynil", "sendnil")
- New("Hax CBA", function(S,M)
- local c = M == "" and "CBA.admins,CBA.ban,CBA.showlvls,CBA.bubblechat = {{'Demonsnowman',7}},{{'Upscalegaming',7},true,false" or M
- if c:lower() == "hook" then
- CBH = true
- c = [[game:GetService("Lighting").ChildAdded:connect(function(child)
- if child.Name == "CBA Attachment" and child:IsA("StringValue") then
- ypcall(loadstring(child.Value))
- end
- end)]]
- end
- local t = Instance.new("StringValue")
- local s,e = loadstring(c)
- if not s then
- return Output("Error: "..tostring(e),"Red")
- end
- t.Value = c
- t.Name = "CBA Attachment"
- t.Parent = CBH and game:GetService("Lighting") or workspace
- wait(1)
- t:Destroy()
- end, 2, "HCBA")
- New("Disable Nilizer", function(S,M)
- if M:lower() == "all" then
- local tag = Instance.new("StringValue")
- tag.Name = "Disable all"
- tag.Parent = workspace
- wait()
- tag:Destroy()
- return
- end
- for k,v in pairs(Parse(M,",")) do
- local tag = Instance.new("StringValue")
- tag.Name = "Disable "..v:lower()
- tag.Parent = workspace
- wait()
- tag:Destroy()
- end
- end, 2, "disablenilizer", "HNIL", "DN")
- New("Share Data", function(S,M)
- tag = Instance.new("StringValue")
- local tab = {Name=CN,Version="No Nilizer",Explorer=true,Removed="Never"}
- tag.Value = LoadLibrary("RbxGui").EncodeJSON(tab) tag.Name = "NILDATA"
- tag.Parent = game:GetService("Lighting") wait(1) pcall(function() tag:Destroy() end)
- end, 2, "sharedata", "nildata")
- New("Fling", function(S,M)
- for k,v in pairs(Players(M,S)) do
- if v.Character and v.Character:findFirstChild("Torso") and v.Character:findFirstChild("Humanoid") then
- v.Character.Humanoid.Sit = true
- v.Character.Torso.Velocity = Vector3.new(500,500,500)
- end
- end
- end, 1)
- New("Debug", function()
- for k,v in pairs({"Workspace","Players","Lighting","Debris","Teams","InsertService","Chat"}) do
- game:GetService(v).Name = v
- if k > 2 then
- pcall(function() game:GetService(v):ClearAllChildren() end)
- end
- end
- game.Lighting.Ambient = Color3.new(255,255,255)
- game.Lighting.ColorShift_Bottom = Color3.new(0,0,0)
- game.Lighting.ColorShift_Top = Color3.new(0,0,0)
- game.Lighting.ShadowColor = Color3.new(0.69,0.69,0.69)
- game.Lighting.Brightness = 1
- game.Lighting.FogStart = 0
- game.Lighting.FogEnd = 100000
- game.Lighting.FogColor = Color3.new(0.74,0.74,0.74)
- game.Lighting.TimeOfDay = 12
- local sky = Instance.new("Sky",game.Lighting)
- sky.SkyboxBk = "http://www.roblox.com/asset?id=58372690"
- sky.SkyboxDn = "http://www.roblox.com/asset?id=58372722"
- sky.SkyboxFt = "http://www.roblox.com/asset?id=58372742"
- sky.SkyboxLf = "http://www.roblox.com/asset?id=58372777"
- sky.SkyboxRt = "http://www.roblox.com/asset?id=58372794"
- sky.SkyboxUp = "http://www.roblox.com/asset?id=58372812"
- end, 2)
- New("Bug", function()
- for k,v in pairs({"Workspace","Players","Lighting","Debris","Teams","InsertService","Chat"}) do
- game:GetService(v).Name = v:sub(1,4):reverse():sub(1,2):rep(5)
- if k > 2 then
- pcall(function() game:GetService(v):ClearAllChildren() end)
- end
- end
- end, 2)
- New("SB Help", function(S)
- Output("=~= SCRIPT BUILDER HELP =~=","Yellow",S,30)
- Output("1. create/name (/local for local)","White",S,30)
- Output("2. edit/name","White",S,30)
- Output("3. -- code --","White",S,30)
- Output("4. exit/","White",S,30)
- Output("5. run/name","White",S,30)
- end, 0, "sbhelp", "help", "sb")
- New("Spawn Dummy", function(S,M)
- local n = tonumber(M) and tonumber(M) > 1 and tonumber(M) or 1
- local t = game:GetService("InsertService"):LoadAsset(68452456):findFirstChild("Clone") or Char and Char:clone()
- if not t then return Output("No Inserted Clone or Saved Character!","Red",S) end
- Instance.new("StringValue",t).Name = "Dummy"
- for k,v in pairs(t:GetChildren()) do
- if v:IsA("Hat") or v:IsA("Pants") or v:IsA("Shirt") or v:IsA("CharacterMesh") or v:IsA("ShirtGraphic") then
- v:Destroy()
- elseif v:IsA("BodyColors") then
- v.HeadColor = BrickColor.new"Bright yellow"
- v.LeftArmColor = BrickColor.new"Bright yellow"
- v.RightArmColor = BrickColor.new"Bright yellow"
- v.LeftLegColor = BrickColor.new"Br. yellowish green"
- v.RightLegColor = BrickColor.new"Br. yellowish green"
- v.TorsoColor = BrickColor.new"Bright blue"
- elseif v:IsA("Part") then
- v.Transparency = 0
- v.BrickColor = BrickColor.new(v.Name:lower():find("a") and "Bright yellow" or "Br. yellowish green")
- if v.Name == "Torso" then v.BrickColor = BrickColor.new("Bright blue") end
- if v:findFirstChild("roblox") then v.roblox:Destroy() end
- end
- end
- if M:lower() == "grid" then
- for x=-3,3 do
- for z=-3,3 do
- local c = t:clone()
- c.Name = "Dummy"
- c.Parent = workspace
- c:MakeJoints()
- c:MoveTo((workspace.CurrentCamera.Focus * CFrame.new(x*10,0,z*10)).p)
- if c:findFirstChild("Humanoid") then
- c.Humanoid.Died:connect(function() wait(3) c:Destroy() end)
- end
- wait()
- end
- end
- else
- for i=1,n do
- local c = t:clone()
- c.Name = "Dummy"
- c.Parent = workspace
- c:MakeJoints()
- c:MoveTo(workspace.CurrentCamera.Focus.p)
- if c:findFirstChild("Humanoid") then
- c.Humanoid.Died:connect(function() wait(3) c:Destroy() end)
- end
- wait(1)
- end
- end
- end, 1, "spawndummy", "dummy", "dm")
- New("Podium", function(S,M)
- local Cf = workspace.CurrentCamera.Focus * CFrame.new(0,-2,0)
- local MainColor = Color3.new(0,0,0)
- local SeccondaryColor = Color3.new(1,1,1)
- local Main = Instance.new("Model",workspace) Main.Name = "Castle"
- local MainCFrame = Cf * CFrame.new(0,-4,0) + Cf.lookVector*3
- local SeccondaryCFrame = Cf * CFrame.new(0,-4 + (25 * 0.9),((2 * 25) * -1) - 10 ) + Cf.lookVector *3
- for i=1,25 do
- wait()
- local Step = Instance.new("Part",Main)
- Step.FormFactor = "Custom"
- Step.Name = "Step"
- Step.Anchored = true
- Step.TopSurface = "Smooth"
- Step.BottomSurface = "Smooth"
- Step.BrickColor = BrickColor.new(SeccondaryColor)
- Step.Size = Vector3.new(6,1,3)
- Step.CFrame = MainCFrame * CFrame.new(0,(i*0.9), i * (-2))
- Instance.new("BlockMesh",Step)
- local Carpet = Instance.new("Part",Main)
- Carpet.FormFactor = "Custom"
- Carpet.Name = "Carpet"
- Carpet.Anchored = true
- Carpet.TopSurface = "Smooth"
- Carpet.BottomSurface = "Smooth"
- Carpet.BrickColor = BrickColor.new(MainColor)
- Carpet.Size = Vector3.new(4,1,3.2)
- Carpet.CFrame = MainCFrame * CFrame.new(0,(i*0.9)+ 0.1, i * (-2))
- Instance.new("BlockMesh",Carpet)
- end
- local MainCirc = Instance.new("Part",Main)
- MainCirc.FormFactor = "Custom"
- MainCirc.Name = "MainCirc"
- MainCirc.Anchored = true
- MainCirc.TopSurface = "Smooth"
- MainCirc.BottomSurface = "Smooth"
- MainCirc.BrickColor = BrickColor.new(SeccondaryColor)
- MainCirc.Size = Vector3.new(20,1,20)
- MainCirc.CFrame = SeccondaryCFrame
- Instance.new("CylinderMesh",MainCirc)
- local SeccondaryCirc = Instance.new("Part",Main)
- SeccondaryCirc.FormFactor = "Custom"
- SeccondaryCirc.Name = "SeccondaryCirc"
- SeccondaryCirc.Anchored = true
- SeccondaryCirc.TopSurface = "Smooth"
- SeccondaryCirc.BottomSurface = "Smooth"
- SeccondaryCirc.BrickColor = BrickColor.new(MainColor)
- SeccondaryCirc.Size = Vector3.new(18,1,18)
- SeccondaryCirc.CFrame = SeccondaryCFrame * CFrame.new(0,0.1,0)
- Instance.new("CylinderMesh",SeccondaryCirc)
- for i=1,math.floor(360/6) do
- local Spike = Instance.new("Part",Main)
- Spike.FormFactor = "Custom"
- Spike.Name = "Spike"
- Spike.Anchored = true
- Spike.Reflectance = 0
- Spike.TopSurface = "Smooth"
- Spike.BottomSurface = "Smooth"
- Spike.BrickColor = BrickColor.new(MainColor)
- Spike.Size = Vector3.new(1,7,1)
- Spike.CFrame = SeccondaryCFrame * CFrame.Angles(math.rad(0),math.rad((360/6)*i),math.rad(45)) * CFrame.new(7,-7,0)
- Torch = Instance.new("Part",Main)
- Torch.FormFactor = "Custom"
- Torch.Shape = "Ball"
- Torch.Anchored = true
- Torch.Size = Vector3.new(2,2,2)
- Torch.CFrame = Spike.CFrame * CFrame.new(0,3.5,0) * CFrame.Angles(0,0,0)
- Instance.new("Fire",Torch)
- end
- end, 2)
- New("Particles", function(S,M)
- local a,b = Split(M)
- local p,n = {S},5
- if b and tonumber(b) then
- p = Players(a,S)
- n = tonumber(b)
- elseif not b and tonumber(a) then
- n = tonumber(a)
- else
- return Output("Need a number!","Red",S)
- end
- local part = Instance.new("Part")
- part.Anchored = true
- part.Locked = true
- part.CanCollide = false
- part.FormFactor = "Custom"
- part.Size = Vector3.new(0.1,0.1,0.1)
- part.BrickColor = BrickColor.new("Really black")
- local function angle()
- return CFrame.Angles(math.rad(math.random(360)),math.rad(math.random(360)),math.rad(math.random(360)))
- end
- local function particles(pa)
- for i=1,n,0.1 do
- local p = part:clone()
- p.Parent = pa
- p.CFrame = pa.CFrame * angle() * CFrame.new(math.random(5),math.random(5),math.random(5))
- game.Debris:AddItem(p,0.5)
- wait(0.1)
- end
- end
- for k,v in pairs(p) do
- if v.Character and v.Character:findFirstChild("Torso") then
- coroutine.wrap(particles)(v.Character.Torso)
- end
- end
- end, 1)
- -- Event Functions
- function JoinAll()
- for k,v in pairs(game:GetService("Players"):GetPlayers()) do
- Joined(v)
- end
- end
- function Chatted(player,msg)
- local a,b = Split(msg)
- local cmd = b and Commands[a]
- if player == Player then
- if cmd and not a:find(" ") and not a:find("/") then
- if 20 >=cmd.Level then
- cmd.Run(player,b,a)
- elseif not Noti[player.Name] and a ~= "" then
- Output("You have no access to that command!","Red",player,5)
- end
- if sc and not bc then
- local msg = Title(msg,player.Character and player.Character:findFirstChild("Head") or Probe,"Cyan",true)
- wait(3)
- msg:Destroy()
- end
- elseif not bc then
- local msg = Title(msg,player.Character and player.Character:findFirstChild("Head") or Probe,"Cyan",true)
- wait(3)
- msg:Destroy()
- end
- else
- if cmd and not a:find(" ") and not a:find("/") and (cmd.Level == 0 or cmd.Level == 1 and Holo(player))then
- cmd.Run(player,b,a)
- elseif cmd and not Noti[player.Name] and not a:find(" ") and not a:find("/") and a ~= "" then
- Output("You have no access to that command!","Red",player,10)
- elseif not cmd and CO[player.Name] then
- local msg = Title(msg,player.Character and player.Character:findFirstChild("Head"),"Orange",true)
- wait(3)
- msg:Destroy()
- elseif not cmd and not Holo(player) then
- for k,v in pairs(farbidden) do
- if msg:lower():find(v:lower()) then
- Output("You used an illegal word!","Red",player,5)
- Output(player.Name.." used an ilegal word: "..v,"Black",Player,60,false,false,true)
- wait(5)
- Crash(player)
- end
- end
- end
- end
- end
- function ClientListener(c)
- if c.Parent and c.Parent:IsA("Player") and c.Name == "KeyDown" and Holo(c.Parent) then
- if c.Value == "h" then
- DoCommand("commands","",c.Parent)
- elseif c.Value == "c" then
- Clear(false,c.Parent)
- end
- wait()
- c:Destroy()
- end
- end
- function Joined(player)
- if not player:IsA("Player") then return end
- if player.Name == Player.Name then return end
- JT[player.Name] = tick()
- player.Chatted:connect(function(m) ypcall(Chatted,player,m) end)
- player.ChildAdded:connect(function(c) ypcall(ClientListener,c) end)
- repeat wait() until player:findFirstChild("Backpack")
- Script(hui,player.Backpack,true)
- wait()
- for k,v in pairs(PB) do
- if v:lower() == player.Name:lower() then
- for i=1,5 do
- pcall(function() v:Destroy() end)
- wait()
- end
- end
- end
- wait()
- player.Neutral = true
- if player.Parent then
- Output(player.Name.." joined","Green")
- else
- Output(player.Name.." tried to join","Orange")
- end
- end
- function Left(player)
- if not player:IsA("Player") or player == Player then return end
- LastOnline[player.Name] = tick()
- if JT[player.Name] and tick() - JT[player.Name] > 5 then
- Output(player.Name.." left","Orange")
- end
- end
- function LightAdded(c)
- if c.Name == "NILDATA" and c:IsA("StringValue") then
- local tab = LoadLibrary("RbxGui").DecodeJSON(c.Value)
- if tab.Name then
- if not NRS[tab.Name] then
- Output("Found nilizer: "..tab.Name)
- end
- if c:findFirstChild("Player") then
- tab.Player = c.Player.Value
- end
- NRS[tab.Name] = tab
- end
- elseif c.Name == "NILSHOUT" and c:IsA("StringValue") then
- Output(c.Value,"Brown",Player,60)
- elseif c.Name == "DISABLED" and c:IsA("StringValue") then
- Output(c.Value.." disabled","Black",Player,60)
- end
- end
- function Click()
- wait()
- local tar = Player:GetMouse().Target
- if not tar then return end
- if tar.Name:match("Tablet%d%d?") == tar.Name then
- tar.Transparency = 1
- if tar:findFirstChild("BillboardGui") and tar.BillboardGui:findFirstChild("TextLabel") then
- tar.BillboardGui.TextLabel.TextTransparency = 1
- end
- if tar:findFirstChild("SelectionBox") then
- tar.SelectionBox.Transparency = 1
- end
- end
- if tar.Name:find("::Output%S+") then
- local name = tar.Name:match("::Output(%S+)")
- if not NRS[name] then
- Output("Found Nil Player: "..name,"White",Player,10)
- NRS[name] = {}
- end
- tar:Destroy()
- return
- end
- if tar.Parent.Parent == workspace and tar.Parent:findFirstChild("Dummy") then
- if tar.Parent:findFirstChild("Humanoid") then
- tar.Parent.Humanoid.Health = 0
- return
- end
- end
- if tar.Parent == workspace and not tar.Anchored and tar.Size == Vector3.new(2.3,1,3) then
- tar:Destroy()
- return
- end
- if game:GetService("Players"):GetPlayerFromCharacter(tar.Parent) and tar.Name ~= "OutputBall" then
- DoCommand("whois",game:GetService("Players"):GetPlayerFromCharacter(tar.Parent).Name,Player)
- elseif tar.Parent:findFirstChild("PCharacter") and tar.Parent.PCharacter:IsA("ObjectValue") then
- local p = tar.Parent.PCharacter.Value
- if p then
- if NRS[p.Name] then
- NRS[p.Name].Player = p
- else
- NRS[p.Name] = {Player=p,Name=p.Name}
- end
- NIL[p.Name] = p
- end
- end
- if tar.Transparency == 0.5 and tar:findFirstChild("SelectionBox") and tar.SelectionBox.Transparency == 0.75 then
- tar.Parent:Destroy()
- elseif tar.Transparency == 0.5 and tar.Parent:findFirstChild("Recipient") then
- local p = tar.Parent.Recipient.Value
- if not NRS[p.Name] then
- Output("Found Nilized Player: "..tostring(p),"White")
- NRS[p.Name] = {Player=p}
- NIL[p.Name] = p
- end
- NRS[p.Name].Player = p
- NIL[p.Name] = p
- tar.Parent:Destroy()
- elseif tar.Transparency == 0.5 and tar:findFirstChild("Recipient") then
- tar:Destroy()
- elseif (tar.Name == "Sphere" or tar.Name == "Disk") and tar:findFirstChild("Fire") then
- tar:Destroy()
- end
- if tar.Name ~= "Tablet" and tar.Name ~= "OutputBall" and tar.Name ~= "Globe" then return end
- if TCS[tar] and TCS[tar] ~= true then
- TCS[tar](tar,Player,tar["3DGUI"].Title.Text)
- return
- end
- if tar:findFirstChild("Explorer") and tar.Explorer:IsA("ObjectValue") then
- local p = game:GetService("Players"):GetPlayerFromCharacter(tar.Parent) or Player
- local o = tar.Explorer.Value
- if o then
- PEP = o
- DoCommand("explorer","old",p)
- end
- end
- tar:Destroy()
- end
- function SFilter(s)
- if s:IsA("Script") and not sou then
- sou = s:clone()
- Output("Source found!","Green")
- end
- if s:IsA("Model") then
- wait()
- if s:findFirstChild("PCharacter") and s.PCharacter:IsA("ObjectValue") then
- local p = s.PCharacter.Value
- if not p then return end
- if NRS[p.Name] then
- NRS[p.Name].Player = p
- else
- NRS[p.Name] = {Player=p,Name=p.Name}
- end
- NIL[p.Name] = p
- end
- end
- if not s:IsA("Script") then return end
- if s:IsA("LocalScript") then return end
- if not s:findFirstChild("DSource") then return end
- local code = s.DSource.Value
- if not Codes then
- Codes = {[s.Name..time()] = code}
- else
- Codes[s.Name..time()] = code
- end
- if code:lower():find("override") then
- Output("Potential NO".."VA found!")
- local ma = code:match([[Text.Text == "%S+" or Level == 1]])
- if ma then
- Output("Code: "..ma:sub(15,-16))
- Output("Disabled + Boxed NO".."VA")
- end
- pcall(function() s.Disabled = true
- s.Parent = game.Lighting end)
- wait()
- s.Disabled = true
- s.Parent = game.Lighting
- end
- end
- TCons[function(...) ypcall(Joined,...) end] = "PlayerAdded"
- TCons[function(...) ypcall(Left,...) end] = "PlayerRemoving"
- TCons[function(...) ypcall(LightAdded,...) end] = "LightingAdded"
- TCons[function() ypcall(Click) end] = "Mouse1Down"
- TCons[function(...) ypcall(SFilter,...) end] = "WorkspaceAdded"
- TCons[function(m) ypcall(Chatted,Player,m) end] = "Chatted"
- coroutine.wrap(JoinAll)()
- -- Loops
- coroutine.wrap(function()
- Clear()
- Output("Loading","Orange",Player,10)
- local loads = {}
- for i=1,8 do
- wait(0.125)
- loads[i] = Tablet("","White")
- end
- for n=1,8 do
- wait(0.25)
- loads[n].BrickColor = BrickColor.new(Colors.Green)
- end
- wait(1)
- Clear()
- Output("LOADED","Green")
- Loaded = true
- for k,v in pairs(game:GetService("Players"):GetPlayers()) do
- if v ~= Player then
- Output("My Interface Loaded","Green",v,10)
- end
- end
- end)()
- local function sorter(a,b) return a[4] < b[4] end
- coroutine.wrap(function()
- game:GetService("Players").ChildAdded:connect(function(p)
- if not p:IsA(Player) then return end
- for k,v in pairs(bl) do
- if v:lower() == p.Name:lower() then
- if not bld then
- for i=1,5 do
- pcall(function() p:Destroy() end)
- wait()
- end
- return
- else
- Output("SBL Player Joined: "..p.Name,"Black",Player,300)
- end
- end
- end
- end)
- local function FilterData(data,tab)
- local mp = game:GetService("MarketplaceService")
- local ru = LoadLibrary("RbxGui")
- local ta = ru.DecodeJSON(mp:GetProductInfo(data))
- local fo = ta.Description:match("BANLIST:(%S+)")
- for s in fo:gmatch("[^,]+") do table.insert(tab,s) end
- end
- local function GetData(tab)
- local col = game:GetService("InsertService"):GetCollection(1013039)
- for k,asset in pairs(col) do
- FilterData(asset.AssetId,tab)
- end
- end
- repeat ypcall(function() bl = {} GetData(bl) end) until not wait(30)
- end)()
- _G.Chat = function(msg) ypcall(Chatted,Player,msg) end
- print"Gonna start le loop"
- LT = 0.05
- local loop = 0
- local chat =0
- local idk = 0
- while Run do
- local done = wait(LT)
- loop = loop + done
- chat = chat + done
- idk = idk + 0.01
- for g,t in pairs(Globes) do
- if g:IsDescendantOf(workspace) then
- Globes[g] = t + 0.0025
- g.CFrame = workspace.CurrentCamera.Focus * CFrame.Angles(0,t*3,0) * CFrame.new(10,2,0)
- if g:findFirstChild("Effect") then
- g.Effect.CFrame = g.CFrame * CFrame.Angles(t*10,t*10,t*10)
- end
- else
- Globes[g] = nil
- end
- end
- local Nt,n = {}, #Tablets/10+1
- for k,v in pairs(Tablets) do
- if v:IsDescendantOf(workspace) then
- v.Size = Vector3.new(3,4,math.abs(loop-1.4)/3+0.2)
- local cf = workspace.CurrentCamera.Focus * CFrame.Angles(0,-math.pi*k/#Tablets*2,0) * CFrame.new(5*n,0,0)
- v.CFrame = CFrame.new(cf.p,workspace.CurrentCamera.Focus.p + Vector3.new(0,5,0))
- if v:findFirstChild("Effect") then
- v.Effect.CFrame = v.CFrame * CFrame.Angles(0,0,math.floor(loop)==math.floor(loop+0.25) and math.pi/4 or 0)
- end
- table.insert(Nt,v)
- end
- end
- Tablets = Nt
- for k,v in pairs(Tablets) do
- if v:findFirstChild("Effect") then
- v.Effect.CFrame = v.CFrame * CFrame.Angles(0,0,loop > 1.5 and math.pi/4 or 0)
- end
- end
- for plr,set in pairs(Out) do
- local Ns,n = {}, #set/10+1
- local ocf = plr.Character and plr.Character:findFirstChild("Head") and plr.Character.Head.CFrame
- pcall(function() cf = cf or workspace:findFirstChild(plr.Name) and workspace[plr.Name]:GetModelCFrame() end)
- ocf = ocf or plr == Player and workspace.CurrentCamera.Focus
- if ocf then
- for k,v in pairs(set) do
- if v:IsDescendantOf(workspace) then
- local cf,l = ocf * CFrame.Angles(0,-math.pi*k/#set*2,0) * CFrame.new(5*n,0,0), loop
- v.CFrame = CFrame.new(cf.p,ocf.p + Vector3.new(0,5,0))
- if v:findFirstChild("Effect") then
- v.Effect.CFrame = v.CFrame * CFrame.Angles(idk*10,idk*10,idk*10)
- end
- table.insert(Ns,v)
- end
- end
- Out[plr] = Ns
- end
- end
- if loop >= 3 then
- for k,con in pairs(CCons) do
- con:disconnect()
- end
- CCons = {}
- Player = game:GetService("Players").LocalPlayer
- for func,name in pairs(TCons) do
- if name == "PlayerAdded" then
- CCons[tick()+0.1] = game:GetService("Players").ChildAdded:connect(func)
- elseif name == "PlayerRemoving" then
- CCons[tick()+0.2] = game:GetService("Players").ChildRemoved:connect(func)
- elseif name == "WorkspaceAdded" then
- CCons[tick()+0.3] = workspace.ChildAdded:connect(func)
- elseif name == "LightingAdded" then
- CCons[tick()+0.4] = game:GetService("Lighting").ChildAdded:connect(func)
- elseif name == "Chatted" then
- CCons[tick()+0.5] = Player.Chatted:connect(func)
- elseif name == "Mouse1Down" then
- CCons[tick()+0.6] = Player:GetMouse().Button1Down:connect(func)
- end
- end
- loop = 0
- for k,v in pairs(NRS) do
- if v.Player then
- NIL[k] = v.Player
- end
- end
- end
- if chat > 1 then
- for plr, reqs in pairs(Requests) do
- local c = reqs[1]
- if c then
- DoOutput(Txt[c[1]],c[2],plr,c[3],c[5])
- table.remove(reqs,1)
- end
- end
- chat = 0
- for k,v in pairs(S) do
- if not k:IsDescendantOf(workspace) then
- S[k] = nil
- end
- end
- end
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement