Advertisement
mathmasterphil

Solar Editing

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