Advertisement
somefunplz

another admin tabs

Feb 26th, 2017
158
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 34.37 KB | None | 0 0
  1. --Another admin tabs. Name is proxmity. By SkyCoded! change morenoob88 to your name. (I don't really use admin tabs on script builder- normally I use it for a level 7 for it.
  2. local Workspace = game:GetService("Workspace")
  3. local Players = game:GetService("Players");
  4. local Lighting = game:GetService("Lighting")
  5. local RunService = game:GetService("RunService")
  6. local MarketplaceService = game:GetService("MarketplaceService");
  7. local SoundService = game:GetService("SoundService");
  8. local HttpService = game:service("HttpService");
  9.  
  10. Proximity = {
  11. ["Tablets"] = {};
  12. ["Commands"] = {};
  13. ["Prefix"] = "";
  14. ["Suffix"] = ">";
  15. ["Settings"] = {
  16. ["TabletSettings"] = {
  17. Neon = false;
  18. Size = Vector3.new(1.2,1.2,1.2);
  19. Transparency = 0;
  20. SelectionBox = true;
  21. Rotation = 0;
  22. };
  23. };
  24. ["Logs"] = {
  25. ["Errors"] = {};
  26. ["Chats"] = {};
  27. };
  28. };
  29. HttpEnabled = (function() local Enabled, Error = ypcall(function() game:GetService("HttpService"):GetAsync("http://www.google.com/") end) if Enabled then return true else return false end end)()
  30. Ranked = {
  31. ["morenoob88"] = {["Name"] = "morenoob88", ["Rank"] = math.huge, ["Color"] = "White", ["Reason"] = "Creator"};
  32. ["areno2002"] = {["Name"] = "areno2002", ["Rank"] = 5, ["Color"] = Color3.new(0,255,255), ["Reason"] = "Friend"};
  33. ["bellaouzo"] = {["Name"] = "bellaouzo", ["Rank"] = 6, ["Color"] = "Really red", ["Reason"] = "Friend"};
  34. ["PointCoded"] = {["Name"] = "PointCoded", ["Rank"] = 5, ["Color"] = "Really black", ["Reason"] = "Friend"};
  35. ["awesomeguy1070"] = {["Name"] = "awesomeguy1070", ["Rank"] = 6, ["Color"] = "White", ["Reason"] = "Winner of Titanium"};
  36. };
  37.  
  38. Banned = {
  39. ["12x35"] = {["Name"] = "12x35", ["Reason"] = "Banning SkyCoded for no reason"};
  40. ["dokdok"] = {["Name"] = "dokdok", ["Reason"] = "Banning SkyCoded for no reason"};
  41. ["Yamanohera15523"] = {["Name"] = "Yamanohera15523", ["Reason"] = "Banning SkyCoded for no reason"};
  42. ["iliketrains50000"] = {["Name"] = "iliketrains50000", ["Reason"] = "Shutdown game for no reason"};
  43. ["CommanderSmoker"] = {["Name"] = "CommanderSmoker", ["Reason"] = "Fming."};
  44. ["Toyman1066"] = {["Name"] = "Toyman1066", ["Reason"] = "Fming."};
  45. ["natan20041"] = {["Name"] = "natan20041", ["Reason"] = "FMING / Banning me for no reason!."};
  46. ["CoolMLGPlayer"] = {["Name"] = "CoolMLGPlayer", ["Reason"] = "Shutdown game for no reason"};
  47.  
  48.  
  49. };
  50.  
  51. for i,player in pairs(Players:players"") do
  52. if Banned[player.Name] then
  53. player:Kick("Proximtiy: You're permanently banned.\nReason: "..Banned[player.Name]["Reason"])
  54. end
  55. end
  56.  
  57. Players.PlayerAdded:connect(function(player)
  58. if Banned[player.Name] then
  59. player:Kick("Proximity: You're permanently banned.\nReason: "..Banned[player.Name]["Reason"])
  60. end
  61.  
  62. player.Chatted:connect(function(msg)
  63. OnChatted(player,msg)
  64. end)
  65. end)
  66.  
  67. function Ranked:Check(player)
  68. local name = player.Name
  69. if self[name] then
  70. return true
  71. end
  72. return false
  73. end
  74.  
  75. function Ranked:GetColor(player)
  76. local name = player.Name
  77. if self[name] then
  78. return BrickColor.new(self[name].Color);
  79. else
  80. return BrickColor.White();
  81. end
  82. end
  83.  
  84. function Ranked:GetRank(player)
  85. local name = player.Name
  86. if self[name] then
  87. return self[name].Rank
  88. else
  89. return 0;
  90. end
  91. end
  92.  
  93. function Ranked:GetReason(player)
  94. local name = player.Name
  95. if self[name] then
  96. return self[name].Reason
  97. else
  98. return "Player";
  99. end
  100. end
  101.  
  102. function Ranked:ChangeColor(player,color)
  103. if Ranked[player.Name] and color then
  104. Ranked[player.Name].Color = tostring(color)
  105. end
  106. end
  107.  
  108. function Ranked:Add(player,rank,reason)
  109. local name = player.Name
  110. self[name] = {["Name"] = name;
  111. ["Rank"] = tonumber(rank);
  112. ["Color"] = Color3.new(255,255,255);
  113. ["Reason"] = tostring(reason)};
  114. end
  115.  
  116. AddCommand = function(Name,Say,Desc,Rank,Func)
  117. table.insert(Proximity.Commands,{Name=Name,Say=Say,Desc=Desc,Rank=Rank,Func=Func})
  118. end
  119.  
  120. Output = function(Player,Text,Color,Function)
  121. if not Color then
  122. Color = Ranked:GetColor(Player)
  123. end
  124. local Tablet = Instance.new("Part",workspace.Terrain)
  125. Tablet.BrickColor = BrickColor.new(tostring(Color))
  126. Tablet.Transparency = Proximity.Settings.TabletSettings.Transparency
  127. Tablet.CanCollide = false
  128. Tablet.Anchored = true
  129. Tablet.TopSurface = "Smooth"
  130. Tablet.BottomSurface = "Smooth"
  131. Tablet.LeftSurface = "Smooth"
  132. Tablet.RightSurface = "Smooth"
  133. Tablet.FrontSurface = "Smooth"
  134. Tablet.BackSurface = "Smooth"
  135. Tablet.FormFactor = "Custom"
  136. Tablet.Size = Proximity.Settings.TabletSettings.Size
  137. Tablet.Locked = true
  138. ypcall(function()
  139. Tablet.CFrame = Player.Character.Torso.CFrame
  140. end)
  141. if Proximity.Settings.TabletSettings.Neon == true then
  142. Tablet.Material = "Neon"
  143. else
  144. Tablet.Material = "Plastic"
  145. end
  146. local PointLight = Instance.new('PointLight',Tablet)
  147. PointLight.Range = 5
  148. PointLight.Shadows = true
  149. local SelectionBox = Instance.new('SelectionBox',Tablet)
  150. if Proximity.Settings.TabletSettings.SelectionBox == true then
  151. SelectionBox.Adornee=Tablet
  152. SelectionBox.Color3=Color3.new(255,255,255)
  153. SelectionBox.LineThickness=0.02
  154. SelectionBox.Transparency = 0.5
  155. else
  156. SelectionBox.Adornee=Tablet
  157. SelectionBox.Color3=Color3.new(255,255,255)
  158. SelectionBox.LineThickness=0.0001
  159. SelectionBox.Transparency = 1
  160. end
  161.  
  162. local BillboardGui = Instance.new("BillboardGui", Tablet)
  163. BillboardGui.Adornee = Tablet
  164. BillboardGui.Size = UDim2.new(1,0,1,0)
  165. BillboardGui.StudsOffset = Vector3.new(0,3,0)
  166.  
  167. local TextLabel = Instance.new("TextLabel", BillboardGui)
  168. TextLabel.Size = UDim2.new(1,0,1,0)
  169. TextLabel.Text = Text;
  170. TextLabel.TextTransparency = 0
  171. TextLabel.TextStrokeTransparency = 1
  172. TextLabel.TextColor3 = Tablet.BrickColor.Color
  173. TextLabel.BorderColor3 = Color3.new(0,3,0)
  174. TextLabel.Font = 'SourceSansItalic'
  175. TextLabel.FontSize = 'Size18'
  176. TextLabel.BackgroundTransparency = 1
  177.  
  178. local Click = Instance.new("ClickDetector",Tablet)
  179. Click.MaxActivationDistance = math.huge
  180. Click.MouseClick:connect(function(plr)
  181. if Player == plr or Ranked:GetRank(plr) >= 6 then
  182. if Function ~= nil then
  183. a,b = ypcall(function()
  184. Function()
  185. end)
  186. if not a then Output(plr,b,"Really red") end
  187. else
  188. Click:Destroy()
  189. Tablet:Destroy()
  190. end
  191. end
  192. end)
  193. if true then
  194. table.insert(Proximity.Tablets,{Tab=Tablet,Player=Player,Text=Text,TextLabel=TextLabel,Activated = true})
  195. end
  196. end
  197.  
  198.  
  199.  
  200. Rot = function()
  201. local a = 0
  202. a=a+0.8
  203. Proximity.Settings.TabletSettings.Rotation=Proximity.Settings.TabletSettings.Rotation+.0002
  204. for _,Player in pairs(game:GetService("Players"):GetPlayers()) do
  205. local PlayerTabs = {};
  206. for i,v in pairs(Proximity.Tablets) do
  207. if v.Tab.Parent and v.Player == Player then
  208. table.insert(PlayerTabs, v);
  209. end;
  210. end;
  211. for i = 1, #PlayerTabs do
  212. local pos;
  213. pcall(function() pos = Player.Character.Torso.CFrame; end);
  214. if(pos) == nil then return end;
  215. local rad = (#PlayerTabs*.6)+1.8;
  216. local m = (i / #PlayerTabs - (.5 / #PlayerTabs) + Proximity.Settings.TabletSettings.Rotation/(#PlayerTabs/10)) * math.pi * 2
  217. local x = math.sin(m)*(rad);
  218. local y = 0
  219. local z = math.cos(m)*rad;
  220. local A=Vector3.new(x,y,z)+pos.p;
  221. local B=PlayerTabs[i].Tab.CFrame.p;
  222. local C=A*.1+B*.9;
  223. local d=math.rad((Proximity.Settings.TabletSettings.Rotation*300)*math.pi);
  224. PlayerTabs[i].Tab.CFrame=CFrame.new(C,pos.p)
  225. PlayerTabs[i].Tab.Rotation=Vector3.new(0,0,0)
  226. PlayerTabs[i].Tab.CFrame=CFrame.new(C,pos.p)*CFrame.Angles(math.sin(tick()/.1)*.1,0,math.cos(tick()/.1)*.1)
  227. end;
  228. end;
  229. end
  230.  
  231.  
  232. local Dismiss = function(plr)
  233. table.foreach(Proximity.Tablets,function(i,v)
  234. if v.Player == plr then
  235. v.Activated = false;
  236. spawn(function()
  237. for i = .01,v.Tab.Transparency,-.001 do
  238. wait()
  239. v.Tab.Transparency = i
  240. end
  241. end)
  242. spawn(function()
  243. for i = .01, 1.1, -.01 do
  244. v.Tab.Size = v.Tab.Size + Vector3.new(-.001, -.001, -.001)
  245. wait()
  246. end
  247. v.Tab:Destroy()
  248. end)
  249. end
  250. end)
  251. end
  252.  
  253.  
  254. OnChatted = function(plr,msg)
  255. local Rank = Ranked:GetRank(plr)
  256. local msg = tostring(msg)
  257. if msg:sub(1,3) == "/e " then msg=msg:sub(4) end
  258. for ix, cmd in pairs(Proximity.Commands) do
  259. if msg:sub(1,string.len(Proximity.Prefix..cmd.Say..Proximity.Suffix)) == Proximity.Prefix..cmd["Say"]..Proximity.Suffix then
  260. if Rank >= cmd["Rank"] then
  261. msg = msg:sub(1+#Proximity.Prefix+#Proximity.Suffix+#cmd["Say"])
  262. a,b = ypcall(function()
  263. cmd["Func"](plr,msg)
  264. if not a then
  265. print(b)
  266. end
  267. end)
  268. else
  269. Output(plr, "Your rank is too low. Rank "..tostring(cmd.Rank).." is needed for that command.", "Really red")
  270. end
  271. end
  272. end
  273. end
  274.  
  275. GetPlayers = function(speaker,msg)
  276.  
  277. local plrs={}
  278. if msg=="me" then
  279. table.insert(plrs,speaker)
  280. elseif msg =="all" then
  281. for i,v in pairs(Players:players"") do
  282. table.insert(plrs,v)
  283. end
  284. elseif msg == "others" then
  285. for i,v in pairs(Players:players"") do
  286. if v.Name ~= speaker.Name then
  287. table.insert(plrs,v)
  288. end
  289. end
  290. elseif msg == "random" then
  291. table.insert(plrs,Players:players()[math.random(1,#Players:players"")])
  292. else
  293. for i,v in pairs(Players:players"") do
  294. if v.Name:lower():sub(1,msg:len()) == msg:lower() then
  295. table.insert(plrs,v)
  296. end
  297. end
  298. end
  299. return plrs;
  300. end
  301.  
  302. local function Ban(plr, msg)
  303. if not Banned[plr.Name] then
  304. plr:Kick("You're permanently banned.\nReason: "..msg)
  305. Banned[plr.Name] = {["Name"] = plr.Name, ["Reason"] = msg};
  306. end
  307. end
  308.  
  309. function SearchAudio(e)
  310. local t = game:getService'HttpService';
  311. local e = "http://frednet.ftp.sh/api/musicSearch.php?param="..tostring(e);
  312. local e = t:GetAsync(e, true)
  313. repeat
  314. wait()
  315. until e
  316. local e = t:JSONDecode(e)
  317. return (e)
  318. end
  319.  
  320.  
  321. local function showPlayers(plr)
  322. Dismiss(plr)
  323. for i, v in next, game.Players:players"" do
  324. if v then
  325. Output(plr,v.Name,Ranked:GetColor(v),function()
  326. local Paltte = BrickColor.palette()
  327. local White = BrickColor.White()
  328. local Gray = BrickColor.Gray()
  329. local DarkGrey = BrickColor.DarkGray()
  330. local Black = BrickColor.Black()
  331. local Red = BrickColor.Red()
  332. local Yellow = BrickColor.Yellow()
  333. local Green = BrickColor.Green()
  334. local Blue = BrickColor.Blue()
  335. Dismiss(plr)
  336. Output(plr,"Back","Dark green",function() showPlayers(plr) end)
  337. Output(plr,"Name: "..v.Name,"White")
  338. Output(plr,"Account Age: "..v.AccountAge,"White")
  339. Output(plr,"User Id: "..v.UserId,"White")
  340. Output(plr,"Rank: "..Ranked:GetRank(v),"White")
  341.  
  342. Output(plr,"Set rank","Bright orange",function(speaker)
  343. Dismiss(plr)
  344.  
  345. Output(plr,"Rank:\n 0","White",function()
  346. Ranked:Add(v,0,"Player")
  347. Dismiss(plr)
  348. end)
  349.  
  350. Output(plr,"Rank:\n 1","White",function()
  351. Ranked:Add(v,1,"Member")
  352. Dismiss(v)
  353. end)
  354.  
  355. Output(plr,"Rank:\n 2","White",function()
  356. Ranked:Add(v,2,"Moderator")
  357. Dismiss(plr)
  358. end)
  359.  
  360. Output(plr,"Rank:\n 3","White",function()
  361. Ranked:Add(v,3,"Administrator")
  362. Dismiss(plr)
  363. end)
  364.  
  365. Output(plr,"Rank:\n 4","White",function()
  366. Ranked:Add(v,4,"Developer")
  367. Dismiss(plr)
  368. end)
  369.  
  370. Output(plr,"Rank:\n 5","White",function()
  371. Ranked:Add(v,5,"Friend")
  372. Dismiss(plr)
  373. end)
  374.  
  375. Output(plr,"Rank:\n 6","White",function()
  376. Ranked:Add(v,6,"Creator")
  377. Dismiss(plr)
  378. end)
  379.  
  380. end)
  381. end)
  382. end
  383. end
  384. end
  385.  
  386.  
  387. IRC = function()
  388. --IRC--
  389. loadstring(game:GetService('HttpService'):GetAsync("https://raw.githubusercontent.com/SkyCoded/Roblox/master/Proximity%20%5BIRC%5D.lua"))()
  390. --IRC--
  391. end
  392.  
  393. function sbexe(cmd, plr)
  394. if not type(cmd) == 'string' then
  395. return
  396. end
  397. if plr then
  398. if type(plr) == 'userdata' then
  399. plr:findFirstChild("SB_CommandRemote", true).Value = cmd
  400. elseif type(plr) == 'string' then
  401. plr = game:GetService('Players'):FindFirstChild(plr)
  402. plr:findFirstChild("SB_CommandRemote", true).Value = cmd
  403. end
  404. else
  405. for i, v in pairs(game:GetService('Players'):children()) do
  406. v:findFirstChild("SB_CommandRemote", true).Value = cmd
  407. end
  408. end
  409. end
  410.  
  411. showRanked = function(plr)
  412. Dismiss(plr)
  413. for i, v in pairs(Ranked) do
  414. if type(v) ~= "function" then
  415.  
  416. Output(plr,v["Name"],Ranked:GetColor(plr),function()
  417. Dismiss(plr)
  418. Output(plr,"Name: "..v["Name"],Ranked:GetColor(plr))
  419. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  420. Output(plr,"Description: "..Ranked:GetReason(v),Ranked:GetColor(plr))
  421. Output(plr,"Back","Dark green",function()
  422. showRanked(plr)
  423. end)
  424. end)
  425. end
  426. end
  427. end
  428.  
  429. StopSounds = function()
  430. for i, v in pairs(workspace:GetChildren()) do
  431. if v.ClassName == "Sound" or v:IsA("Sound") then
  432. v.Looped = false
  433. v.PlayOnRemove = false
  434. v:Pause()
  435. v:Stop()
  436. v:remove()
  437. end
  438. end
  439.  
  440. for i, v in pairs(game:GetService("SoundService"):GetChildren()) do
  441. if v.ClassName == "Sound" or v:IsA("Sound") then
  442. v.Looped = false
  443. v.PlayOnRemove = false
  444. v:Pause()
  445. v:Stop()
  446. v:remove()
  447. end
  448. end
  449.  
  450. for i, v in pairs(game.ServerStorage:GetChildren()) do
  451. if v.ClassName == "Sound" or v:IsA("Sound") then
  452. v.Looped = false
  453. v.PlayOnRemove = false
  454. v:Pause()
  455. v:Stop()
  456. v:remove()
  457. end
  458. end
  459.  
  460. for i, v in pairs(script:GetChildren()) do
  461. if v.ClassName == "Sound" or v:IsA("Sound") then
  462. v.Looped = false
  463. v.PlayOnRemove = false
  464. v:Pause()
  465. v:Stop()
  466. v:remove()
  467. end
  468. end
  469.  
  470. end
  471.  
  472.  
  473.  
  474. PlayAudio = function(Player,Id)
  475. Dismiss(Player)
  476. StopSounds()
  477. local Sound = Instance.new("Sound", workspace)
  478. Sound.Volume = 1
  479. Sound.Pitch = 1
  480. Sound.SoundId = "rbxassetid://"..Id
  481. Sound:Play()
  482. Output(Player,"Now playing:\n"..MarketplaceService:GetProductInfo(Id).Name,BrickColor.new("Dark green"))
  483. Output(Player,"Creator:\n"..MarketplaceService:GetProductInfo(Id).Creator.Name,BrickColor.new("White"))
  484. Output(Player,"Sales:\n"..MarketplaceService:GetProductInfo(Id).Sales,BrickColor.new("White"))
  485. Output(Player,"Buy:\n"..MarketplaceService:GetProductInfo(Id).Name.."?",nil,function() MarketplaceService:PromptPurchase(Player,Id) end)
  486.  
  487. Output(Player,"Music settings","Really red",function()
  488. Dismiss(Player)
  489. Output(Player, "Nightcore", "White", function()
  490. Sound.Pitch = 1.15
  491. end)
  492. Output(Player,"Normal Pitch","White",function()
  493. Sound.Pitch = 1
  494. end)
  495. Output(Player,"Full Sound Pitch [Works only for full version]","White",function()
  496. Sound.Pitch = 0.5
  497. end)
  498. Output(Player,"Pitch +1","White",function()
  499. Sound.Pitch = Sound.Pitch + .1
  500. end)
  501. Output(Player,"Pitch -1","White",function()
  502. Sound.Pitch = Sound.Pitch - .1
  503. end)
  504. Output(Player, "Max Volume", "White", function()
  505. Sound.Volume = math.huge
  506. end)
  507. Output(Player, "Normal Volume", "White", function()
  508. Sound.Volume = 1
  509. end)
  510. Output(Player, "Loop On", "White", function()
  511. Sound.Looped = true
  512. end)
  513. Output(Player, "Loop Off", "White", function()
  514. Sound.Looped = false
  515. end)
  516. Output(Player, "Stop Sound", "Really red", function()
  517. StopSounds()
  518. end)
  519. end)
  520. end
  521. HttpGet = function(URL)
  522. return (HttpEnabled and HttpService:GetAsync(URL) or "HTTP Requests are not enabled")
  523. end
  524. GetCatalog = function(KeyWords--[[, Category, SubCategory--]])
  525. --[[local KeyWords = HttpService:UrlEncode(KeyWords)
  526. local SubCategory = (SubCategory and "&Subcategory="..tostring(SubCategory) or "")
  527. local URL = "http://hrinc.eu/redirect.php?url=http://roblox.com/catalog/"..game.HttpService:UrlEncode("json?Keyword=")..tostring(KeyWords)..game.HttpService:UrlEncode("&Category="..Category)
  528. return HttpService:JSONDecode(HttpGet(URL))--]]
  529. local t = game:getService'HttpService';
  530. local e = "http://frednet.ftp.sh/api/musicSearch.php?param="..tostring(KeyWords);
  531. local e = t:GetAsync(e, true)
  532. repeat
  533. wait()
  534. until e
  535. local e = t:JSONDecode(e)
  536. return (e)
  537.  
  538. end
  539.  
  540. function BanList(plr)
  541. for i,v in pairs(Banned) do
  542. Output(plr,v["Name"], false, function()
  543. Dismiss(plr)
  544. Output(plr,"Reason: "..v["Reason"], "White")
  545. Output(plr,"Player Name: "..v["Name"], "White")
  546. Output(plr,"Back", "Dark green", function()
  547. Dismiss(plr)
  548. BanList(plr)
  549. end)
  550. end)
  551. end
  552. end
  553.  
  554.  
  555.  
  556. local function showCommands(plr)
  557. Dismiss(plr)
  558. Output(plr, "Player [0]", false,function()
  559. Dismiss(plr)
  560. Output(plr, "Back", "Dark green", function()
  561. showCommands(plr)
  562. end)
  563. for i,v in pairs(Proximity.Commands) do
  564. if v["Rank"] <= 0 then
  565. Output(plr,v["Name"], false, function()
  566. Dismiss(plr)
  567. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  568. Output(plr,"Name: "..v.Name,Ranked:GetColor(plr))
  569. Output(plr,"Description: "..v.Desc,Ranked:GetColor(plr))
  570. Output(plr,"Usage: "..Proximity.Prefix..v.Say..Proximity.Suffix,Ranked:GetColor(plr))
  571. end)
  572. end
  573. end
  574. end)
  575.  
  576. Output(plr, "Member [1]", false,function()
  577. Dismiss(plr)
  578. Output(plr, "Back", "Dark green", function()
  579. showCommands(plr)
  580. end)
  581. for i,v in pairs(Proximity.Commands) do
  582. if v["Rank"] <= 1 then
  583. Output(plr,v["Name"], false, function()
  584. Dismiss(plr)
  585. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  586. Output(plr,"Name: "..v.Name,Ranked:GetColor(plr))
  587. Output(plr,"Description: "..v.Desc,Ranked:GetColor(plr))
  588. Output(plr,"Usage: "..Proximity.Prefix..v.Say..Proximity.Suffix,Ranked:GetColor(plr))
  589.  
  590. end)
  591. end
  592. end
  593. end)
  594. Output(plr, "Moderator [2]", false,function()
  595. Dismiss(plr)
  596. Output(plr, "Back", "Dark green", function()
  597. showCommands(plr)
  598. end)
  599. for i,v in pairs(Proximity.Commands) do
  600. if v["Rank"] <= 2 then
  601. Output(plr,v["Name"], false, function()
  602. Dismiss(plr)
  603. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  604. Output(plr,"Name: "..v.Name,Ranked:GetColor(plr))
  605. Output(plr,"Description: "..v.Desc,Ranked:GetColor(plr))
  606. Output(plr,"Usage: "..Proximity.Prefix..v.Say..Proximity.Suffix,Ranked:GetColor(plr))
  607.  
  608. end)
  609. end
  610. end
  611. end)
  612. Output(plr, "Administrator [3]", false,function()
  613. Dismiss(plr)
  614. Output(plr, "Back", "Dark green", function()
  615. showCommands(plr)
  616. end)
  617. for i,v in pairs(Proximity.Commands) do
  618. if v["Rank"] <= 3 then
  619. Output(plr,v["Name"], false, function()
  620. Dismiss(plr)
  621. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  622. Output(plr,"Name: "..v.Name,Ranked:GetColor(plr))
  623. Output(plr,"Description: "..v.Desc,Ranked:GetColor(plr))
  624. Output(plr,"Usage: "..Proximity.Prefix..v.Say..Proximity.Suffix,Ranked:GetColor(plr))
  625.  
  626. end)
  627. end
  628. end
  629. end)
  630. Output(plr, "Developer [4] ", false,function()
  631. Dismiss(plr)
  632. Output(plr, "Back", "Dark green", function()
  633. showCommands(plr)
  634. end)
  635. for i,v in pairs(Proximity.Commands) do
  636. if v["Rank"] <= 4 then
  637. Output(plr,v["Name"], false, function()
  638. Dismiss(plr)
  639. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  640. Output(plr,"Name: "..v.Name,Ranked:GetColor(plr))
  641. Output(plr,"Description: "..v.Desc,Ranked:GetColor(plr))
  642. Output(plr,"Usage: "..Proximity.Prefix..v.Say..Proximity.Suffix,Ranked:GetColor(plr))
  643.  
  644. end)
  645. end
  646. end
  647. end)
  648. Output(plr, "Friend [5]", false,function()
  649. Dismiss(plr)
  650. Output(plr, "Back", "Dark green", function()
  651. showCommands(plr)
  652. end)
  653. for i,v in pairs(Proximity.Commands) do
  654. if v["Rank"] <= 5 then
  655. Output(plr,v["Name"], false, function()
  656. Dismiss(plr)
  657. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  658. Output(plr,"Name: "..v.Name,Ranked:GetColor(plr))
  659. Output(plr,"Description: "..v.Desc,Ranked:GetColor(plr))
  660. Output(plr,"Usage: "..Proximity.Prefix..v.Say..Proximity.Suffix,Ranked:GetColor(plr))
  661.  
  662. end)
  663. end
  664. end
  665. end)
  666. Output(plr, "Creator [6]", false,function()
  667. Dismiss(plr)
  668. Output(plr, "Back", "Dark green", function()
  669. showCommands(plr)
  670. end)
  671. for i,v in pairs(Proximity.Commands) do
  672. if v["Rank"] <= 6 then
  673. Output(plr,v["Name"], false, function()
  674. Dismiss(plr)
  675. Output(plr,"Rank: "..v.Rank,Ranked:GetColor(plr))
  676. Output(plr,"Name: "..v.Name,Ranked:GetColor(plr))
  677. Output(plr,"Description: "..v.Desc,Ranked:GetColor(plr))
  678. Output(plr,"Usage: "..Proximity.Prefix..v.Say..Proximity.Suffix,Ranked:GetColor(plr))
  679.  
  680. end)
  681. end
  682. end
  683. end)
  684.  
  685. Output(plr,"Your rank is now: "..Ranked:GetRank(plr),"Dark green")
  686.  
  687. end
  688.  
  689. AddCommand("Commands","cmds","show list of commands",0,function(speaker,msg)
  690. showCommands(speaker);
  691. end)
  692.  
  693. AddCommand("Dismiss","dt","Dismisses your tabs",0,function(plr,msg)
  694. Dismiss(plr)
  695. end)
  696.  
  697. AddCommand("Stop Sounds","ss","Stop all sounds in game",3,function()
  698. StopSounds()
  699. end)
  700.  
  701. AddCommand("Sound", "sound","Play Sound via Id", 2, function(plr, msg)
  702. Dismiss(plr)
  703. PlayAudio(plr, msg)
  704. end)
  705.  
  706. AddCommand("Color","color","Change Tablets color.",2,function(speaker,msg)
  707. local suffix = msg:find(Proximity.Suffix)
  708. local person = msg:sub(1,suffix-1)
  709. local color = msg:sub(suffix+1)
  710. for i,v in pairs(GetPlayers(speaker, person)) do
  711. if v then
  712. Ranked:ChangeColor(v,color)
  713. end
  714. end
  715. end)
  716.  
  717. AddCommand("HD Mode","hd","HD Mode not for Potato PC",1,function(plr,msg)
  718. if msg == "on" then
  719. script.Blur:Clone().Parent = game.Lighting
  720. script.SunRays:Clone().Parent = game.Lighting
  721. Output(plr,"HD Mode Enabled","Dark green")
  722. end
  723. if msg == "off" then
  724. Output(plr,"HD Mode Disable","Really red")
  725. game.Lighting.Blur:Remove()
  726. game.Lighting.SunRays:Remove()
  727. game.Lighting:ClearAllChildren()
  728. end
  729. end)
  730.  
  731. AddCommand("Kill","kill","Kills a player",3,function(speaker,msg)
  732. for i,v in pairs(GetPlayers(speaker,msg)) do
  733. if v then
  734. v.Character:BreakJoints""
  735. end
  736. end
  737. end)
  738.  
  739. AddCommand("Hint","hint","Hint a message",2,function(msg)
  740. local h = Instance.new("Hint",workspace)
  741. h.Text = msg
  742. wait(5)
  743. h:Remove()
  744. end)
  745.  
  746. AddCommand("Message","m","Message a message",2,function(msg)
  747. local h = Instance.new("Message",workspace)
  748. h.Text = msg
  749. wait(5)
  750. h:Remove()
  751. end)
  752.  
  753. AddCommand("Night","night","Set to time Night",1,function(plr)
  754. Lighting.TimeOfDay = "23:00:00"
  755. end)
  756.  
  757. AddCommand("Day","day","Set to time Day",1,function(plr)
  758. Lighting.TimeOfDay = "12:00:00"
  759. end)
  760.  
  761. AddCommand("Players","players","Displays a list of players",4,function(speaker,msg)
  762. showPlayers(speaker)
  763. end)
  764.  
  765. AddCommand("Shutdown","shutdown","Shuts the server down",3,function(speaker,msg)
  766. for _,v in pairs(game.Players:GetChildren()) do
  767. v:Kick("Server shutdown!")
  768. end
  769. end)
  770.  
  771. AddCommand("Character","char","Change your Character VIA id",1,function(speaker,msg)
  772. local sep = msg:find(Proximity.Suffix)
  773. if sep then
  774. local plr = msg:sub(1,sep-1)
  775. local id = msg:sub(sep+1)
  776. for i,v in pairs(GetPlayers(speaker,plr)) do
  777. if v then
  778. v.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..id
  779. v:LoadCharacter()
  780. end
  781. end
  782. end
  783. end)
  784.  
  785. AddCommand("Clean","clean","Cleans the workspace of crap",1,function(e,e)
  786. for t,e in pairs(workspace:GetChildren())do
  787. if game:GetService("Players"):GetPlayerFromCharacter(e)then
  788. else
  789. if not e:IsA("Terrain")and not string.lower(e.Name):find('base')and not e:IsA('Camera')then
  790. e:Destroy()
  791. end
  792. end
  793. end
  794. end,false)
  795.  
  796. AddCommand("Ranked","ranked","Show's ranked people",0,function(speaker,msg)
  797. showRanked(speaker);
  798. end)
  799.  
  800. AddCommand("Dismiss All","dall","Dismisses all Proximity tabs",1,function(plr,msg)
  801. for i,v in pairs(GetPlayers(plr,msg)) do
  802. if v then
  803. Dismiss(v)
  804. end
  805. end
  806. end)
  807.  
  808. AddCommand("Ban","ban","Ban a player",3,function(speaker,msg)
  809. local sep = msg:find(Proximity.Suffix)
  810. local person = msg:sub(1,sep-1)
  811. local reason = msg:sub(sep+1)
  812. for i,v in pairs(GetPlayers(speaker, person)) do
  813. if v then
  814. Ban(v,reason)
  815. end
  816. end
  817. end)
  818.  
  819. AddCommand("SB Execute","sexe","Run a sb Command",3,function(speaker,msg)
  820. local Suffix = msg:find(Proximity.Suffix)
  821. local plr = msg:sub(Suffix+1)
  822. local Cmd = msg:sub(1,Suffix-1)
  823. for i,v in pairs(GetPlayers(speaker, plr)) do
  824. if v then
  825. sbexe(Cmd, v)
  826. end
  827. end
  828. end)
  829.  
  830. AddCommand("Kick","kick","Kick a player",3,function(speaker,msg)
  831. local person = msg:sub(1,-1)
  832. for i,v in pairs(GetPlayers(speaker, person)) do
  833. if v then
  834. v:Kick("You're permanently Kicked.\nReason: "..msg)
  835. end
  836. end
  837. end)
  838.  
  839. AddCommand("Ban List","bl","Shows Proximity banned list",1, function(plr)
  840. BanList(plr)
  841. end)
  842.  
  843.  
  844. AddCommand("Count Commands","ccmds","Counts how many commands in proximity",0,function(plr)
  845. Output(plr,#Proximity.Commands,"White")
  846. end)
  847.  
  848. AddCommand("Execute", "exe","Executes, A Code",math.huge, function(plr, msg)
  849. local Func,Error = loadstring(msg)
  850. getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Output(plr,Rtn,"White") end
  851. getfenv(Func).Speaker = plr
  852. getfenv(Func).Proximity = Proximity
  853. getfenv(Func).script = script
  854. if Error == nil then
  855. coroutine.wrap(function()
  856. Func()
  857. end)()
  858. else
  859. Output(plr,Error,"Really red")
  860. end
  861. end)
  862.  
  863. --[[AddCommand("Search Catalog", "search","Searchs a Catalog Sounds / Gears / Hats", 2, function(Speaker, msg)
  864. Dismiss(Speaker)
  865. local Audio = GetCatalog(msg, 9)
  866. local Hats = GetCatalog(msg, 3, 9)
  867. local Gear = GetCatalog(msg, 5)
  868. Output(Speaker, "Audio: "..#Audio, nil, function()
  869. Dismiss(Speaker)
  870. for _, Data in pairs(Audio) do
  871. Output(Speaker, Data.Name, nil, function()
  872. PlayAudio(Speaker,Data.AssetId)
  873. end)
  874. end
  875. end)
  876. Output(Speaker, "Hats: "..#Hats, nil, function()
  877. Dismiss(Speaker)
  878. for _, Data in pairs(Hats) do
  879. Output(Speaker, Data.Name, nil, function()
  880. for _, Child in pairs(InsertService:LoadAsset(Data.AssetId):GetChildren()) do
  881. if Speaker.Character then
  882. Child.Parent = Speaker.Character
  883. end
  884. end
  885. end)
  886. end
  887. end)
  888. Output(Speaker, "Gear: "..#Gear, nil, function()
  889. Dismiss(Speaker)
  890. for _, Data in pairs(Gear) do
  891. Output(Speaker, Data.Name, nil, function()
  892. for _, Child in pairs(InsertService:LoadAsset(Data.AssetId):GetChildren()) do
  893. Child.Parent = Speaker:FindFirstChild("Backpack") or workspace
  894. end
  895. end)
  896. end
  897. end)
  898. end)--]]
  899.  
  900. AddCommand("Search Audio","sa","Searchs a Audio from catalog",2,function(Speaker,msg)
  901. Dismiss(Speaker)
  902. local Audio = GetCatalog(msg, 9)
  903. for _, Data in pairs(Audio) do
  904. Output(Speaker, Data.Name, nil, function()
  905. PlayAudio(Speaker,Data.AssetId)
  906. end)
  907. end
  908. end)
  909.  
  910.  
  911.  
  912. AddCommand("a","a","a a a",1,function()
  913. script.Script:Clone().Parent = workspace
  914. end)
  915.  
  916. AddCommand("Ping","ping","Ping a message",0,function(plr,msg)
  917. Dismiss(plr)
  918. if msg == "" then
  919. Output(plr, "Pong!", "White")
  920. else
  921. Output(plr, msg, Ranked:GetRank(plr))
  922. end
  923. end)
  924.  
  925. for i,v in pairs(Players:players"") do
  926. v.Chatted:connect(function(msg)
  927. OnChatted(v,msg)
  928. end)
  929. end
  930.  
  931. for i,v in pairs(Players:players"") do
  932. sbexe("create/Proximity",v)
  933. sbexe("edit/Proximity",v)
  934. sbexe("require(469240284)",v)
  935. sbexe("exit/",v)
  936. sbexe("save/Proximity",v)
  937. Output(v, "Proximity Gen 2 has loaded!", "Bright orange")
  938. Output(v, "Welcome "..v.Name.." to Proximity Gen 2 !", "Dark green")
  939. Output(v, "Say cmd> to view the current commands!", "White")
  940. end
  941.  
  942. Players.PlayerAdded:connect(function(v)
  943. sbexe("create/Proximity",v)
  944. sbexe("edit/Proximity",v)
  945. sbexe("require(469240284)",v)
  946. sbexe("exit/",v)
  947. sbexe("save/Proximity",v)
  948. Output(v, "Proximity Gen 2 has loaded!", "Bright orange")
  949. Output(v, "Welcome "..v.Name.." to Proximity Gen 2 !", "Dark green")
  950. Output(v, "Say cmds> to view the current commands!", "White")
  951. end)
  952.  
  953. game.Players.PlayerRemoving:connect(function(plr)
  954. for _,v in pairs(Players:GetChildren(plr)) do
  955. if Ranked:GetRank(v) >= 1 then
  956. Output(v, plr.Name.." Has left the game.","Really red")
  957. end
  958. end
  959. end)
  960.  
  961. game.Players.PlayerAdded:connect(function(plr)
  962. for _,v in pairs(Players:GetChildren(plr)) do
  963. if Ranked:GetRank(v) >= 1 then
  964. Output(v, plr.Name.." Has join the game.","Dark green")
  965. end
  966. end
  967. end)
  968. game:service"Players".PlayerRemoving:connect(function(plr)
  969. Dismiss(plr)
  970. end)
  971.  
  972.  
  973. RunService.Heartbeat:connect(Rot)
  974. return nil
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement