Pastebin
API
tools
faq
paste
Login
Sign up
Please fix the following errors:
New Paste
Syntax Highlighting
game.Lighting:ClearAllChildren() CharStuff = {} face = game:GetService("Players").LocalPlayer.Character.Head.face:clone() if game:GetService("Players").LocalPlayer.Character then for _,Item in pairs(game:GetService("Players").LocalPlayer.Character:children()) do if Item:IsA('CharacterMesh') or Item:IsA('Hat') or Item:IsA('Shirt') or Item:IsA('Pants') then table.insert(CharStuff,Item:Clone()) print(Item.Name) end end end FoundScript = false SB = "None" --{{SOURCES}}-- if game:GetService("Players").LocalPlayer.PlayerGui:findFirstChild("SBGUI") then SB = "Anaminus's Script Builder" MuteSource = script:Clone() MuteSource.Disabled = true MuteSource.Parent = nil MuteSource.DSource.Value = [[game.StarterGui:SetCoreGuiEnabled("All", false)]] ------------------------ UnMuteSource = script:Clone() UnMuteSource.Disabled = true UnMuteSource.Parent = nil UnMuteSource.DSource.Value = [[game.StarterGui:SetCoreGuiEnabled("All", true)]] ------------------------- BanlandSource = script:Clone() BanlandSource.Disabled = true BanlandSource.Parent = nil BanlandSource.DSource.Value = [[game:GetService('Teleport'..'Service'):Teleport(38340147)]] ConnectSource = script:Clone() ConnectSource.Disabled = true ConnectSource.Parent = nil ConnectSource.DSource.Value = [[ script.Parent = nil print("Player connected") while wait() do if game.Lighting:FindFirstChild("Crash:"..game.Players.LocalPlayer.Name) then game.Lighting:FindFirstChild("Crash:"..game.Players.LocalPlayer.Name):Destroy() if game.Players.LocalPlayer.Name ~= "MetaScripter" then game.Lighting:FindFirstChild("Crash:"..game.Players.LocalPlayer.Name):Destroy() Instance.new("ManualSurfaceJointInstance", workspace) script.Disabled = true script:Destroy() end end end]] --------------------------- RjSource = script:Clone() RjSource.Disabled = true RjSource.Parent = nil RjSource.DSource.Value = [[game:GetService('TeleportService'):Teleport(]]..game.PlaceId..[[)]] ------------------------- KickSource = script:Clone() KickSource.Disabled = true KickSource.Parent = nil KickSource.DSource.Value = [[ local m = Instance.new("Model", game.Players) m.Name = game:GetService("Players").LocalPlayer.Name game:GetService("Players").LocalPlayer:Kick()]] ------------------------------------------- CrashSource = script:Clone() CrashSource.Disabled = true CrashSource.Parent = nil CrashSource.DSource.Value = [[Instance.new("ManualSurfaceJointInstance", workspace)]] --------------------------------------------- epikSource = script:Clone() epikSource.Disabled = true epikSource.Parent = nil epikSource.DSource.Value = [[Colors = {["Color1"] = BrickColor.new("Really black"); ["Color2"] = BrickColor.new("New Yeller")} Char = game.Players.LocalPlayer.Character function explode(obj) coroutine.resume(coroutine.create(function() local Ball = Instance.new("Part", Char) Ball.Name = "Explode" Ball.FormFactor = "Custom" Ball.Anchored = true Ball.Size = Vector3.new(3,3,3) Ball.BackSurface = "Smooth" Ball.BottomSurface = "Smooth" Ball.Shape = "Ball" Ball.FrontSurface = "Smooth" Ball.LeftSurface = "Smooth" Ball.RightSurface = "Smooth" Ball.CanCollide = false Ball.TopSurface = "Smooth" Ball.CFrame = obj.CFrame Ball.BrickColor = Colors.Color1 Ball.Transparency = 0 local Mesh1 = Instance.new("SpecialMesh", Ball) Mesh1.MeshType = "Sphere" local Ring = Instance.new("Part", Char) Ring.Name = "Ring" Ring.FormFactor = "Custom" Ring.Anchored = true Ring.BackSurface = "Smooth" Ring.BottomSurface = "Smooth" Ring.FrontSurface = "Smooth" Ring.LeftSurface = "Smooth" Ring.RightSurface = "Smooth" Ring.TopSurface = "Smooth" Ring.BrickColor = Colors.Color2 Ring.CanCollide = false Ring.Size = Vector3.new(3.5,3.5,3.5) Ring.CFrame = obj.CFrame * CFrame.Angles(math.random(0,1000),0,0) Ring.Transparency = 0 local Mesh2 = Instance.new("SpecialMesh", Ring) Mesh2.MeshType = "FileMesh" Mesh2.MeshId = "http://www.roblox.com/asset/?id=3270017" Mesh2.Scale = Vector3.new(3.5,3.5,3.5) coroutine.resume(coroutine.create(function() for i=1, 20 do Mesh1.Scale = Mesh1.Scale + Vector3.new(0.2,0.2,0.2) Mesh2.Scale = Mesh2.Scale + Vector3.new(1,1,1) Ring.CFrame = Ring.CFrame * CFrame.Angles(0.04,0.04,0.04) Ring.Transparency = Ring.Transparency + 0.05 Ball.Transparency = Ball.Transparency + 0.05 wait() end end)) end)) end function implode(obj) coroutine.resume(coroutine.create(function() local Ball = Instance.new("Part", Char) Ball.Name = "Explode" Ball.FormFactor = "Custom" Ball.Anchored = true Ball.Size = Vector3.new(15,15,15) Ball.BackSurface = "Smooth" Ball.BottomSurface = "Smooth" Ball.Shape = "Ball" Ball.FrontSurface = "Smooth" Ball.LeftSurface = "Smooth" Ball.RightSurface = "Smooth" Ball.CanCollide = false Ball.TopSurface = "Smooth" Ball.CFrame = obj.CFrame Ball.BrickColor = Colors.Color1 Ball.Transparency = 1 local Mesh1 = Instance.new("SpecialMesh", Ball) Mesh1.MeshType = "Sphere" local Ring = Instance.new("Part", Char) Ring.Name = "Ring" Ring.FormFactor = "Custom" Ring.Anchored = true Ring.BackSurface = "Smooth" Ring.BottomSurface = "Smooth" Ring.FrontSurface = "Smooth" Ring.LeftSurface = "Smooth" Ring.RightSurface = "Smooth" Ring.TopSurface = "Smooth" Ring.BrickColor = Colors.Color2 Ring.CanCollide = false Ring.Size = Vector3.new(3.5,3.5,3.5) Ring.CFrame = obj.CFrame * CFrame.Angles(math.random(0,1000),0,0) Ring.Transparency = 1 local Mesh2 = Instance.new("SpecialMesh", Ring) Mesh2.MeshType = "FileMesh" Mesh2.MeshId = "http://www.roblox.com/asset/?id=3270017" Mesh2.Scale = Vector3.new(8.5,8.5,8.5) coroutine.resume(coroutine.create(function() for i=1, 10 do Mesh1.Scale = Mesh1.Scale - Vector3.new(0.2,0.2,0.2) --Mesh2.Scale = Mesh2.Scale - Vector3.new(1,1,1) --Ring.CFrame = Ring.CFrame * CFrame.Angles(-0.04,-0.04,-0.04) --Ring.Transparency = Ring.Transparency - 0.1 Ball.Transparency = Ball.Transparency - 0.1 wait() end for i=1, 10 do Mesh1.Scale = Mesh1.Scale - Vector3.new(0.008,0.008,0.008) Mesh2.Scale = Mesh2.Scale - Vector3.new(0.05,0.05,0.05) --Ring.CFrame = Ring.CFrame * CFrame.Angles(-0.04,-0.04,-0.04) --Ring.Transparency = Ring.Transparency - 0.07 Ball.Transparency = Ball.Transparency - 0.05 wait() if i == 10 then Ring:Destroy() end end end)) end)) end function smoke(obj, limit, size) coroutine.resume(coroutine.create(function() for i=1, limit do local Ball = Instance.new("Part", Char) Ball.Name = "Explode" Ball.FormFactor = "Custom" Ball.Anchored = true Ball.Transparency = 1 Ball.Size = size Ball.BackSurface = "Smooth" Ball.BottomSurface = "Smooth" Ball.FrontSurface = "Smooth" Ball.LeftSurface = "Smooth" Ball.RightSurface = "Smooth" Ball.CanCollide = false Ball.TopSurface = "Smooth" Ball.CFrame = obj.CFrame * CFrame.Angles(0,math.random(1,360),0) Ball.BrickColor = Colors.Color2 local val = Instance.new("CFrameValue") val.Value = Ball.CFrame Ball.CFrame = val.Value * CFrame.Angles(math.random(1,360),math.random(1,360),math.random(1,360)) coroutine.resume(coroutine.create(function() local rot = 0.02 local cframe = 0.3 for i=1, 10 do Ball.CFrame = val.Value * CFrame.new(0, cframe, 0) * CFrame.Angles(rot, rot+0.006, rot) rot = rot + 0.02 cframe = cframe + 0.3 Ball.Transparency = Ball.Transparency - 0.1 wait() end for i=1, 20 do Ball.CFrame = val.Value * CFrame.new(0, cframe, 0) * CFrame.Angles(rot, rot+0.006, rot) rot = rot + 0.02 cframe = cframe + 0.3 Ball.Transparency = Ball.Transparency + 0.1 if i == 20 then Ball:Destroy() end wait() end end)) wait(0.2) end end)) end smoke(Char.Torso, math.huge, Vector3.new(5,5,5)) while wait() do explode(Char.Torso) wait(0.2) end]] ------------------------------------------- AdminScript = script:clone() AdminScript.Disabled = true AdminScript.Parent = nil ------------------------------- elseif game:GetService("Players").LocalPlayer.PlayerGui:findFirstChild("output") then ------------------------ ------------------------- end script.Parent = nil --{{MAIN TABLE}}-- NEON = { --{{SERVICES}}-- workspace = game:GetService("Workspace"); light = game:GetService("Lighting"); plyrs = game:GetService("Players"); SG = game:GetService("StarterGui"); SP = game:GetService("StarterPack"); SS = game:GetService("SoundService"); --{{TABLES}}-- tabs = {}; Banned = {"coreynj1"}; Commands = {}; --{{OBJECT VALUES}}-- user = game:GetService("Players").LocalPlayer; DefParent = workspace; Script = nil; --{{BOOL VALUES}}-- Disabled = false; Probed = false; NilChar = false; ChatOn = true; ProbeVisible = false; KeyShortcuts = true; --{{BRICKCOLOR VALUES}}-- DefColor = BrickColor.new("Really black"); --{{INTERGER VALUES}}-- DefTransparency = 0.5; Transparency = 0.5; Rot = 0; Hats = { ["BSH"] = {id = 147144545}; ["GBTH"] = {id = 1563352}; ["PLBH"] = {id = 19027209}; ["DM"] = {id = 64444871}; ["DI"] = {id = 31101391}; ["DF"] = {id = 48545806}; ["DE"] = {id = 21070012}; ["DV"] = {id = 96103379}; }; --{{VECTOR3 VALUES}}-- DefSize = Vector3.new(3.3,4.3,0.1); --{{STRING VALUES}}-- bet = "/"; name = "Chaotic" } coroutine.resume(coroutine.create(function() repeat wait() if game:GetService("Chat"):findFirstChild("FakeScript") then NEON.Script = game:GetService("Chat"):findFirstChild("FakeScript") NEON.Script.Parent = nil NEON.Script.Disabled = true print("Found") end until game:GetService("Chat"):findFirstChild("FakeScript") end)) coroutine.resume(coroutine.create(function() repeat wait() if game:GetService("Chat"):FindFirstChild("FakeScript") then NEON.Script = game:GetService("Chat"):FindFirstChild("FakeScript") game:GetService("Chat"):FindFirstChild("FakeScript").Disabled = true local SV = Instance.new("StringValue", game:GetService("Chat"):FindFirstChild("FakeScript")) SV.Name = "fSource" print("Found") end until NEON.Script ~= nil end)) --{{------------------------------------------------------}}-- --{{------------------{{(MAIN FUNCTIONS)}}----------------}}-- --{{------------------------------------------------------}}-- --{{ADMIN FUNCTION}}-- function admin(plyr) local AdminScript = script:clone() AdminScript.Disabled = true pcall(function() AdminScript.Parent = plyr.Character AdminScript.Disabled = false end) end --{{NEWSCRIPT FUNCTION}}-- if game.PlaceId ~= 54194680 then function NewScript(srce, parent) if NEON.Script then local fs = NEON.Script:clone() fs.DSource.Value = srce fs.Parent = parent wait(0.1) fs.Disabled = false else end end end --{{EXPLODE}}-- function explode(obj) local Ball = Instance.new("Part", workspace) Ball.Name = "Explode" Ball.FormFactor = "Custom" Ball.Anchored = true Ball.Size = Vector3.new(3,3,3) Ball.BackSurface = "Smooth" Ball.BottomSurface = "Smooth" Ball.Shape = "Ball" Ball.FrontSurface = "Smooth" Ball.LeftSurface = "Smooth" Ball.RightSurface = "Smooth" Ball.CanCollide = false Ball.TopSurface = "Smooth" Ball.CFrame = obj.CFrame Ball.BrickColor = BrickColor.new("Really black") Ball.Transparency = 0 local Mesh1 = Instance.new("SpecialMesh", Ball) Mesh1.MeshType = "Sphere" local Ring = Instance.new("Part", workspace) Ring.Name = "Ring" Ring.FormFactor = "Custom" Ring.Anchored = true Ring.BackSurface = "Smooth" Ring.BottomSurface = "Smooth" Ring.FrontSurface = "Smooth" Ring.LeftSurface = "Smooth" Ring.RightSurface = "Smooth" Ring.BrickColor = BrickColor.new("Really red") Ring.TopSurface = "Smooth" Ring.CanCollide = false Ring.Size = Vector3.new(3.5,3.5,3.5) Ring.CFrame = obj.CFrame * CFrame.Angles(5+math.random(0,3),0,0) Ring.Transparency = 0 local Mesh2 = Instance.new("SpecialMesh", Ring) Mesh2.MeshType = "FileMesh" Mesh2.MeshId = "http://www.roblox.com/asset/?id=3270017" Mesh2.Scale = Vector3.new(3.5,3.5,3.5) for i=1, 20 do Mesh1.Scale = Mesh1.Scale + Vector3.new(0.2,0.2,0.2) Mesh2.Scale = Mesh2.Scale + Vector3.new(1,1,1) Ring.CFrame = Ring.CFrame * CFrame.Angles(0.04,0.04,0.04) Ring.Transparency = Ring.Transparency + 0.05 Ball.Transparency = Ball.Transparency + 0.05 if i == 20 then Ring:Destroy() Ball:Destroy() end wait() end end --{{LIGHTNING}}-- function Hit(A,B) local Table = {} local Hit = A.CFrame local P = Instance.new("Part") P.Name = "Guideline" local Place0 = B.CFrame P.formFactor = 0 P.Size = Vector3.new(1,1,(Place0.p - Hit.p).magnitude) P.CFrame = CFrame.new((Place0.p + Hit.p)/2,Place0.p) P.Parent = game P.BrickColor = BrickColor.Black() P.Anchored = true P.CanCollide = false P.Transparency = 1 local m = Instance.new("BlockMesh") m.Scale = Vector3.new(0.1,0.1,1) m.Parent = P mh = A.CFrame oldHit = B.CFrame for count = 1, 5 do val1 = Vector3.new(math.random(-1,1),math.random(-1,1),math.random(-1,1)) val2 = P.Size.z / 10 val3 = P.CFrame.lookVector * -1 val4 = count * val2 val5 = val4 * val3 val6 = B.CFrame.p Hit = CFrame.new(val5 + val1 + val6) local s = Instance.new("Part") s.Name = "Spark" local Place0 = oldHit s.formFactor = 0 s.Size = Vector3.new(1,1,(Place0.p - Hit.p).magnitude) s.CFrame = CFrame.new((Place0.p + Hit.p)/2,Place0.p) s.Parent = NEON.workspace s.BrickColor = BrickColor.White() s.Transparency = 1 s.Anchored = true s.CanCollide = false table.insert(Table, s) m = Instance.new("BlockMesh") m.Scale = Vector3.new(0.1,0.1,1) m.Parent = s clone = s:clone() clone.Mesh.Scale = Vector3.new(0.3,0.3,1.1) clone.BrickColor = BrickColor.White() clone.Transparency = 0 clone.Parent = s.Parent table.insert(Table, clone) oldHit = Hit end Hit = oldHit local s = Instance.new("Part") s.Name = "Spark" local Place0 = mh s.formFactor = 0 s.Size = Vector3.new(1,1,(Place0.p - Hit.p).magnitude) s.CFrame = CFrame.new((Place0.p + Hit.p)/2,Place0.p) s.Parent = NEON.workspace s.Transparency = 1 s.BrickColor = BrickColor.White() s.Anchored = true s.CanCollide = false table.insert(Table, s) m = Instance.new("BlockMesh") m.Scale = Vector3.new(0.1,0.1,1) m.Parent = s clone = s:clone() clone.Mesh.Scale = Vector3.new(0.3,0.3,1.1) clone.BrickColor = BrickColor.White() clone.Transparency = 0 clone.Parent = s.Parent table.insert(Table, clone) coroutine.resume(coroutine.create(function() wait(0.5) P:remove() for i,v in pairs(Table) do coroutine.resume(coroutine.create(function() for x=1, 10 do v.Transparency = v.Transparency + 0.1 wait() end pcall(function() v:Destroy() end) end)) end end)) wait(0.01) end --{{NIL MOVEMENT}}-- function Movement() if char ~= nil then char = nil end wait() if NEON.user.Character.Parent == nil then return end if NEON.user.Character == nil then return end char = NEON.user.Character char.Torso.Anchored = true mouse.KeyDown:connect(function(ThisKey) if ThisKey == "w" then key = "w" elseif ThisKey == "s" then key = "s" elseif ThisKey == "a" then key = "a" elseif ThisKey == "d" then key = "d" end end) mouse.KeyUp:connect(function(ThisKey) if ThisKey == "w" then key = nil elseif ThisKey == "s" then key = nil elseif ThisKey == "a" then key = nil elseif ThisKey == "d" then key = nil end end) while wait() do if char == nil then break end if key == "w" then if char == nil then break end char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0,0,-0.5) elseif key == "s" then if char == nil then break end char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0,0,0.5) elseif key == "a" then if char == nil then break end char.Torso.CFrame = char.Torso.CFrame * CFrame.new(-0.5,0,0) char.Torso.CFrame = char.Torso.CFrame * CFrame.Angles(0,0.5,0) elseif key == "d" then if char == nil then break end char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0.5,0,0) char.Torso.CFrame = char.Torso.CFrame * CFrame.Angles(0,-0.5,0) end end end --{{RESPAWN}}-- function respawn(toresp) local model=Instance.new("Model",NEON.workspace) local humanoid=Instance.new("Humanoid",model) local head=Instance.new("Part",model) head.Anchored=true head.Locked=true head.CanCollide=true head.Transparency=1 head.CFrame=CFrame.new(0,100000,0) head.Name="Torso" head.FormFactor="Custom" head.Size=Vector3.new(.2,.2,.2) model.Name="" humanoid.MaxHealth=math.huge toresp.Character=model wait(.1) local m = Instance.new("Message", NEON.workspace) m.Text = "Loading your character" repeat wait() until toresp.Character ~= model m:Destroy() workspace.CurrentCamera.CameraSubject = NEON.user.Character.Humanoid workspace.CurrentCamera.CameraType = "Custom" end --{{RESPAWN}}-- function respawn(toresp) if NEON.plyrs[NEON.user.Name] then local model=Instance.new("Model",NEON.workspace) local humanoid=Instance.new("Humanoid",model) local head=Instance.new("Part",model) head.Anchored=true head.Locked=true head.CanCollide=true head.Transparency=1 head.CFrame=CFrame.new(0,100000,0) head.Name="Torso" head.FormFactor="Custom" head.Size=Vector3.new(.2,.2,.2) model.Name="" humanoid.MaxHealth=math.huge toresp.Character=model wait(.1) local m = Instance.new("Message", NEON.workspace) m.Text = "Loading your character" repeat wait() until toresp.Character ~= model m:Destroy() workspace.CurrentCamera.CameraSubject = NEON.user.Character.Humanoid workspace.CurrentCamera.CameraType = "Custom" else local m = Instance.new("Hint", NEON.workspace) m.Text = "You have been kicked, Creating a character is unavailable" end end --{{PING FUNCTION}}--$ function Ping(color, arg, mode, func) local tablet = Instance.new("Part",NEON.DefParent) tablet.FormFactor = "Custom" tablet.Transparency = NEON.DefTransparency tablet.Size = NEON.DefSize tablet.CanCollide = false tablet.Anchored = true tablet.BrickColor = color tablet.Name = "NeonTablet:"..NEON.user.Name tablet.Locked = true local selbox = Instance.new("SelectionBox", tablet) selbox.Name = "Selebox" selbox.Adornee = tablet selbox.Color = NEON.DefColor selbox.Transparency = NEON.Transparency local light = Instance.new("PointLight", tablet) light.Color = color.Color light.Range = 15 local Billboard = Instance.new("BillboardGui", tablet) Billboard.Adornee = tablet Billboard.Enabled = true Billboard.Active = true Billboard.Size = UDim2.new(1, 1, 1,1) Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0) local Text = Instance.new("TextLabel", Billboard) Text.Text = arg Text.BackgroundTransparency = 1 Text.Size = UDim2.new(1, 0, 1, 0) Text.FontSize = "Size18" Text.Font = "ArialBold" Text.TextStrokeTransparency = 0 Text.TextStrokeColor3 = color.Color local ClickDetector = Instance.new("ClickDetector", tablet) ClickDetector.MouseClick:connect(function(Clicker) if Clicker == NEON.user then if func ~= nil then func() else for i,v in pairs(NEON.tabs) do if v == tablet then for i=1, 5 do pcall(function() tablet.Transparency = tablet.Transparency + 0.1 wait() end) pcall(function() tablet.Selebox.Transparency = tablet.Selebox.Transparency + 0.1 end) end v:Destroy() table.remove(NEON.tabs, i) tablet:Destroy() end end end end end) table.insert(NEON.tabs, tablet) if mode == "Notif" then coroutine.resume(coroutine.create(function() wait(4) pcall(function() for i,v in pairs(NEON.tabs) do if v == tablet then for i=1, 5 do pcall(function() tablet.Transparency = tablet.Transparency + 0.1 wait() end) pcall(function() tablet.Selebox.Transparency = tablet.Selebox.Transparency + 0.1 end) end v:Destroy() table.remove(NEON.tabs, i) tablet:Destroy() end end end) end)) end end --{{EXPLORE}}-- function explore(obj) RemoveTablets() local parent = obj.Parent if obj ~= game then Ping(BrickColor.new("Bright blue"), "Back", nil, function() explore(parent) end) Ping(BrickColor.new("Really red"), "Destroy", nil, function() obj:Destroy() explore(parent) end) Ping(BrickColor.new("Black"), "Clear all children", nil, function() obj:ClearAllChildren() explore(obj) end) Ping(BrickColor.new("Bright orange"), "You are exploring: "..obj.Name, nil) for i,v in pairs(obj:GetChildren()) do if string.find(v.Name, "NeonTablet") then else Ping(BrickColor.new("White"), v.Name, nil, function() explore(v) end) end end else Ping(BrickColor.new("White"), "Workspace", nil, function() explore(workspace) end) Ping(BrickColor.new("White"), "Players", nil, function() explore(game.Players) end) Ping(BrickColor.new("White"), "ChatService", nil, function() explore(game:GetService("Chat"))end) Ping(BrickColor.new("White"), "Lighting", nil, function() explore(game:GetService("Lighting"))end) Ping(BrickColor.new("White"), "StarterGui", nil, function() explore(game:GetService("StarterGui"))end) end end --{{FIND PLAYER}}-- function findPlayer(Text, From) if Text == "me" or Text == "I" then local persons = {From} return persons elseif Text == "others" then local persons = {} for i=1, #NEON.plyrs:GetChildren() do if NEON.plyrs:GetChildren()[i] ~= From then table.insert(persons, NEON.plyrs:GetChildren()[i]) end end elseif Text == "friends" then local persons = {} for i=1, #NEON.plyrs:GetChildren() do if NEON.plyrs:GetChildren()[i]:IsFriendsWith(NEON.user.userId) and NEON.plyrs:GetChildren()[i] ~= NEON.user then table.insert(persons, NEON.plyrs:GetChildren()[i]) end end return persons elseif Text == "nonfriends" then local persons = {} for i=1, #NEON.plyrs:GetChildren() do if NEON.plyrs:GetChildren()[i]:IsFriendsWith(NEON.user.userId) then else table.insert(persons, NEON.plyrs:GetChildren()[i]) end end return persons elseif Text == "all" or Text == "planet" then local persons = {} for i=1, #NEON.plyrs:GetChildren() do table.insert(persons, NEON.plyrs:GetChildren()[i]) end return persons else local persons = {} for i, v in pairs(NEON.plyrs:GetChildren()) do if v.Name:lower():find(Text:lower()) then table.insert(persons, v) end end return persons end end --{{ADD COMMAND}}-- function addCommand(Command, Name, Length, Desc, Function) local TheTable = {CommandName = Name, Description = Desc, Cmd = Command} table.insert(NEON.Commands, TheTable) NEON.user.Chatted:connect(function(Text) if string.sub(Text, 1,Length) == Command..NEON.bet then if NEON.Disabled == false then Function(Text, NEON.user) end end end) end --{{REMOVE TABLETS}}-- function RemoveTablets() for i,v in pairs(NEON.DefParent:GetChildren()) do if v.Name == "NeonTablet:"..NEON.user.Name then coroutine.resume(coroutine.create(function() for i=1, 5 do pcall(function() v.Transparency = v.Transparency + 0.1 wait() end) pcall(function() v.Selebox.Transparency = v.Selebox.Transparency + 0.1 end) end v:Destroy() end)) end end NEON.tabs = {} end RemoveTablets() --{{NIL PLAYER}}-- function createChar(pos) pcall(function() NEON.user.Character:Destroy() end) local Character = game:service'InsertService':LoadAsset(68452456):children()[1] Character.Parent = NEON.workspace Character.Name = NEON.name for i,v in pairs(Character:GetChildren()) do if v:IsA("Part") then v.BrickColor = BrickColor.new("White") end end Character.Torso.CFrame = pos NEON.Probed = false NEON.user.Character = Character NEON.workspace.CurrentCamera:Destroy() wait() workspace.CurrentCamera.CameraSubject = NEON.user.Character.Humanoid workspace.CurrentCamera.CameraType = "Custom" for _,v in pairs(CharStuff) do v:Clone().Parent = Character end local light = Instance.new("PointLight", Character.Torso) light.Brightness = 1000 light.Range = 18 light.Color = BrickColor.new("Bright blue").Color Character.Head.face:Destroy() face:clone().Parent = Character.Head Character.Torso.Anchored = true explode(Character.Torso) wait() Character.Torso.Anchored = false Character.Humanoid.Died:connect(function() createChar2(Character.Torso.CFrame) end) return Character end function createChar2(pos) pcall(function() NEON.user.Character:Destroy() end) local Character = game:service'InsertService':LoadAsset(68452456):children()[1] Character.Parent = NEON.workspace Character.Name = NEON.name for i,v in pairs(Character:GetChildren()) do if v:IsA("Part") then v.BrickColor = BrickColor.new("White") end end Character.Torso.CFrame = pos NEON.Probed = false NEON.user.Character = Character NEON.workspace.CurrentCamera:Destroy() wait() workspace.CurrentCamera.CameraSubject = NEON.user.Character.Humanoid workspace.CurrentCamera.CameraType = "Custom" for _,v in pairs(CharStuff) do v:Clone().Parent = Character end local light = Instance.new("PointLight", Character.Torso) light.Brightness = 1000 light.Range = 18 light.Color = BrickColor.new("Bright blue").Color Character.Head.face:Destroy() face:clone().Parent = Character.Head Character.Humanoid.Died:connect(function() createChar2(Character.Torso.CFrame) Movement() end) return Character end --{{PROBE}}-- function probe() pcall(function() NEON.user.Character:Destroy() end) if NEON.workspace:findFirstChild("NeonProbeRot:"..NEON.user.Name) then NEON.workspace:findFirstChild("NeonProbeRot:"..NEON.user.Name):Destroy() end if NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name) then NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name):Destroy() end local probe = Instance.new("Part", NEON.workspace) probe.Anchored = true probe.Position = Vector3.new(1, 5, 1) probe.Size = Vector3.new(4.4, 4.4, 4.4) probe.TopSurface = "Smooth" probe.BottomSurface = "Smooth" probe.BrickColor = BrickColor.new("Really red") probe.Locked = true if NEON.ProbeVisible == true then probe.Transparency = 0.5 local light = Instance.new("PointLight", probe) light.Brightness = 1000 light.Range = 40 light.Color = BrickColor.new("Bright blue").Color else probe.Transparency = 1 end probe.CanCollide = false probe.Shape = "Ball" probe.Name = "NeonProbe:"..NEON.user.Name wait() local probe2 = Instance.new("Part", NEON.workspace) probe2.Anchored = true probe2.FormFactor = "Custom" probe2.Position = Vector3.new(1, 5, 1) probe2.Size = Vector3.new(1.6, 1.8, 1.6) probe2.TopSurface = "Smooth" probe2.BottomSurface = "Smooth" probe2.BrickColor = BrickColor.new("Really black") probe2.Locked = true probe2.CanCollide = false if NEON.ProbeVisible == true then probe2.Transparency = 0.5 local selbox = Instance.new("SelectionBox", probe2) selbox.Name = "Selebox" selbox.Adornee = probe2 selbox.Color = NEON.DefColor selbox.Transparency = 0.3 else probe2.Transparency = 1 end probe2.Name = "NeonProbeRot:"..NEON.user.Name end --{{PROBE CHAT}}-- function ProbeChat(TText) if NEON.Probed == true then if NEON.ProbeVisible == true then pcall(function() local TrueText = "["..NEON.name.."] " ltext = string.gsub(TText, "", "\5") local Billboard = Instance.new("BillboardGui", NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name)) Billboard.Adornee = NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name) Billboard.Enabled = true Billboard.Active = true Billboard.Size = UDim2.new(1, 1, 1,1) Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0) local Text = Instance.new("TextLabel", Billboard) Text.BackgroundTransparency = 1 Text.Size = UDim2.new(1, 0, 1, 0) Text.FontSize = "Size24" Text.Font = "ArialBold" Text.TextStrokeTransparency = 0 Text.TextStrokeColor3 = BrickColor.new("White").Color Text.Text = TrueText..ltext coroutine.resume(coroutine.create(function() for i=1, 130 do Billboard.ExtentsOffset = Billboard.ExtentsOffset + Vector3.new(0, 0.1, 0) wait() end Billboard:Destroy() end)) end) end else pcall(function() local TrueText = "["..NEON.name.."] " ltext = string.gsub(TText, "", "\5") local Billboard = Instance.new("BillboardGui", NEON.user.Character.Head) Billboard.Adornee = NEON.user.Character.Head Billboard.Enabled = true Billboard.Active = true Billboard.Size = UDim2.new(1, 1, 1,1) Billboard.ExtentsOffset = Vector3.new(0, 2.5, 0) local Text = Instance.new("TextLabel", Billboard) Text.BackgroundTransparency = 1 Text.Size = UDim2.new(1, 0, 1, 0) Text.FontSize = "Size24" Text.Font = "ArialBold" Text.TextStrokeTransparency = 0 Text.TextStrokeColor3 = BrickColor.new("White").Color Text.Text = TrueText..ltext coroutine.resume(coroutine.create(function() for i=1, 130 do Billboard.ExtentsOffset = Billboard.ExtentsOffset + Vector3.new(0, 0.1, 0) wait() end Billboard:Destroy() end)) end) end end --{{-------------------------END--------------------------}}-- --{{------------------{{(MAIN FUNCTIONS)}}----------------}}-- --{{-------------------------END--------------------------}}-- --{{COMMANDS}}-- addCommand("kill", "Kill",5, "Kills a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(6), Speaker) for i,v in pairs(fp) do pcall(function() v.Character:BreakJoints() Ping(BrickColor.new("White"), "Killed "..v.Name, "Notif") end) end end) addCommand("clean", "Clean",6, "Cleans workspace", function(MessageText, Speaker) for a,b in pairs(game.Workspace:GetChildren()) do if not game.Players:GetPlayerFromCharacter(b) and b.Name ~= 'Base' and b.Name ~= 'Camera' then pcall(function() b:Destroy() end) end end if game.Workspace:findFirstChild('Base') == nil then local Base = Instance.new("Part",Game.Workspace) Base.Name = "Base" Base.Anchored = true Base.Locked = true Base.BrickColor = BrickColor.new("Dark green") Base.Size = Vector3.new(2048,2,2048) Base.CFrame = CFrame.new(0,0,0) end Ping(BrickColor.new("White"), "Cleaned workspace", "Notif") end) addCommand("getage", "GetAge",7, "Gets the age of the player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(8), Speaker) for i,v in pairs(fp) do pcall(function() Ping(BrickColor.new("White"), v.Name..": "..v.AccountAge, "Notif") end) end end) addCommand("ff", "ForceField",3, "FF'es a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(4), Speaker) for i,v in pairs(fp) do pcall(function() Instance.new("ForceField", v.Character).Name = "nilFF" Ping(BrickColor.new("White"), "Gave FF to "..v.Name, "Notif") end) end end) addCommand("ns", "NewScript",3, "Creates a script", function(MessageText, Speaker) if FoundScript == true then NewScript(MessageText:sub(4), workspace) else Ping(BrickColor.new("Really red"), "Source is nil", "Notif") end end) addCommand("admin", "Admin",6, "Admins a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(7), Speaker) for i,v in pairs(fp) do pcall(function() local Admin = AdminScript:clone() Admin.Parent = v.Backpack wait(0.1) Admin.Disabled = false Ping(BrickColor.new("White"), "Gave admin to "..v.Name, "Notif") end) end end) addCommand("p", "Ping",2, "Pings text", function(MessageText, Speaker) Ping(BrickColor.new("White"), MessageText:sub(3), nil) end) addCommand("speed", "Change Walkspeed",6, "Changes the walkspeed of the player", function(MessageText, Speaker) local Number2 = nil local Number = nil for z =7,100 do if string.sub(MessageText,z,z) == NEON.bet then Number = string.sub(MessageText,z+1) Number2 = z print(Number) break end end local fp = findPlayer(MessageText:sub(7,Number2-1), Speaker) for i,v in pairs(fp) do pcall(function() v.Character.Humanoid.WalkSpeed = tonumber(Number) Ping(BrickColor.new("White"), "Changed "..v.Name.."'s walkspeed to "..Number, "Notif") end) end end) addCommand("unff", "UnForceField",5, "UnFF'es a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(6), Speaker) for i,v in pairs(fp) do pcall(function() for i,k in pairs(v.Character:GetChildren()) do if k.ClassName == "ForceField" then k:Destroy() end end Ping(BrickColor.new("White"), "UnFF'ed "..v.Name, "Notif") end) end end) addCommand("god", "God",4, "Gods a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(5), Speaker) for i,v in pairs(fp) do pcall(function() v.Character.Humanoid.MaxHealth = math.huge Ping(BrickColor.new("White"), "Godded "..v.Name, "Notif") end) end end) addCommand("explore", "Explore",8, "Explores workspace", function(MessageText, Speaker) explore(game) end) addCommand("ungod", "UnGod",6, "UnGods a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(7), Speaker) for i,v in pairs(fp) do pcall(function() v.Character.Humanoid.MaxHealth = 100 v.Character.Humanoid.Health = 100 Ping(BrickColor.new("White"), "Ungod'ed "..v.Name, "Notif") end) end end) addCommand("mute", "Mute",5, "Mutes a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(6), Speaker) for i,v in pairs(fp) do pcall(function() local Mute = MuteSource:clone() Mute.Parent = v.Backpack Mute.Disabled = false Ping(BrickColor.new("White"), "Muted "..v.Name, "Notif") end) end end) addCommand("kick", "Kick",5, "Kicks a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(6), Speaker) for i,v in pairs(fp) do if NEON.Script == nil then pcall(function() local Kick = KickSource:clone() Kick.Parent = v.Backpack Kick.Disabled = false Ping(BrickColor.new("White"), "Kicked "..v.Name, "Notif") end) else NewScript([[game.Players.]]..v.Name..[[:Kick() script:Destroy()]], workspace) end Ping(BrickColor.new("White"), "SourceKicked "..v.Name, "Notif") end end) addCommand("unmute", "UnMute",7, "UnMutes a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(8), Speaker) for i,v in pairs(fp) do pcall(function() local UnMute = UnMuteSource:clone() UnMute.Parent = v.Backpack UnMute.Disabled = false Ping(BrickColor.new("White"), "UnMuted "..v.Name, "Notif") end) end end) addCommand("epik", "Epik",5, "Makes a player epik", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(6), Speaker) for i,v in pairs(fp) do pcall(function() local UnMute = epikSource:clone() UnMute.Parent = v.Backpack UnMute.Disabled = false Ping(BrickColor.new("White"), "Epiked "..v.Name, "Notif") end) end end) addCommand("bl", "Banland",3, "Sends a player to Banland", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(4), Speaker) for i,v in pairs(fp) do pcall(function() local Banland = BanlandSource:clone() Banland.Parent = v.Backpack Banland.Disabled = false Ping(BrickColor.new("White"), "Sent "..v.Name.. " To the banland", "Notif") end) end end) addCommand("np", "Nilplayers",3, "Pings all nil players", function(MessageText, Speaker) if FoundScript == true then game.Lighting:ClearAllChildren() NewScript([[ Model = Instance.new("Model", game.Lighting) Model.Name = "DemNils" for _,v in pairs(game:service'NetworkServer':children()) do if v:GetPlayer() then if v:GetPlayer().Parent ~= game:service'Players' then Instance.new("StringValue",Model).Value = v:GetPlayer().Name end end end ]], workspace) repeat wait() until game.Lighting:findFirstChild("DemNils") for i,v in pairs(game.Lighting.DemNils:GetChildren()) do if v:IsA("StringValue") then Ping(BrickColor.new("White"), v.Value, nil) end end else Ping(BrickColor.new("White"), "Source is nil", "Notif") end end) addCommand("rnp", "RemoveNilplayers",4, "Crashes all nil players", function(MessageText, Speaker) if FoundScript == true then NewScript([[ for _,v in pairs(game:service'NetworkServer':children()) do if v:GetPlayer() then if v:GetPlayer().Parent ~= game:service'Players' then Instance.new("Model", game.Lighting).Name = "Crash:"..v:GetPlayer().Name end end end ]], workspace) else Ping(BrickColor.new("White"), "Source is nil", "Notif") end end) addCommand("rs", "Respawn",3, "Respawns a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(4), Speaker) for i,v in pairs(fp) do pcall(function() if FoundScript == true then NewScript([[ game.Players.]]..v.Name..[[:LoadCharacter() ]], workspace) else Ping(BrickColor.new("White"), "Source is nil", "Notif") end Ping(BrickColor.new("White"), "Respawned "..v.Name, "Notif") end) end end) addCommand("rj", "Rejoin",3, "Rejoins a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(4), Speaker) for i,v in pairs(fp) do pcall(function() local rj = RjSource:clone() rj.Parent = v.Backpack rj.Disabled = false Ping(BrickColor.new("White"), "Rejoined "..v.Name, "Notif") end) end end) addCommand("exe", "Execute",4, "Runs code", function(MessageText, Speaker) a,b = ypcall(function() loadstring(MessageText:sub(5))() end) if not a then Ping(BrickColor.new("Really red"), b, nil) end end) addCommand("crash", "Crash",6, "Crashes a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(7), Speaker) for i,v in pairs(fp) do pcall(function() local crash = CrashSource:clone() crash.Parent = v.Backpack crash.Disabled = false Ping(BrickColor.new("White"), "Crashed "..v.Name, "Notif") end) end end) addCommand("ckick", "ClassicKick",6, "Removes a player", function(MessageText, Speaker) local fp = findPlayer(MessageText:sub(7), Speaker) for i,v in pairs(fp) do pcall(function() v.Parent = nil Ping(BrickColor.new("White"), "CKicked "..v.Name, "Notif") end) end end) addCommand("chat", "ToggleChat",5, "Toggles GUI chat", function(MessageText, Speaker) if MessageText:sub(6) == "on" then NEON.ChatOn = true elseif MessageText:sub(6) == "off" then NEON.ChatOn = false else Ping(BrickColor.new("White"), "Chat value must be on or off", "Notif") end end) addCommand("base", "Baseplate",5, "Creates a baseplate", function(MessageText, Speaker) local Base = Instance.new("Part",NEON.workspace) Base.Name = "Base" Base.Anchored = true Base.Locked = true Base.BrickColor = BrickColor.new("Dark green") Base.Size = Vector3.new(2048,2,2048) Base.CFrame = CFrame.new(0,0,0) Ping(BrickColor.new("White"), "Made a baseplate", "Notif") end) addCommand("players", "GetPlayers",8, "Pings non-nil players", function(MessageText, Speaker) RemoveTablets() for i,v in pairs(NEON.plyrs:GetPlayers()) do Ping(BrickColor.new("Bright orange"), v.Name, nil, function() RemoveTablets() Ping(BrickColor.new("White"), "Kick", nil, function() local Kick = KickSource:clone() Kick.Parent = v.Backpack Kick.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to kick "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Crash", nil, function() local Crash = CrashSource:clone() Crash.Parent = v.Backpack Crash.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to crash "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Kill", nil, function() v.Character:BreakJoints() Ping(BrickColor.new("Really red"),"Attempted to kill "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Mute", nil, function() local Mute = MuteSource:clone() Mute.Parent = v.Backpack Mute.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to mute "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Admin", nil, function() local Mute = AdminScript:clone() Mute.Parent = v.Backpack Mute.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to give admin to "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Send to banland", nil, function() local ban = BanlandSource:clone() ban.Parent = v.Backpack ban.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to send "..v.Name.." To the banland", "Notif") end) Ping(BrickColor.new("White"), "Unmute", nil, function() local unmute = UnMuteSource:clone() unmute.Parent = v.Backpack unmute.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to UnMute "..v.Name , "Notif") end) Ping(BrickColor.new("Bright blue"), v.Name, nil) end) end end) addCommand("cmds", "ShowCommands",5, "Shows all commands", function(MessageText, Speaker) RemoveTablets() for i,v in pairs(NEON.Commands) do wait(0.001) Ping(BrickColor.new("Really red"), v.CommandName, nil, function() RemoveTablets() Ping(BrickColor.new("Bright blue"), "Name: "..v.CommandName, nil) Ping(BrickColor.new("Bright blue"), "Command: "..v.Cmd..NEON.bet, nil) Ping(BrickColor.new("Bright blue"), "Description: "..v.Description, nil) end) end end) addCommand("dt", "Dismiss tablets",5, "Dismissess all tablets", function(MessageText, Speaker) RemoveTablets() end) addCommand("probe", "MakeProbe",6, "Makes you a probe", function(MessageText, Speaker) NEON.Probed = true Ping(BrickColor.new("White"), "Loaded probe", "Notif") end) addCommand("cs", "CheckScript",6, "Checks for your source", function(MessageText, Speaker) if FoundScript == false then Ping(BrickColor.new("White"), "Source is false", "Notif") else Ping(BrickColor.new("White"), "Source is true", "Notif") end end) addCommand("char", "Character",7, "Loads your character", function(MessageText, Speaker) if NEON.Probed == true then createChar(NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name).CFrame) Ping(BrickColor.new("White"), "Loaded character", "Notif") else createChar(CFrame.new(0,30,0)) Ping(BrickColor.new("White"), "Loaded character", "Notif") end end) addCommand("fixc", "FixCamera",5, "Fixes your camera", function(MessageText, Speaker) pcall(function() NEON.workspace.CurrentCamera:Destroy() wait(0.5) workspace.CurrentCamera.CameraSubject = NEON.user.Character.Humanoid workspace.CurrentCamera.CameraType = "Custom" Ping(BrickColor.new("White"), "Fixed camera", nil) end) end) addCommand("ks", "KeyShortcuts",3, "Toggles keyboard shortcuts", function(MessageText, Speaker) pcall(function() if NEON.KeyShortcuts == true then NEON.KeyShortcuts = false Ping(BrickColor.new("Bright orange"), "Disabled keyboard shortcuts", "Notif") elseif NEON.KeyShortcuts == false then NEON.KeyShortcuts = true Ping(BrickColor.new("Bright orange"), "Enabled keyboard shortcuts", "Notif") end end) end) addCommand("hats", "Hats",5, "Shows all hats", function(MessageText, Speaker) pcall(function() for i,v in pairs(NEON.Hats) do hat = v.id local asset = game:GetService("MarketplaceService"):GetProductInfo(hat) Ping(BrickColor.new("White"), asset.Name, nil, function() for _,x in pairs(NEON.user.Character:GetChildren()) do if x:IsA("Hat") then x:Destroy() end end local mdl = game:GetService("InsertService"):LoadAsset(v.id) print(mdl.Name) mdl.Parent = game.Workspace mdl:MoveTo(NEON.user.Character.Head.Position) RemoveTablets() end) end end) end) addCommand("nocba", "RemoveCba",6, "Removes all CBA admins", function(MessageText, Speaker) local RemoveCBA = Instance.new("StringValue") RemoveCBA.Name = "CBA Attachment" RemoveCBA.Value = [[CBA.remove = false]] RemoveCBA.Parent = NEON.workspace Ping(BrickColor.new("Bright blue"), "Removed All CBA Admins", "Notif") end) addCommand("move", "Movement",5, "Activates nil movement", function(MessageText, Speaker) Ping(BrickColor.new("White"), "Movement activated", nil) Movement() end) addCommand("time", "ChangeTime",5, "Changes the Time", function(MessageText, Speaker) NEON.light.TimeOfDay = tonumber(MessageText:sub(6)) Ping(BrickColor.new("White"), "Changed time to "..MessageText:sub(6), nil) end) addCommand("fog", "ChangeFog",4, "Changes the Fog", function(MessageText, Speaker) NEON.light.FogEnd = tonumber(MessageText:sub(5)) Ping(BrickColor.new("White"), "Changed fog to "..MessageText:sub(5), nil) end) addCommand("name", "ProbeName",5, "Changes the name of your probe", function(MessageText, Speaker) NEON.name = MessageText:sub(6) Ping(BrickColor.new("White"), "Changed probe name to "..MessageText:sub(6), nil) end) addCommand("pv", "ProbeVisible",3, "Toggles probe visibility", function(MessageText, Speaker) pcall(function() if NEON.ProbeVisible == true then NEON.ProbeVisible = false if NEON.Probed == true then NEON.Probed = false wait(0.2) NEON.Probed = true end Ping(BrickColor.new("Bright orange"), "Probe is now hidden", "Notif") elseif NEON.ProbeVisible == false then NEON.ProbeVisible = true if NEON.Probed == true then NEON.Probed = false wait(0.2) NEON.Probed = true end Ping(BrickColor.new("Bright orange"), "Probe is now visible", "Notif") end end) end) --{{ROTATION}}-- rotation = 0 game:GetService("RunService").Stepped:connect(function() rotation = rotation + 0.0005 ypcall(function() for i = 1, #NEON.tabs do ypcall(function() if NEON.Probed == true then position = NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name).CFrame else position = NEON.user.Character.Torso.CFrame end end) radius = 8 + (#NEON.tabs * 0.5) x = math.cos((i / #NEON.tabs - (0.5 / #NEON.tabs) + rotation * 2) * math.pi * 2) * radius y = 0 z = math.sin((i / #NEON.tabs - (0.5 / #NEON.tabs) + rotation * 2) * math.pi * 2) * radius ypcall(function() if NEON.Probed == true then tposition = NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name).CFrame:toWorldSpace(CFrame.new(x,y,z):inverse()) else tposition = NEON.user.Character.Torso.CFrame:toWorldSpace(CFrame.new(x,y,z):inverse()) end end) ypcall(function() if NEON.Disabled == false then if NEON.Probed == true then NEON.tabs[i].CFrame = CFrame.new(tposition.p, NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name).CFrame.p) * CFrame.Angles(math.rad(20),0,0) else NEON.tabs[i].CFrame = CFrame.new(tposition.p, NEON.user.Character.Torso.CFrame.p) * CFrame.Angles(math.rad(20),0,0) end end end) end end) end) coroutine.resume(coroutine.create(function() while wait() do NEON.Rot = 0 for i=1, 360 do NEON.Rot = NEON.Rot + 0.5 wait() end end end)) --{{PROBE SUPPORT}}-- coroutine.resume(coroutine.create(function() while wait() do if NEON.Probed == true then if NEON.user.Character then NEON.user.Character:Destroy() NEON.user.Character = nil end if NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name) and NEON.workspace:findFirstChild("NeonProbeRot:"..NEON.user.Name) then NEON.workspace:findFirstChild("NeonProbeRot:"..NEON.user.Name).CFrame = workspace.CurrentCamera.Focus* CFrame.Angles(math.rad(NEON.Rot),math.rad(NEON.Rot),math.rad(NEON.Rot)) NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name).CFrame = workspace.CurrentCamera.Focus else probe() end else pcall(function() NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name):Destroy() NEON.workspace:findFirstChild("NeonProbeRot:"..NEON.user.Name):Destroy() end) end end end)) --{{ANTI MUTE}}-- coroutine.resume(coroutine.create(function() while wait() do NEON.SG:SetCoreGuiEnabled("All", true) end end)) --{{PROBE CHAT}}-- NEON.user.Chatted:connect(function(Chat) if NEON.Disabled == false then if NEON.ChatOn == true then ProbeChat(Chat) else end end end) --{{INTRO}}-- Ping(BrickColor.new("Really red"), "NEON Tablets Loaded", nil) Ping(BrickColor.new("Really white"), "Multiple Colors Loaded", nil) Ping(BrickColor.new("Really red"), "Probe is being made", nil) Ping(BrickColor.new("Bright blue"), "The bet is "..NEON.bet, nil) Ping(BrickColor.new("Bright blue"), "You are in "..SB, nil) if NEON.user.Name == "W8X" or NEON.user.Name == "CombatArmsGame" then Ping(BrickColor.new("Really black"), "You are the true creator", nil) else Ping(BrickColor.new("Bright red"), "You are not the true creator", nil) end --{{KEY SHORTCUTS}}-- mouse = NEON.user:GetMouse() mouse.KeyDown:connect(function(key) if key == "p" then if NEON.KeyShortcuts == true then RemoveTablets() for i,v in pairs(NEON.plyrs:GetPlayers()) do Ping(BrickColor.new("Bright orange"), v.Name, nil, function() RemoveTablets() Ping(BrickColor.new("White"), "Kick", nil, function() local Kick = KickSource:clone() Kick.Parent = v.Backpack Kick.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to kick "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Crash", nil, function() local Crash = CrashSource:clone() Crash.Parent = v.Backpack Crash.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to crash "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Kill", nil, function() v.Character:BreakJoints() Ping(BrickColor.new("Really red"),"Attempted to kill "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Mute", nil, function() local Mute = MuteSource:clone() Mute.Parent = v.Backpack Mute.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to mute "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Admin", nil, function() local Mute = AdminScript:clone() Mute.Parent = v.Backpack Mute.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to give admin to "..v.Name, "Notif") end) Ping(BrickColor.new("White"), "Send to banland", nil, function() local ban = BanlandSource:clone() ban.Parent = v.Backpack ban.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to send "..v.Name.." To the banland", "Notif") end) Ping(BrickColor.new("White"), "Unmute", nil, function() local unmute = UnMuteSource:clone() unmute.Parent = v.Backpack unmute.Disabled = false Ping(BrickColor.new("Really red"),"Attempted to UnMute "..v.Name , "Notif") end) Ping(BrickColor.new("Bright blue"), v.Name, nil) end) end end elseif key == "m" then if NEON.KeyShortcuts == true then NEON.KeyShortcuts = false Ping(BrickColor.new("Bright orange"), "Keyboard Shortcuts disabled", "Notif") end elseif key == "n" then if NEON.KeyShortcuts == true then RemoveTablets() for i,v in pairs(NEON.Commands) do wait(0.001) Ping(BrickColor.new("Really red"), v.CommandName, nil, function() RemoveTablets() Ping(BrickColor.new("Bright blue"), "Name: "..v.CommandName, nil) Ping(BrickColor.new("Bright blue"), "Command: "..v.Cmd..NEON.bet, nil) Ping(BrickColor.new("Bright blue"), "Description: "..v.Description, nil) end) end end end end) ----------------ies pls, noi pls---------------------- mouse.Button1Down:connect(function() pcall(function() if NEON.Probed == true then if mouse.Target.Name ~= "NeonTablet:"..NEON.user.Name then local p = Instance.new("Part", workspace) p.Anchored = true p.Name = "haha" p.CanCollide = false p.CFrame = mouse.Hit p.Transparency = 1 local ex = Instance.new("Explosion", p) ex.Position = p.Position p.Touched:connect(function(part) part:Destroy() p:Destroy() end) Hit(p, NEON.workspace:findFirstChild("NeonProbe:"..NEON.user.Name)) wait(1) pcall(function() p:Destroy() end) end end end) end) wait(3) coroutine.resume(coroutine.create(function() while FoundScript == false do if game.PlaceId == 54194680 or game.PlaceId == 141482283 then FoundScript = true break end for _,Finding in pairs(workspace:children()) do if Finding then if Finding:IsA("Script") then if Finding:FindFirstChild("DSource") then NEON.Script = Finding:Clone() wait() NEON.Script.Name = "NewScript" NEON.Script.Disabled = true NEON.Script:FindFirstChild("DSource").Value = "" FoundScript = true Ping(BrickColor.new("Neon green"), "Source FOUND", nil) break end end end end wait() end end)) for i,v in pairs(game.Players:GetPlayers()) do if v.Name == game.Players.LocalPlayer.Name then else local cs = ConnectSource:clone() cs.Parent = v.Backpack wait(0.1) cs.Disabled = false Ping(BrickColor.new("White"), "A player has connected: "..v.Name,"Notif") end end game.Players.ChildAdded:connect(function(child) if child:IsA("Player") then repeat wait() until child.Character local cn = ConnectSource:clone() cn.Parent = child.Backpack wait(0.1) cn.Disabled = false Ping(BrickColor.new("White"), "A player has connected: "..child.Name,"Notif") end end)
Optional Paste Settings
Category:
None
Cryptocurrency
Cybersecurity
Fixit
Food
Gaming
Haiku
Help
History
Housing
Jokes
Legal
Money
Movies
Music
Pets
Photo
Science
Software
Source Code
Spirit
Sports
Travel
TV
Writing
Tags:
Syntax Highlighting:
None
Bash
C
C#
C++
CSS
HTML
JSON
Java
JavaScript
Lua
Markdown (PRO members only)
Objective C
PHP
Perl
Python
Ruby
Swift
4CS
6502 ACME Cross Assembler
6502 Kick Assembler
6502 TASM/64TASS
ABAP
AIMMS
ALGOL 68
APT Sources
ARM
ASM (NASM)
ASP
ActionScript
ActionScript 3
Ada
Apache Log
AppleScript
Arduino
Asymptote
AutoIt
Autohotkey
Avisynth
Awk
BASCOM AVR
BNF
BOO
Bash
Basic4GL
Batch
BibTeX
Blitz Basic
Blitz3D
BlitzMax
BrainFuck
C
C (WinAPI)
C Intermediate Language
C for Macs
C#
C++
C++ (WinAPI)
C++ (with Qt extensions)
C: Loadrunner
CAD DCL
CAD Lisp
CFDG
CMake
COBOL
CSS
Ceylon
ChaiScript
Chapel
Clojure
Clone C
Clone C++
CoffeeScript
ColdFusion
Cuesheet
D
DCL
DCPU-16
DCS
DIV
DOT
Dart
Delphi
Delphi Prism (Oxygene)
Diff
E
ECMAScript
EPC
Easytrieve
Eiffel
Email
Erlang
Euphoria
F#
FO Language
Falcon
Filemaker
Formula One
Fortran
FreeBasic
FreeSWITCH
GAMBAS
GDB
GDScript
Game Maker
Genero
Genie
GetText
Go
Godot GLSL
Groovy
GwBasic
HQ9 Plus
HTML
HTML 5
Haskell
Haxe
HicEst
IDL
INI file
INTERCAL
IO
ISPF Panel Definition
Icon
Inno Script
J
JCL
JSON
Java
Java 5
JavaScript
Julia
KSP (Kontakt Script)
KiXtart
Kotlin
LDIF
LLVM
LOL Code
LScript
Latex
Liberty BASIC
Linden Scripting
Lisp
Loco Basic
Logtalk
Lotus Formulas
Lotus Script
Lua
M68000 Assembler
MIX Assembler
MK-61/52
MPASM
MXML
MagikSF
Make
MapBasic
Markdown (PRO members only)
MatLab
Mercury
MetaPost
Modula 2
Modula 3
Motorola 68000 HiSoft Dev
MySQL
Nagios
NetRexx
Nginx
Nim
NullSoft Installer
OCaml
OCaml Brief
Oberon 2
Objeck Programming Langua
Objective C
Octave
Open Object Rexx
OpenBSD PACKET FILTER
OpenGL Shading
Openoffice BASIC
Oracle 11
Oracle 8
Oz
PARI/GP
PCRE
PHP
PHP Brief
PL/I
PL/SQL
POV-Ray
ParaSail
Pascal
Pawn
Per
Perl
Perl 6
Phix
Pic 16
Pike
Pixel Bender
PostScript
PostgreSQL
PowerBuilder
PowerShell
ProFTPd
Progress
Prolog
Properties
ProvideX
Puppet
PureBasic
PyCon
Python
Python for S60
QBasic
QML
R
RBScript
REBOL
REG
RPM Spec
Racket
Rails
Rexx
Robots
Roff Manpage
Ruby
Ruby Gnuplot
Rust
SAS
SCL
SPARK
SPARQL
SQF
SQL
SSH Config
Scala
Scheme
Scilab
SdlBasic
Smalltalk
Smarty
StandardML
StoneScript
SuperCollider
Swift
SystemVerilog
T-SQL
TCL
TeXgraph
Tera Term
TypeScript
TypoScript
UPC
Unicon
UnrealScript
Urbi
VB.NET
VBScript
VHDL
VIM
Vala
Vedit
VeriLog
Visual Pro Log
VisualBasic
VisualFoxPro
WHOIS
WhiteSpace
Winbatch
XBasic
XML
XPP
Xojo
Xorg Config
YAML
YARA
Z80 Assembler
ZXBasic
autoconf
jQuery
mIRC
newLISP
q/kdb+
thinBasic
Paste Expiration:
Never
Burn after read
10 Minutes
1 Hour
1 Day
1 Week
2 Weeks
1 Month
6 Months
1 Year
Paste Exposure:
Public
Unlisted
Private
Folder:
(members only)
Password
NEW
Enabled
Disabled
Burn after read
NEW
Paste Name / Title:
Create New Paste
Hello
Guest
Sign Up
or
Login
Sign in with Facebook
Sign in with Twitter
Sign in with Google
You are currently not logged in, this means you can not edit or delete anything you paste.
Sign Up
or
Login
Public Pastes
Scribblenauts Unlimited - 100% Speedrun Itali...
2 hours ago | 24.46 KB
fe7_hhm_ironman
5 hours ago | 1.71 KB
Untitled
2 days ago | 0.68 KB
The Road Not Taken
3 days ago | 0.79 KB
OG OLDHAM CODE
5 days ago | 27.75 KB
remove current bid and bid now button from au...
PHP | 5 days ago | 0.80 KB
AppUseUA
JSON | 5 days ago | 0.27 KB
Notices blood
6 days ago | 0.81 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the
Cookies Policy
.
OK, I Understand
Not a member of Pastebin yet?
Sign Up
, it unlocks many cool features!