SHOW:
|
|
- or go back to the newest paste.
1 | --[[ | |
2 | Hey, You! | |
3 | Yeah, You! | |
4 | This is made by KillKill426. | |
5 | Take any credit, banned on Synthex Administration. | |
6 | And this one. | |
7 | So... | |
8 | Bye! | |
9 | --]] | |
10 | ||
11 | ||
12 | - | local p = game:service"Players".ttatatataat7777 |
12 | + | local p = game:service"Players".XxXexe5 |
13 | local work = workspace; | |
14 | local char = p.Character | |
15 | local cam = work.CurrentCamera | |
16 | local Rotation = 0 | |
17 | local Speed = 0.0001 | |
18 | ||
19 | local Services = { | |
20 | Workspace = game:service'Workspace'; | |
21 | Lighting = game:service'Lighting'; | |
22 | Players = game:service'Players'; | |
23 | ReplicatedFirst = game:service'ReplicatedFirst'; | |
24 | ReplicatedStorage = game:service'ReplicatedStorage'; | |
25 | ServerScriptService = game:service'ServerScriptService'; | |
26 | ServerStorage = game:service'ServerStorage'; | |
27 | StarterGui = game:service'StarterGui'; | |
28 | StarterPack = game:service'StarterPack'; | |
29 | StarterPlayer = game:service'StarterPlayer'; | |
30 | SoundService = game:service'SoundService'; | |
31 | Chat = game:service'Chat'; | |
32 | HttpService = game:service'HttpService'; | |
33 | InsertService = game:service'InsertService' | |
34 | } | |
35 | --- | |
36 | function nwPrt(prnt,siz,cf,col) | |
37 | local prt=Instance.new("Part") | |
38 | prt.Parent=prnt | |
39 | prt.FormFactor=3 | |
40 | prt.Name="Part" | |
41 | prt.Size=Vector3.new(2,2,2) | |
42 | prt.CanCollide=false | |
43 | prt.Anchored=true | |
44 | prt.Locked=true | |
45 | prt.Transparency = 1 | |
46 | prt.TopSurface=0 | |
47 | prt.BottomSurface=0 | |
48 | prt:BreakJoints() | |
49 | prt.CFrame=cf or CFrame.new(30,10,30) | |
50 | prt.Material="SmoothPlastic" | |
51 | prt.BrickColor=col | |
52 | return prt | |
53 | end | |
54 | -- | |
55 | function Lerp(c1,c2,tim) | |
56 | local com1 = {c1.X,c1.Y,c1.Z,c1:toEulerAnglesXYZ()} | |
57 | local com2 = {c2.X,c2.Y,c2.Z,c2:toEulerAnglesXYZ()} | |
58 | for i,v in pairs(com1) do | |
59 | if i<4 then | |
60 | com1[i] = v+(com2[i]-v)*tim | |
61 | else | |
62 | com1[i] = com2[i] | |
63 | end | |
64 | end | |
65 | return CFrame.new(com1[1],com1[2],com1[3])*CFrame.Angles(com1[4],com1[5],com1[6]) | |
66 | end | |
67 | --- | |
68 | function Rndv(tbl) | |
69 | local chs=math.random(1,#tbl) | |
70 | for i,v in pairs(tbl) do | |
71 | if i==chs then | |
72 | return v | |
73 | end | |
74 | end | |
75 | end | |
76 | --- | |
77 | Tabs={} | |
78 | Cmds={} | |
79 | bet1 = ">" | |
80 | Splitkey = ">" | |
81 | Colours={ | |
82 | BrickColor.Red(); | |
83 | BrickColor.Green(); | |
84 | BrickColor.Blue(); | |
85 | BrickColor.Yellow(); | |
86 | }; | |
87 | -- | |
88 | -- | |
89 | ||
90 | function getPlayers(msg) | |
91 | local plrs = {} | |
92 | if msg == "me" then | |
93 | table.insert(plrs, p) | |
94 | elseif msg == "all" then | |
95 | plrs = game:GetService("Players"):GetChildren() | |
96 | elseif msg == "noobs" then | |
97 | for _,plr in pairs(game:GetService("Players"):GetChildren()) do | |
98 | if plr.AccountAge > 364 then | |
99 | table.insert(plrs, plr) | |
100 | end | |
101 | end | |
102 | elseif msg == "veterans" then | |
103 | for _,plr in pairs(game:GetService("Players"):GetChildren()) do | |
104 | if plr.AccountAge > 364 then | |
105 | table.insert(plrs, plr) | |
106 | end | |
107 | end | |
108 | elseif msg == "others" then | |
109 | for i,v in pairs(game:GetService("Players"):GetChildren()) do | |
110 | if v ~= p then | |
111 | table.insert(plrs, v) | |
112 | end | |
113 | end | |
114 | else | |
115 | for i,v in pairs(game:GetService("Players"):GetChildren()) do | |
116 | if v.Name:lower():sub(1,#msg) == msg:lower() then | |
117 | table.insert(plrs, v) | |
118 | end | |
119 | end | |
120 | end | |
121 | return plrs | |
122 | end | |
123 | ||
124 | for _,plr in pairs(game:GetService("Players"):GetChildren()) do | |
125 | end | |
126 | ||
127 | ||
128 | ||
129 | function Output(Text,Color,Func) | |
130 | Color=tostring(Color); | |
131 | local tb=nwPrt(script,Vector3.new(3,4,0.4),nil,BrickColor.new(Color)) | |
132 | tb.CanCollide = false | |
133 | local hd = Instance.new('BoxHandleAdornment',tb) | |
134 | hd.Adornee = tb | |
135 | hd.Size = Vector3.new(1.3,1.3,1.3) | |
136 | hd.Color = tb.BrickColor | |
137 | hd.Transparency = 0 | |
138 | local BG=Instance.new('BillboardGui',tb); | |
139 | BG.Adornee=tb; | |
140 | BG.StudsOffset=Vector3.new(0,4); | |
141 | BG.Size=UDim2.new(10,0,10); | |
142 | local TL=Instance.new('TextLabel',BG); | |
143 | TL.BackgroundTransparency=1; | |
144 | TL.Font='Arial'; | |
145 | TL.FontSize='Size24'; | |
146 | TL.Size=UDim2.new(1,0,1); | |
147 | TL.TextColor3=BrickColor.new(Color).Color; | |
148 | TL.Text=tostring(Text); | |
149 | local PL = Instance.new("PointLight", tb) | |
150 | PL.Color = tb.Color | |
151 | PL.Range = 10 | |
152 | local CD = Instance.new("ClickDetector", tb) | |
153 | CD.MaxActivationDistance = 1/0 | |
154 | CD.MouseClick:connect(function(pe) | |
155 | if pe.Name == p.Name or pe.userId == p.userId then | |
156 | if Func == nil then | |
157 | tb:Destroy() | |
158 | else | |
159 | tb:Destroy() | |
160 | Func = Func | |
161 | Func() | |
162 | end | |
163 | end | |
164 | end) | |
165 | CD.MouseHoverEnter:connect(function(plr) | |
166 | if plr.Name == p.Name or plr.userId == p.userId then | |
167 | hd.Size = Vector3.new(1.5,1.5,1.5) | |
168 | tb.Size = Vector3.new(2.2,2.2,2.2) | |
169 | end | |
170 | end) | |
171 | CD.MouseHoverLeave:connect(function(plr) | |
172 | if plr.Name == p.Name or plr.userId == p.userId then | |
173 | hd.Size = Vector3.new(1.3,1.3,1.3) | |
174 | tb.Size = Vector3.new(2,2,2) | |
175 | end | |
176 | end) | |
177 | ||
178 | local SB = Instance.new("SelectionBox", tb) | |
179 | SB.Color = BrickColor.new("White") | |
180 | SB.Adornee = tb | |
181 | SB.Transparency = 0.2 | |
182 | SB.LineThickness = 0.02 | |
183 | ||
184 | ||
185 | pcall(function() | |
186 | tb.CFrame = p.Character.Torso.CFrame | |
187 | end) | |
188 | table.insert(Tabs,tb); | |
189 | end | |
190 | -- | |
191 | Dismiss=function() | |
192 | pcall(function() | |
193 | for _,Tab in next,Tabs do | |
194 | coroutine.wrap(function() | |
195 | for i = 0,1,.2 do | |
196 | pcall(function() | |
197 | wait'' | |
198 | Tab.Transparency=i | |
199 | Tab.Size = Vector3.new(i,i,i) | |
200 | end) | |
201 | end | |
202 | Tab:destroy'' | |
203 | end)() | |
204 | Tabs[_]=nil | |
205 | end | |
206 | end) | |
207 | end | |
208 | ||
209 | game:GetService("RunService").Stepped:connect(function() | |
210 | if p then | |
211 | if p.Character then | |
212 | ||
213 | ||
214 | ||
215 | ||
216 | if p.Character:FindFirstChild('Torso') ~= nil then | |
217 | ||
218 | ||
219 | ||
220 | ||
221 | Rotation = Rotation + Speed | |
222 | ||
223 | ||
224 | ||
225 | ||
226 | for i,v in pairs(Tabs) do | |
227 | ||
228 | ||
229 | ||
230 | ||
231 | ypcall(function() | |
232 | ||
233 | ||
234 | ||
235 | ||
236 | if p and p.Character and p.Character:FindFirstChild('Torso') ~= nil then | |
237 | ||
238 | ||
239 | ||
240 | ||
241 | pos = p.Character:WaitForChild("Torso").CFrame | |
242 | ||
243 | ||
244 | ||
245 | ||
246 | else | |
247 | ||
248 | ||
249 | ||
250 | ||
251 | pos = CFrame.new(0,0,0) | |
252 | ||
253 | ||
254 | ||
255 | ||
256 | end | |
257 | ||
258 | ||
259 | ||
260 | ||
261 | local radius = 6 + (#Tabs * 0.5) | |
262 | ||
263 | ||
264 | ||
265 | ||
266 | local x = math.sin((i / #Tabs - (0.5 / #Tabs) + Rotation * 0) * math.pi * 2) * radius | |
267 | ||
268 | ||
269 | ||
270 | ||
271 | local y = math.sin(i + tick()*2.3) | |
272 | ||
273 | ||
274 | ||
275 | local z = math.cos((i / #Tabs - (0.5 / #Tabs) + Rotation * 0) * math.pi * 2) * radius | |
276 | ||
277 | ||
278 | ||
279 | ||
280 | local arot = Vector3.new(x, y, z) + pos.p | |
281 | ||
282 | ||
283 | ||
284 | ||
285 | local brot = v.CFrame.p | |
286 | ||
287 | ||
288 | ||
289 | ||
290 | local crot = (arot * .1 + brot * .9) | |
291 | ||
292 | ||
293 | ||
294 | ||
295 | local d = math.rad((Rotation*4000)*math.pi) | |
296 | ||
297 | ||
298 | ||
299 | ||
300 | v.CFrame = CFrame.new(crot, pos.p)*CFrame.Angles(d,d,d) | |
301 | ||
302 | ||
303 | ||
304 | ||
305 | end) | |
306 | ||
307 | ||
308 | ||
309 | ||
310 | end | |
311 | ||
312 | ||
313 | ||
314 | ||
315 | elseif p.Character:FindFirstChild('Torso') == nil then | |
316 | ||
317 | ||
318 | ||
319 | ||
320 | repeat wait() until p.Character:FindFirstChild('Torso') ~= nil | |
321 | ||
322 | ||
323 | ||
324 | ||
325 | end | |
326 | ||
327 | ||
328 | ||
329 | ||
330 | end | |
331 | ||
332 | ||
333 | ||
334 | ||
335 | end | |
336 | ||
337 | ||
338 | ||
339 | ||
340 | end) | |
341 | ||
342 | -- | |
343 | function ShowCommands() | |
344 | Dismiss() | |
345 | for i,v in next,Cmds do | |
346 | Output(v['Name'],'Institutional white',function() | |
347 | Dismiss() | |
348 | Output('Name: '..v['Name'],'Lime green') | |
349 | Output('Usage: '..v['Say'],'Cyan') | |
350 | Output('Description: '..v['Description'],'Deep orange') | |
351 | Output('Back','Navy blue',function() ShowCommands() end) | |
352 | Output('Dismiss','Really red',function() Dismiss() end) | |
353 | end) | |
354 | end | |
355 | end | |
356 | function AddCmd(name,whatToSay,desc,func) | |
357 | table.insert(Cmds,{['Name'] = name,['Say'] = whatToSay,['Description'] = desc,['Function']=func}) | |
358 | end | |
359 | ||
360 | AddCmd("Ping","ping","Ping a message", | |
361 | function(msg) | |
362 | Output(msg, 'Lime green') | |
363 | end) | |
364 | ||
365 | AddCmd("Execute","exe","Execute a script", | |
366 | function(msg) | |
367 | local success,errore = loadstring(tostring(msg)) | |
368 | if success and not errore then | |
369 | success() | |
370 | else | |
371 | Output(tostring(errore),'Really red') | |
372 | end | |
373 | end) | |
374 | ||
375 | AddCmd("Kill","kill","Kill a player",function(msg) | |
376 | for _, plr in pairs(msg) do | |
377 | if plr and plr.Character then | |
378 | plr.Character:BreakJoints() | |
379 | plr=plr.Name | |
380 | Output('Killed player '..plr..'','Really red') | |
381 | end | |
382 | end | |
383 | end) | |
384 | ||
385 | AddCmd("Health","health","Set someone's health",function(plr,msg) | |
386 | local Split = msg:find(Splitkey) | |
387 | local PreSplit = msg:sub(1, Split - 1) | |
388 | local Plrs = getPlayers(PreSplit) | |
389 | local AfterSplit = msg:sub(tonumber(Split + 1)) | |
390 | for _,plr in pairs(Plrs) do | |
391 | plr.Character.Humanoid.Health = AfterSplit | |
392 | end | |
393 | end) | |
394 | ||
395 | AddCmd("Character","char","Set a player's character appearance",function(plr,msg) | |
396 | local Split = msg:find(Splitkey) | |
397 | local PreSplit = msg:sub(1, Split - 1) | |
398 | local Plrs = getPlayers(PreSplit) | |
399 | local AfterSplit = msg:sub(tostring(Split + 1)) | |
400 | for _,plr in pairs(Plrs) do | |
401 | plr.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId="..AfterSplit | |
402 | plr:LoadCharacter() | |
403 | end | |
404 | end) | |
405 | ||
406 | AddCmd("Music List","mlist","Show the music list",function(msg) | |
407 | Dismiss() | |
408 | Output("[ BYPASSED ]","Really red",function() local s = Instance.new('Sound',workspace) s.SoundId = "rbxassetid://505534951" s.Volume = 1 s.Pitch = 1 s.Looped = true s:play() end) | |
409 | Output("Tobu - Candyland","Lime green",function() local s = Instance.new('Sound',workspace) s.SoundId = "rbxassetid://222095512" s.Volume = 1 s.Pitch = 1 s.Looped = true s:play() end) | |
410 | end) | |
411 | ||
412 | AddCmd("No Character","unchar","Reset the player's character back to their own",function(msg) | |
413 | for _,plr in pairs,getPlayers(msg) do | |
414 | if plr then | |
415 | plr.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId="..plr.userId | |
416 | plr:LoadCharacter() | |
417 | end | |
418 | end | |
419 | end) | |
420 | ||
421 | AddCmd("AFK","afk","Make tablets saying you are afk",function(msg) | |
422 | Output(p.Name.." is AFK","Really red") | |
423 | Output(p.Name.." is AFK","Really red") | |
424 | Output(p.Name.." is AFK","Really red") | |
425 | Output(p.Name.." is AFK","Really red") | |
426 | Output(p.Name.." is AFK","Really red") | |
427 | Output(p.Name.." is AFK","Really red") | |
428 | Output(p.Name.." is AFK","Really red") | |
429 | Output(p.Name.." is AFK","Really red") | |
430 | Output(p.Name.." is AFK","Really red") | |
431 | end) | |
432 | ||
433 | AddCmd("God","god","God a player",function(msg) | |
434 | for _, plr in pairs(msg) do | |
435 | if plr and plr.Character then | |
436 | plr.Character.Humanoid.MaxHealth = math.huge | |
437 | plr=plr.Name | |
438 | Output('Godded player '..plr..'','Lime green') | |
439 | end | |
440 | end | |
441 | end) | |
442 | ||
443 | AddCmd("Walk Speed","ws","Set someone's walkspeed",function(plr,msg) | |
444 | local Split = msg:find(Splitkey) | |
445 | local PreSplit = msg:sub(1, Split - 1) | |
446 | local Plrs = getPlayers(PreSplit) | |
447 | local AfterSplit = msg:sub(tonumber(Split + 1)) | |
448 | for _,plr in pairs(Plrs) do | |
449 | plr.Character.Humanoid.WalkSpeed = AfterSplit | |
450 | end | |
451 | end) | |
452 | ||
453 | AddCmd("Break GUIs","breakguis","Break the guis!! OH NOOO!!!!",function(msg) | |
454 | game.ItemChanged:connect(function(x) | |
455 | if x:IsA("TextLabel") then | |
456 | x.Text = "[Meltdown R4]: Disabled." | |
457 | elseif x:IsA("TextButton") then | |
458 | x.Text = "[Meltdown R4]: Disabled." | |
459 | elseif x:IsA("TextBox") then | |
460 | x.Text = "[Meltdown R4]: Disabled." | |
461 | elseif x:IsA("Message") then | |
462 | x.Text = "[Meltdown R4]: Disabled." | |
463 | elseif x:IsA("Hint") then | |
464 | x.Text = "[Meltdown R4]: Disabled." | |
465 | end | |
466 | end) | |
467 | end) | |
468 | ||
469 | AddCmd("Stun","stun","Stun a player",function(msg) | |
470 | for _,plr in pairs(msg) do | |
471 | if plr and plr.Character then | |
472 | plr.Character.Humanoid.PlatformStand = true | |
473 | end | |
474 | end | |
475 | end) | |
476 | ||
477 | AddCmd("UnStun","unstun","Unstun a player",function(msg) | |
478 | for _,plr in pairs(msg) do | |
479 | if plr and plr.Character then | |
480 | plr.Character.Humanoid.PlatformStand = false | |
481 | end | |
482 | end | |
483 | end) | |
484 | ||
485 | AddCmd("FF","ff","Give a player a forcefield",function(msg) | |
486 | for _, plr in pairs(msg) do | |
487 | if plr and plr.Character then | |
488 | Instance.new('ForceField',plr.Character) | |
489 | end | |
490 | end | |
491 | end) | |
492 | ||
493 | AddCmd('Cmds','cmds','Show all commands',function(msg) | |
494 | ShowCommands() | |
495 | end) | |
496 | ||
497 | AddCmd('Dismiss','dt','Dismiss the tablets',function(msg) | |
498 | Dismiss() | |
499 | end) | |
500 | ||
501 | AddCmd("Hack Services","hservices","Hack the services so people can't use them",function(msg) | |
502 | Services.Workspace.Name = "####" | |
503 | Services.Lighting.Name = "####" | |
504 | Services.Players.Name = "####" | |
505 | Services.ReplicatedFirst.Name = "####" | |
506 | Services.ReplicatedStorage.Name = "####" | |
507 | Services.ServerScriptService.Name = "####" | |
508 | Services.ServerStorage.Name = "####" | |
509 | Services.StarterGui.Name = "####" | |
510 | Services.StarterPack.Name = "####" | |
511 | Services.StarterPlayer.Name = "####" | |
512 | Services.SoundService.Name = "####" | |
513 | Services.HttpService.Name = "HTTP NOT AVAILABLE" | |
514 | Services.InsertService.Name = "INSERTING NOT AVAILABLE" | |
515 | end) | |
516 | ||
517 | AddCmd("Fix Services","fservices","Fix the services. People can use them.",function(msg) | |
518 | Services.Workspace.Name = "Workspace" | |
519 | Services.Lighting.Name = "Lighting" | |
520 | Services.Players.Name = "Players" | |
521 | Services.ReplicatedFirst.Name = "ReplicatedFirst" | |
522 | Services.ReplicatedStorage.Name = "ReplicatedStorage" | |
523 | Services.ServerScriptService.Name = "ServerScriptService" | |
524 | Services.ServerStorage.Name = "ServerStorage" | |
525 | Services.StarterGui.Name = "StarterGui" | |
526 | Services.StarterPack.Name = "StarterPack" | |
527 | Services.StarterPlayer.Name = "StarterPlayer" | |
528 | Services.SoundService.Name = "SoundService" | |
529 | Services.HttpService.Name = "HttpService" | |
530 | Services.InsertService.Name = "InsertService" | |
531 | end) | |
532 | ||
533 | AddCmd("Break Chat","breakchat","Break the top chat so people can't use it",function(msg) | |
534 | Services.Chat.Name = "CHAT BREAK ID: 939Q@ASK#)" or "CHAT BREAK ID: #AKC!!L398MUAN" or "CHAT BREAK ID: 376((@CAER:CA#" | |
535 | end) | |
536 | ||
537 | AddCmd("Fix Chat","fixchat","Fix the top chat so people can use it",function(msg) | |
538 | Services.Chat.Name = "Chat" | |
539 | end) | |
540 | ||
541 | p.Chatted:connect(function(m) | |
542 | for i,v in pairs(Cmds) do | |
543 | if v["Say"]..bet1 == m:sub(1, #v["Say"]+#bet1) then | |
544 | v["Function"](getPlayers(m:sub(#v["Say"]+#bet1+1)), m:sub(#v["Say"]+#bet1+1)) | |
545 | end | |
546 | end | |
547 | end) | |
548 | ||
549 | wait(1) | |
550 | Output('Welcome to Meltdown R4 Administration, '..p.Name..'!','Lime green') | |
551 | Output('The suffix is '..bet1,'Royal purple') | |
552 | Output('Show Commands','Cyan',function() ShowCommands() end) | |
553 | Output('Dismiss','Really red',function() Dismiss() end) |