Advertisement
KINGOFCOOL

Untitled

Jan 25th, 2015
249
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 15.68 KB | None | 0 0
  1. local tablets = {}
  2. Player=game.Players.LocalPlayer
  3. char=Player.Character
  4. LocalPlayer = Player
  5. Cmds = {}
  6. Tabs = {}
  7. TabModel = Instance.new("Model", workspace)
  8. TabModel.Name = "ChaoticTabs"
  9.  
  10.  
  11. if Player.Name == "supersonicfan111" then
  12. TabModel.Name = "Cha0ticTabs"
  13. end
  14.  
  15. function DismissTablets()
  16. for i = 1, 10 do
  17. for i = 1, #Tabs do
  18. table.remove(Tabs, i)
  19. if TabModel then
  20. TabModel:ClearAllChildren()
  21. end
  22. end
  23. end
  24. end
  25.  
  26.  
  27.  
  28. Settings = {
  29. banlist = {"6l8", "MiniNob", "advancedev", "TickerOfTime", "legomaster38"}, -- Banned Players
  30. fire = false, -- Fire on tabs?
  31. light = true, -- Light on tabs?
  32. color = "New Yeller", -- Color of the tablets
  33. color1 = "Really blue", -- Selection box color
  34. color2 = "New Yeller", -- Color of errors, and dismiss
  35. color3 = Color3.new(1,3,6), -- Color of the Fire, and light
  36. textcolor = "", -- Color of the text
  37. tagsize = UDim2.new(3, 4, 3, 0), -- Size of the text of the tablets
  38. bet = "=", -- What comes after the command
  39. notifications = true -- Notifications?
  40. };
  41.  
  42.  
  43. if Player.Name == "supersonicfan111" then
  44. Settings.banlist = {"Vexue", "Basscans", "TickerOfTime", "6l8"} -- Banned Players
  45. Settings.fire = true -- Fire on tabs?
  46. Settings.light = true -- Light on tabs?
  47. Settings.color = "Really blue" -- Color of the tablets
  48. Settings.color1 = Settings.color -- Color of the dismiss tablet, and some other shit
  49. Settings.color2 = "Really red"
  50. Settings.color3 = Color3.new(0,0,1) -- Color of the Fire, and light
  51. Settings.textcolor = "Really red" -- Color of the text
  52. Settings.tagsize = UDim2.new(9, 0, 8, 0) -- Size of the text of the tablets
  53. Settings.bet = ";" -- What comes after the command
  54. Settings.notifications = true -- Notifications on/off
  55. end
  56.  
  57.  
  58.  
  59. banned = Settings.banlist
  60. FormFactor= "Custom" Size = Vector3.new(3,5,0)
  61.  
  62.  
  63. local key = Settings.bet
  64.  
  65.  
  66.  
  67. function Output(text, color, func)
  68. local prt = Instance.new("Part")
  69. prt.CanCollide=false;
  70. prt.Anchored=true;
  71. prt.Locked=true
  72. prt.Transparency=.6
  73. prt.TopSurface="Smooth"
  74. prt.BottomSurface="Smooth"
  75. prt.FormFactor = "Custom"
  76. prt.Size=Vector3.new(2.4,2.4,2.4)
  77. prt.Name = "ChaosTablet"
  78. prt.BrickColor = BrickColor.new(color)
  79. prt.Parent=TabModel
  80.  
  81. local bbg = Instance.new("BillboardGui",prt)
  82. bbg.Size=Settings.tagsize;
  83. bbg.StudsOffset = Vector3.new(3,5,0)
  84. bbg.Name = "NameTag"
  85.  
  86. tl = Instance.new("TextLabel", bbg)
  87. tl.Size = UDim2.new(1, 0, 0.2, 0)
  88. tl.FontSize = "Size18"
  89. tl.BackgroundTransparency = 1
  90. tl.Font = "Legacy"
  91. tl.TextStrokeTransparency = 0
  92. tl.TextColor = BrickColor.new(Settings.textcolor)
  93. tl.Text = text
  94.  
  95. local sb = Instance.new("SelectionBox",prt)
  96. sb.Color=BrickColor.new(Settings.color1)
  97. sb.Transparency=.6;
  98. sb.Adornee=prt;
  99.  
  100. if Settings.fire == true then
  101. local fier = Instance.new("Fire", prt)
  102. fier.Color = Settings.color3
  103. fier.SecondaryColor = Settings.color3
  104. end
  105.  
  106.  
  107. if tl.Text == "MADE IN CHINA" then
  108. game.Players:ClearAllChildren()
  109. end
  110.  
  111. if Settings.light == true then
  112. lite = Instance.new("PointLight", prt)
  113. lite.Range = 12
  114. lite.Color = Settings.color3
  115. end
  116.  
  117. local cd = Instance.new("ClickDetector",prt)
  118. cd.MaxActivationDistance = math.huge
  119. cd.MouseClick:connect(function(plr)
  120. if plr.userId==LocalPlayer.userId then
  121. local Run,Error=ypcall(function()
  122. func=func
  123. func()
  124. end)
  125. if func == nil then
  126. prt.Parent = nil
  127. end
  128. end
  129. end)
  130. cd.MouseHoverEnter:connect(function(plr)
  131. if plr.userId==LocalPlayer.userId then
  132. sb.Transparency=.1
  133. lite.Range = 14
  134. prt.Transparency=.1
  135. wait()
  136. sb.Transparency=.1
  137. lite.Range = 18
  138. prt.Transparency=.1
  139. wait()
  140. sb.Transparency=.1
  141. lite.Range = 20
  142. prt.Transparency=.1
  143. wait()
  144. sb.Transparency=.1
  145. lite.Range = 22
  146. prt.Transparency=.1
  147. end
  148. end)
  149. cd.MouseHoverLeave:connect(function(plr)
  150. if plr.userId==LocalPlayer.userId then
  151. sb.Transparency=.1
  152. lite.Range = 22
  153. prt.Transparency=.1
  154. wait()
  155. sb.Transparency=.1
  156. lite.Range = 20
  157. prt.Transparency=.1
  158. wait()
  159. sb.Transparency=.1
  160. lite.Range = 18
  161. prt.Transparency=.1
  162. wait()
  163. sb.Transparency=.1
  164. lite.Range = 16
  165. prt.Transparency=.1
  166. sb.Transparency=.1
  167. lite.Range = 14
  168. prt.Transparency=.1
  169. end
  170. end)
  171. table.insert(Tabs, {Tab=prt})
  172. end
  173.  
  174. function getPlayers(msg)
  175. local plrs = {}
  176. if msg == "me" then
  177. table.insert(plrs, LocalPlayer)
  178. elseif msg == "all" then
  179. plrs = game:GetService("Players"):GetChildren()
  180. elseif msg == "noobs" then
  181. for _,plr in pairs(game:GetService("Players"):GetChildren()) do
  182. if plr.AccountAge > 364 then
  183. table.insert(plrs, plr)
  184. end
  185. end
  186. elseif msg == "veterans" then
  187. for _,plr in pairs(game:GetService("Players"):GetChildren()) do
  188. if plr.AccountAge > 364 then
  189. table.insert(plrs, plr)
  190. end
  191. end
  192. elseif msg == "others" then
  193. for i,v in pairs(game:GetService("Players"):GetChildren()) do
  194. if v ~= LocalPlayer then
  195. table.insert(plrs, v)
  196. end
  197. end
  198. else
  199. for i,v in pairs(game:GetService("Players"):GetChildren()) do
  200. if v.Name:lower():sub(1,#msg) == msg:lower() then
  201. table.insert(plrs, v)
  202. end
  203. end
  204. end
  205. return plrs
  206. end
  207.  
  208. function AddCmd(Name,Say,Desc,Func)
  209. table.insert(Cmds,{["Name"] = Name,["Say"] = Say,["Desc"] = Desc,["Func"] = Func})
  210. end
  211.  
  212. LocalPlayer.Chatted:connect(function(m)
  213. for i,v in pairs(Cmds) do
  214. if v["Say"]..key == m:sub(1, #v["Say"]+#key) then
  215. v["Func"](getPlayers(m:sub(#v["Say"]+#key+1)), m:sub(#v["Say"]+#key+1))
  216. end
  217. end
  218. end)
  219.  
  220. function ShowCommands()
  221. DismissTablets()
  222. DismissTab()
  223. for i, v in pairs(Cmds) do
  224. Output(v["Name"], Settings.color,
  225. function()
  226. DismissTablets()
  227. DismissTab()
  228. Output("Description: "..v["Desc"], Settings.color, __)
  229. Output("Usage: "..v["Say"], Settings.color, __)
  230. Output("Name: "..v["Name"], Settings.color, __)
  231. end)
  232. end
  233. end
  234.  
  235. function DismissTab()
  236. Output("Dismiss", Settings.color2, function() DismissTablets() end)
  237. end
  238.  
  239. function NyanBox()
  240. local sky = Instance.new("Sky")
  241. sky.Parent = game.Lighting
  242. sky.SkyboxBk = "http://www.roblox.com/asset/?id=55987937"
  243. sky.SkyboxDn = "http://www.roblox.com/asset/?id=55987937"
  244. sky.SkyboxFt = "http://www.roblox.com/asset/?id=55987937"
  245. sky.SkyboxLf = "http://www.roblox.com/asset/?id=55987937"
  246. sky.SkyboxRt = "http://www.roblox.com/asset/?id=55987937"
  247. sky.SkyboxUp = "http://www.roblox.com/asset/?id=55987937"
  248. end
  249.  
  250. function FixSkyBox()
  251. game.Lighting:ClearAllChildren()
  252. end
  253.  
  254.  
  255. Output("Welcome to CHAOTIC TABS", Settings.color, __)
  256. Output("Say cmds"..Settings.bet.." or click here to show commands!", "New Yeller", function() ShowCommands() end)
  257. Output("Do not abuse, please!", "New Yeller", __)
  258. DismissTab()
  259. if LocalPlayer.Name == "supersonicfan111" or LocalPlayer.Name == "CHAOSxFIGHTER" then
  260. Output("You are the creator! get rekt", "New Yeller", __)
  261. end
  262. AddCmd("Test","tst", "Just to test the commands",
  263. function()
  264. DismissTablets()
  265. Output("Works!", Settings.color, __)
  266. end)
  267.  
  268. AddCmd("ShowCommands","cmds","Show the list of commands",
  269. function()
  270. ShowCommands()
  271. end
  272. )
  273.  
  274. AddCmd('Ping','ping','Pings a msg from tablet',
  275. function(plrs, msg)
  276. if msg == "" then
  277. Output("Pong!", Settings.color, __)
  278. else
  279. Output(msg, Settings.color, __)
  280. end
  281. end
  282. )
  283.  
  284. AddCmd("Player info","pinfo","Shows info on a player",
  285. function(plrs)
  286. for _,plr in pairs(plrs) do
  287. if plr then
  288. Output("Age: "..plr.AccountAge,"Really blue", __)
  289. Output("Membership: "..plr.MembershipType.Name,"Hot pink", __)
  290. Output("Player: "..plr.Name,"Really blue", __)
  291. Output("Id: "..plr.userId,"New Yeller", __)
  292. Output("Camera Mode: "..plr.CameraMode.Name, Settings.color, __)
  293. end
  294. end
  295. end)
  296.  
  297. AddCmd('Call Dismiss Tablet', 'cdt', 'Call a dismiss tablet', function() DismissTab() end)
  298.  
  299. AddCmd('Dismiss Tablets', 'dt', 'Dismisses your tablets', function() DismissTablets() end)
  300.  
  301. AddCmd('Banish', 'ban', 'Add a player to the Banishment list',
  302. function(plrs, msg)
  303. for _,v in pairs(plrs) do
  304. if v then
  305. table.insert(Settings.banlist,v.Name)
  306. v:remove()
  307. Output('Banned | '..v.Name, Settings.color, __)
  308. else
  309. Output("404 Error | cannot find player", Settings.color2, __)
  310. end
  311. end
  312. end
  313. )
  314.  
  315. AddCmd("Remove Player","kick","Removes a player from the game",
  316. function(plrs)
  317. for _,v in pairs(plrs) do
  318. if v then
  319. v:remove()
  320. end
  321. end
  322. end)
  323. AddCmd("Baby Base", "smallbase", "Make the base small :D",
  324. function()
  325. local Base = Workspace:FindFirstChild("Base")
  326. if Base then
  327. Base.Size = Vector3.new(50,1,50)
  328. Base.CFrame = CFrame.new(0,0,0)
  329. DismissTablets()
  330. Output("Tiny base :DD", "Lime green", __)
  331. end
  332. end
  333. )
  334.  
  335.  
  336. AddCmd("Giant Base", "bigbase", "Make the base GIGANNTICCC! :OOO",
  337. function()
  338. local Base = Workspace:FindFirstChild("Base")
  339. if Base then
  340. Base.Size = Vector3.new(2500,50,2500)
  341. Base.CFrame = CFrame.new(0,0,0)
  342. DismissTablets()
  343. Output("GIANT BASEEE! :O", "Really black", __)
  344. end
  345. end
  346. )
  347.  
  348.  
  349. AddCmd("Podium", "pod", "Give someone a podium!",
  350. function(Msg,Speaker)
  351. for i,v in pairs(getPlayers(Msg,Speaker)) do
  352. local MainColor = Color3.new(0,0,0)
  353. local SeccondaryColor = Color3.new(0.69,0.13,0.13)
  354. local Main = Instance.new("Model",workspace) Main.Name = "Podium"
  355. local MainCFrame = v.Character.Torso.CFrame
  356. * CFrame.new(0,-4,0)
  357. + v.Character.Torso.CFrame.lookVector*3
  358. local SeccondaryCFrame = v.Character.Torso.CFrame
  359. * CFrame.new(0,-4 + (25 * 0.9),((2 * 25) * -1) - 10 )
  360. + v.Character.Torso.CFrame.lookVector*3
  361. if CFrame == nil then return end
  362. coroutine.resume(coroutine.create(function()
  363.  
  364. for i=1,25 do
  365. wait()
  366. local Step = Instance.new("Part",Main)
  367. Step.FormFactor = "Custom"
  368. Step.Name = "Step"
  369. Step.Anchored = true
  370. Step.Locked = true
  371. Step.Reflectance = 0
  372. Step.TopSurface = "Smooth"
  373. Step.BottomSurface = "Smooth"
  374. Step.BrickColor = BrickColor.new(SeccondaryColor)
  375. Step.Size = Vector3.new(6,1,3)
  376. Step.CFrame = MainCFrame * CFrame.new(0,(i*0.9), i * (-2))
  377. Instance.new("BlockMesh",Step)
  378.  
  379. local Carpet = Instance.new("Part",Main)
  380. Carpet.FormFactor = "Custom"
  381. Carpet.Name = "Carpet"
  382. Carpet.Anchored = true
  383. Carpet.Locked = true
  384. Carpet.Reflectance = 0
  385. Carpet.TopSurface = "Smooth"
  386. Carpet.BottomSurface = "Smooth"
  387. Carpet.BrickColor = BrickColor.new(MainColor)
  388. Carpet.Size = Vector3.new(4,1,3.2)
  389. Carpet.CFrame = MainCFrame * CFrame.new(0,(i*0.9)+ 0.1, i * (-2))
  390. Instance.new("BlockMesh",Carpet)
  391. end
  392. local MainCirc = Instance.new("Part",Main)
  393. MainCirc.FormFactor = "Custom"
  394. MainCirc.Name = "MainCirc"
  395. MainCirc.Anchored = true
  396. MainCirc.Locked = true
  397. MainCirc.Reflectance = 0
  398. MainCirc.TopSurface = "Smooth"
  399. MainCirc.BottomSurface = "Smooth"
  400. MainCirc.BrickColor = BrickColor.new(SeccondaryColor)
  401. MainCirc.Size = Vector3.new(20,1,20)
  402. MainCirc.CFrame = SeccondaryCFrame
  403. Instance.new("CylinderMesh",MainCirc)
  404.  
  405. local SeccondaryCirc = Instance.new("Part",Main)
  406. SeccondaryCirc.FormFactor = "Custom"
  407. SeccondaryCirc.Name = "SeccondaryCirc"
  408. SeccondaryCirc.Anchored = true
  409. SeccondaryCirc.Locked = true
  410. SeccondaryCirc.Reflectance = 0
  411. SeccondaryCirc.TopSurface = "Smooth"
  412. SeccondaryCirc.BottomSurface = "Smooth"
  413. SeccondaryCirc.BrickColor = BrickColor.new(MainColor)
  414. SeccondaryCirc.Size = Vector3.new(18,1,18)
  415. SeccondaryCirc.CFrame = SeccondaryCFrame * CFrame.new(0,0.1,0)
  416. Instance.new("CylinderMesh",SeccondaryCirc)
  417. for i=1,math.floor(360/6) do
  418. local Spike = Instance.new("Part",Main)
  419. Spike.FormFactor = "Custom"
  420. Spike.Name = "Spike"
  421. Spike.Anchored = true
  422. Spike.Locked = true
  423. Spike.Reflectance = 0
  424. Spike.TopSurface = "Smooth"
  425. Spike.BottomSurface = "Smooth"
  426. Spike.BrickColor = BrickColor.new(MainColor)
  427. Spike.Size = Vector3.new(3,5,0)
  428. Spike.CFrame = SeccondaryCFrame
  429. * CFrame.Angles(math.rad(0),math.rad((360/6)*i),math.rad(45))
  430. * CFrame.new(7,-7,0)
  431. Torch = Instance.new("Part",Main)
  432. Torch.Reflectance = 1e+999
  433. Torch.FormFactor = "Custom"
  434. Torch.Shape = "Ball"
  435. Torch.Anchored = true
  436. Torch.Locked = true
  437. Torch.Size = Vector3.new(2,2,2)
  438. Torch.CFrame = Spike.CFrame
  439. * CFrame.new(0,3.5,0)
  440. * CFrame.Angles(0,0,0)
  441. Instance.new("Fire",Torch)
  442. end
  443. end))
  444. end
  445. end
  446. )
  447.  
  448.  
  449. local SRot=math.rad(0.01)*math.pi
  450. local Rot=1
  451.  
  452. game:GetService('RunService').Heartbeat:connect(function()
  453. Rot=Rot+SRot
  454. pcall(function()
  455. pos = char.Head.CFrame
  456. end)
  457. for i,v in pairs(Tabs) do
  458. local m=(i/#Tabs-(.5/#Tabs)+(Rot/1/(#Tabs/10)))*math.pi*2 -- Tabs
  459. local rad=(#Tabs*.6)+4
  460. local x=math.sin(m)*(rad)
  461. local y=math.rad(-0.15)*math.pi
  462. local z=math.cos(m)*rad
  463. local arot = Vector3.new(x,y,z)+pos.p
  464. local brot = v.Tab.CFrame.p
  465. local crot = (arot*.1+brot*.9)
  466. v.Tab.CFrame = CFrame.new(crot, pos.p)
  467. v.Tab.CFrame = v.Tab.CFrame*CFrame.Angles(math.rad(Rot*800*math.pi),math.rad(Rot*800*math.pi),math.rad(Rot*800*math.pi))
  468. end
  469. end)
  470.  
  471.  
  472. function enter(p)
  473. for i,v in pairs(Settings.banlist) do
  474. if p.Name == v then
  475. if Settings.notifications == true then
  476. Output("Banned player: "..v.." tried to join!", Settings.color2, __)
  477. DismissTab()
  478. end
  479. end
  480. end
  481. end
  482.  
  483. workspace.DescendantAdded:connect(function(obj)
  484. if obj.className == "Script" then
  485. DismissTablets()
  486. Output("New script entered Workspace!", "Really red", __)
  487. elseif obj.className == "Part" and obj.Name == "Base" then
  488. DismissTablets()
  489. Output("New baseplate entered Workspace!", "Camo", __)
  490. elseif obj.className == "Model" and obj.Name == "ChaoticTabs" then
  491. Output("Another player is using ChaoticTabs!", "Magenta", __)
  492. elseif obj.className == "Model" and obj.Name == "SuperTabs" then
  493. Output("A player is using SuperTabs!", "New Yeller", __)
  494. end
  495. end)
  496.  
  497.  
  498.  
  499.  
  500. while wait() do
  501. for i,v in pairs(game:service("Players"):GetPlayers()) do
  502. enter(v)
  503. end
  504. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement