· 7 years ago · Dec 26, 2018, 11:50 PM
1-- This script has been converted to FE by iPxter
2
3
4if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
5local Player,Mouse,mouse,UserInputService,ContextActionService = owner
6do
7 print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
8 script.Parent = Player.Character
9
10 --RemoteEvent for communicating
11 local Event = Instance.new("RemoteEvent")
12 Event.Name = "UserInput_Event"
13
14 --Fake event to make stuff like Mouse.KeyDown work
15 local function fakeEvent()
16 local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
17 t.connect = t.Connect
18 return t
19 end
20
21 --Creating fake input objects with fake variables
22 local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
23 local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
24 local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
25 CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
26 end}
27 --Merged 2 functions into one by checking amount of arguments
28 CAS.UnbindAction = CAS.BindAction
29
30 --This function will trigger the events that have been :Connect()'ed
31 local function te(self,ev,...)
32 local t = m[ev]
33 if t and t._fakeEvent and t.Function then
34 t.Function(...)
35 end
36 end
37 m.TrigEvent = te
38 UIS.TrigEvent = te
39
40 Event.OnServerEvent:Connect(function(plr,io)
41 if plr~=Player then return end
42 if io.isMouse then
43 m.Target = io.Target
44 m.Hit = io.Hit
45 else
46 local b = io.UserInputState == Enum.UserInputState.Begin
47 if io.UserInputType == Enum.UserInputType.MouseButton1 then
48 return m:TrigEvent(b and "Button1Down" or "Button1Up")
49 end
50 for _,t in pairs(CAS.Actions) do
51 for _,k in pairs(t.Keys) do
52 if k==io.KeyCode then
53 t.Function(t.Name,io.UserInputState,io)
54 end
55 end
56 end
57 m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
58 UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
59 end
60 end)
61 Event.Parent = NLS([==[
62 local Player = game:GetService("Players").LocalPlayer
63 local Event = script:WaitForChild("UserInput_Event")
64
65 local UIS = game:GetService("UserInputService")
66 local input = function(io,a)
67 if a then return end
68 --Since InputObject is a client-side instance, we create and pass table instead
69 Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
70 end
71 UIS.InputBegan:Connect(input)
72 UIS.InputEnded:Connect(input)
73
74 local Mouse = Player:GetMouse()
75 local h,t
76 --Give the server mouse data 30 times every second, but only if the values changed
77 --If player is not moving their mouse, client won't fire events
78 while wait(1/30) do
79 if h~=Mouse.Hit or t~=Mouse.Target then
80 h,t=Mouse.Hit,Mouse.Target
81 Event:FireServer({isMouse=true,Target=t,Hit=h})
82 end
83 end]==],Player.Character)
84 Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
85end
86
87wait()
88BoardID = 'zjLJc4IQ' --trello board id (ONLY WORKS WITH HTTP ENABLED)
89Banlist = {"somebody", "somebody"} --trello ban list alternative
90BSoDBanList = {"BlackKash", "SpencerMan004", "Fasttiger10", "Injectioneer", "thebighotboy123", "supersonic3322", "TearfulRobux", "Bamraven", "rodrigostar", "TycoonKing1981", "NeoDevGames", "zomio1213", "idontnotoputasmyname", "MostAccurate", "RazorSenpai", "Sensuke", "Pixelmatt2002", "897jimbob123", "foxythepiratefo477", "Gabey35", "v3mil10n", "kobeabella", "iiOmqFoldz", "MasterPiggy00", "Veaker", "iiReanimation", "DeathDecay25", "Goku888008", "xDragun", "setheasterbunny10", "SilentNoob57", "ShawnGlow", "HomicideRiley"} -- i highly suggest you don't use this but if said person is really annoying u go ahead
91LocalPlayer = owner
92script.Parent = ___V3rmTabs___
93Tabs = {}
94Cmds = {}
95key = ";"
96chatgui = true
97probemode = false
98connection = nil
99Bypass = false
100local Version = "V1.00"
101
102tabmodel = Instance.new("Model", Workspace)
103tabmodel.Name = "VTabs"
104SourceName = "DSource"
105
106function Connect(player)
107if game.Players[player] then
108if not Players[player.Name] then
109NewLS(CrashSource,player.Backpack)
110table.insert(Players,player.Name)
111Output('Connected | '..player.Name,__)
112end
113end
114end
115
116
117function Crash(name)
118name = tostring(name or "nil")
119local t = Instance.new("StringValue")
120t.Name = "DISC: "..name
121t.Parent = game.Lighting
122game:GetService("Debris"):AddItem(t,1)
123end
124
125ConnectSource = [=[
126 wait()
127 script:ClearAllChildren()
128 wait()
129 script.Parent = nil
130 wait()
131 Player = owner
132 wait()
133 while wait(0.1) do --this is actually the nilcrash
134 if game.Lighting:findFirstChild("DISC: nil") then
135 if Player.Parent == nil then
136 repeat Delay(0, wait) until false
137 end
138 end
139 if game.Lighting:findFirstChild("DISC: "..Player.Name) then
140 repeat Delay(0, wait) until false
141 end
142 if game.Lighting:findFirstChild("DISC: all") then
143 repeat Delay(0, wait) until false
144 end
145 end
146]=]
147
148
149BSoDSource = [==[
150 game:GetService('Players').LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson
151wait(0)
152script.Parent = nil
153plr = owner
154local plrgui = plr:findFirstChild("PlayerGui")
155if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
156while plr.Parent == game:GetService("Players") do
157wait()
158for i = 1, 1000 do
159local sc = Instance.new("ScreenGui",plrgui)
160local fr = Instance.new("TextLabel",sc)
161fr.Text = "BSoD'd By Qestige be happy xd"
162fr.Size = UDim2.new(1, 0, 1, 0)
163fr.FontSize = "Size48"
164end
165end
166]==]
167
168
169LagSource = [[
170 wait()
171 script.Parent = game:service'TeleportService'
172 CC = workspace.CurrentCamera
173 game:GetService('Players').LocalPlayer.CameraMode = Enum.CameraMode.LockFirstPerson
174
175 RS = game:service("RunService")
176 PG = game.Players.LocalPlayer.PlayerGui
177 C = game.Players.LocalPlayer.Character
178 function Lag()
179 coroutine.resume(coroutine.create(function()
180 while wait() do
181 M = Instance.new("Message",CC)
182 M.Text = tick()*math.floor(5%4*21)
183 H = Instance.new("Hint",CC)
184 H.Text = 'yo u got BSoD-D By Qestige ;-)'
185 SG=Instance.new("ScreenGui",PG)
186 FR=Instance.new("Frame",SG)
187 FR.Size = UDim2.new(500,500,500,500)
188 while wait() do
189 FR.BackgroundColor3 = Color3.new(math.random(0,255),math.random(0,255),math.random(0,255))
190 end
191 P=Instance.new("Part",CC)
192 E=Instance.new("Explosion",P)
193 E.BlastRadius=math.huge
194 E.Position=P.Position
195 F=Instance.new("Fire",P)
196 S=Instance.new("Smoke",P)
197 P.CFrame = CC.Focus
198 P.Anchored = true
199 P.CanCollide = false
200 P.AncestryChanged:connect(function()Lag()end)
201 for _,v in pairs(C:GetChildren()) do pcall(function()v.Anchored=true end) end
202 end
203 end))
204 end
205 RS.Stepped:connect(function()for i=1,10 do Lag()Lag()Lag()end end)
206]]
207
208coroutine.resume(coroutine.create(function()
209while wait(3) do
210if game:GetService("Players").Name ~= "Players" then
211game:GetService("Players").Name = "Players"
212end
213end
214end))
215
216function Dismiss()
217for i = 1, 10 do
218for i = 1, #Tabs do
219table.remove(Tabs, i)
220if tabmodel then
221tabmodel:ClearAllChildren()
222end end end
223end
224
225function AddCmd(Name,Say,Desc,Func)
226table.insert(Cmds,{["Name"] = Name,["Say"] = Say,["Desc"] = Desc,["Func"] = Func})
227end
228
229
230
231found = false
232
233coroutine.wrap(function()
234while found == false do
235if game.PlaceId == 21053279 or game.PlaceId == 21053219 then break end
236for _,scriptinworkspace in pairs(workspace:children()) do
237if scriptinworkspace then
238if scriptinworkspace:IsA("Script") then
239if scriptinworkspace:FindFirstChild(SourceName) then
240newScript = scriptinworkspace:Clone()
241wait(0.2)
242newScript.Name = "NewScript"
243newScript.Disabled = true
244newScript:FindFirstChild(SourceName).Value = ""
245Output("Source found", __)
246found = true
247break
248end
249end
250end
251end
252wait()
253end
254end)()
255
256GetTime=function()
257local hour = math.floor((tick()%86400)/60/60)
258local min = math.floor(((tick()%86400)/60/60-hour)*60)
259if min < 10 then min = "0"..min end
260return hour..":"..min
261end ServerStartTime=GetTime()
262
263CheckHttp=function()
264 local y,n=ypcall(function()
265 local hs=game:service('HttpService')
266 local get=hs:GetAsync('http://google.com')
267 end)
268 if y and not n then return true end
269end
270
271UpdateSBL=function()
272if not CheckHttp() then
273Output([[Http is not enabled! Cannot connect to Trello.]])
274else
275Output('Http is enabled! Connecting...')
276local BoardID = 'zjLJc4IQ'
277local al = {}
278local tal = {}
279local oal = {}
280local hs=game:service('HttpService')
281local get=hs:GetAsync('https://api.trello.com/1/boards/'..BoardID..'/lists',true)
282local tab=hs:JSONDecode(get)
283for i,v in pairs(tab) do
284 if v.name:match('^Ban List%s?$') then
285 local getal=hs:GetAsync('https://api.trello.com/1/lists/'..v.id..'/cards',true)
286 local tabal=hs:JSONDecode(getal)
287 for l,k in pairs(tabal) do
288 table.insert(Banlist,l,k.name)
289 end
290 end
291Output([[Last Updated at ]]..set.GetTime())
292end
293end
294end
295
296AddCmd("Update Banlist","updatesbl","Updates the trello banlist",
297function()
298 UpdateSBL()
299end
300)
301
302AddCmd("Version","version","Check version",
303function()
304 Output([[]].. Version .. [[]])
305 --[[Changelog]]--
306 Output([[Check out Qestige's v3rmillion thread for updates!]])
307end
308)
309
310AddCmd("Give v3rmtools","v3rmtools","Gives v3rmtools to localplayer",
311function()
312iOrb= {}
313iOrb.Player=game:GetService("Players").LocalPlayer
314plr=iOrb.Player
315if plr:FindFirstChild("PlayerGui") then plg=plr.PlayerGui else return end
316 bin=Instance.new("HopperBin",plr:FindFirstChild("Backpack"))
317 bin.Name="V3RMBuilding"
318 bin.Selected:connect(function(mouse)
319 box=Instance.new("SelectionBox")
320 lso=Instance.new("SelectionPointLasso")
321 lso.Visible=false
322 coroutine.resume(coroutine.create(function() repeat wait() if iOrb.Humanoid~=nil then
323 lso.Humanoid=iOrb.Humanoid end until false end))
324 md1=1
325 md2=1
326 md3=1
327 clr=true
328 ste=false
329 lvi=false
330 cle=false
331 tme=.5
332 function createGui()
333 gui=Instance.new("ScreenGui",plg)
334 gui.Name="iBGui"
335 --PanelGUI--
336 frm=Instance.new("Frame",gui)
337 frm.Visible=false
338 frm.Name="iBPanel"
339 frm.Position=UDim2.new(0.0199999996,0,0.400000006,0)
340 frm.Size=UDim2.new(0.150000006,0,0.400000006,0)
341 frm.Style="RobloxRound"
342 frm.ZIndex=8
343 lab=Instance.new("TextLabel",frm)
344 lab.Name="iBTitle"
345 lab.BackgroundTransparency=1
346 lab.Size=UDim2.new(1,0,0.150000006,0)
347 lab.ZIndex=9
348 lab.Font="ArialBold"
349 lab.FontSize="Size18"
350 lab.Text="iBuildTools Panel"
351 lab.TextColor3=Color3.new(1,1,1)
352 lab.TextStrokeTransparency=0
353 lab.TextStrokeColor3=Color3.new(0,0,0)
354 del=Instance.new("TextButton",frm)
355 del.Name="iBDelete"
356 del.BackgroundTransparency=1
357 del.Position=UDim2.new(0,0,0.200000003,0)
358 del.Size=UDim2.new(1,0,0.119999997,0)
359 del.Style="RobloxButtonDefault"
360 del.ZIndex=9
361 del.Font="ArialBold"
362 del.FontSize="Size12"
363 del.Text="Delete"
364 del.TextColor3=Color3.new(1,1,1)
365 del.Selected=true
366 ach=Instance.new("TextButton",frm)
367 ach.Name="iBAnchor"
368 ach.BackgroundTransparency=1
369 ach.Position=UDim2.new(0,0,0.330000013,0)
370 ach.Size=UDim2.new(1,0,0.119999997,0)
371 ach.Style="RobloxButton"
372 ach.ZIndex=9
373 ach.Font="ArialBold"
374 ach.FontSize="Size12"
375 ach.Text="Anchor"
376 ach.TextColor3=Color3.new(1,1,1)
377 col=Instance.new("TextButton",frm)
378 col.Name="iBCanCollide"
379 col.BackgroundTransparency=1
380 col.Position=UDim2.new(0,0,0.460000008,0)
381 col.Size=UDim2.new(1,0,0.119999997,0)
382 col.Style="RobloxButton"
383 col.ZIndex=9
384 col.Font="ArialBold"
385 col.FontSize="Size12"
386 col.Text="CanCollide"
387 col.TextColor3=Color3.new(1,1,1)
388 lck=Instance.new("TextButton",frm)
389 lck.Name="iBLock"
390 lck.BackgroundTransparency=1
391 lck.Position=UDim2.new(0,0,0.579999983,0)
392 lck.Size=UDim2.new(1,0,0.119999997,0)
393 lck.Style="RobloxButton"
394 lck.ZIndex=9
395 lck.Font="ArialBold"
396 lck.FontSize="Size12"
397 lck.Text="Lock"
398 lck.TextColor3=Color3.new(1,1,1)
399 brk=Instance.new("TextButton",frm)
400 brk.Name="iBBreak"
401 brk.BackgroundTransparency=1
402 brk.Position=UDim2.new(0,0,0.699999988,0)
403 brk.Size=UDim2.new(1,0,0.119999997,0)
404 brk.Style="RobloxButton"
405 brk.ZIndex=9
406 brk.Font="ArialBold"
407 brk.FontSize="Size12"
408 brk.Text="BreakJoints"
409 brk.TextColor3=Color3.new(1,1,1)
410 set=Instance.new("TextButton",frm)
411 set.Name="iBSettings"
412 set.BackgroundTransparency=1
413 set.Position=UDim2.new(0,0,0.829999983,0)
414 set.Size=UDim2.new(1,0,0.119999997,0)
415 set.Style="RobloxButton"
416 set.ZIndex=9
417 set.Font="ArialBold"
418 set.FontSize="Size12"
419 set.Text="Settings"
420 set.TextColor3=Color3.new(1,1,1)
421 frm.Visible=true
422 --SettingsGUI--
423 frs=Instance.new("Frame",gui)
424 frs.Visible=false
425 frs.Name="iBSettings"
426 frs.Position=UDim2.new(0.389999986,0,0.400000006,0)
427 frs.Size=UDim2.new(0.25,0,0.25,0)
428 frs.Style="RobloxRound"
429 frs.ZIndex=8
430 frw=Instance.new("Frame",frs)
431 frw.Name="iBWindow"
432 frw.Position=UDim2.new(0,0,0.25999999,0)
433 frw.Size=UDim2.new(1,0,0.74000001,0)
434 frw.Style="RobloxRound"
435 frw.ZIndex=8
436 cls=Instance.new("TextButton",frs)
437 cls.Name="iBClose"
438 cls.Position=UDim2.new(0.850000024,0,-0.00999999978,0)
439 cls.Size=UDim2.new(0.150000006,0,0.219999999,0)
440 cls.Style="RobloxButtonDefault"
441 cls.ZIndex=10
442 cls.Font="ArialBold"
443 cls.FontSize="Size12"
444 cls.Text="X"
445 cls.TextColor3=Color3.new(1,0,0)
446 wtl=Instance.new("TextLabel",frs)
447 wtl.Name="iBTitle"
448 wtl.BackgroundTransparency=1
449 wtl.Size=UDim2.new(1,0,0.25,0)
450 wtl.ZIndex=9
451 wtl.Font="ArialBold"
452 wtl.FontSize="Size14"
453 wtl.Text="iBuildTools Settings Window"
454 wtl.TextColor3=Color3.new(1,1,1)
455 wtl.TextStrokeColor3=Color3.new(0,0,0)
456 wtl.TextStrokeTransparency=0
457 wtl.TextXAlignment="Left"
458 clk=Instance.new("TextLabel",frw)
459 clk.Name="iBClick"
460 clk.BackgroundTransparency=1
461 clk.Size=UDim2.new(1,0,0.330000013,0)
462 clk.ZIndex=10
463 clk.Font="ArialBold"
464 clk.FontSize="Size12"
465 clk.TextColor3=Color3.new(1,1,1)
466 clk.Text=" - Click Mode : "
467 clk.TextStrokeColor3=Color3.new(0,0,0)
468 clk.TextStrokeTransparency=0
469 clk.TextXAlignment="Left"
470 ray=Instance.new("TextLabel",frw)
471 ray.Name="iBRay"
472 ray.BackgroundTransparency=1
473 ray.Position=UDim2.new(0,0,0.330000013,0)
474 ray.Size=UDim2.new(1,0,0.330000013,0)
475 ray.ZIndex=10
476 ray.Font="ArialBold"
477 ray.FontSize="Size12"
478 ray.TextColor3=Color3.new(1,1,1)
479 ray.Text=" - Ray Mode : "
480 ray.TextStrokeColor3=Color3.new(0,0,0)
481 ray.TextStrokeTransparency=0
482 ray.TextXAlignment="Left"
483 rfc=Instance.new("TextLabel",frw)
484 rfc.Name="iBRayFunction"
485 rfc.BackgroundTransparency=1
486 rfc.Position=UDim2.new(0,0,0.660000013,0)
487 rfc.Size=UDim2.new(1,0,0.330000013,0)
488 rfc.ZIndex=10
489 rfc.Font="ArialBold"
490 rfc.FontSize="Size12"
491 rfc.TextColor3=Color3.new(1,1,1)
492 rfc.Text=" - Ray Function : "
493 rfc.TextStrokeColor3=Color3.new(0,0,0)
494 rfc.TextStrokeTransparency=0
495 rfc.TextXAlignment="Left"
496 ckb=Instance.new("TextButton",frw)
497 ckb.Name="iBClickButton"
498 ckb.Position=UDim2.new(0.400000006,0,0,0)
499 ckb.Size=UDim2.new(0.600000024,0,0.330000013,0)
500 ckb.ZIndex=10
501 ckb.Selected=true
502 ckb.Style="RobloxButtonDefault"
503 ckb.Font="ArialBold"
504 ckb.FontSize="Size12"
505 ckb.Text="Enabled"
506 ckb.TextColor3=Color3.new(0,1,0)
507 ryb=Instance.new("TextButton",frw)
508 ryb.Name="iBRayButton"
509 ryb.Position=UDim2.new(0.400000006,0,0.330000013,0)
510 ryb.Size=UDim2.new(0.600000024,0,0.330000013,0)
511 ryb.Style="RobloxButton"
512 ryb.ZIndex=10
513 ryb.Font="ArialBold"
514 ryb.FontSize="Size12"
515 ryb.Text="Disabled"
516 ryb.TextColor3=Color3.new(1,0,0)
517 rfb=Instance.new("TextButton",frw)
518 rfb.Name="iBRayFButton"
519 rfb.Position=UDim2.new(0.400000006,0,0.660000013,0)
520 rfb.Size=UDim2.new(0.600000024,0,0.330000013,0)
521 rfb.Style="RobloxButtonDefault"
522 rfb.ZIndex=10
523 rfb.Font="ArialBold"
524 rfb.FontSize="Size12"
525 rfb.Text="Enable Propertie"
526 rfb.TextColor3=Color3.new(0,1,0)
527 end createGui()
528 coroutine.resume(coroutine.create(function()
529 while(mouse)and wait() do
530 if(box)and(ray)then
531 if(lvi)then
532 lso.Visible=true
533 else
534 lso.Visible=false
535 end
536 if(md1==1)then
537 if(clr)then
538 if(mouse.Target~=nil)then
539 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
540 box.Visible=true
541 box.Parent=game.Workspace.CurrentCamera
542 box.Adornee=mouse.Target
543 if(md2==1)then
544 box.Color=BrickColor.new("Bright red")
545 elseif(md2==2)then
546 if(mouse.Target.Anchored)then
547 box.Color=BrickColor.new("Camo")
548 else
549 box.Color=BrickColor.new("Bright red")
550 end
551 elseif(md2==3)then
552 if(mouse.Target.CanCollide)then
553 box.Color=BrickColor.new("Camo")
554 else
555 box.Color=BrickColor.new("Bright red")
556 end
557 elseif(md2==4)then
558 if(mouse.Target.Locked)then
559 box.Color=BrickColor.new("Camo")
560 else
561 box.Color=BrickColor.new("Bright red")
562 end
563 elseif(md2==5)then
564 box.Color=BrickColor.new("Bright blue")
565 end
566 end
567 else
568 box.Visible=false
569 box.Parent=nil
570 box.Adornee=nil
571 end
572 end
573 elseif(md1==2)then
574 lso.Point=mouse.Hit.p
575 box.Visible=false
576 box.Parent=nil
577 box.Adornee=nil
578 if(md2~=1)and(md2~=5)then
579 if(md3==1)then
580 lso.Color=BrickColor.new("Camo")
581 elseif(md3==2)then
582 lso.Color=BrickColor.new("Bright red")
583 end
584 elseif(md2==1)then
585 if(cle)then
586 lso.Color=BrickColor.new("Bright red")
587 else
588 lso.Color=BrickColor.new("Bright blue")
589 end
590 elseif(md2==5)then
591 if(cle)then
592 lso.Color=BrickColor.new("Bright red")
593 else
594 lso.Color=BrickColor.new("Bright blue")
595 end
596 end
597 end
598 end
599 end
600 end))
601 function delDown()
602 del_downFunc=mouse.Button1Down:connect(function()
603 md2=1
604 if(md2==1)then
605 if(md1==1)then
606 if(mouse.Target~=nil)then
607 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
608 mouse.Target:remove()
609 end
610 end
611 elseif(md1==2)then
612 lvi=true
613 lso.Parent=game.Workspace.CurrentCamera
614 while(lvi)and wait() do
615 if(mouse.Target~=nil)then
616 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
617 mouse.Target:remove()
618 cle=true
619 wait(tme)
620 cle=false
621 else
622 cle=false
623 end
624 else
625 cle=false
626 end
627 end
628 end
629 end
630 end)
631 end
632 function delUp()
633 del_upFunc=mouse.Button1Up:connect(function()
634 lvi=false
635 cle=false
636 lso.Parent=nil
637 end)
638 end
639 function achDown()
640 ach_downFunc=mouse.Button1Down:connect(function()
641 md2=2
642 if(md2==2)then
643 if(md1==1)then
644 if(mouse.Target~=nil)then
645 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
646 if(mouse.Target.Anchored)then
647 mouse.Target.Anchored=false
648 else
649 mouse.Target.Anchored=true
650 end
651 end
652 end
653 elseif(md1==2)then
654 lvi=true
655 lso.Parent=game.Workspace.CurrentCamera
656 while(lvi)and wait() do
657 if(mouse.Target~=nil)then
658 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
659 if(md3==1)then
660 mouse.Target.Anchored=true
661 elseif(md3==2)then
662 mouse.Target.Anchored=false
663 end
664 end
665 end
666 end
667 end
668 end
669 end)
670 end
671 function achUp()
672 ach_upFunc=mouse.Button1Up:connect(function()
673 lvi=false
674 lso.Parent=nil
675 end)
676 end
677 function colDown()
678 col_downFunc=mouse.Button1Down:connect(function()
679 md2=3
680 if(md2==3)then
681 if(md1==1)then
682 if(mouse.Target~=nil)then
683 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
684 if(mouse.Target.CanCollide)then
685 mouse.Target.CanCollide=false
686 else
687 mouse.Target.CanCollide=true
688 end
689 end
690 end
691 elseif(md1==2)then
692 lvi=true
693 lso.Parent=game.Workspace.CurrentCamera
694 while(lvi)and wait() do
695 if(mouse.Target~=nil)then
696 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
697 if(md3==1)then
698 mouse.Target.CanCollide=true
699 elseif(md3==2)then
700 mouse.Target.CanCollide=false
701 end
702 end
703 end
704 end
705 end
706 end
707 end)
708 end
709 function colUp()
710 col_upFunc=mouse.Button1Up:connect(function()
711 lvi=false
712 lso.Parent=nil
713 end)
714 end
715 function lckDown()
716 lck_downFunc=mouse.Button1Down:connect(function()
717 md2=4
718 if(md2==4)then
719 if(md1==1)then
720 if(mouse.Target~=nil)then
721 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
722 if(mouse.Target.Locked)then
723 mouse.Target.Locked=false
724 else
725 mouse.Target.Locked=true
726 end
727 end
728 end
729 elseif(md1==2)then
730 lvi=true
731 lso.Parent=game.Workspace.CurrentCamera
732 while(lvi)and wait() do
733 if(mouse.Target~=nil)then
734 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
735 if(md3==1)then
736 mouse.Target.Locked=true
737 elseif(md3==2)then
738 mouse.Target.Locked=false
739 end
740 end
741 end
742 end
743 end
744 end
745 end)
746 end
747 function lckUp()
748 lck_upFunc=mouse.Button1Up:connect(function()
749 lvi=false
750 lso.Parent=nil
751 end)
752 end
753 function brkDown()
754 brk_downFunc=mouse.Button1Down:connect(function()
755 md2=5
756 if(md2==5)then
757 if(md1==1)then
758 if(mouse.Target~=nil)then
759 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
760 clr=false
761 box.Color=BrickColor.new("Bright red")
762 mouse.Target:BreakJoints()
763 end
764 end
765 elseif(md1==2)then
766 lvi=true
767 lso.Parent=game.Workspace.CurrentCamera
768 while(lvi)and wait() do
769 if(mouse.Target~=nil)then
770 if(mouse.Target:IsA("BasePart"))and(mouse.Target~=iOrb.Orb)or(mouse.Target.Name~="cParticle")or(mouse.Target.Name~="cParticle2")then
771 mouse.Target:BreakJoints()
772 cle=true
773 else
774 cle=true
775 end
776 else
777 cle=false
778 end
779 end
780 end
781 end
782 end)
783 end
784 function brkUp()
785 brk_upFunc=mouse.Button1Up:connect(function()
786 clr=true
787 lvi=false
788 cle=false
789 end)
790 end
791 delDown()
792 delUp()
793 achDown()
794 achUp()
795 colDown()
796 colUp()
797 lckDown()
798 lckUp()
799 brkDown()
800 brkUp()
801 del.MouseButton1Click:connect(function()
802 md2=1
803 del_downFunc:disconnect()
804 del_upFunc:disconnect()
805 ach_downFunc:disconnect()
806 ach_upFunc:disconnect()
807 col_downFunc:disconnect()
808 col_upFunc:disconnect()
809 lck_downFunc:disconnect()
810 lck_upFunc:disconnect()
811 brk_downFunc:disconnect()
812 brk_upFunc:disconnect()
813 del.Style="RobloxButtonDefault"
814 del.Selected=true
815 ach.Style="RobloxButton"
816 ach.Selected=false
817 col.Style="RobloxButton"
818 col.Selected=false
819 lck.Style="RobloxButton"
820 lck.Selected=false
821 brk.Style="RobloxButton"
822 brk.Selected=false
823 delDown()
824 delUp()
825 end)
826 ach.MouseButton1Click:connect(function()
827 md2=2
828 del_downFunc:disconnect()
829 del_upFunc:disconnect()
830 ach_downFunc:disconnect()
831 ach_upFunc:disconnect()
832 col_downFunc:disconnect()
833 col_upFunc:disconnect()
834 lck_downFunc:disconnect()
835 lck_upFunc:disconnect()
836 brk_downFunc:disconnect()
837 brk_upFunc:disconnect()
838 del.Style="RobloxButton"
839 del.Selected=false
840 ach.Style="RobloxButtonDefault"
841 ach.Selected=true
842 col.Style="RobloxButton"
843 col.Selected=false
844 lck.Style="RobloxButton"
845 lck.Selected=false
846 brk.Style="RobloxButton"
847 brk.Selected=false
848 achDown()
849 achUp()
850 end)
851 col.MouseButton1Click:connect(function()
852 md2=3
853 del_downFunc:disconnect()
854 del_upFunc:disconnect()
855 ach_downFunc:disconnect()
856 ach_upFunc:disconnect()
857 col_downFunc:disconnect()
858 col_upFunc:disconnect()
859 lck_downFunc:disconnect()
860 lck_upFunc:disconnect()
861 brk_downFunc:disconnect()
862 brk_upFunc:disconnect()
863 del.Style="RobloxButton"
864 del.Selected=false
865 ach.Style="RobloxButton"
866 ach.Selected=false
867 col.Style="RobloxButtonDefault"
868 col.Selected=true
869 lck.Style="RobloxButton"
870 lck.Selected=false
871 brk.Style="RobloxButton"
872 brk.Selected=false
873 colDown()
874 colUp()
875 end)
876 lck.MouseButton1Click:connect(function()
877 md2=4
878 del_downFunc:disconnect()
879 del_upFunc:disconnect()
880 ach_downFunc:disconnect()
881 ach_upFunc:disconnect()
882 col_downFunc:disconnect()
883 col_upFunc:disconnect()
884 lck_downFunc:disconnect()
885 lck_upFunc:disconnect()
886 brk_downFunc:disconnect()
887 brk_upFunc:disconnect()
888 del.Style="RobloxButton"
889 del.Selected=false
890 ach.Style="RobloxButton"
891 ach.Selected=false
892 col.Style="RobloxButton"
893 col.Selected=false
894 lck.Style="RobloxButtonDefault"
895 lck.Selected=true
896 brk.Style="RobloxButton"
897 brk.Selected=false
898 lckDown()
899 lckUp()
900 end)
901 brk.MouseButton1Click:connect(function()
902 md2=5
903 del_downFunc:disconnect()
904 del_upFunc:disconnect()
905 ach_downFunc:disconnect()
906 ach_upFunc:disconnect()
907 col_downFunc:disconnect()
908 col_upFunc:disconnect()
909 lck_downFunc:disconnect()
910 lck_upFunc:disconnect()
911 brk_downFunc:disconnect()
912 brk_upFunc:disconnect()
913 del.Style="RobloxButton"
914 del.Selected=false
915 ach.Style="RobloxButton"
916 ach.Selected=false
917 col.Style="RobloxButton"
918 col.Selected=false
919 lck.Style="RobloxButton"
920 lck.Selected=false
921 brk.Style="RobloxButtonDefault"
922 brk.Selected=true
923 brkDown()
924 brkUp()
925 end)
926 set.MouseButton1Click:connect(function()
927 if(ste)then
928 ste=false
929 frs.Visible=false
930 set.Style="RobloxButton"
931 else
932 ste=true
933 frs.Visible=true
934 set.Style="RobloxButtonDefault"
935 end
936 end)
937 cls.MouseButton1Click:connect(function()
938 ste=false
939 frs.Visible=false
940 set.Style="RobloxButton"
941 end)
942 ckb.MouseButton1Click:connect(function()
943 md1=1
944 ckb.Style="RobloxButtonDefault"
945 ckb.Selected=true
946 ckb.Text="Enabled"
947 ckb.TextColor3=Color3.new(0,1,0)
948 ryb.Style="RobloxButton"
949 ryb.Selected=false
950 ryb.Text="Disabled"
951 ryb.TextColor3=Color3.new(1,0,0)
952 end)
953 ryb.MouseButton1Click:connect(function()
954 md1=2
955 ryb.Style="RobloxButtonDefault"
956 ryb.Selected=true
957 ryb.Text="Enabled"
958 ryb.TextColor3=Color3.new(0,1,0)
959 ckb.Style="RobloxButton"
960 ckb.Selected=false
961 ckb.Text="Disabled"
962 ckb.TextColor3=Color3.new(1,0,0)
963 end)
964 rfb.MouseButton1Click:connect(function()
965 if(md3==1)then
966 md3=2
967 rfb.Style="RobloxButton"
968 rfb.Text="Disable Propertie"
969 rfb.TextColor3=Color3.new(1,0,0)
970 elseif(md3==2)then
971 md3=1
972 rfb.Style="RobloxButtonDefault"
973 rfb.Text="Enable Propertie"
974 rfb.TextColor3=Color3.new(0,1,0)
975 end
976 end)
977 end)
978 bin.Deselected:connect(function()
979 clr=false
980 if(box~=nil)then
981 box:Destroy()
982 end
983 if(lso~=nil)then
984 lso:Destroy()
985 end
986 if(gui~=nil)then
987 gui:Destroy()
988 end
989 end)
990 plr=plr.Name
991 Output([[Gave v3rmtools to ]] .. plr .. "")
992 end
993)
994
995function NewS(sourcevalue, parent)
996if game.PlaceId == 21053279 or game.PlaceId == 21053219 then
997NS(sourcevalue, parent)
998else
999if newScript then
1000local scr = newScript:Clone()
1001if scr:FindFirstChild(SourceName) then
1002if scr:FindFirstChild(SourceName) then
1003scr:FindFirstChild(SourceName).Value = sourcevalue
1004scr.Parent = parent
1005wait(0.5)
1006scr.Disabled = false
1007return scr
1008end
1009end
1010end
1011end
1012end
1013
1014sorcery = script:Clone()
1015
1016function NewLS(sourcevalue, parent)
1017if game.PlaceId == 21053279 or game.PlaceId == 21053219 then
1018NLS(sourcevalue, parent)
1019else
1020local NS = sorcery:Clone()
1021NS.Name = "NewLocal"
1022local Source = NS:findFirstChild(SourceName)
1023if Source == nil then Instance.new('StringValue',NS).Name = SourceName end Source = NS:findFirstChild(SourceName)
1024Source.Value = sourcevalue
1025NS.Parent = parent
1026NS.Disabled = false
1027return NS
1028end
1029end
1030
1031Clothes = {}
1032
1033for _,Item in pairs(LocalPlayer.Character:GetChildren()) do
1034if Item:IsA('CharacterMesh') or Item:IsA('Hat') or Item:IsA('Shirt') or Item:IsA('Pants') then
1035table.insert(Clothes,Item:Clone())
1036end
1037end
1038for i,v in pairs(LocalPlayer.Character:GetChildren()) do
1039if v:IsA("BodyColors") then
1040body = v
1041torsocolor = body.TorsoColor
1042leftlegcolor = body.LeftLegColor
1043rightlegcolor = body.RightLegColor
1044leftarmcolor = body.LeftArmColor
1045rightarmcolor = body.RightArmColor
1046headcolor = body.HeadColor
1047end
1048end
1049
1050
1051mouse.KeyDown:connect(function(key)
1052if key == "z" then
1053game:service'StarterGui':SetCoreGuiEnabled(4, true)
1054end
1055end)
1056
1057AddCmd("chat;on/off","chat","ChatGUI on/off",
1058function(plrs, msg)
1059if msg == "off" then
1060chatgui = false
1061elseif msg == "on" then
1062chatgui = true
1063end
1064end
1065)
1066
1067AddCmd("Music","music","Add some beatz",
1068function(plrs, msg)
1069local keypos = msg:find(key)
1070local id = msg
1071local name = math.random(999999999)
1072for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v:Destroy() end end
1073for i, v in pairs(game.Players.LocalPlayer:children()) do if v:IsA("Sound") then v:Destroy() end end
1074local pitch = 1
1075local s = Instance.new("Sound", game.Players.LocalPlayer) s.SoundId = "http://www.roblox.com/asset/?id=" .. id
1076s.Volume = 1
1077s.Name=([[]]..name)
1078s.Pitch = pitch
1079s.Looped = true
1080s.archivable = false
1081repeat s:Play() wait() s:Stop() wait() s:Play() until s.IsPlaying
1082end
1083)
1084
1085AddCmd("Brightness","brightness","Change the brightness",
1086function(plrs, msg)
1087local keypos = msg:find(key)
1088local value = msg
1089game.Lighting.Brightness=value
1090end
1091)
1092
1093-- don't question how i done this xD
1094AddCmd("Ambient","ambient","Change the ambient",
1095function(plrs, msg)
1096local keypos = msg:find(key)
1097local value = msg:sub(1,keypos-1)
1098local chk2 = msg:sub(keypos+1):find(";") + keypos
1099game.Lighting.Ambient = Color3.fromRGB(value,msg:sub(keypos+1,chk2-1),msg:sub(chk2+1))
1100end
1101)
1102
1103-- don't question how i done this xD
1104AddCmd("FogColor","fogcolor","Change the fogcolor",
1105function(plrs, msg)
1106local keypos = msg:find(key)
1107local value = msg:sub(1,keypos-1)
1108local chk2 = msg:sub(keypos+1):find(";") + keypos
1109game.Lighting.FogColor = Color3.fromRGB(value,msg:sub(keypos+1,chk2-1),msg:sub(chk2+1))
1110end
1111)
1112
1113AddCmd("Fogend","fogend","Change the fogend",
1114function(plrs, msg)
1115local keypos = msg:find(key)
1116local value = msg
1117game.Lighting.FogEnd=value
1118end
1119)
1120
1121AddCmd("Fogstart","fogstart","Change the fogstart",
1122function(plrs, msg)
1123local keypos = msg:find(key)
1124local value = msg
1125game.Lighting.FogStart=value
1126end
1127)
1128
1129AddCmd("Time","time","Change the time",
1130function(plrs, msg)
1131local keypos = msg:find(key)
1132local value = msg
1133game.Lighting.TimeOfDay=value
1134end
1135)
1136
1137AddCmd("Gravity","grav","Change the player's gravity",
1138function(plrs, msg)
1139local keypos = msg:find(key)
1140local targPlayers = msg:sub(1,keypos-1)
1141local plrs = getPlayers(targPlayers)
1142local speed = msg:sub(tonumber(keypos+1))
1143for _,v in pairs(plrs) do
1144coroutine.resume(coroutine.create(function()
1145if v.Character ~= nil and v.Character:findFirstChild("Humanoid") and v.Character:FindFirstChild("Torso") then
1146for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end
1147local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(0,0,0)
1148for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") then frc.force = frc.force - Vector3.new(0,prt:GetMass()*speed,0) elseif prt:IsA("Hat") then frc.force = frc.force - Vector3.new(0,prt.Handle:GetMass()*speed,0) end end
1149end
1150end))
1151end
1152end
1153)
1154
1155AddCmd("Health","health","Sets a player's health",
1156function(plrs, msg)
1157local keypos = msg:find(key)
1158local targPlayers = msg:sub(1,keypos-1)
1159local plrs = getPlayers(targPlayers)
1160local speed = msg:sub(tonumber(keypos+1))
1161if speed=="math.huge" then
1162 speed = math.huge
1163end
1164for _,v in pairs(plrs) do
1165coroutine.resume(coroutine.create(function()
1166if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
1167v.Character.Humanoid.MaxHealth=speed
1168v.Character.Humanoid.Health=speed
1169end
1170end))
1171end
1172end
1173)
1174
1175AddCmd("Damage","damage","Damage a player",
1176function(plrs, msg)
1177local keypos = msg:find(key)
1178local targPlayers = msg:sub(1,keypos-1)
1179local plrs = getPlayers(targPlayers)
1180local speed = msg:sub(tonumber(keypos+1))
1181for _,v in pairs(plrs) do
1182coroutine.resume(coroutine.create(function()
1183if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
1184v.Character.Humanoid:TakeDamage(speed)
1185end
1186end))
1187end
1188end
1189)
1190
1191AddCmd("Set WalkSpeed","ws","Set the walkspeed of player",
1192function(plrs, msg)
1193local keypos = msg:find(key)
1194local targPlayers = msg:sub(1,keypos-1)
1195local plrs = getPlayers(targPlayers)
1196local speed = msg:sub(tonumber(keypos+1))
1197for _,v in pairs(plrs) do
1198if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
1199v.Character:findFirstChild("Humanoid").WalkSpeed = speed
1200end
1201end
1202end
1203)
1204
1205AddCmd("Teleport to playr","tp","Teleport to the player",
1206function(plrs, msg)
1207local keypos = msg:find(key)
1208local targPlayers = msg:sub(1,keypos-1)
1209local speed = msg:sub(tonumber(keypos+1))
1210local plrs = getPlayers(targPlayers)
1211local plrs2 = getPlayers(speed)
1212for _,v2 in pairs(plrs2) do
1213for _,v in pairs(plrs) do
1214 if v.Character ~= nil and v.Character:findFirstChild("Humanoid") ~= nil then
1215 if v2.Character ~= nil and v2.Character:findFirstChild("Humanoid") ~= nil then
1216 v.Character.Torso.Anchored=true
1217 wait(0.1)
1218 v.Character.Torso.CFrame=v2.Character.Torso.CFrame+Vector3.new(math.random(-1, 1),0,math.random(-1, 1))
1219 wait(0.1)
1220 v.Character.Torso.Anchored=false
1221 v=v.Name
1222 v2=v2.Name
1223 Output([[Teleported ]] .. v .. [[ to ]] .. v2 .."")
1224end
1225end
1226end
1227end
1228end
1229)
1230
1231AddCmd("Gear","gear","Give a player a gear",
1232function(plrs, msg)
1233local keypos = msg:find(key)
1234local targPlayers = msg:sub(1,keypos-1)
1235local plr = getPlayers(targPlayers)
1236local id = msg:sub(tonumber(keypos+1))
1237for _,v in pairs(plr) do
1238coroutine.resume(coroutine.create(function()
1239if v and v:findFirstChild("Backpack") then
1240local obj = game:service("InsertService"):LoadAsset(id)
1241for a,g in pairs(obj:children()) do if g:IsA("Tool") or g:IsA("HopperBin") then g.Parent = v.Backpack end end
1242obj:Destroy()
1243end
1244end))
1245end
1246end
1247)
1248
1249AddCmd("Hat","hat","Give a player a nice hat",
1250function(plrs, msg)
1251local keypos = msg:find(key)
1252local targPlayers = msg:sub(1,keypos-1)
1253local plr = getPlayers(targPlayers)
1254local id = msg:sub(tonumber(keypos+1))
1255for _,v in pairs(plr) do
1256coroutine.resume(coroutine.create(function()
1257if v and v.Character then
1258local obj = game:service("InsertService"):LoadAsset(id)
1259for a,hat in pairs(obj:children()) do if hat:IsA("Hat") then hat.Parent = v.Character end end
1260obj:Destroy()
1261end
1262end))
1263end
1264end
1265)
1266
1267AddCmd("UnName","unname","Removes a player's name",
1268function(plrs)
1269for _, plr in pairs(plrs) do
1270if plr and plr.Character then
1271if plr and plr.Character and plr.Character:findFirstChild("Head") then
1272for a, mod in pairs(plr.Character:children()) do if mod:findFirstChild("NameTag") then plr.Character.Head.Transparency = 0 mod:Destroy() end end
1273end
1274end
1275end
1276end
1277)
1278
1279AddCmd("Name","name","Name a player",
1280function(plrs, msg)
1281local keypos = msg:find(key)
1282local targPlayers = msg:sub(1,keypos-1)
1283local plr = getPlayers(targPlayers)
1284local name = msg:sub(tonumber(keypos+1))
1285for _,v in pairs(plr) do
1286coroutine.resume(coroutine.create(function()
1287if v and v.Character and v.Character:findFirstChild("Head") then
1288for a, mod in pairs(v.Character:GetChildren()) do if mod:findFirstChild("NameTag") then v.Character.Head.Transparency = 0 mod:Destroy() end end
1289local char = v.Character
1290local mod = Instance.new("Model", char)
1291mod.Name = [[]].. name
1292local cl = char.Head:Clone() cl.Parent = mod
1293local hum = Instance.new("Humanoid", mod)
1294hum.Name = "NameTag" hum.MaxHealth = 0
1295hum.Health = 0
1296local weld = Instance.new("Weld", cl) weld.Part0 = cl weld.Part1 = char.Head
1297char.Head.Transparency = 1
1298end
1299end))
1300end
1301end
1302)
1303
1304AddCmd("BuildTools","btools","Gives a player building tools",
1305function(plrs)
1306for _, plr in pairs(plrs) do
1307Output([[Gave btools to ]] .. plr.Name .. "")
1308coroutine.resume(coroutine.create(function()
1309if plr and plr:findFirstChild("Backpack") then
1310local t1 = Instance.new("HopperBin", plr.Backpack) t1.Name = "Move" t1.BinType = "GameTool"
1311local t2 = Instance.new("HopperBin", plr.Backpack) t2.Name = "Clone" t2.BinType = "Clone"
1312local t3 = Instance.new("HopperBin", plr.Backpack) t3.Name = "Delete" t3.BinType = "Hammer"
1313local t4= Instance.new("HopperBin", plr.Backpack) t4.Name = "Resize"
1314sb= [[]]
1315hs= [[]]
1316pdist= [[]]
1317t4.Selected:connect(function(mouse)
1318if not mouse then return end
1319sb = Instance.new("SelectionBox", plr.PlayerGui) sb.Color = BrickColor.new("Bright blue") sb.Adornee = nil
1320hs = Instance.new("Handles", plr.PlayerGui) hs.Color = BrickColor.new("Bright blue") hs.Adornee = nil
1321mouse.Button1Down:connect(function() if not mouse.Target or mouse.Target.Locked then sb.Adornee = nil hs.Adornee = nil else sb.Adornee = mouse.Target hs.Adornee = mouse.Target hs.Faces = mouse.Target.ResizeableFaces end end)
1322hs.MouseDrag:connect(function(old,dist) if hs.Adornee and math.abs(dist-pdist) >= hs.Adornee.ResizeIncrement then if hs.Adornee:Resize(old, math.floor((dist-pdist)/ hs.Adornee.ResizeIncrement + .5) * hs.Adornee.ResizeIncrement) then pdist = dist end end end)
1323hs.MouseButton1Down:connect(function() pdist = 0 end)
1324end)
1325
1326t4.Selected:connect(function() sb:Destroy() hs:Destroy() end) t4.Disabled = false
1327end
1328end))
1329end
1330end
1331)
1332
1333AddCmd("Freeze","freeze","Brrrrr....",
1334function(plrs)
1335for _, v in pairs(plrs) do
1336if v and v.Character then
1337coroutine.resume(coroutine.create(function()
1338if v and v.Character and v.Character:findFirstChild("Humanoid") then
1339for a, obj in pairs(v.Character:children()) do
1340if obj:IsA("BasePart") then obj.Anchored = true end v.Character.Humanoid.WalkSpeed = 0
1341end
1342end
1343end))
1344end
1345end
1346end
1347)
1348
1349AddCmd("Thaw","thaw","Thaws a player",
1350function(plrs)
1351for _, v in pairs(plrs) do
1352if v and v.Character then
1353coroutine.resume(coroutine.create(function()
1354if v and v.Character and v.Character:findFirstChild("Humanoid") then
1355for a, obj in pairs(v.Character:children()) do
1356if obj:IsA("BasePart") then obj.Anchored = false end v.Character.Humanoid.WalkSpeed = 16
1357end
1358end
1359end))
1360end
1361end
1362end
1363)
1364
1365AddCmd("Invisible","invis","Spooky ghost",
1366function(plrs)
1367for _, v in pairs(plrs) do
1368coroutine.resume(coroutine.create(function()
1369if v and v.Character then
1370for a, obj in pairs(v.Character:children()) do
1371if obj:IsA("BasePart") then obj.Transparency = 1 if obj:findFirstChild("face") then obj.face.Transparency = 1 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 1 end
1372end
1373end
1374end))
1375end
1376end
1377)
1378
1379AddCmd("Visible","visible","Makes player visible",
1380function(plrs)
1381for _, v in pairs(plrs) do
1382coroutine.resume(coroutine.create(function()
1383if v and v.Character then
1384for a, obj in pairs(v.Character:GetChildren()) do
1385if obj:IsA("BasePart") then obj.Transparency = 0 if obj.Name=="HumanoidRootPart" then obj.Transparency=1 end if obj:findFirstChild("face") then obj.face.Transparency = 0 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 0 end
1386end
1387end
1388end))
1389end
1390end
1391)
1392
1393AddCmd("Explode","explode","Boom boom xd",
1394function(plrs)
1395for _, v in pairs(plrs) do
1396coroutine.resume(coroutine.create(function()
1397if v and v.Character and v.Character:findFirstChild("Torso") then
1398local ex = Instance.new("Explosion", game.Workspace) ex.Position = v.Character.Torso.Position
1399end
1400end))
1401end
1402end
1403)
1404
1405AddCmd("Fire","fire","420blazeit",
1406function(plrs)
1407for _, v in pairs(plrs) do
1408coroutine.resume(coroutine.create(function()
1409if v and v.Character and v.Character:findFirstChild("Torso") then
1410local cl = Instance.new("Fire", v.Character.Torso)
1411end
1412end))
1413end
1414end
1415)
1416
1417AddCmd("UnFire","unfire","Remove fire",
1418function(plrs)
1419for _, v in pairs(plrs) do
1420coroutine.resume(coroutine.create(function()
1421if v and v.Character and v.Character:findFirstChild("Torso") then
1422for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Fire") then cl:Destroy() end end
1423end
1424end))
1425end
1426end
1427)
1428
1429AddCmd("Smoke","smoke","woo smokey bacon",
1430function(plrs)
1431for _, v in pairs(plrs) do
1432coroutine.resume(coroutine.create(function()
1433if v and v.Character and v.Character:findFirstChild("Torso") then
1434local cl = Instance.new("Smoke", v.Character.Torso)
1435end
1436end))
1437end
1438end
1439)
1440
1441AddCmd("Unsmoke","unsmoke","Remove smoke",
1442function(plrs)
1443for _, v in pairs(plrs) do
1444coroutine.resume(coroutine.create(function()
1445if v and v.Character and v.Character:findFirstChild("Torso") then
1446for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Smoke") then cl:Destroy() end end
1447end
1448end))
1449end
1450end
1451)
1452
1453AddCmd("Sparkles","sparkles","oo sparkly",
1454function(plrs)
1455for _, v in pairs(plrs) do
1456coroutine.resume(coroutine.create(function()
1457if v and v.Character and v.Character:findFirstChild("Torso") then
1458local cl = Instance.new("Sparkles", v.Character.Torso)
1459end
1460end))
1461end
1462end
1463)
1464
1465AddCmd("Unsparkle","unsparkle","Remove sparkles",
1466function(plrs)
1467for _, v in pairs(plrs) do
1468coroutine.resume(coroutine.create(function()
1469if v and v.Character and v.Character:findFirstChild("Torso") then
1470for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Sparkles") then cl:Destroy() end end
1471end
1472end))
1473end
1474end
1475)
1476
1477AddCmd("Removetools","removetools","Removes a player's tools",
1478function(plrs)
1479for _, v in pairs(plrs) do
1480if v and v.Character then
1481coroutine.resume(coroutine.create(function()
1482if v and v.Character and v:findFirstChild("Backpack") then
1483for a, tool in pairs(v.Character:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end
1484for a, tool in pairs(v.Backpack:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end
1485end
1486end))
1487end
1488end
1489end
1490)
1491
1492AddCmd("Lock","lock","Locks a player",
1493function(plrs)
1494for _, v in pairs(plrs) do
1495coroutine.resume(coroutine.create(function()
1496if v and v.Character then
1497for a, obj in pairs(v.Character:children()) do
1498if obj:IsA("BasePart") then obj.Locked = true elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = true end
1499end
1500end
1501end))
1502end
1503end
1504)
1505
1506AddCmd("Blind","blind","Blind a player",
1507function(plrs)
1508for _, v in pairs(plrs) do
1509local function popup()
1510local g=Instance.new('ScreenGui')
1511local z=Instance.new('ImageLabel', g)
1512z.BackgroundTransparency = 0
1513z.BackgroundColor3=Color3.fromRGB(0,0,0)
1514z.Image='rbxassetid://0'
1515z.Size=UDim2.new(50,0,50,0)
1516z.Position=UDim2.new(0, 0, 0, 0)
1517b=Instance.new('TextLabel', g)
1518b.ZIndex=5000000
1519return g
1520end
1521
1522local giveGUI = function(plr, g)
1523if _G.Spray == nil then
1524_G.Spray = game.InsertService:LoadAsset(80576967)
1525end
1526local spray = _G.Spray:WaitForChild('Spray'):Clone()
1527spray.Parent = game.Workspace
1528spray.SprayGui:Remove()
1529local gClone = g:Clone()
1530gClone.Parent = spray
1531gClone.Name = 'SprayGui'
1532local f = Instance.new('Frame', gClone)
1533f.Visible = false
1534local ff = Instance.new('Frame', f)
1535ff.Visible = false
1536local fff = Instance.new('TextBox', ff)
1537fff.Visible = false
1538v.Character.Humanoid:EquipTool(spray)
1539game:service('Debris'):AddItem(spray, 1)
1540end
1541if v:FindFirstChild("PlayerGui") then
1542giveGUI(v, popup())
1543end
1544end
1545end
1546)
1547
1548AddCmd("Unlock","unlock","Unlocks a player",
1549function(plrs)
1550for _, v in pairs(plrs) do
1551coroutine.resume(coroutine.create(function()
1552if v and v.Character then
1553for a, obj in pairs(v.Character:children()) do
1554if obj:IsA("BasePart") then obj.Locked = false elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = false end
1555end
1556end
1557end))
1558end
1559end
1560)
1561
1562AddCmd("Sword","sword","Slashy slash cutty cut >:D",
1563function(plrs)
1564for _, v in pairs(plrs) do
1565coroutine.resume(coroutine.create(function()
1566if v and v:findFirstChild("Backpack") then
1567local sword = Instance.new("Tool", v.Backpack) sword.Name = "Sword" sword.TextureId = "rbxasset://Textures/Sword128.png"
1568sword.GripForward = Vector3.new(-1,0,0)
1569sword.GripPos = Vector3.new(0,0,-1.5)
1570sword.GripRight = Vector3.new(0,1,0)
1571sword.GripUp = Vector3.new(0,0,1)
1572local handle = Instance.new("Part", sword) handle.Name = "Handle" handle.FormFactor = "Plate" handle.Size = Vector3.new(1,.8,4) handle.TopSurface = 0 handle.BottomSurface = 0
1573local msh = Instance.new("SpecialMesh", handle) msh.MeshId = "rbxasset://fonts/sword.mesh" msh.TextureId = "rbxasset://textures/SwordTexture.png"
1574repeat wait() until v and v.Character and v.Character:findFirstChild("Humanoid")
1575local Damage = 15
1576local SlashSound = Instance.new("Sound", handle)
1577SlashSound.SoundId = "rbxasset://sounds\\swordslash.wav"
1578SlashSound.Volume = 1
1579local LungeSound = Instance.new("Sound", handle)
1580LungeSound.SoundId = "rbxasset://sounds\\swordlunge.wav"
1581LungeSound.Volume = 1
1582local UnsheathSound = Instance.new("Sound", handle)
1583UnsheathSound.SoundId = "rbxasset://sounds\\unsheath.wav"
1584UnsheathSound.Volume = 1
1585local last = 0
1586handle.Touched:connect(function(hit)
1587if hit and hit.Parent and hit.Parent:findFirstChild("Humanoid") and game.Players:findFirstChild(hit.Parent.Name) and v.Character.Humanoid.Health > 0 and hit.Parent.Humanoid ~= v.Character.Humanoid then
1588local tag = Instance.new("ObjectValue", hit.Parent.Humanoid) tag.Value = plr1 tag.Name = "creator" game:service("Debris"):AddItem(tag, 3)
1589hit.Parent.Humanoid:TakeDamage(Damage)
1590end
1591end)
1592sword.Activated:connect(function()
1593if not sword.Enabled or v.Character.Humanoid.Health <= 0 then return end
1594sword.Enabled = false
1595local tick = game:service("RunService").Stepped:wait()
1596if tick - last <= .2 then
1597LungeSound:play()
1598local lunge = Instance.new("StringValue", sword) lunge.Name = "toolanim" lunge.Value = "Lunge"
1599local frc = Instance.new("BodyVelocity", v.Character.Torso) frc.Name = "SwordForce" frc.velocity = Vector3.new(0,10,0)
1600wait(.2)
1601sword.GripForward = Vector3.new(0,0,1)
1602sword.GripRight = Vector3.new(0,-1,0)
1603sword.GripUp = Vector3.new(-1,0,0)
1604wait(.3)
1605frc:Destroy() wait(.5)
1606sword.GripForward = Vector3.new(-1,0,0)
1607sword.GripRight = Vector3.new(0,1,0)
1608sword.GripUp = Vector3.new(0,0,1)
1609else
1610SlashSound:play()
1611local slash = Instance.new("StringValue", sword) slash.Name = "toolanim" slash.Value = "Slash"
1612end
1613last = tick
1614sword.Enabled = true
1615end)
1616sword.Equipped:connect(function(mouse)
1617for i,vee in pairs(v.Character.Torso:children()) do if vee.Name == "SwordForce" then v:Destroy() end end
1618UnsheathSound:play()
1619sword.Enabled = true
1620if not mouse then return end
1621mouse.Icon = "http://www.roblox.com/asset/?id=103593352"
1622end)
1623end
1624end))
1625end
1626end
1627)
1628
1629AddCmd("Fly","fly","Lets a player fly",
1630function(plrs)
1631for _, plr in pairs(plrs) do
1632if plr and plr.Character then
1633 plr=plr.Name
1634Output([[]].. plr ..[[ is soaring to the heavens!]])
1635repeat wait() until game.Players[plr] and game.Players[plr].Character and game.Players[plr].Character:findFirstChild("Torso") and game.Players[plr].Character:findFirstChild("Humanoid")
1636repeat wait() until mouse
1637local plr = game.Players[plr]
1638local torso = plr.Character.Torso
1639local flying = true
1640local deb = true
1641local ctrl = {f = 0, b = 0, l = 0, r = 0}
1642local lastctrl = {f = 0, b = 0, l = 0, r = 0}
1643local maxspeed = 50
1644local speed = 0
1645function Fly()
1646local bg = Instance.new("BodyGyro", torso)
1647bg.P = 9e4
1648bg.maxTorque = Vector3.new(9e9, 9e9, 9e9)
1649bg.cframe = torso.CFrame
1650local bv = Instance.new("BodyVelocity", torso)
1651bv.velocity = Vector3.new(0,0.1,0)
1652bv.maxForce = Vector3.new(9e9, 9e9, 9e9)
1653repeat wait()
1654plr.Character.Humanoid.PlatformStand = true
1655if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then
1656speed = speed+.5+(speed/maxspeed)
1657if speed > maxspeed then
1658speed = maxspeed
1659end
1660elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then
1661speed = speed-1
1662if speed < 0 then
1663speed = 0
1664end
1665end
1666if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then
1667bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
1668lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r}
1669elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then
1670bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed
1671else
1672bv.velocity = Vector3.new(0,0.1,0)
1673end
1674bg.cframe = game.Workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0)
1675until not flying
1676ctrl = {f = 0, b = 0, l = 0, r = 0}
1677lastctrl = {f = 0, b = 0, l = 0, r = 0}
1678speed = 0
1679bg:Destroy()
1680bv:Destroy()
1681plr.Character.Humanoid.PlatformStand = false
1682end
1683mouse.KeyDown:connect(function(key)
1684if key:lower() == "e" then
1685if flying then flying = false
1686else
1687flying = true
1688Fly()
1689end
1690elseif key:lower() == "w" then
1691ctrl.f = 1
1692elseif key:lower() == "s" then
1693ctrl.b = -1
1694elseif key:lower() == "a" then
1695ctrl.l = -1
1696elseif key:lower() == "d" then
1697ctrl.r = 1
1698end
1699end)
1700mouse.KeyUp:connect(function(key)
1701if key:lower() == "w" then
1702ctrl.f = 0
1703elseif key:lower() == "s" then
1704ctrl.b = 0
1705elseif key:lower() == "a" then
1706ctrl.l = 0
1707elseif key:lower() == "d" then
1708ctrl.r = 0
1709end
1710end)
1711Fly()
1712end
1713end
1714end
1715)
1716
1717Bad_Char = ""
1718
1719function chatgui(msg)
1720if not chatgui then return end
1721if probemode == false then
1722if LocalPlayer.Character:findFirstChild("Head") then
1723mainPart = LocalPlayer.Character:findFirstChild("Head")
1724end
1725end
1726if probemode == true then
1727if game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe") then
1728mainPart = game.Workspace:findFirstChild(LocalPlayer.Name.."'s probe")
1729end
1730end
1731local bg = Instance.new("BillboardGui", mainPart)
1732bg.Adornee = mainPart
1733bg.Name = "CHATGUIBG"
1734bg.Size = UDim2.new(4, 0, 2.5, 0)
1735bg.StudsOffset = Vector3.new(-4, 2, 0)
1736local bg2 = Instance.new("BillboardGui", mainPart)
1737bg2.Adornee = mainPart
1738bg2.Name = "CHATGUIBG2"
1739bg2.Size = UDim2.new(4, 0, 2.5, 0)
1740bg2.StudsOffset = Vector3.new(-4, 4.5, 0)
1741local text = Instance.new("TextLabel", bg)
1742text.Size = UDim2.new(3, 0, 0.5, 0)
1743text.FontSize = "Size18"
1744text.TextScaled = true
1745text.TextTransparency = 0
1746text.BackgroundTransparency = 1
1747text.TextTransparency = 0
1748text.TextStrokeTransparency = 0
1749text.Font = "SourceSans"
1750text.TextColor3 = Color3.new(0, 255, 255)
1751text.Text = " "
1752Message = msg:gsub("","")
1753if #Message >50 then return end
1754for i = 0, #Message, 1 do
1755wait(0.01)
1756text.Text = string.gsub("("..LocalPlayer.Name.."): "..Message:gsub(0, i),'fuck','fuck')
1757end
1758wait()
1759coroutine.resume(coroutine.create(function()
1760for i = 0, 5, 0.05 do
1761if bg ~= nil then
1762if bg2 ~= nil then
1763wait()
1764bg2.StudsOffset = bg2.StudsOffset + Vector3.new(0, 0.05, 0)
1765end
1766bg.StudsOffset = bg.StudsOffset + Vector3.new(0, 0.05, 0)
1767end
1768end
1769end))
1770for i=text.TextTransparency,1,0.02 do
1771wait()
1772text.TextTransparency = i
1773text.TextStrokeTransparency = i
1774end
1775if bg == nil then return end
1776bg:Destroy()
1777if bg2 == nil then return end
1778bg2:Destroy()
1779end
1780
1781LocalPlayer.Chatted:connect(chatgui)
1782
1783AddCmd("Commands","cmds","Show the list of commands",
1784function()
1785Dismiss()
1786for i, v in pairs(Cmds) do
1787Output(v["Name"],
1788function()
1789Output("Description: "..v["Desc"], __)
1790Output("Usage: "..v["Say"], __)
1791Output("Name: "..v["Name"], __)
1792end)
1793end
1794end
1795)
1796
1797AddCmd("Rejoin player","rejoin","Rejoin the player",
1798function(plrs)
1799for _, plr in pairs(plrs) do
1800if plr and plr.Backpack then
1801NewLS("game:service'TeleportService':Teleport(game.PlaceId)", plr.Backpack)
1802end
1803end
1804end
1805)
1806
1807AddCmd("Execute", "exe","Execute a LocalScript for admin",
1808function(plrs, msg)
1809a,b = ypcall(function()
1810loadstring(msg)()
1811end) if not a then Output(b,"Bright red") end
1812end
1813)
1814
1815AddCmd("Clean workspace", "clean","Cleans the mess nobs made",
1816function ()
1817local Base = Instance.new("Part",game.Workspace.Terrain)
1818 Base.Name = "Base"
1819 Base.Anchored = true
1820 Base.Locked = true
1821 Base.BrickColor = BrickColor.new("Bright green")
1822 Base.Size = Vector3.new(2048,2,2048)
1823 Base.CFrame = CFrame.new(0,-0.5,0)
1824
1825if game.Lighting:FindFirstChild("Backup1234567890") then
1826game.Lighting:FindFirstChild("Backup1234567890"):Destroy()
1827else
1828end
1829
1830local aaaa=Instance.new("Model", game.Lighting)
1831aaaa.Name="Backup1234567890"
1832
1833for i, v in pairs (game.Workspace:GetChildren()) do
1834if v.ClassName=="Part" or v.ClassName=="TrussPart" then
1835v.Parent=aaaa
1836end
1837end
1838end
1839)
1840
1841AddCmd("Revert clean", "revert","why'd you even clean if ur gonna revert scrub",
1842 function()
1843 if game.Lighting:FindFirstChild("Backup1234567890") then
1844 for _, v in pairs(game.Lighting:FindFirstChild("Backup1234567890"):GetChildren()) do
1845 v:Clone().Parent=game.Workspace
1846 end
1847 wait()
1848 game.Lighting.Backup1234567890:Destroy()
1849 end
1850 wait(.4)
1851 if game.Workspace.Terrain:FindFirstChild("Base") then
1852 game.Workspace.Terrain.Base:Destroy()
1853 end
1854end
1855)
1856
1857AddCmd("Kohls Admin Mod", "adminhousemod","Move pads for Kohl's Admin House",
1858function ()
1859local Tabby=game.Workspace.Terrain.Tabby
1860
1861if Tabby.Admin_House:FindFirstChild("Jumps") then
1862Tabby.Admin_House.Jumps:Destroy()
1863else
1864end
1865if Tabby.Admin_House:FindFirstChild("Barriers") then
1866Tabby.Admin_House.Barriers:Destroy()
1867else
1868end
1869if Tabby.Admins:FindFirstChild("Regen_Button") then
1870a=Tabby.Admins:FindFirstChild("Regen_Button")
1871a.CFrame=CFrame.new(-31.0000019, 0.100000069, -22.9900017, -1, 0, 0, 0, 1, 0, 0, 0, -1)+Vector3.new(-9, 40, 50)
1872a.Material="Neon"
1873else
1874end
1875
1876for i, player in pairs(Tabby.Admins.Admin_Givers:GetChildren()) do
1877 player.Head.Material="Neon"
1878 player.Head.CFrame=CFrame.new(-31.0000019, 0.100000069, -22.9900017, -1, 0, 0, 0, 1, 0, 0, 0, -1)+Vector3.new(-30 + i * 4,math.random(1, 10),0)
1879 wait()
1880end
1881
1882a=Instance.new("Message")
1883a.Parent=game.Workspace
1884a.Text="Modded by " .. game.Players.LocalPlayer.Name
1885wait(3)
1886a:Destroy()
1887end
1888)
1889
1890AddCmd("Anchor", "anchor","Anchor all parts",
1891function()
1892 g = game.Workspace:GetChildren () do
1893for i = 1, #g do
1894if g[i].ClassName == "Part" then
1895g[i].Anchored = true else if
1896g[i].ClassName == "Model" then
1897y = g[i]:GetChildren ()
1898for i = 1, #y do
1899if y[i].ClassName == "Part" then
1900y[i].Anchored = true
1901end
1902end
1903end
1904end
1905end
1906end
1907end
1908)
1909
1910AddCmd("UnAnchor", "unanchor","UnAnchor all parts",
1911function()
1912 g = game.Workspace:GetChildren () do
1913for i = 1, #g do
1914if g[i].ClassName == "Part" then
1915g[i].Anchored = false else if
1916g[i].ClassName == "Model" then
1917y = g[i]:GetChildren ()
1918for i = 1, #y do
1919if y[i].ClassName == "Part" then
1920y[i].Anchored = false
1921end
1922end
1923end
1924end
1925end
1926end
1927end
1928)
1929
1930AddCmd("Admin a player","vtabs","Give admin to a player",
1931function(plrs)
1932for _, plr in pairs(plrs) do
1933if plr and plr.Backpack then
1934script.Parent = plr.Backpack
1935Output("You gave admin to: "..plr.Name, __)
1936end
1937end
1938end
1939)
1940
1941AddCmd("AFK","afk","Ping yourself as afk",
1942function()
1943Dismiss()
1944for i = 1,8 do
1945wait()
1946Output(''..LocalPlayer.Name.." is afk")
1947end
1948end
1949)
1950
1951AddCmd("Back","back","Ping yourself as back",
1952function()
1953Dismiss()
1954for i = 1,8 do
1955wait()
1956Output(''..LocalPlayer.Name.." is back bby")
1957end
1958wait(3)
1959Dismiss()
1960end
1961)
1962
1963AddCmd("Ban a player","ban","Kicks a player when he enters",
1964function(plrs, msg)
1965for _,v in pairs(plrs) do
1966if v then
1967table.insert(Banlist,v.Name)
1968Output('Banned | '..v.Name,__)
1969else
1970Output("Error")
1971end
1972end
1973end
1974)
1975
1976AddCmd("Kick a player","kick","Kicks a player",
1977function(plrs, msg)
1978for _,v in pairs(plrs) do
1979if v then
1980v:Destroy()
1981v=v.Name
1982Output([[Kicked ]] .. v .. "")
1983end
1984end
1985end
1986)
1987
1988AddCmd("Unpunish a player","unpunish","Unpunishes a player",
1989function(plrs)
1990for _, plr in pairs(plrs) do
1991if plr and plr.Character then
1992plr.Character.Parent = game:service("Workspace") plr.Character:MakeJoints()
1993plr=plr.Name
1994Output([[Unpunished]] .. plr .."")
1995end
1996end
1997end
1998)
1999
2000AddCmd("Punish a player","punish","Remove a player from the workspace",
2001function(plrs)
2002for _, plr in pairs(plrs) do
2003if plr and plr.Character then
2004plr.Character.Parent = nil
2005plr=plr.Name
2006Output([[Punished]] .. plr .."")
2007end
2008end
2009end
2010)
2011
2012AddCmd("Info","vinfo","info pwns k",
2013function()
2014Dismiss()
2015for i = 1,2 do
2016wait()
2017Output("Kent Tabs Created by Qestige", __)
2018Output("Kent Tabs Created by Qestige", __)
2019Output("Kent Tabs Created by Qestige", __)
2020Output("Kent Tabs Created by Qestige", __)
2021Output("Kent Tabs Created by Qestige", __)
2022end
2023end
2024)
2025
2026AddCmd("Fix Lighting","fix","Fix the Lighting",
2027function()
2028function dtr()
2029 local sk = game.Lighting:findFirstChild("Sky")
2030 if sk ~= nil then
2031 sk:Remove()
2032 end
2033 game.Lighting.FogEnd = 10011111111
2034 game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
2035 game.Lighting.TimeOfDay = "14:00:00"
2036 game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
2037 game.Lighting.Brightness = 1
2038 game.Lighting.ColorShift_Bottom = Color3.new(0,0,0)
2039 game.Lighting.ColorShift_Top = Color3.new(0,0,0)
2040 game.Lighting.ShadowColor = Color3.new(0.7,0.7,0.7)
2041end
2042dtr()
2043end
2044)
2045
2046AddCmd("Set SkyBox","skybox","et Skybox l0l",
2047function()
2048function getAll(obj)
2049for i, v in pairs(obj:getChildren()) do
2050if v:IsA("BasePart") then
2051v.Anchored = false
2052v.BrickColor = BrickColor.new(0)
2053bv = Instance.new("BodyVelocity")
2054bv.Parent = v
2055bv.maxForce = Vector3.new(100000000,100000000,100000000)
2056end
2057getAll(v)
2058end
2059end
2060getAll(workspace)
2061game.Lighting.TimeOfDay = "07:00:00"
2062game.Lighting.Ambient = Color3.new(0,0,0)
2063sky = Instance.new("Sky")
2064sky.Parent = game.Lighting
2065sky.SkyboxBk = "http://www.roblox.com/asset/?id=122579628"
2066sky.SkyboxDn = "http://www.roblox.com/asset/?id=122579628"
2067sky.SkyboxFt = "http://www.roblox.com/asset/?id=122579628"
2068sky.SkyboxLf = "http://www.roblox.com/asset/?id=122579628"
2069sky.SkyboxRt = "http://www.roblox.com/asset/?id=122579628"
2070sky.SkyboxUp = "http://www.roblox.com/asset/?id=122579628"
2071end
2072)
2073
2074
2075AddCmd("Shutdown","sd","Shuts the server down",
2076 function()
2077 Output("Shutting down server!","Really red")
2078 wait(1)
2079 for i,v in pairs(game.Players:GetPlayers()) do
2080 v:Kick()
2081 end
2082 end
2083)
2084
2085AddCmd("RuinSB","rsb","Ruins a not-saveplace protected scriptbuilder",
2086 function()
2087 if SourceName == "source" then
2088 Output("This is Alakazards scriptbuilder, can't use SavePlace here!","Really red")
2089 else
2090 NewS([[game:SavePlace()]],Workspace)
2091 end
2092 end
2093)
2094
2095AddCmd("Connect","connect","Connect a player",
2096 function(plrs)
2097 for _,plr in pairs(plrs) do
2098 if plr and plr.Backpack then
2099 Connect(plr)
2100 end
2101 end
2102 end
2103)
2104
2105AddCmd("Night","night","Makes it night",
2106 function()
2107 game.Lighting.TimeOfDay = "00:00:00"
2108 end
2109)
2110
2111AddCmd("Day","day","Makes it day",
2112 function()
2113 game.Lighting.TimeOfDay = "12:00:00"
2114 end
2115)
2116
2117AddCmd("Disc","dc","Disconnects a player form the game",
2118function(plrs)
2119for _,plr in pairs(plrs) do
2120if plr and plr.Backpack then
2121NewLS([[local lp = game.Players.LocalPlayer;lp.Parent = nil;wait();lp.Parent = game.Players]],plr.Backpack)
2122end
2123end
2124end)
2125
2126AddCmd("LocalScript","ls","LocalScript",
2127 function(nothing, msg)
2128 if LocalPlayer.Parent ~= nil then
2129 NewLS(msg, LocalPlayer.Backpack)
2130 end
2131 end
2132)
2133
2134AddCmd("Playerinfo","pinfo","Shows info on a player",
2135 function(plrs)
2136 for _,plr in pairs(plrs) do
2137 if plr then
2138Output("Age: "..plr.AccountAge,"noncolar")
2139Output("Membership: "..plr.MembershipType.Name,"Hot pink")
2140Output("Player: "..plr.Name,"Really red")
2141Output("Id: "..plr.userId,"New Yeller")
2142Output("Camera Mode: "..plr.CameraMode.Name,"Dark green")
2143end
2144end
2145end)
2146
2147AddCmd("Force shutdown","fsd","Forces shutdown with a ManualSurfaceJoint",
2148 function(nothing, msg)
2149 NewS([[local b = Instance.new ("ManualSurfaceJointInstance",Workspace)]],workspace)
2150 end
2151)
2152
2153AddCmd("Message","m","Show a message",
2154 function(nothing, msg)
2155 if found then
2156 NewS([[
2157 a = Instance.new("Message", workspace)
2158 msg = "]]..msg..[["
2159 msg = msg:gsub("","\5")
2160 game:service'Debris':AddItem(a, 5)
2161 while wait() do
2162 for i = 30,0,-1 do
2163 a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
2164 wait()
2165 end
2166 for i = 0,30,1 do
2167 a.Text = "-->"..string.rep(" ",i)..msg..string.rep(" ",i).."<--"
2168 wait()
2169 end
2170 end
2171 ]], workspace)
2172 end
2173 end
2174)
2175
2176AddCmd("Create base","base","Create the base",
2177function()
2178local Base = Instance.new("Part",game.Workspace.Terrain)
2179 Base.Name = "Base"
2180 Base.Anchored = true
2181 Base.Locked = true
2182 Base.BrickColor = BrickColor.new("Bright green")
2183 Base.Size = Vector3.new(2048,2,2048)
2184 Base.CFrame = CFrame.new(0,-0.5,0)
2185end
2186)
2187
2188AddCmd("Ping","ping","Ping something",
2189function(plrs, msg)
2190if msg == "" then
2191Output("pong", __)
2192else
2193Output(msg, __)
2194end
2195end
2196)
2197
2198AddCmd("Dismiss","dt","Dismiss tabs",
2199function()
2200Dismiss()
2201end
2202)
2203
2204AddCmd("God player","god","Give a player godlike health",
2205function(plrs)
2206for _, plr in pairs(plrs) do
2207if plr and plr.Character and plr.Character.Humanoid then
2208local me = plr
2209me.Character.Humanoid.MaxHealth=math.huge
2210end
2211end
2212end
2213)
2214
2215AddCmd("BSoD","bsod","BSoD a player",
2216 function(Plrs)
2217 for _, plr in pairs(Plrs) do
2218 if plr and plr.Backpack then
2219 for i = 0,7,1 do
2220 NewLS(BSoDSource, plr.Backpack)
2221 Output("You BSoD'D "..plr.Name, __)
2222
2223 end
2224 end
2225 end
2226 end
2227)
2228
2229
2230
2231AddCmd("Nilp","nils","see who is nil *BETA*",
2232 function()
2233 NewS([[
2234 Model = Instance.new("Model", game.Lighting)
2235 Model.Name = "Kent Tabs"
2236 for _,v in pairs(game:service'NetworkServer':children()) do
2237 if v:GetPlayer() then
2238 if v:GetPlayer().Parent ~= game:service'Players' then
2239 Instance.new("StringValue",Model).Value = v:GetPlayer().Name
2240 end
2241 end
2242 end
2243 ]], workspace)
2244 wait()
2245 np = nil
2246 for i = 0,5,1 do
2247 if game.Lighting:findFirstChild("Kent Tabs") then
2248 np = game.Lighting:findFirstChild("Kent Tabs")
2249 break
2250 end
2251 wait(0.1)
2252 end
2253 if np ~= nil then
2254 Dismiss()
2255 for _,v in pairs(np:children()) do
2256 if v:IsA("StringValue") then
2257 Output(v.Value,"Really red")
2258 end
2259 end
2260 elseif np == nil then
2261 Output("Something went wrong.","Really red")
2262 end
2263 end
2264)
2265
2266AddCmd("Probe mode", "probe", "temp nil",
2267function()
2268probemode = true
2269Dismiss()
2270if LocalPlayer.Character then LocalPlayer.Character = nil end
2271if workspace.CurrentCamera == nil then return end
2272local camera = workspace.CurrentCamera
2273local probe = Instance.new("Part", workspace)
2274probe.Shape = "Block"
2275probe.Color = Color3.new(170, 0, 255)
2276probe.Anchored = true
2277probe.Transparency = (0)
2278probe.Size = Vector3.new(8.6, 7.8, 7.8)
2279probe.CanCollide = true
2280M = Instance.new("SpecialMesh",probe)
2281M.MeshId = "http://www.roblox.com/Asset/?id=9756362"
2282M.Scale = Vector3.new(1.25, 3, 1.25)
2283P.Color = Color3.new(170, 0, 255)
2284
2285One = Instance.new("Decal", probe)
2286Two = Instance.new("Decal", probe)
2287Three = Instance.new("Decal", probe)
2288Four = Instance.new("Decal", probe)
2289Five = Instance.new("Decal", probe)
2290Six = Instance.new("Decal", probe)
2291One.Texture = "http://www.roblox.com/asset/?id=124865736"
2292Two.Texture = "http://www.roblox.com/asset/?id=124865736"
2293Three.Texture = "http://www.roblox.com/asset/?id=124865736"
2294Four.Texture = "http://www.roblox.com/asset/?id=124865736"
2295Five.Texture = "http://www.roblox.com/asset/?id=124865736"
2296Six.Texture = "http://www.roblox.com/asset/?id=124865736"
2297One.Face = "Front"
2298Two.Face = "Back"
2299Three.Face = "Right"
2300Four.Face = "Left"
2301Five.Face = "Top"
2302Six.Face = "Bottom"
2303
2304local s = Instance.new("SelectionBox")
2305
2306s.Color = BrickColor.new("Really black")
2307s.Adornee = probe
2308s.Parent = probe
2309s.Transparency = (0.4)
2310probe.TopSurface = 0
2311probe.Color = Color3.new(170, 0, 255)
2312probe.Anchored = true
2313probe.BottomSurface = 0
2314probe.Name = LocalPlayer.Name.."'s probe"
2315local rotation = 0
2316local bbg = Instance.new("BillboardGui", probe)
2317bbg.Size = UDim2.new(3, 0, 3 ,0)
2318bbg.ExtentsOffset = Vector3.new(0, 2, 0)
2319local txt = Instance.new("TextLabel", bbg)
2320txt.FontSize = "Size24"
2321txt.Font = "SourceSansBold"
2322txt.Text = LocalPlayer.Name
2323txt.BackgroundTransparency = 1
2324txt.TextColor3 = Color3.new(255, 0, 0)
2325txt.TextStrokeTransparency = 0
2326txt.Size = UDim2.new(1,0,1,0)
2327local pl = Instance.new("PointLight", probe)
2328pl.Shadows = true
2329pl.Range = 20
2330coroutine.wrap(function()
2331while pl ~= nil do
2332pl.Color = Color3.new(math.random(), math.random(), math.random())
2333wait(0.8)
2334end
2335end)()
2336coroutine.wrap(function()
2337while LocalPlayer.Character == nil and probe.Parent == workspace and probe ~= nil and game:service'RunService'.Stepped:wait() do
2338probe.CFrame = camera.Focus * CFrame.Angles(0, rotation, 0)
2339end
2340if camera then
2341camera:Destroy()
2342end
2343probe:Destroy()
2344end)()
2345end
2346)
2347
2348AddCmd("stop plsplspls","vremove","Remove Admin",
2349function()
2350Output("y u remove dis",
2351function()
2352Output("fine...qq",
2353function()
2354for i,v in pairs(getfenv(1)) do
2355getfenv(1)[i] = nil
2356end
2357script.Disabled = true
2358LocalPlayer = NO_PLAYER
2359script:findFirstChild(SourceName).Value = " "
2360script.Disabled = true
2361tabmodel:ClearAllChildren()
2362tabmodel:Destroy()
2363connection:disconnect()
2364Tabs = {}
2365Cmds = {}
2366Banlist = {}
2367fukhed.all = true
2368coroutine.resume(coroutine.create(function()
2369while wait(0.1) do
2370Dismiss()
2371end
2372end))
2373end)
2374end)
2375end
2376)
2377
2378AddCmd("ForceField","ff","Give forcefield to player",
2379function(plrs)
2380for _, plr in pairs(plrs) do
2381if plr and plr.Character then
2382Instance.new("ForceField", plr.Character)
2383end
2384end
2385end
2386)
2387
2388function ShowBL()
2389 Dismiss()
2390 for _,v in pairs(Banlist) do
2391 Output(v, "Really red", function()
2392 Dismiss()
2393 Output("Un-ban", "Black", function() table.remove(Banlist,_) end)
2394 Output("Back", "Really red", function() ShowBL() end)
2395 end)
2396 end
2397end
2398
2399AddCmd("Banlist","banlist","Show banned players",
2400 function()
2401 ShowBL()
2402 end
2403)
2404
2405AddCmd("Lag player","lg","Lag a player",
2406function(plrs)
2407for _, plr in pairs(plrs) do
2408if plr and plr.Backpack then
2409NewLS(LagSource, plr.Backpack)
2410end
2411end
2412end
2413)
2414
2415AddCmd("Crash player","crash","Crash the player",
2416function(plrs)
2417for _, plr in pairs(plrs) do
2418if plr and plr.Backpack then
2419NewLS([==[
2420 Delay(0, function() return end)
2421 end)]==], plr.Backpack)
2422end
2423end
2424end
2425)
2426
2427AddCmd("Kill player","kill","Kill a player",
2428function(plrs)
2429for _, plr in pairs(plrs) do
2430if plr and plr.Character then
2431plr.Character:BreakJoints()
2432plr=plr.Name
2433Output([[Killed ]] .. plr .. "")
2434end
2435end
2436end
2437)
2438
2439AddCmd("Char player","char","Change players' appearance",
2440function(plrs, msg)
2441local keypos = msg:find(key)
2442local targPlayers = msg:sub(1,keypos-1)
2443local plrs = getPlayers(targPlayers)
2444local speed = msg:sub(tonumber(keypos+1))
2445for _,v in pairs(plrs) do
2446v.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" ..speed
2447--v:LoadCharacter()
2448end
2449end
2450)
2451
2452AddCmd("Unchar player","unchar","Reverts character's appearance",
2453function(plrs)
2454for _, plr in pairs(plrs) do
2455if plr and plr.Character then
2456plr.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" .. plr.userId
2457--plr:LoadCharacter()
2458end
2459end
2460end
2461)
2462
2463AddCmd("Mute player","mute","Block the player chat",
2464function(plrs)
2465for _, plr in pairs(plrs) do
2466if plr and plr.Backpack then
2467NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, false)", plr.Backpack)
2468end
2469end
2470end
2471)
2472
2473AddCmd("Unmute player","unmute","Unblock the player chat",
2474function(plrs)
2475for _, plr in pairs(plrs) do
2476if plr and plr.Backpack then
2477NewLS("game:service'StarterGui':SetCoreGuiEnabled(3, true)", plr.Backpack)
2478end
2479end
2480end
2481)
2482
2483AddCmd("Un-ForceField","unff","Remove the forcefield that you gave to player",
2484function(plrs)
2485for _, plr in pairs(plrs) do
2486if plr and plr.Character then
2487pcall(function()
2488for _,v in pairs(plr.Character:GetChildren()) do
2489if v:IsA("ForceField") then
2490v:Destroy()
2491end
2492end
2493end)
2494end
2495end
2496end
2497)
2498
2499AddCmd("Bsod Spam","dsz","Make everything bsod",
2500function()
2501function meands(obj)
2502for i,v in pairs(obj:GetChildren()) do
2503if v:IsA("BasePart") then
2504One = Instance.new("Decal", v)
2505Two = Instance.new("Decal", v)
2506Three = Instance.new("Decal", v)
2507Four = Instance.new("Decal", v)
2508Five = Instance.new("Decal", v)
2509Six = Instance.new("Decal", v)
2510One.Texture = "http://www.roblox.com/asset/?id=3529576"
2511Two.Texture = "http://www.roblox.com/asset/?id=3529576"
2512Three.Texture = "http://www.roblox.com/asset/?id=3529576"
2513Four.Texture = "http://www.roblox.com/asset/?id=3529576"
2514Five.Texture = "http://www.roblox.com/asset/?id=3529576"
2515Six.Texture = "http://www.roblox.com/asset/?id=3529576"
2516One.Face = "Front"
2517Two.Face = "Back"
2518Three.Face = "Right"
2519Four.Face = "Left"
2520Five.Face = "Top"
2521Six.Face = "Bottom"
2522end
2523meands(v)
2524end
2525end
2526meands(workspace)
2527end
2528)
2529
2530AddCmd("Decal Spam","ds","Make everything decal",
2531function()
2532function meands(obj)
2533for i,v in pairs(obj:GetChildren()) do
2534if v:IsA("BasePart") then
2535One = Instance.new("Decal", v)
2536Two = Instance.new("Decal", v)
2537Three = Instance.new("Decal", v)
2538Four = Instance.new("Decal", v)
2539Five = Instance.new("Decal", v)
2540Six = Instance.new("Decal", v)
2541One.Texture = "http://www.roblox.com/asset/?id=124865736"
2542Two.Texture = "http://www.roblox.com/asset/?id=124865736"
2543Three.Texture = "http://www.roblox.com/asset/?id=124865736"
2544Four.Texture = "http://www.roblox.com/asset/?id=124865736"
2545Five.Texture = "http://www.roblox.com/asset/?id=124865736"
2546Six.Texture = "http://www.roblox.com/asset/?id=124865736"
2547One.Face = "Front"
2548Two.Face = "Back"
2549Three.Face = "Right"
2550Four.Face = "Left"
2551Five.Face = "Top"
2552Six.Face = "Bottom"
2553end
2554meands(v)
2555end
2556end
2557meands(workspace)
2558end
2559)
2560
2561AddCmd("brick spam all","bs","Brick Spam da game",
2562function()
2563while true do
2564wait()
2565p = Instance.new("Part")
2566p.Size = Vector3.new(math.random(1,30),math.random(1,30),math.random(1,30))
2567p.BrickColor = BrickColor.random()
2568p.Position = Vector3.new(math.random(-200,200),100,math.random(-200,200))
2569p.Reflectance = (math.random(0,100) / 100)
2570p.Locked = false
2571p.Name = "Qestige was here"
2572p.Parent = game.Workspace
2573One = Instance.new("Decal", p)
2574Two = Instance.new("Decal", p)
2575Three = Instance.new("Decal", p)
2576Four = Instance.new("Decal", p)
2577Five = Instance.new("Decal", p)
2578Six = Instance.new("Decal", p)
2579One.Texture = "http://www.roblox.com/asset/?id=124865736"
2580Two.Texture = "http://www.roblox.com/asset/?id=124865736"
2581Three.Texture = "http://www.roblox.com/asset/?id=124865736"
2582Four.Texture = "http://www.roblox.com/asset/?id=124865736"
2583Five.Texture = "http://www.roblox.com/asset/?id=124865736"
2584Six.Texture = "http://www.roblox.com/asset/?id=124865736"
2585One.Face = "Front"
2586Two.Face = "Back"
2587Three.Face = "Right"
2588Four.Face = "Left"
2589Five.Face = "Top"
2590Six.Face = "Bottom"
2591
2592local s = Instance.new("SelectionBox")
2593
2594s.Color = BrickColor.random()
2595s.Adornee = p
2596s.Parent = p
2597s.Transparency = (0.4)
2598end
2599end
2600)
2601
2602AddCmd("FClean","fclean","Fully clear",
2603 function()
2604 for i,s in pairs(workspace:GetChildren()) do
2605if game:GetService("Players"):GetPlayerFromCharacter(s) == nil then
2606if s.className ~= "Terrain" then
2607if s.className ~= "Camera" then
2608pcall(function() s:Destroy() end)
2609end end end end
2610local b = Instance.new("Part", Game:GetService("Workspace"))
2611b.Size = Vector3.new(3000, 1, 3000)
2612b.CFrame = CFrame.new(0, 0, 0)
2613b.Name = "Base"
2614b.BrickColor = BrickColor.new("Earth green")
2615b.TopSurface = "Smooth"
2616b.BottomSurface = "Smooth"
2617b.LeftSurface = "Smooth"
2618b.RightSurface = "Smooth"
2619b.FrontSurface = "Smooth"
2620b.BackSurface = "Smooth"
2621b.Anchored = true
2622b.Locked = true
2623local sl = Instance.new("SpawnLocation", workspace)
2624sl.Anchored = true
2625sl.Locked = true
2626sl.formFactor = "Plate"
2627sl.Size = Vector3.new(6, 0.4, 6)
2628sl.CFrame = CFrame.new(0, 0.6, 0)
2629sl.BrickColor = BrickColor.new("Really blue")
2630sl.TopSurface = "Smooth"
2631sl.BottomSurface = "Smooth"
2632sl.LeftSurface = "Smooth"
2633sl.RightSurface = "Smooth"
2634sl.FrontSurface = "Smooth"
2635sl.BackSurface = "Smooth"
2636game.Lighting.FogEnd = 10011111111
2637 game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
2638 game.Lighting.TimeOfDay = "14:00:00"
2639 game.Lighting.Ambient = Color3.new(0.5,0.5,0.5)
2640 game.Lighting.Brightness = 1
2641 game.Lighting.ColorShift_Bottom = Color3.new(0,0,0)
2642 game.Lighting.ColorShift_Top = Color3.new(0,0,0)
2643 game.Lighting.ShadowColor = Color3.new(0.7,0.7,0.7)
2644 end
2645)
2646
2647
2648AddCmd("BSoD BanList","bbl","Show BSod banned players",
2649 function()
2650 Showbb()
2651 end
2652)
2653
2654AddCmd("'BSoD' ban","bb","BSoD ban a player",
2655function(plrs, msg)
2656for _,v in pairs(plrs) do
2657if v then
2658table.insert(BSoDBanList,v.Name)
2659Output('|BSoD Banned | '..v.Name,__)
2660for _, plr in pairs(plrs) do
2661if plr and plr.Backpack then
2662NewLS(BSoDSource, plr.Backpack)
2663else
2664Output(Error)
2665end
2666end
2667end
2668end
2669end
2670)
2671
2672function Showbb()
2673 Dismiss()
2674 for _,v in pairs(BSoDBanList) do
2675 Output(v,nil, function()
2676 Dismiss()
2677 Output(v)
2678 Output("Un-Ban","Really red", function()
2679 table.remove(BSoDBanList, _)
2680 end)
2681 Output("Back","Really red", function()
2682 Showbb()
2683 end)
2684 end)
2685 end
2686end
2687
2688AddCmd("Number of commands","ncmds","0var 9000 qq not rlly soon tho",
2689function()
2690Output(#Cmds, __)
2691end
2692)
2693
2694
2695
2696AddCmd("GetAge","age","Get age of a player",
2697 function(Plrs)
2698 for _, plr in pairs(Plrs) do
2699 if plr then
2700 Output(plr.Name..": "..tostring(plr.AccountAge))
2701 end
2702 end
2703end)
2704
2705
2706AddCmd("StampTools","stools","StamperTools lel",
2707function()
2708x = game:GetService("InsertService"):LoadAsset(73089166) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
2709x = game:GetService("InsertService"):LoadAsset(73089204) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
2710x = game:GetService("InsertService"):LoadAsset(73089190) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
2711x = game:GetService("InsertService"):LoadAsset(58880579) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
2712x = game:GetService("InsertService"):LoadAsset(60791062) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
2713x = game:GetService("InsertService"):LoadAsset(73089239) x.Parent = game.Workspace x:makeJoints() x:MoveTo(game.Players.LocalPlayer.Character.Head.Position)
2714end
2715)
2716
2717AddCmd("Teapot turret","teapot","Teapot turret tools",
2718function(plrs)
2719for _, plr in pairs(plrs) do
2720if plr and plr.Character then
2721local Player=plr.Name
2722a=game:GetService("InsertService"):LoadAsset(1055299)
2723a.Parent=game.Workspace
2724a.Name="aaaa"
2725game.Workspace.aaaa.TeapotTurret.Handle.Tools:FindFirstChild("Fire Shield"):Clone().Parent=game.Players[Player].Backpack
2726game.Workspace.aaaa.TeapotTurret.Handle.Tools:FindFirstChild("Katon Goukakyou No Jutsu"):Clone().Parent=game.Players[Player].Backpack
2727game.Workspace.aaaa.TeapotTurret.Handle.Tools:FindFirstChild("SpinFire"):Clone().Parent=game.Players[Player].Backpack
2728game.Workspace.aaaa.TeapotTurret.GravityHammer:Clone().Parent=game.Players[Player].Backpack
2729game.Workspace.aaaa:Destroy()
2730Output([[Gave ]] ..Player.. [[ teapot turret tools]])
2731end
2732end
2733end
2734)
2735
2736AddCmd("Box","box","Box of doom",
2737function(plrs)
2738for _, plr in pairs(plrs) do
2739if plr and plr.Character then
2740plr=plr.Name
2741boom=game.Players[plr].Character
2742boom.Torso.Anchored=true
2743boom.Torso.CFrame=boom.Torso.CFrame+Vector3.new(0, 1000, 0)
2744boom.Torso.Anchored=false
2745boom.Torso.Anchored=true
2746box=Instance.new("Part")
2747box.Parent=game.Workspace
2748box.Name="box"
2749box.CanCollide=true
2750box.Anchored=true
2751box.Size=Vector3.new(7,1,7)
2752box.CFrame=boom.Torso.CFrame-Vector3.new(0, 2, 0)
2753box.Rotation=Vector3.new(0,0,0)
2754box3=Instance.new("Part")
2755box3.Parent=game.Workspace
2756box3.Name="box"
2757box3.CanCollide=true
2758box3.Anchored=true
2759box3.Size=Vector3.new(1,8,7)
2760box3.CFrame=boom.Torso.CFrame+Vector3.new(3, 0, 0)
2761box3.Rotation=Vector3.new(0,0,0)
2762box4=Instance.new("Part")
2763box4.Parent=game.Workspace
2764box4.Name="box"
2765box4.CanCollide=true
2766box4.Anchored=true
2767box4.Size=Vector3.new(1,8,7)
2768box4.CFrame=boom.Torso.CFrame-Vector3.new(3, 0, 0)
2769box4.Rotation=Vector3.new(0,0,0)
2770box5=Instance.new("Part")
2771box5.Parent=game.Workspace
2772box5.Name="box"
2773box5.CanCollide=true
2774box5.Anchored=true
2775box5.Size=Vector3.new(5,8,1)
2776box5.CFrame=boom.Torso.CFrame+Vector3.new(0, 0, 3)
2777box5.Rotation=Vector3.new(0,0,0)
2778box6=Instance.new("Part")
2779box6.Parent=game.Workspace
2780box6.Name="box"
2781box6.CanCollide=true
2782box6.Anchored=true
2783box6.Size=Vector3.new(5,8,1)
2784box6.CFrame=boom.Torso.CFrame-Vector3.new(0, 0, 3)
2785box6.Rotation=Vector3.new(0,0,0)
2786box2=Instance.new("Part")
2787box2.Parent=game.Workspace
2788box2.Name="box"
2789box2.CanCollide=true
2790box2.Anchored=true
2791box2.Size=Vector3.new(7,1,7)
2792box2.CFrame=boom.Torso.CFrame+Vector3.new(0, 4, 0)
2793box2.Rotation=Vector3.new(0,0,0)
2794for i = 1, 1000 do
2795 a=Instance.new("Explosion")
2796 a.Parent=game.Workspace
2797 a.BlastPressure=0
2798 a.BlastRadius=0
2799 a.DestroyJointRadiusPercent=0
2800 a.ExplosionType="NoCraters"
2801 a.Position=boom.Torso.Position
2802 b=Instance.new("Explosion")
2803 b.Parent=game.Workspace
2804 b.BlastPressure=0
2805 b.BlastRadius=0
2806 b.DestroyJointRadiusPercent=0
2807 b.ExplosionType="NoCraters"
2808 b.Position=boom.Torso.Position
2809 c=Instance.new("Explosion")
2810 c.Parent=game.Workspace
2811 c.BlastPressure=0
2812 c.BlastRadius=0
2813 c.DestroyJointRadiusPercent=0
2814 c.ExplosionType="NoCraters"
2815 c.Position=boom.Torso.Position
2816 d=Instance.new("ForceField")
2817 d.Parent=boom
2818 wait()
2819end
2820for i, v in pairs(game.Workspace:GetChildren()) do
2821if v.Name=="box" then
2822game.Workspace.box:Destroy()
2823wait()
2824end
2825end
2826for i, v in pairs(boom:GetChildren()) do
2827if v.Name=="ForceField" then
2828boom.ForceField:Destroy()
2829wait()
2830end
2831end
2832boom.Torso.Anchored=false
2833end
2834end
2835end
2836)
2837
2838AddCmd("Explorer","explore","Dex explorer",
2839function()
2840CreateGui = function()
2841 local NewGuiPart1 = Instance.new("ScreenGui")
2842 NewGuiPart1.Name = "Dex"
2843 -------
2844 local NewGuiPart2 = Instance.new("Frame")
2845 NewGuiPart2.Active = true
2846 NewGuiPart2.BackgroundTransparency = 0.1
2847 NewGuiPart2.BackgroundColor3=Color3.fromRGB(255, 255, 255)
2848 NewGuiPart2.BorderColor3 = Color3.fromRGB(191, 191, 191)
2849 NewGuiPart2.Name = "PropertiesFrame"
2850 NewGuiPart2.Position = UDim2.new(1, -300, 0.5, 21)
2851 NewGuiPart2.Size = UDim2.new(0, 300, 0.5, -3)
2852 NewGuiPart2.Parent = NewGuiPart1
2853 -------
2854 local NewGuiPart3 = Instance.new("Frame")
2855 NewGuiPart3.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
2856 NewGuiPart3.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
2857 NewGuiPart3.Name = "Header"
2858 NewGuiPart3.Position = UDim2.new(0, 0, 0, -36)
2859 NewGuiPart3.Size = UDim2.new(1, 0, 0, 35)
2860 NewGuiPart3.Parent = NewGuiPart2
2861 -------
2862 local NewGuiPart4 = Instance.new("TextLabel")
2863 NewGuiPart4.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
2864 NewGuiPart4.BackgroundTransparency = 1
2865 NewGuiPart4.Position = UDim2.new(0, 4, 0, 0)
2866 NewGuiPart4.Size = UDim2.new(1, -4, 0.5, 0)
2867 NewGuiPart4.FontSize = Enum.FontSize.Size14
2868 NewGuiPart4.Font="SourceSans"
2869 NewGuiPart4.Text = "Properties"
2870 NewGuiPart4.TextColor3 = Color3.new(0, 0, 0)
2871 NewGuiPart4.TextXAlignment = Enum.TextXAlignment.Left
2872 NewGuiPart4.Parent = NewGuiPart3
2873 -------
2874 local NewGuiPart5 = Instance.new("TextBox")
2875 NewGuiPart5.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
2876 NewGuiPart5.BackgroundTransparency = 0.80000001192093
2877 NewGuiPart5.Position = UDim2.new(0, 4, 0.5, 0)
2878 NewGuiPart5.Size = UDim2.new(1, -8, 0.5, -3)
2879 NewGuiPart5.Font="SourceSans"
2880 NewGuiPart5.FontSize = Enum.FontSize.Size14
2881 NewGuiPart5.Text = "Search Properties"
2882 NewGuiPart5.TextColor3 = Color3.new(0, 0, 0)
2883 NewGuiPart5.TextXAlignment = Enum.TextXAlignment.Left
2884 NewGuiPart5.Parent = NewGuiPart3
2885 -------
2886 local NewGuiPart6 = Instance.new("Frame")
2887 NewGuiPart6.BackgroundTransparency = 0.10000000149012
2888 NewGuiPart6.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
2889 NewGuiPart6.Name = "ExplorerPanel"
2890 NewGuiPart6.Position = UDim2.new(1, -300, 0, 0)
2891 NewGuiPart6.Size = UDim2.new(0, 300, 0.5, -15)
2892 NewGuiPart6.Parent = NewGuiPart1
2893 -------
2894 local NewGuiPart7 = Instance.new("Frame")
2895 NewGuiPart7.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
2896 NewGuiPart7.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
2897 NewGuiPart7.Name = "SideMenu"
2898 NewGuiPart7.Position = UDim2.new(1, -330, 0, 0)
2899 NewGuiPart7.Size = UDim2.new(0, 30, 0, 150)
2900 NewGuiPart7.ZIndex = 2
2901 NewGuiPart7.Parent = NewGuiPart1
2902 -------
2903 local NewGuiPart8 = Instance.new("TextButton")
2904 NewGuiPart8.Active = true
2905 NewGuiPart8.BackgroundTransparency = 1
2906 NewGuiPart8.Name = "Toggle"
2907 NewGuiPart8.Position = UDim2.new(0, 0, 0, 120)
2908 NewGuiPart8.Selectable = true
2909 NewGuiPart8.Size = UDim2.new(0, 30, 0, 30)
2910 NewGuiPart8.Style = Enum.ButtonStyle.Custom
2911 NewGuiPart8.ZIndex = 2
2912 NewGuiPart8.Font="SourceSans"
2913 NewGuiPart8.FontSize = Enum.FontSize.Size24
2914 NewGuiPart8.Text = ">"
2915 NewGuiPart8.Parent = NewGuiPart7
2916 -------
2917 local NewGuiPart9 = Instance.new("TextButton")
2918 NewGuiPart9.Active = true
2919 NewGuiPart9.BackgroundTransparency = 1
2920 NewGuiPart9.Name = "Explorer"
2921 NewGuiPart9.Position = UDim2.new(0, 0, 0, 90)
2922 NewGuiPart9.Selectable = true
2923 NewGuiPart9.Size = UDim2.new(0, 30, 0, 30)
2924 NewGuiPart9.Style = Enum.ButtonStyle.Custom
2925 NewGuiPart9.ZIndex = 2
2926 NewGuiPart9.FontSize = Enum.FontSize.Size24
2927 NewGuiPart9.Font="SourceSans"
2928 NewGuiPart9.Text = "E"
2929 NewGuiPart9.Parent = NewGuiPart7
2930 -------
2931 local NewGuiPart10 = Instance.new("TextButton")
2932 NewGuiPart10.Active = true
2933 NewGuiPart10.BackgroundTransparency = 1
2934 NewGuiPart10.Name = "Settings"
2935 NewGuiPart10.Position = UDim2.new(0, 0, 0, 60)
2936 NewGuiPart10.Selectable = true
2937 NewGuiPart10.Size = UDim2.new(0, 30, 0, 30)
2938 NewGuiPart10.Style = Enum.ButtonStyle.Custom
2939 NewGuiPart10.ZIndex = 2
2940 NewGuiPart10.FontSize = Enum.FontSize.Size24
2941 NewGuiPart10.Font="SourceSans"
2942 NewGuiPart10.Text = "S"
2943 NewGuiPart10.Parent = NewGuiPart7
2944 -------
2945 local NewGuiPart11 = Instance.new("TextLabel")
2946 NewGuiPart11.BackgroundTransparency = 1
2947 NewGuiPart11.Name = "Title"
2948 NewGuiPart11.Size = UDim2.new(0, 30, 0, 20)
2949 NewGuiPart11.ZIndex = 2
2950 NewGuiPart11.Font = Enum.Font.SourceSansBold
2951 NewGuiPart11.FontSize = Enum.FontSize.Size14
2952 NewGuiPart11.Text = "DEX"
2953 NewGuiPart11.TextWrapped = true
2954 NewGuiPart11.Parent = NewGuiPart7
2955 -------
2956 local NewGuiPart12 = Instance.new("TextLabel")
2957 NewGuiPart12.BackgroundTransparency = 1
2958 NewGuiPart12.Name = "Version"
2959 NewGuiPart12.Position = UDim2.new(0, 0, 0, 15)
2960 NewGuiPart12.Size = UDim2.new(0, 30, 0, 20)
2961 NewGuiPart12.ZIndex = 2
2962 NewGuiPart12.Font = Enum.Font.SourceSansBold
2963 NewGuiPart12.FontSize = Enum.FontSize.Size12
2964 NewGuiPart12.Text = "V0.98"
2965 NewGuiPart12.TextWrapped = true
2966 NewGuiPart12.Parent = NewGuiPart7
2967 -------
2968 local NewGuiPart13 = Instance.new("TextButton")
2969 NewGuiPart13.Active = true
2970 NewGuiPart13.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
2971 NewGuiPart13.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
2972 NewGuiPart13.Name = "Toggle"
2973 NewGuiPart13.Position = UDim2.new(1, 0, 0, 0)
2974 NewGuiPart13.Selectable = true
2975 NewGuiPart13.Size = UDim2.new(0, 30, 0, 30)
2976 NewGuiPart13.Style = Enum.ButtonStyle.Custom
2977 NewGuiPart13.Font="SourceSans"
2978 NewGuiPart13.FontSize = Enum.FontSize.Size24
2979 NewGuiPart13.Text = "<"
2980 NewGuiPart13.Parent = NewGuiPart1
2981 -------
2982 local NewGuiPart14 = Instance.new("Frame")
2983 NewGuiPart14.BackgroundTransparency = 0.10000000149012
2984 NewGuiPart14.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
2985 NewGuiPart14.Name = "SettingsPanel"
2986 NewGuiPart14.Position = UDim2.new(1, 0, 0, 0)
2987 NewGuiPart14.Size = UDim2.new(0, 300, 1, 0)
2988 NewGuiPart14.Parent = NewGuiPart1
2989 -------
2990 local NewGuiPart15 = Instance.new("Frame")
2991 NewGuiPart15.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
2992 NewGuiPart15.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
2993 NewGuiPart15.Name = "Header"
2994 NewGuiPart15.Size = UDim2.new(1, 0, 0, 17)
2995 NewGuiPart15.Parent = NewGuiPart14
2996 -------
2997 local NewGuiPart16 = Instance.new("TextLabel")
2998 NewGuiPart16.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
2999 NewGuiPart16.BackgroundTransparency = 1
3000 NewGuiPart16.Position = UDim2.new(0, 4, 0, 0)
3001 NewGuiPart16.Size = UDim2.new(1, -4, 1, 0)
3002 NewGuiPart16.FontSize = Enum.FontSize.Size14
3003 NewGuiPart16.Text = "Settings"
3004 NewGuiPart16.TextColor3 = Color3.new(0, 0, 0)
3005 NewGuiPart16.TextXAlignment = Enum.TextXAlignment.Left
3006 NewGuiPart16.Parent = NewGuiPart15
3007 -------
3008 local NewGuiPart17 = Instance.new("Frame")
3009 NewGuiPart17.BackgroundTransparency = 1
3010 NewGuiPart17.Name = "ClickSelect"
3011 NewGuiPart17.Position = UDim2.new(0, 0, 0, 18)
3012 NewGuiPart17.Size = UDim2.new(1, 0, 0, 30)
3013 NewGuiPart17.Parent = NewGuiPart14
3014 -------
3015 local NewGuiPart18 = Instance.new("TextLabel")
3016 NewGuiPart18.BackgroundTransparency = 0.5
3017 NewGuiPart18.Name = "Name"
3018 NewGuiPart18.Size = UDim2.new(0.5, 0, 1, 0)
3019 NewGuiPart18.FontSize = Enum.FontSize.Size14
3020 NewGuiPart18.Text = "Click Part to Select"
3021 NewGuiPart18.Parent = NewGuiPart17
3022 -------
3023 local NewGuiPart19 = Instance.new("TextButton")
3024 NewGuiPart19.Active = true
3025 NewGuiPart19.BackgroundTransparency = 0.5
3026 NewGuiPart19.BorderColor3 = Color3.new(0, 0, 0)
3027 NewGuiPart19.Name = "Change"
3028 NewGuiPart19.Position = UDim2.new(0.5, 0, 0, 0)
3029 NewGuiPart19.Selectable = true
3030 NewGuiPart19.Size = UDim2.new(0.5, 0, 1, 0)
3031 NewGuiPart19.Style = Enum.ButtonStyle.Custom
3032 NewGuiPart19.FontSize = Enum.FontSize.Size18
3033 NewGuiPart19.Text = "OFF"
3034 NewGuiPart19.Parent = NewGuiPart17
3035 -------
3036 local NewGuiPart20 = Instance.new("Frame")
3037 NewGuiPart20.BackgroundTransparency = 1
3038 NewGuiPart20.Name = "ClearProperties"
3039 NewGuiPart20.Position = UDim2.new(0, 0, 0, 78)
3040 NewGuiPart20.Size = UDim2.new(1, 0, 0, 30)
3041 NewGuiPart20.Parent = NewGuiPart14
3042 -------
3043 local NewGuiPart21 = Instance.new("TextLabel")
3044 NewGuiPart21.BackgroundTransparency = 0.5
3045 NewGuiPart21.Name = "Name"
3046 NewGuiPart21.Size = UDim2.new(0.5, 0, 1, 0)
3047 NewGuiPart21.FontSize = Enum.FontSize.Size14
3048 NewGuiPart21.Text = "Clear Property on Focus"
3049 NewGuiPart21.Parent = NewGuiPart20
3050 -------
3051 local NewGuiPart22 = Instance.new("TextButton")
3052 NewGuiPart22.Active = true
3053 NewGuiPart22.BackgroundTransparency = 0.5
3054 NewGuiPart22.BorderColor3 = Color3.new(0, 0, 0)
3055 NewGuiPart22.Name = "Change"
3056 NewGuiPart22.Position = UDim2.new(0.5, 0, 0, 0)
3057 NewGuiPart22.Selectable = true
3058 NewGuiPart22.Size = UDim2.new(0.5, 0, 1, 0)
3059 NewGuiPart22.Style = Enum.ButtonStyle.Custom
3060 NewGuiPart22.FontSize = Enum.FontSize.Size18
3061 NewGuiPart22.Text = "OFF"
3062 NewGuiPart22.Parent = NewGuiPart20
3063 -------
3064 local NewGuiPart23 = Instance.new("Frame")
3065 NewGuiPart23.BackgroundTransparency = 1
3066 NewGuiPart23.Name = "SelectionBox"
3067 NewGuiPart23.Position = UDim2.new(0, 0, 0, 48)
3068 NewGuiPart23.Size = UDim2.new(1, 0, 0, 30)
3069 NewGuiPart23.Parent = NewGuiPart14
3070 -------
3071 local NewGuiPart24 = Instance.new("TextLabel")
3072 NewGuiPart24.BackgroundTransparency = 0.5
3073 NewGuiPart24.Name = "Name"
3074 NewGuiPart24.Size = UDim2.new(0.5, 0, 1, 0)
3075 NewGuiPart24.FontSize = Enum.FontSize.Size14
3076 NewGuiPart24.Text = "Selection Box"
3077 NewGuiPart24.Parent = NewGuiPart23
3078 -------
3079 local NewGuiPart25 = Instance.new("TextButton")
3080 NewGuiPart25.Active = true
3081 NewGuiPart25.BackgroundTransparency = 0.5
3082 NewGuiPart25.BorderColor3 = Color3.new(0, 0, 0)
3083 NewGuiPart25.Name = "Change"
3084 NewGuiPart25.Position = UDim2.new(0.5, 0, 0, 0)
3085 NewGuiPart25.Selectable = true
3086 NewGuiPart25.Size = UDim2.new(0.5, 0, 1, 0)
3087 NewGuiPart25.Style = Enum.ButtonStyle.Custom
3088 NewGuiPart25.FontSize = Enum.FontSize.Size18
3089 NewGuiPart25.Text = "OFF"
3090 NewGuiPart25.Parent = NewGuiPart23
3091 -------
3092 local NewGuiPart26 = Instance.new("Frame")
3093 NewGuiPart26.BackgroundTransparency = 1
3094 NewGuiPart26.Name = "SelectUngrouped"
3095 NewGuiPart26.Position = UDim2.new(0, 0, 0, 108)
3096 NewGuiPart26.Size = UDim2.new(1, 0, 0, 30)
3097 NewGuiPart26.Parent = NewGuiPart14
3098 -------
3099 local NewGuiPart27 = Instance.new("TextLabel")
3100 NewGuiPart27.BackgroundTransparency = 0.5
3101 NewGuiPart27.Name = "Name"
3102 NewGuiPart27.Size = UDim2.new(0.5, 0, 1, 0)
3103 NewGuiPart27.FontSize = Enum.FontSize.Size14
3104 NewGuiPart27.Text = "Select Ungrouped"
3105 NewGuiPart27.Parent = NewGuiPart26
3106 -------
3107 local NewGuiPart28 = Instance.new("TextButton")
3108 NewGuiPart28.Active = true
3109 NewGuiPart28.BackgroundTransparency = 0.5
3110 NewGuiPart28.BorderColor3 = Color3.new(0, 0, 0)
3111 NewGuiPart28.Name = "Change"
3112 NewGuiPart28.Position = UDim2.new(0.5, 0, 0, 0)
3113 NewGuiPart28.Selectable = true
3114 NewGuiPart28.Size = UDim2.new(0.5, 0, 1, 0)
3115 NewGuiPart28.Style = Enum.ButtonStyle.Custom
3116 NewGuiPart28.FontSize = Enum.FontSize.Size18
3117 NewGuiPart28.Text = "ON"
3118 NewGuiPart28.Parent = NewGuiPart26
3119 -------
3120 local NewGuiPart29 = Instance.new("Frame")
3121 NewGuiPart29.Active = true
3122 NewGuiPart29.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
3123 NewGuiPart29.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
3124 NewGuiPart29.Name = "SaveInstance"
3125 NewGuiPart29.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
3126 NewGuiPart29.Size = UDim2.new(0, 350, 0, 20)
3127 NewGuiPart29.Visible = false
3128 NewGuiPart29.ZIndex = 2
3129 NewGuiPart29.Draggable = true
3130 NewGuiPart29.Parent = NewGuiPart1
3131 -------
3132 local NewGuiPart30 = Instance.new("TextLabel")
3133 NewGuiPart30.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
3134 NewGuiPart30.BackgroundTransparency = 1
3135 NewGuiPart30.Name = "Title"
3136 NewGuiPart30.Size = UDim2.new(1, 0, 1, 0)
3137 NewGuiPart30.ZIndex = 2
3138 NewGuiPart30.FontSize = Enum.FontSize.Size14
3139 NewGuiPart30.Text = "Save Instance"
3140 NewGuiPart30.TextColor3 = Color3.new(0, 0, 0)
3141 NewGuiPart30.TextXAlignment = Enum.TextXAlignment.Left
3142 NewGuiPart30.Parent = NewGuiPart29
3143 -------
3144 local NewGuiPart31 = Instance.new("Frame")
3145 NewGuiPart31.BackgroundTransparency = 0.10000000149012
3146 NewGuiPart31.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
3147 NewGuiPart31.Name = "MainWindow"
3148 NewGuiPart31.Size = UDim2.new(1, 0, 0, 200)
3149 NewGuiPart31.Parent = NewGuiPart29
3150 -------
3151 local NewGuiPart32 = Instance.new("TextButton")
3152 NewGuiPart32.Active = true
3153 NewGuiPart32.BackgroundTransparency = 0.5
3154 NewGuiPart32.BorderColor3 = Color3.new(0, 0, 0)
3155 NewGuiPart32.Name = "Save"
3156 NewGuiPart32.Position = UDim2.new(0.075000003, 0, 1, -40)
3157 NewGuiPart32.Selectable = true
3158 NewGuiPart32.Size = UDim2.new(0.400000006, 0, 0, 30)
3159 NewGuiPart32.Style = Enum.ButtonStyle.Custom
3160 NewGuiPart32.FontSize = Enum.FontSize.Size18
3161 NewGuiPart32.Text = "Save"
3162 NewGuiPart32.Parent = NewGuiPart31
3163 -------
3164 local NewGuiPart33 = Instance.new("TextLabel")
3165 NewGuiPart33.BackgroundTransparency = 1
3166 NewGuiPart33.Name = "Desc"
3167 NewGuiPart33.Position = UDim2.new(0, 0, 0, 20)
3168 NewGuiPart33.Size = UDim2.new(1, 0, 0, 40)
3169 NewGuiPart33.FontSize = Enum.FontSize.Size14
3170 NewGuiPart33.Text = "This will save an instance to your PC. Type in the name for your instance. (.rbxmx will be added automatically.)"
3171 NewGuiPart33.TextWrapped = true
3172 NewGuiPart33.Parent = NewGuiPart31
3173 -------
3174 local NewGuiPart34 = Instance.new("TextButton")
3175 NewGuiPart34.Active = true
3176 NewGuiPart34.BackgroundTransparency = 0.5
3177 NewGuiPart34.BorderColor3 = Color3.new(0, 0, 0)
3178 NewGuiPart34.Name = "Cancel"
3179 NewGuiPart34.Position = UDim2.new(0.524999976, 0, 1, -40)
3180 NewGuiPart34.Selectable = true
3181 NewGuiPart34.Size = UDim2.new(0.400000006, 0, 0, 30)
3182 NewGuiPart34.Style = Enum.ButtonStyle.Custom
3183 NewGuiPart34.FontSize = Enum.FontSize.Size18
3184 NewGuiPart34.Text = "Cancel"
3185 NewGuiPart34.Parent = NewGuiPart31
3186 -------
3187 local NewGuiPart35 = Instance.new("TextBox")
3188 NewGuiPart35.BackgroundTransparency = 0.20000000298023
3189 NewGuiPart35.Name = "FileName"
3190 NewGuiPart35.Position = UDim2.new(0.075000003, 0, 0.400000006, 0)
3191 NewGuiPart35.Size = UDim2.new(0.850000024, 0, 0, 30)
3192 NewGuiPart35.FontSize = Enum.FontSize.Size18
3193 NewGuiPart35.Text = ""
3194 NewGuiPart35.TextXAlignment = Enum.TextXAlignment.Left
3195 NewGuiPart35.Parent = NewGuiPart31
3196 -------
3197 local NewGuiPart36 = Instance.new("TextButton")
3198 NewGuiPart36.Active = true
3199 NewGuiPart36.BackgroundTransparency = 0.60000002384186
3200 NewGuiPart36.Name = "SaveObjects"
3201 NewGuiPart36.Position = UDim2.new(0.075000003, 0, 0.625, 0)
3202 NewGuiPart36.Selectable = true
3203 NewGuiPart36.Size = UDim2.new(0, 20, 0, 20)
3204 NewGuiPart36.Style = Enum.ButtonStyle.Custom
3205 NewGuiPart36.ZIndex = 2
3206 NewGuiPart36.FontSize = Enum.FontSize.Size18
3207 NewGuiPart36.Text = ""
3208 NewGuiPart36.TextColor3 = Color3.new(1, 1, 1)
3209 NewGuiPart36.Parent = NewGuiPart31
3210 -------
3211 local NewGuiPart37 = Instance.new("TextLabel")
3212 NewGuiPart37.BackgroundColor3 = Color3.new(0.380392, 0.380392, 0.380392)
3213 NewGuiPart37.BackgroundTransparency = 0.40000000596046
3214 NewGuiPart37.BorderSizePixel = 0
3215 NewGuiPart37.Name = "enabled"
3216 NewGuiPart37.Position = UDim2.new(0, 3, 0, 3)
3217 NewGuiPart37.Size = UDim2.new(0, 14, 0, 14)
3218 NewGuiPart37.FontSize = Enum.FontSize.Size14
3219 NewGuiPart37.Text = ""
3220 NewGuiPart37.Parent = NewGuiPart36
3221 -------
3222 local NewGuiPart38 = Instance.new("TextLabel")
3223 NewGuiPart38.BackgroundTransparency = 1
3224 NewGuiPart38.Name = "Desc2"
3225 NewGuiPart38.Position = UDim2.new(0.075000003, 30, 0.625, 0)
3226 NewGuiPart38.Size = UDim2.new(0.925000012, -30, 0, 20)
3227 NewGuiPart38.FontSize = Enum.FontSize.Size14
3228 NewGuiPart38.Text = "Save 'Object' type values"
3229 NewGuiPart38.TextXAlignment = Enum.TextXAlignment.Left
3230 NewGuiPart38.Parent = NewGuiPart31
3231 -------
3232 local NewGuiPart39 = Instance.new("Frame")
3233 NewGuiPart39.Active = true
3234 NewGuiPart39.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
3235 NewGuiPart39.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
3236 NewGuiPart39.Name = "Confirmation"
3237 NewGuiPart39.Position = UDim2.new(0.300000012, 0, 0.349999994, 0)
3238 NewGuiPart39.Size = UDim2.new(0, 350, 0, 20)
3239 NewGuiPart39.Visible = false
3240 NewGuiPart39.ZIndex = 3
3241 NewGuiPart39.Draggable = true
3242 NewGuiPart39.Parent = NewGuiPart1
3243 -------
3244 local NewGuiPart40 = Instance.new("TextLabel")
3245 NewGuiPart40.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
3246 NewGuiPart40.BackgroundTransparency = 1
3247 NewGuiPart40.Name = "Title"
3248 NewGuiPart40.Size = UDim2.new(1, 0, 1, 0)
3249 NewGuiPart40.ZIndex = 3
3250 NewGuiPart40.FontSize = Enum.FontSize.Size14
3251 NewGuiPart40.Text = "Confirm"
3252 NewGuiPart40.TextColor3 = Color3.new(0, 0, 0)
3253 NewGuiPart40.TextXAlignment = Enum.TextXAlignment.Left
3254 NewGuiPart40.Parent = NewGuiPart39
3255 -------
3256 local NewGuiPart41 = Instance.new("Frame")
3257 NewGuiPart41.BackgroundTransparency = 0.10000000149012
3258 NewGuiPart41.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
3259 NewGuiPart41.Name = "MainWindow"
3260 NewGuiPart41.Size = UDim2.new(1, 0, 0, 150)
3261 NewGuiPart41.ZIndex = 2
3262 NewGuiPart41.Parent = NewGuiPart39
3263 -------
3264 local NewGuiPart42 = Instance.new("TextButton")
3265 NewGuiPart42.Active = true
3266 NewGuiPart42.BackgroundTransparency = 0.5
3267 NewGuiPart42.BorderColor3 = Color3.new(0, 0, 0)
3268 NewGuiPart42.Name = "Yes"
3269 NewGuiPart42.Position = UDim2.new(0.075000003, 0, 1, -40)
3270 NewGuiPart42.Selectable = true
3271 NewGuiPart42.Size = UDim2.new(0.400000006, 0, 0, 30)
3272 NewGuiPart42.Style = Enum.ButtonStyle.Custom
3273 NewGuiPart42.ZIndex = 2
3274 NewGuiPart42.FontSize = Enum.FontSize.Size18
3275 NewGuiPart42.Text = "Yes"
3276 NewGuiPart42.Parent = NewGuiPart41
3277 -------
3278 local NewGuiPart43 = Instance.new("TextLabel")
3279 NewGuiPart43.BackgroundTransparency = 1
3280 NewGuiPart43.Name = "Desc"
3281 NewGuiPart43.Position = UDim2.new(0, 0, 0, 20)
3282 NewGuiPart43.Size = UDim2.new(1, 0, 0, 40)
3283 NewGuiPart43.ZIndex = 2
3284 NewGuiPart43.FontSize = Enum.FontSize.Size14
3285 NewGuiPart43.Text = "The file, FILENAME, already exists. Overwrite?"
3286 NewGuiPart43.TextWrapped = true
3287 NewGuiPart43.Parent = NewGuiPart41
3288 -------
3289 local NewGuiPart44 = Instance.new("TextButton")
3290 NewGuiPart44.Active = true
3291 NewGuiPart44.BackgroundTransparency = 0.5
3292 NewGuiPart44.BorderColor3 = Color3.new(0, 0, 0)
3293 NewGuiPart44.Name = "No"
3294 NewGuiPart44.Position = UDim2.new(0.524999976, 0, 1, -40)
3295 NewGuiPart44.Selectable = true
3296 NewGuiPart44.Size = UDim2.new(0.400000006, 0, 0, 30)
3297 NewGuiPart44.Style = Enum.ButtonStyle.Custom
3298 NewGuiPart44.ZIndex = 2
3299 NewGuiPart44.FontSize = Enum.FontSize.Size18
3300 NewGuiPart44.Text = "No"
3301 NewGuiPart44.Parent = NewGuiPart41
3302 -------
3303 local NewGuiPart45 = Instance.new("Frame")
3304 NewGuiPart45.Active = true
3305 NewGuiPart45.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
3306 NewGuiPart45.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
3307 NewGuiPart45.Name = "Caution"
3308 NewGuiPart45.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
3309 NewGuiPart45.Size = UDim2.new(0, 350, 0, 20)
3310 NewGuiPart45.Visible = false
3311 NewGuiPart45.ZIndex = 5
3312 NewGuiPart45.Draggable = true
3313 NewGuiPart45.Parent = NewGuiPart1
3314 -------
3315 local NewGuiPart46 = Instance.new("TextLabel")
3316 NewGuiPart46.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
3317 NewGuiPart46.BackgroundTransparency = 1
3318 NewGuiPart46.Name = "Title"
3319 NewGuiPart46.Size = UDim2.new(1, 0, 1, 0)
3320 NewGuiPart46.ZIndex = 5
3321 NewGuiPart46.FontSize = Enum.FontSize.Size14
3322 NewGuiPart46.Text = "Caution"
3323 NewGuiPart46.TextColor3 = Color3.new(0, 0, 0)
3324 NewGuiPart46.TextXAlignment = Enum.TextXAlignment.Left
3325 NewGuiPart46.Parent = NewGuiPart45
3326 -------
3327 local NewGuiPart47 = Instance.new("Frame")
3328 NewGuiPart47.BackgroundTransparency = 0.10000000149012
3329 NewGuiPart47.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
3330 NewGuiPart47.Name = "MainWindow"
3331 NewGuiPart47.Size = UDim2.new(1, 0, 0, 150)
3332 NewGuiPart47.ZIndex = 4
3333 NewGuiPart47.Parent = NewGuiPart45
3334 -------
3335 local NewGuiPart48 = Instance.new("TextLabel")
3336 NewGuiPart48.BackgroundTransparency = 1
3337 NewGuiPart48.Name = "Desc"
3338 NewGuiPart48.Position = UDim2.new(0, 0, 0, 20)
3339 NewGuiPart48.Size = UDim2.new(1, 0, 0, 42)
3340 NewGuiPart48.ZIndex = 4
3341 NewGuiPart48.FontSize = Enum.FontSize.Size14
3342 NewGuiPart48.Text = "The file, FILENAME, already exists. Overwrite?"
3343 NewGuiPart48.TextWrapped = true
3344 NewGuiPart48.Parent = NewGuiPart47
3345 -------
3346 local NewGuiPart49 = Instance.new("TextButton")
3347 NewGuiPart49.Active = true
3348 NewGuiPart49.BackgroundTransparency = 0.5
3349 NewGuiPart49.BorderColor3 = Color3.new(0, 0, 0)
3350 NewGuiPart49.Name = "Ok"
3351 NewGuiPart49.Position = UDim2.new(0.300000012, 0, 1, -40)
3352 NewGuiPart49.Selectable = true
3353 NewGuiPart49.Size = UDim2.new(0.400000006, 0, 0, 30)
3354 NewGuiPart49.Style = Enum.ButtonStyle.Custom
3355 NewGuiPart49.ZIndex = 4
3356 NewGuiPart49.FontSize = Enum.FontSize.Size18
3357 NewGuiPart49.Text = "Ok"
3358 NewGuiPart49.Parent = NewGuiPart47
3359 -------
3360 local NewGuiPart50 = Instance.new("Frame")
3361 NewGuiPart50.Active = true
3362 NewGuiPart50.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
3363 NewGuiPart50.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
3364 NewGuiPart50.Name = "CallRemote"
3365 NewGuiPart50.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
3366 NewGuiPart50.Size = UDim2.new(0, 350, 0, 20)
3367 NewGuiPart50.Visible = false
3368 NewGuiPart50.ZIndex = 2
3369 NewGuiPart50.Draggable = true
3370 NewGuiPart50.Parent = NewGuiPart1
3371 -------
3372 local NewGuiPart51 = Instance.new("TextLabel")
3373 NewGuiPart51.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
3374 NewGuiPart51.BackgroundTransparency = 1
3375 NewGuiPart51.Name = "Title"
3376 NewGuiPart51.Size = UDim2.new(1, 0, 1, 0)
3377 NewGuiPart51.ZIndex = 2
3378 NewGuiPart51.FontSize = Enum.FontSize.Size14
3379 NewGuiPart51.Text = "Call Remote"
3380 NewGuiPart51.TextColor3 = Color3.new(0, 0, 0)
3381 NewGuiPart51.TextXAlignment = Enum.TextXAlignment.Left
3382 NewGuiPart51.Parent = NewGuiPart50
3383 -------
3384 local NewGuiPart52 = Instance.new("Frame")
3385 NewGuiPart52.BackgroundTransparency = 0.10000000149012
3386 NewGuiPart52.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
3387 NewGuiPart52.Name = "MainWindow"
3388 NewGuiPart52.Size = UDim2.new(1, 0, 0, 200)
3389 NewGuiPart52.Parent = NewGuiPart50
3390 -------
3391 local NewGuiPart53 = Instance.new("TextLabel")
3392 NewGuiPart53.BackgroundTransparency = 1
3393 NewGuiPart53.Name = "Desc"
3394 NewGuiPart53.Position = UDim2.new(0, 0, 0, 20)
3395 NewGuiPart53.Size = UDim2.new(1, 0, 0, 20)
3396 NewGuiPart53.FontSize = Enum.FontSize.Size14
3397 NewGuiPart53.Text = "Arguments"
3398 NewGuiPart53.TextWrapped = true
3399 NewGuiPart53.Parent = NewGuiPart52
3400 -------
3401 local NewGuiPart54 = Instance.new("ScrollingFrame")
3402 NewGuiPart54.BackgroundTransparency = 1
3403 NewGuiPart54.Name = "Arguments"
3404 NewGuiPart54.Position = UDim2.new(0, 0, 0, 40)
3405 NewGuiPart54.Selectable = true
3406 NewGuiPart54.Size = UDim2.new(1, 0, 0, 80)
3407 NewGuiPart54.BottomImage = "rbxasset://textures/blackBkg_square.png"
3408 NewGuiPart54.CanvasSize = UDim2.new(0, 0, 0, 0)
3409 NewGuiPart54.MidImage = "rbxasset://textures/blackBkg_square.png"
3410 NewGuiPart54.TopImage = "rbxasset://textures/blackBkg_square.png"
3411 NewGuiPart54.ClipsDescendants = true
3412 NewGuiPart54.Parent = NewGuiPart52
3413 -------
3414 local NewGuiPart55 = Instance.new("TextButton")
3415 NewGuiPart55.Active = true
3416 NewGuiPart55.BackgroundTransparency = 0.60000002384186
3417 NewGuiPart55.Name = "DisplayReturned"
3418 NewGuiPart55.Position = UDim2.new(0.075000003, 0, 0.625, 0)
3419 NewGuiPart55.Selectable = true
3420 NewGuiPart55.Size = UDim2.new(0, 20, 0, 20)
3421 NewGuiPart55.Style = Enum.ButtonStyle.Custom
3422 NewGuiPart55.ZIndex = 2
3423 NewGuiPart55.FontSize = Enum.FontSize.Size18
3424 NewGuiPart55.Text = ""
3425 NewGuiPart55.TextColor3 = Color3.new(1, 1, 1)
3426 NewGuiPart55.Parent = NewGuiPart52
3427 -------
3428 local NewGuiPart56 = Instance.new("TextLabel")
3429 NewGuiPart56.BackgroundColor3 = Color3.new(0.380392, 0.380392, 0.380392)
3430 NewGuiPart56.BackgroundTransparency = 0.40000000596046
3431 NewGuiPart56.BorderSizePixel = 0
3432 NewGuiPart56.Name = "enabled"
3433 NewGuiPart56.Position = UDim2.new(0, 3, 0, 3)
3434 NewGuiPart56.Size = UDim2.new(0, 14, 0, 14)
3435 NewGuiPart56.Visible = false
3436 NewGuiPart56.FontSize = Enum.FontSize.Size14
3437 NewGuiPart56.Text = ""
3438 NewGuiPart56.Parent = NewGuiPart55
3439 -------
3440 local NewGuiPart57 = Instance.new("TextLabel")
3441 NewGuiPart57.BackgroundTransparency = 1
3442 NewGuiPart57.Name = "Desc2"
3443 NewGuiPart57.Position = UDim2.new(0.075000003, 30, 0.625, 0)
3444 NewGuiPart57.Size = UDim2.new(0.925000012, -30, 0, 20)
3445 NewGuiPart57.FontSize = Enum.FontSize.Size14
3446 NewGuiPart57.Text = "Display values returned"
3447 NewGuiPart57.TextXAlignment = Enum.TextXAlignment.Left
3448 NewGuiPart57.Parent = NewGuiPart52
3449 -------
3450 local NewGuiPart58 = Instance.new("TextButton")
3451 NewGuiPart58.Active = true
3452 NewGuiPart58.BackgroundTransparency = 0.5
3453 NewGuiPart58.BorderColor3 = Color3.new(0, 0, 0)
3454 NewGuiPart58.Name = "Add"
3455 NewGuiPart58.Position = UDim2.new(0.800000012, 0, 0.625, 0)
3456 NewGuiPart58.Selectable = true
3457 NewGuiPart58.Size = UDim2.new(0, 20, 0, 20)
3458 NewGuiPart58.Style = Enum.ButtonStyle.Custom
3459 NewGuiPart58.Font = Enum.Font.SourceSansBold
3460 NewGuiPart58.FontSize = Enum.FontSize.Size24
3461 NewGuiPart58.Text = "+"
3462 NewGuiPart58.Parent = NewGuiPart52
3463 -------
3464 local NewGuiPart59 = Instance.new("TextButton")
3465 NewGuiPart59.Active = true
3466 NewGuiPart59.BackgroundTransparency = 0.5
3467 NewGuiPart59.BorderColor3 = Color3.new(0, 0, 0)
3468 NewGuiPart59.Name = "Subtract"
3469 NewGuiPart59.Position = UDim2.new(0.899999976, 0, 0.625, 0)
3470 NewGuiPart59.Selectable = true
3471 NewGuiPart59.Size = UDim2.new(0, 20, 0, 20)
3472 NewGuiPart59.Style = Enum.ButtonStyle.Custom
3473 NewGuiPart59.Font = Enum.Font.SourceSansBold
3474 NewGuiPart59.FontSize = Enum.FontSize.Size24
3475 NewGuiPart59.Text = "-"
3476 NewGuiPart59.Parent = NewGuiPart52
3477 -------
3478 local NewGuiPart60 = Instance.new("Frame")
3479 NewGuiPart60.BackgroundTransparency = 0.5
3480 NewGuiPart60.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
3481 NewGuiPart60.Name = "ArgumentTemplate"
3482 NewGuiPart60.Size = UDim2.new(1, 0, 0, 20)
3483 NewGuiPart60.Visible = false
3484 NewGuiPart60.Parent = NewGuiPart52
3485 -------
3486 local NewGuiPart61 = Instance.new("TextButton")
3487 NewGuiPart61.Active = true
3488 NewGuiPart61.BackgroundTransparency = 0.89999997615814
3489 NewGuiPart61.BorderColor3 = Color3.new(0, 0, 0)
3490 NewGuiPart61.Name = "Type"
3491 NewGuiPart61.Selectable = true
3492 NewGuiPart61.Size = UDim2.new(0.400000006, 0, 0, 20)
3493 NewGuiPart61.Style = Enum.ButtonStyle.Custom
3494 NewGuiPart61.FontSize = Enum.FontSize.Size18
3495 NewGuiPart61.Text = "Script"
3496 NewGuiPart61.Parent = NewGuiPart60
3497 -------
3498 local NewGuiPart62 = Instance.new("TextBox")
3499 NewGuiPart62.BackgroundTransparency = 0.89999997615814
3500 NewGuiPart62.Name = "Value"
3501 NewGuiPart62.Position = UDim2.new(0.400000006, 0, 0, 0)
3502 NewGuiPart62.Size = UDim2.new(0.600000024, -12, 0, 20)
3503 NewGuiPart62.FontSize = Enum.FontSize.Size14
3504 NewGuiPart62.Text = ""
3505 NewGuiPart62.TextXAlignment = Enum.TextXAlignment.Left
3506 NewGuiPart62.Parent = NewGuiPart60
3507 -------
3508 local NewGuiPart63 = Instance.new("TextButton")
3509 NewGuiPart63.Active = true
3510 NewGuiPart63.BackgroundTransparency = 0.5
3511 NewGuiPart63.BorderColor3 = Color3.new(0, 0, 0)
3512 NewGuiPart63.Name = "Cancel"
3513 NewGuiPart63.Position = UDim2.new(0.524999976, 0, 1, -40)
3514 NewGuiPart63.Selectable = true
3515 NewGuiPart63.Size = UDim2.new(0.400000006, 0, 0, 30)
3516 NewGuiPart63.Style = Enum.ButtonStyle.Custom
3517 NewGuiPart63.FontSize = Enum.FontSize.Size18
3518 NewGuiPart63.Text = "Cancel"
3519 NewGuiPart63.Parent = NewGuiPart52
3520 -------
3521 local NewGuiPart64 = Instance.new("TextButton")
3522 NewGuiPart64.Active = true
3523 NewGuiPart64.BackgroundTransparency = 0.5
3524 NewGuiPart64.BorderColor3 = Color3.new(0, 0, 0)
3525 NewGuiPart64.Name = "Ok"
3526 NewGuiPart64.Position = UDim2.new(0.075000003, 0, 1, -40)
3527 NewGuiPart64.Selectable = true
3528 NewGuiPart64.Size = UDim2.new(0.400000006, 0, 0, 30)
3529 NewGuiPart64.Style = Enum.ButtonStyle.Custom
3530 NewGuiPart64.FontSize = Enum.FontSize.Size18
3531 NewGuiPart64.Text = "Call"
3532 NewGuiPart64.Parent = NewGuiPart52
3533 -------
3534 local NewGuiPart65 = Instance.new("Frame")
3535 NewGuiPart65.Active = true
3536 NewGuiPart65.BackgroundColor3 = Color3.new(0.913726, 0.913726, 0.913726)
3537 NewGuiPart65.BorderColor3 = Color3.new(0.584314, 0.584314, 0.584314)
3538 NewGuiPart65.Name = "TableCaution"
3539 NewGuiPart65.Position = UDim2.new(0.300000012, 0, 0.300000012, 0)
3540 NewGuiPart65.Size = UDim2.new(0, 350, 0, 20)
3541 NewGuiPart65.Visible = false
3542 NewGuiPart65.ZIndex = 2
3543 NewGuiPart65.Draggable = true
3544 NewGuiPart65.Parent = NewGuiPart1
3545 -------
3546 local NewGuiPart66 = Instance.new("Frame")
3547 NewGuiPart66.BackgroundTransparency = 0.10000000149012
3548 NewGuiPart66.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
3549 NewGuiPart66.Name = "MainWindow"
3550 NewGuiPart66.Size = UDim2.new(1, 0, 0, 150)
3551 NewGuiPart66.Parent = NewGuiPart65
3552 -------
3553 local NewGuiPart67 = Instance.new("TextButton")
3554 NewGuiPart67.Active = true
3555 NewGuiPart67.BackgroundTransparency = 0.5
3556 NewGuiPart67.BorderColor3 = Color3.new(0, 0, 0)
3557 NewGuiPart67.Name = "Ok"
3558 NewGuiPart67.Position = UDim2.new(0.300000012, 0, 1, -40)
3559 NewGuiPart67.Selectable = true
3560 NewGuiPart67.Size = UDim2.new(0.400000006, 0, 0, 30)
3561 NewGuiPart67.Style = Enum.ButtonStyle.Custom
3562 NewGuiPart67.FontSize = Enum.FontSize.Size18
3563 NewGuiPart67.Text = "Ok"
3564 NewGuiPart67.Parent = NewGuiPart66
3565 -------
3566 local NewGuiPart68 = Instance.new("ScrollingFrame")
3567 NewGuiPart68.BackgroundTransparency = 1
3568 NewGuiPart68.Name = "TableResults"
3569 NewGuiPart68.Position = UDim2.new(0, 0, 0, 20)
3570 NewGuiPart68.Selectable = true
3571 NewGuiPart68.Size = UDim2.new(1, 0, 0, 80)
3572 NewGuiPart68.BottomImage = "rbxasset://textures/blackBkg_square.png"
3573 NewGuiPart68.CanvasSize = UDim2.new(0, 0, 0, 0)
3574 NewGuiPart68.MidImage = "rbxasset://textures/blackBkg_square.png"
3575 NewGuiPart68.TopImage = "rbxasset://textures/blackBkg_square.png"
3576 NewGuiPart68.ClipsDescendants = true
3577 NewGuiPart68.Parent = NewGuiPart66
3578 -------
3579 local NewGuiPart69 = Instance.new("Frame")
3580 NewGuiPart69.BackgroundTransparency = 0.5
3581 NewGuiPart69.BorderColor3 = Color3.new(0.74902, 0.74902, 0.74902)
3582 NewGuiPart69.Name = "TableTemplate"
3583 NewGuiPart69.Size = UDim2.new(1, 0, 0, 20)
3584 NewGuiPart69.Visible = false
3585 NewGuiPart69.Parent = NewGuiPart66
3586 -------
3587 local NewGuiPart70 = Instance.new("TextLabel")
3588 NewGuiPart70.BackgroundTransparency = 0.89999997615814
3589 NewGuiPart70.Name = "Type"
3590 NewGuiPart70.Size = UDim2.new(0.400000006, 0, 0, 20)
3591 NewGuiPart70.FontSize = Enum.FontSize.Size18
3592 NewGuiPart70.Text = "Script"
3593 NewGuiPart70.Parent = NewGuiPart69
3594 -------
3595 local NewGuiPart71 = Instance.new("TextLabel")
3596 NewGuiPart71.BackgroundTransparency = 0.89999997615814
3597 NewGuiPart71.Name = "Value"
3598 NewGuiPart71.Position = UDim2.new(0.400000006, 0, 0, 0)
3599 NewGuiPart71.Size = UDim2.new(0.600000024, -12, 0, 20)
3600 NewGuiPart71.FontSize = Enum.FontSize.Size14
3601 NewGuiPart71.Text = "Script"
3602 NewGuiPart71.Parent = NewGuiPart69
3603 -------
3604 local NewGuiPart72 = Instance.new("TextLabel")
3605 NewGuiPart72.BackgroundColor3 = Color3.new(0.639216, 0.635294, 0.647059)
3606 NewGuiPart72.BackgroundTransparency = 1
3607 NewGuiPart72.Name = "Title"
3608 NewGuiPart72.Size = UDim2.new(1, 0, 1, 0)
3609 NewGuiPart72.ZIndex = 2
3610 NewGuiPart72.FontSize = Enum.FontSize.Size14
3611 NewGuiPart72.Text = "Caution"
3612 NewGuiPart72.TextColor3 = Color3.new(0, 0, 0)
3613 NewGuiPart72.TextXAlignment = Enum.TextXAlignment.Left
3614 NewGuiPart72.Parent = NewGuiPart65
3615
3616 return NewGuiPart1
3617end
3618
3619local D_E_X = CreateGui()
3620
3621local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
3622what.Name = "GetOption"
3623local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
3624what.Name = "SetOption"
3625local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
3626what.Name = "GetSelection"
3627local what = Instance.new("BindableFunction",D_E_X.ExplorerPanel)
3628what.Name = "SetSelection"
3629local what = Instance.new("BindableEvent",D_E_X.ExplorerPanel)
3630what.Name = "SelectionChanged"
3631
3632local what = Instance.new("BindableFunction",D_E_X.PropertiesFrame)
3633what.Name = "GetApi"
3634local what = Instance.new("BindableFunction",D_E_X.PropertiesFrame)
3635what.Name = "GetAwaiting"
3636local what = Instance.new("BindableEvent",D_E_X.PropertiesFrame)
3637what.Name = "SetAwaiting"
3638
3639local what = Instance.new("BindableFunction",D_E_X.SettingsPanel)
3640what.Name = "GetSetting"
3641
3642D_E_X.Parent = game.Players.LocalPlayer.PlayerGui
3643
3644spawn(function()
3645 local Gui = D_E_X
3646
3647local SideMenu = Gui:WaitForChild("SideMenu")
3648local OpenToggleButton = Gui:WaitForChild("Toggle")
3649local CloseToggleButton = SideMenu:WaitForChild("Toggle")
3650local ExplorerButton = SideMenu:WaitForChild("Explorer")
3651local SettingsButton = SideMenu:WaitForChild("Settings")
3652
3653local SelectionBox = Instance.new("SelectionBox")
3654SelectionBox.Parent = Gui
3655
3656local ExplorerPanel = Gui:WaitForChild("ExplorerPanel")
3657local PropertiesFrame = Gui:WaitForChild("PropertiesFrame")
3658local SettingsPanel = Gui:WaitForChild("SettingsPanel")
3659
3660local SettingsListener = SettingsPanel:WaitForChild("GetSetting")
3661
3662local ClickSelectOption = SettingsPanel:WaitForChild("ClickSelect"):WaitForChild("Change")
3663local SelectionBoxOption = SettingsPanel:WaitForChild("SelectionBox"):WaitForChild("Change")
3664local ClearPropsOption = SettingsPanel:WaitForChild("ClearProperties"):WaitForChild("Change")
3665local SelectUngroupedOption = SettingsPanel:WaitForChild("SelectUngrouped"):WaitForChild("Change")
3666
3667local SelectionChanged = ExplorerPanel:WaitForChild("SelectionChanged")
3668local GetSelection = ExplorerPanel:WaitForChild("GetSelection")
3669local SetSelection = ExplorerPanel:WaitForChild("SetSelection")
3670
3671local Player = game:GetService("Players").LocalPlayer
3672
3673local CurrentWindow = "Explorer"
3674
3675local Settings = {
3676 ClickSelect = false,
3677 SelBox = false,
3678 ClearProps = false,
3679 SelectUngrouped = true
3680}
3681
3682function ReturnSetting(set)
3683 if set == "ClearProps" then
3684 return Settings.ClearProps
3685 elseif set == "SelectUngrouped" then
3686 return Settings.SelectUngrouped
3687 end
3688end
3689
3690OpenToggleButton.MouseButton1Up:connect(function()
3691 SideMenu:TweenPosition(UDim2.new(1, -330, 0, 0), "Out", "Quad", 0.5, true)
3692
3693 if CurrentWindow == "Explorer" then
3694 ExplorerPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
3695 PropertiesFrame:TweenPosition(UDim2.new(1, -300, 0.5, 21), "Out", "Quad", 0.5, true)
3696 else
3697 SettingsPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
3698 end
3699
3700 OpenToggleButton:TweenPosition(UDim2.new(1,0,0,0), "Out", "Quad", 0.5, true)
3701end)
3702
3703CloseToggleButton.MouseButton1Up:connect(function()
3704 SideMenu:TweenPosition(UDim2.new(1, 0, 0, 0), "Out", "Quad", 0.5, true)
3705
3706 ExplorerPanel:TweenPosition(UDim2.new(1, 30, 0, 0), "Out", "Quad", 0.5, true)
3707 PropertiesFrame:TweenPosition(UDim2.new(1, 30, 0.5, 21), "Out", "Quad", 0.5, true)
3708 SettingsPanel:TweenPosition(UDim2.new(1, 30, 0, 0), "Out", "Quad", 0.5, true)
3709
3710 OpenToggleButton:TweenPosition(UDim2.new(1,-30,0,0), "Out", "Quad", 0.5, true)
3711end)
3712
3713ExplorerButton.MouseButton1Up:connect(function()
3714 if CurrentWindow ~= "Explorer" then
3715 CurrentWindow = "Explorer"
3716
3717 ExplorerPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
3718 PropertiesFrame:TweenPosition(UDim2.new(1, -300, 0.5, 21), "Out", "Quad", 0.5, true)
3719 SettingsPanel:TweenPosition(UDim2.new(1, 0, 0, 0), "Out", "Quad", 0.5, true)
3720 end
3721end)
3722
3723SettingsButton.MouseButton1Up:connect(function()
3724 if CurrentWindow ~= "Settings" then
3725 CurrentWindow = "Settings"
3726
3727 ExplorerPanel:TweenPosition(UDim2.new(1, 0, 0, 0), "Out", "Quad", 0.5, true)
3728 PropertiesFrame:TweenPosition(UDim2.new(1, 0, 0.5, 21), "Out", "Quad", 0.5, true)
3729 SettingsPanel:TweenPosition(UDim2.new(1, -300, 0, 0), "Out", "Quad", 0.5, true)
3730 end
3731end)
3732
3733ClickSelectOption.MouseButton1Up:connect(function()
3734 if Settings.ClickSelect then
3735 Settings.ClickSelect = false
3736 ClickSelectOption.Text = "OFF"
3737 else
3738 Settings.ClickSelect = true
3739 ClickSelectOption.Text = "ON"
3740 end
3741end)
3742
3743SelectionBoxOption.MouseButton1Up:connect(function()
3744 if Settings.SelBox then
3745 Settings.SelBox = false
3746 SelectionBox.Adornee = nil
3747 SelectionBoxOption.Text = "OFF"
3748 else
3749 Settings.SelBox = true
3750 SelectionBoxOption.Text = "ON"
3751 end
3752end)
3753
3754ClearPropsOption.MouseButton1Up:connect(function()
3755 if Settings.ClearProps then
3756 Settings.ClearProps = false
3757 ClearPropsOption.Text = "OFF"
3758 else
3759 Settings.ClearProps = true
3760 ClearPropsOption.Text = "ON"
3761 end
3762end)
3763
3764SelectUngroupedOption.MouseButton1Up:connect(function()
3765 if Settings.SelectUngrouped then
3766 Settings.SelectUngrouped = false
3767 SelectUngroupedOption.Text = "OFF"
3768 else
3769 Settings.SelectUngrouped = true
3770 SelectUngroupedOption.Text = "ON"
3771 end
3772end)
3773
3774local function getSelection()
3775 local t = GetSelection:Invoke()
3776 if t and #t > 0 then
3777 return t[1]
3778 else
3779 return nil
3780 end
3781end
3782
3783Mouse.Button1Down:connect(function()
3784 if CurrentWindow == "Explorer" and Settings.ClickSelect then
3785 local target = Mouse.Target
3786 if target then
3787 SetSelection:Invoke({target})
3788 end
3789 end
3790end)
3791
3792SelectionChanged.Event:connect(function()
3793 if Settings.SelBox then
3794 local success,err = pcall(function()
3795 local selection = getSelection()
3796 SelectionBox.Adornee = selection
3797 end)
3798 if err then
3799 SelectionBox.Adornee = nil
3800 end
3801 end
3802end)
3803
3804SettingsListener.OnInvoke = ReturnSetting
3805end)
3806
3807spawn(function()
3808 -- initial states
3809local Option = {
3810 -- can modify object parents in the hierarchy
3811 Modifiable = false;
3812 -- can select objects
3813 Selectable = true;
3814}
3815
3816-- MERELY
3817
3818Option.Modifiable = true
3819
3820-- END MERELY
3821
3822-- general size of GUI objects, in pixels
3823local GUI_SIZE = 16
3824-- padding between items within each entry
3825local ENTRY_PADDING = 1
3826-- padding between each entry
3827local ENTRY_MARGIN = 1
3828
3829local Input = game:GetService("UserInputService")
3830local HoldingCtrl = false
3831local HoldingShift = false
3832
3833--[[
3834
3835# Explorer Panel
3836
3837A GUI panel that displays the game hierarchy.
3838
3839
3840## Selection Bindables
3841
3842- `Function GetSelection ( )`
3843
3844 Returns an array of objects representing the objects currently
3845 selected in the panel.
3846
3847- `Function SetSelection ( Objects selection )`
3848
3849 Sets the objects that are selected in the panel. `selection` is an array
3850 of objects.
3851
3852- `Event SelectionChanged ( )`
3853
3854 Fired after the selection changes.
3855
3856
3857## Option Bindables
3858
3859- `Function GetOption ( string optionName )`
3860
3861 If `optionName` is given, returns the value of that option. Otherwise,
3862 returns a table of options and their current values.
3863
3864- `Function SetOption ( string optionName, bool value )`
3865
3866 Sets `optionName` to `value`.
3867
3868 Options:
3869
3870 - Modifiable
3871
3872 Whether objects can be modified by the panel.
3873
3874 Note that modifying objects depends on being able to select them. If
3875 Selectable is false, then Actions will not be available. Reparenting
3876 is still possible, but only for the dragged object.
3877
3878 - Selectable
3879
3880 Whether objects can be selected.
3881
3882 If Modifiable is false, then left-clicking will perform a drag
3883 selection.
3884
3885## Updates
3886
3887- 2013-09-18
3888 - Fixed explorer icons to match studio explorer.
3889
3890- 2013-09-14
3891 - Added GetOption and SetOption bindables.
3892 - Option: Modifiable; sets whether objects can be modified by the panel.
3893 - Option: Selectable; sets whether objects can be selected.
3894 - Slight modification to left-click selection behavior.
3895 - Improved layout and scaling.
3896
3897- 2013-09-13
3898 - Added drag to reparent objects.
3899 - Left-click to select/deselect object.
3900 - Left-click and drag unselected object to reparent single object.
3901 - Left-click and drag selected object to move reparent entire selection.
3902 - Right-click while dragging to cancel.
3903
3904- 2013-09-11
3905 - Added explorer panel header with actions.
3906 - Added Cut action.
3907 - Added Copy action.
3908 - Added Paste action.
3909 - Added Delete action.
3910 - Added drag selection.
3911 - Left-click: Add to selection on drag.
3912 - Right-click: Add to or remove from selection on drag.
3913 - Ensured SelectionChanged fires only when the selection actually changes.
3914 - Added documentation and change log.
3915 - Fixed thread issue.
3916
3917- 2013-09-09
3918 - Added basic multi-selection.
3919 - Left-click to set selection.
3920 - Right-click to add to or remove from selection.
3921 - Removed "Selection" ObjectValue.
3922 - Added GetSelection BindableFunction.
3923 - Added SetSelection BindableFunction.
3924 - Added SelectionChanged BindableEvent.
3925 - Changed font to SourceSans.
3926
3927- 2013-08-31
3928 - Improved GUI sizing based off of `GUI_SIZE` constant.
3929 - Automatic font size detection.
3930
3931- 2013-08-27
3932 - Initial explorer panel.
3933
3934
3935## Todo
3936
3937- Sorting
3938 - by ExplorerOrder
3939 - by children
3940 - by name
3941- Drag objects to reparent
3942
3943]]
3944
3945local ENTRY_SIZE = GUI_SIZE + ENTRY_PADDING*2
3946local ENTRY_BOUND = ENTRY_SIZE + ENTRY_MARGIN
3947local HEADER_SIZE = ENTRY_SIZE*2
3948
3949local FONT = 'SourceSans'
3950local FONT_SIZE do
3951 local size = {8,9,10,11,12,14,18,24,36,48}
3952 local s
3953 local n = math.huge
3954 for i = 1,#size do
3955 if size[i] <= GUI_SIZE then
3956 FONT_SIZE = i - 1
3957 end
3958 end
3959end
3960
3961local GuiColor = {
3962 Background = Color3.new(233/255, 233/255, 233/255);
3963 Border = Color3.new(149/255, 149/255, 149/255);
3964 Selected = Color3.new( 96/255, 140/255, 211/255);
3965 BorderSelected = Color3.new( 86/255, 125/255, 188/255);
3966 Text = Color3.new( 0/255, 0/255, 0/255);
3967 TextDisabled = Color3.new(128/255, 128/255, 128/255);
3968 TextSelected = Color3.new(255/255, 255/255, 255/255);
3969 Button = Color3.new(221/255, 221/255, 221/255);
3970 ButtonBorder = Color3.new(149/255, 149/255, 149/255);
3971 ButtonSelected = Color3.new(255/255, 0/255, 0/255);
3972 Field = Color3.new(255/255, 255/255, 255/255);
3973 FieldBorder = Color3.new(191/255, 191/255, 191/255);
3974 TitleBackground = Color3.new(178/255, 178/255, 178/255);
3975}
3976
3977----------------------------------------------------------------
3978----------------------------------------------------------------
3979----------------------------------------------------------------
3980----------------------------------------------------------------
3981---- Icon map constants
3982
3983local MAP_ID = 418720155
3984
3985-- Indices based on implementation of Icon function.
3986local ACTION_CUT = 160
3987local ACTION_COPY = 161
3988local ACTION_PASTE = 162
3989local ACTION_DELETE = 163
3990local ACTION_SORT = 164
3991local ACTION_CUT_OVER = 174
3992local ACTION_COPY_OVER = 175
3993local ACTION_PASTE_OVER = 176
3994local ACTION_DELETE_OVER = 177
3995local ACTION_SORT_OVER = 178
3996
3997local NODE_COLLAPSED = 165
3998local NODE_EXPANDED = 166
3999local NODE_COLLAPSED_OVER = 179
4000local NODE_EXPANDED_OVER = 180
4001
4002local ExplorerIndex = {
4003 ["Accessory"] = 32;
4004 ["Accoutrement"] = 32;
4005 ["AdService"] = 73;
4006 ["Animation"] = 60;
4007 ["AnimationController"] = 60;
4008 ["AnimationTrack"] = 60;
4009 ["Animator"] = 60;
4010 ["ArcHandles"] = 56;
4011 ["AssetService"] = 72;
4012 ["Attachment"] = 34;
4013 ["Backpack"] = 20;
4014 ["BadgeService"] = 75;
4015 ["BallSocketConstraint"] = 89;
4016 ["BillboardGui"] = 64;
4017 ["BinaryStringValue"] = 4;
4018 ["BindableEvent"] = 67;
4019 ["BindableFunction"] = 66;
4020 ["BlockMesh"] = 8;
4021 ["BloomEffect"] = 90;
4022 ["BlurEffect"] = 90;
4023 ["BodyAngularVelocity"] = 14;
4024 ["BodyForce"] = 14;
4025 ["BodyGyro"] = 14;
4026 ["BodyPosition"] = 14;
4027 ["BodyThrust"] = 14;
4028 ["BodyVelocity"] = 14;
4029 ["BoolValue"] = 4;
4030 ["BoxHandleAdornment"] = 54;
4031 ["BrickColorValue"] = 4;
4032 ["Camera"] = 5;
4033 ["CFrameValue"] = 4;
4034 ["CharacterMesh"] = 60;
4035 ["Chat"] = 33;
4036 ["ClickDetector"] = 41;
4037 ["CollectionService"] = 30;
4038 ["Color3Value"] = 4;
4039 ["ColorCorrectionEffect"] = 90;
4040 ["ConeHandleAdornment"] = 54;
4041 ["Configuration"] = 58;
4042 ["ContentProvider"] = 72;
4043 ["ContextActionService"] = 41;
4044 ["CoreGui"] = 46;
4045 ["CoreScript"] = 18;
4046 ["CornerWedgePart"] = 1;
4047 ["CustomEvent"] = 4;
4048 ["CustomEventReceiver"] = 4;
4049 ["CylinderHandleAdornment"] = 54;
4050 ["CylinderMesh"] = 8;
4051 ["CylindricalConstraint"] = 89;
4052 ["Debris"] = 30;
4053 ["Decal"] = 7;
4054 ["Dialog"] = 62;
4055 ["DialogChoice"] = 63;
4056 ["DoubleConstrainedValue"] = 4;
4057 ["Explosion"] = 36;
4058 ["FileMesh"] = 8;
4059 ["Fire"] = 61;
4060 ["Flag"] = 38;
4061 ["FlagStand"] = 39;
4062 ["FloorWire"] = 4;
4063 ["Folder"] = 70;
4064 ["ForceField"] = 37;
4065 ["Frame"] = 48;
4066 ["GamePassService"] = 19;
4067 ["Glue"] = 34;
4068 ["GuiButton"] = 52;
4069 ["GuiMain"] = 47;
4070 ["GuiService"] = 47;
4071 ["Handles"] = 53;
4072 ["HapticService"] = 84;
4073 ["Hat"] = 45;
4074 ["HingeConstraint"] = 89;
4075 ["Hint"] = 33;
4076 ["HopperBin"] = 22;
4077 ["HttpService"] = 76;
4078 ["Humanoid"] = 9;
4079 ["ImageButton"] = 52;
4080 ["ImageLabel"] = 49;
4081 ["InsertService"] = 72;
4082 ["IntConstrainedValue"] = 4;
4083 ["IntValue"] = 4;
4084 ["JointInstance"] = 34;
4085 ["JointsService"] = 34;
4086 ["Keyframe"] = 60;
4087 ["KeyframeSequence"] = 60;
4088 ["KeyframeSequenceProvider"] = 60;
4089 ["Lighting"] = 13;
4090 ["LineHandleAdornment"] = 54;
4091 ["LocalScript"] = 18;
4092 ["LogService"] = 87;
4093 ["MarketplaceService"] = 46;
4094 ["Message"] = 33;
4095 ["Model"] = 2;
4096 ["ModuleScript"] = 71;
4097 ["Motor"] = 34;
4098 ["Motor6D"] = 34;
4099 ["MoveToConstraint"] = 89;
4100 ["NegateOperation"] = 78;
4101 ["NetworkClient"] = 16;
4102 ["NetworkReplicator"] = 29;
4103 ["NetworkServer"] = 15;
4104 ["NumberValue"] = 4;
4105 ["ObjectValue"] = 4;
4106 ["Pants"] = 44;
4107 ["ParallelRampPart"] = 1;
4108 ["Part"] = 1;
4109 ["ParticleEmitter"] = 69;
4110 ["PartPairLasso"] = 57;
4111 ["PathfindingService"] = 37;
4112 ["Platform"] = 35;
4113 ["Player"] = 12;
4114 ["PlayerGui"] = 46;
4115 ["Players"] = 21;
4116 ["PlayerScripts"] = 82;
4117 ["PointLight"] = 13;
4118 ["PointsService"] = 83;
4119 ["Pose"] = 60;
4120 ["PrismaticConstraint"] = 89;
4121 ["PrismPart"] = 1;
4122 ["PyramidPart"] = 1;
4123 ["RayValue"] = 4;
4124 ["ReflectionMetadata"] = 86;
4125 ["ReflectionMetadataCallbacks"] = 86;
4126 ["ReflectionMetadataClass"] = 86;
4127 ["ReflectionMetadataClasses"] = 86;
4128 ["ReflectionMetadataEnum"] = 86;
4129 ["ReflectionMetadataEnumItem"] = 86;
4130 ["ReflectionMetadataEnums"] = 86;
4131 ["ReflectionMetadataEvents"] = 86;
4132 ["ReflectionMetadataFunctions"] = 86;
4133 ["ReflectionMetadataMember"] = 86;
4134 ["ReflectionMetadataProperties"] = 86;
4135 ["ReflectionMetadataYieldFunctions"] = 86;
4136 ["RemoteEvent"] = 80;
4137 ["RemoteFunction"] = 79;
4138 ["ReplicatedFirst"] = 72;
4139 ["ReplicatedStorage"] = 72;
4140 ["RightAngleRampPart"] = 1;
4141 ["RocketPropulsion"] = 14;
4142 ["RodConstraint"] = 89;
4143 ["RopeConstraint"] = 89;
4144 ["Rotate"] = 34;
4145 ["RotateP"] = 34;
4146 ["RotateV"] = 34;
4147 ["RunService"] = 66;
4148 ["ScreenGui"] = 47;
4149 ["Script"] = 6;
4150 ["ScrollingFrame"] = 48;
4151 ["Seat"] = 35;
4152 ["Selection"] = 55;
4153 ["SelectionBox"] = 54;
4154 ["SelectionPartLasso"] = 57;
4155 ["SelectionPointLasso"] = 57;
4156 ["SelectionSphere"] = 54;
4157 ["ServerScriptService"] = 0;
4158 ["ServerStorage"] = 74;
4159 ["Shirt"] = 43;
4160 ["ShirtGraphic"] = 40;
4161 ["SkateboardPlatform"] = 35;
4162 ["Sky"] = 28;
4163 ["SlidingBallConstraint"] = 89;
4164 ["Smoke"] = 59;
4165 ["Snap"] = 34;
4166 ["Sound"] = 11;
4167 ["SoundService"] = 31;
4168 ["Sparkles"] = 42;
4169 ["SpawnLocation"] = 25;
4170 ["SpecialMesh"] = 8;
4171 ["SphereHandleAdornment"] = 54;
4172 ["SpotLight"] = 13;
4173 ["SpringConstraint"] = 89;
4174 ["StarterCharacterScripts"] = 82;
4175 ["StarterGear"] = 20;
4176 ["StarterGui"] = 46;
4177 ["StarterPack"] = 20;
4178 ["StarterPlayer"] = 88;
4179 ["StarterPlayerScripts"] = 82;
4180 ["Status"] = 2;
4181 ["StringValue"] = 4;
4182 ["SunRaysEffect"] = 90;
4183 ["SurfaceGui"] = 64;
4184 ["SurfaceLight"] = 13;
4185 ["SurfaceSelection"] = 55;
4186 ["Team"] = 24;
4187 ["Teams"] = 23;
4188 ["TeleportService"] = 81;
4189 ["Terrain"] = 65;
4190 ["TerrainRegion"] = 65;
4191 ["TestService"] = 68;
4192 ["TextBox"] = 51;
4193 ["TextButton"] = 51;
4194 ["TextLabel"] = 50;
4195 ["Texture"] = 10;
4196 ["TextureTrail"] = 4;
4197 ["Tool"] = 17;
4198 ["TouchTransmitter"] = 37;
4199 ["TrussPart"] = 1;
4200 ["UnionOperation"] = 77;
4201 ["UserInputService"] = 84;
4202 ["Vector3Value"] = 4;
4203 ["VehicleSeat"] = 35;
4204 ["VelocityMotor"] = 34;
4205 ["WedgePart"] = 1;
4206 ["Weld"] = 34;
4207 ["Workspace"] = 19;
4208}
4209
4210----------------------------------------------------------------
4211----------------------------------------------------------------
4212----------------------------------------------------------------
4213----------------------------------------------------------------
4214----------------------------------------------------------------
4215
4216function Create(ty,data)
4217 local obj
4218 if type(ty) == 'string' then
4219 obj = Instance.new(ty)
4220 else
4221 obj = ty
4222 end
4223 for k, v in pairs(data) do
4224 if type(k) == 'number' then
4225 v.Parent = obj
4226 else
4227 obj[k] = v
4228 end
4229 end
4230 return obj
4231end
4232
4233local barActive = false
4234local activeOptions = {}
4235
4236function createDDown(dBut, callback,...)
4237 if barActive then
4238 for i,v in pairs(activeOptions) do
4239 v:Destroy()
4240 end
4241 activeOptions = {}
4242 barActive = false
4243 return
4244 else
4245 barActive = true
4246 end
4247 local slots = {...}
4248 local base = dBut
4249 for i,v in pairs(slots) do
4250 local newOption = base:Clone()
4251 newOption.ZIndex = 5
4252 newOption.Name = "Option "..tostring(i)
4253 newOption.Parent = base.Parent.Parent.Parent
4254 newOption.BackgroundTransparency = 0
4255 newOption.ZIndex = 2
4256 table.insert(activeOptions,newOption)
4257 newOption.Position = UDim2.new(-0.4, dBut.Position.X.Offset, dBut.Position.Y.Scale, dBut.Position.Y.Offset + (#activeOptions * dBut.Size.Y.Offset))
4258 newOption.Text = slots[i]
4259 newOption.MouseButton1Down:connect(function()
4260 dBut.Text = slots[i]
4261 callback(slots[i])
4262 for i,v in pairs(activeOptions) do
4263 v:Destroy()
4264 end
4265 activeOptions = {}
4266 barActive = false
4267 end)
4268 end
4269end
4270
4271-- Connects a function to an event such that it fires asynchronously
4272function Connect(event,func)
4273 return event:connect(function(...)
4274 local a = {...}
4275 spawn(function() func(unpack(a)) end)
4276 end)
4277end
4278
4279-- returns the ascendant ScreenGui of an object
4280function GetScreen(screen)
4281 if screen == nil then return nil end
4282 while not screen:IsA("ScreenGui") do
4283 screen = screen.Parent
4284 if screen == nil then return nil end
4285 end
4286 return screen
4287end
4288
4289do
4290 local ZIndexLock = {}
4291 -- Sets the ZIndex of an object and its descendants. Objects are locked so
4292 -- that SetZIndexOnChanged doesn't spawn multiple threads that set the
4293 -- ZIndex of the same object.
4294 function SetZIndex(object,z)
4295 if not ZIndexLock[object] then
4296 ZIndexLock[object] = true
4297 if object:IsA'GuiObject' then
4298 object.ZIndex = z
4299 end
4300 local children = object:GetChildren()
4301 for i = 1,#children do
4302 SetZIndex(children[i],z)
4303 end
4304 ZIndexLock[object] = nil
4305 end
4306 end
4307
4308 function SetZIndexOnChanged(object)
4309 return object.Changed:connect(function(p)
4310 if p == "ZIndex" then
4311 SetZIndex(object,object.ZIndex)
4312 end
4313 end)
4314 end
4315end
4316
4317---- IconMap ----
4318-- Image size: 256px x 256px
4319-- Icon size: 16px x 16px
4320-- Padding between each icon: 2px
4321-- Padding around image edge: 1px
4322-- Total icons: 14 x 14 (196)
4323local Icon do
4324 local iconMap = 'http://www.roblox.com/asset/?id=' .. MAP_ID
4325 game:GetService('ContentProvider'):Preload(iconMap)
4326 local iconDehash do
4327 -- 14 x 14, 0-based input, 0-based output
4328 local f=math.floor
4329 function iconDehash(h)
4330 return f(h/14%14),f(h%14)
4331 end
4332 end
4333
4334 function Icon(IconFrame,index)
4335 local row,col = iconDehash(index)
4336 local mapSize = Vector2.new(256,256)
4337 local pad,border = 2,1
4338 local iconSize = 16
4339
4340 local class = 'Frame'
4341 if type(IconFrame) == 'string' then
4342 class = IconFrame
4343 IconFrame = nil
4344 end
4345
4346 if not IconFrame then
4347 IconFrame = Create(class,{
4348 Name = "Icon";
4349 BackgroundTransparency = 1;
4350 ClipsDescendants = true;
4351 Create('ImageLabel',{
4352 Name = "IconMap";
4353 Active = false;
4354 BackgroundTransparency = 1;
4355 Image = iconMap;
4356 Size = UDim2.new(mapSize.x/iconSize,0,mapSize.y/iconSize,0);
4357 });
4358 })
4359 end
4360
4361 IconFrame.IconMap.Position = UDim2.new(-col - (pad*(col+1) + border)/iconSize,0,-row - (pad*(row+1) + border)/iconSize,0)
4362 return IconFrame
4363 end
4364end
4365
4366----------------------------------------------------------------
4367----------------------------------------------------------------
4368----------------------------------------------------------------
4369----------------------------------------------------------------
4370---- ScrollBar
4371do
4372 -- AutoButtonColor doesn't always reset properly
4373 local function ResetButtonColor(button)
4374 local active = button.Active
4375 button.Active = not active
4376 button.Active = active
4377 end
4378
4379 local function ArrowGraphic(size,dir,scaled,template)
4380 local Frame = Create('Frame',{
4381 Name = "Arrow Graphic";
4382 BorderSizePixel = 0;
4383 Size = UDim2.new(0,size,0,size);
4384 Transparency = 1;
4385 })
4386 if not template then
4387 template = Instance.new("Frame")
4388 template.BorderSizePixel = 0
4389 end
4390
4391 local transform
4392 if dir == nil or dir == 'Up' then
4393 function transform(p,s) return p,s end
4394 elseif dir == 'Down' then
4395 function transform(p,s) return UDim2.new(0,p.X.Offset,0,size-p.Y.Offset-1),s end
4396 elseif dir == 'Left' then
4397 function transform(p,s) return UDim2.new(0,p.Y.Offset,0,p.X.Offset),UDim2.new(0,s.Y.Offset,0,s.X.Offset) end
4398 elseif dir == 'Right' then
4399 function transform(p,s) return UDim2.new(0,size-p.Y.Offset-1,0,p.X.Offset),UDim2.new(0,s.Y.Offset,0,s.X.Offset) end
4400 end
4401
4402 local scale
4403 if scaled then
4404 function scale(p,s) return UDim2.new(p.X.Offset/size,0,p.Y.Offset/size,0),UDim2.new(s.X.Offset/size,0,s.Y.Offset/size,0) end
4405 else
4406 function scale(p,s) return p,s end
4407 end
4408
4409 local o = math.floor(size/4)
4410 if size%2 == 0 then
4411 local n = size/2-1
4412 for i = 0,n do
4413 local t = template:Clone()
4414 local p,s = scale(transform(
4415 UDim2.new(0,n-i,0,o+i),
4416 UDim2.new(0,(i+1)*2,0,1)
4417 ))
4418 t.Position = p
4419 t.Size = s
4420 t.Parent = Frame
4421 end
4422 else
4423 local n = (size-1)/2
4424 for i = 0,n do
4425 local t = template:Clone()
4426 local p,s = scale(transform(
4427 UDim2.new(0,n-i,0,o+i),
4428 UDim2.new(0,i*2+1,0,1)
4429 ))
4430 t.Position = p
4431 t.Size = s
4432 t.Parent = Frame
4433 end
4434 end
4435 if size%4 > 1 then
4436 local t = template:Clone()
4437 local p,s = scale(transform(
4438 UDim2.new(0,0,0,size-o-1),
4439 UDim2.new(0,size,0,1)
4440 ))
4441 t.Position = p
4442 t.Size = s
4443 t.Parent = Frame
4444 end
4445 return Frame
4446 end
4447
4448
4449 local function GripGraphic(size,dir,spacing,scaled,template)
4450 local Frame = Create('Frame',{
4451 Name = "Grip Graphic";
4452 BorderSizePixel = 0;
4453 Size = UDim2.new(0,size.x,0,size.y);
4454 Transparency = 1;
4455 })
4456 if not template then
4457 template = Instance.new("Frame")
4458 template.BorderSizePixel = 0
4459 end
4460
4461 spacing = spacing or 2
4462
4463 local scale
4464 if scaled then
4465 function scale(p) return UDim2.new(p.X.Offset/size.x,0,p.Y.Offset/size.y,0) end
4466 else
4467 function scale(p) return p end
4468 end
4469
4470 if dir == 'Vertical' then
4471 for i=0,size.x-1,spacing do
4472 local t = template:Clone()
4473 t.Size = scale(UDim2.new(0,1,0,size.y))
4474 t.Position = scale(UDim2.new(0,i,0,0))
4475 t.Parent = Frame
4476 end
4477 elseif dir == nil or dir == 'Horizontal' then
4478 for i=0,size.y-1,spacing do
4479 local t = template:Clone()
4480 t.Size = scale(UDim2.new(0,size.x,0,1))
4481 t.Position = scale(UDim2.new(0,0,0,i))
4482 t.Parent = Frame
4483 end
4484 end
4485
4486 return Frame
4487 end
4488
4489 local mt = {
4490 __index = {
4491 GetScrollPercent = function(self)
4492 return self.ScrollIndex/(self.TotalSpace-self.VisibleSpace)
4493 end;
4494 CanScrollDown = function(self)
4495 return self.ScrollIndex + self.VisibleSpace < self.TotalSpace
4496 end;
4497 CanScrollUp = function(self)
4498 return self.ScrollIndex > 0
4499 end;
4500 ScrollDown = function(self)
4501 self.ScrollIndex = self.ScrollIndex + self.PageIncrement
4502 self:Update()
4503 end;
4504 ScrollUp = function(self)
4505 self.ScrollIndex = self.ScrollIndex - self.PageIncrement
4506 self:Update()
4507 end;
4508 ScrollTo = function(self,index)
4509 self.ScrollIndex = index
4510 self:Update()
4511 end;
4512 SetScrollPercent = function(self,percent)
4513 self.ScrollIndex = math.floor((self.TotalSpace - self.VisibleSpace)*percent + 0.5)
4514 self:Update()
4515 end;
4516 };
4517 }
4518 mt.__index.CanScrollRight = mt.__index.CanScrollDown
4519 mt.__index.CanScrollLeft = mt.__index.CanScrollUp
4520 mt.__index.ScrollLeft = mt.__index.ScrollUp
4521 mt.__index.ScrollRight = mt.__index.ScrollDown
4522
4523 function ScrollBar(horizontal)
4524 -- create row scroll bar
4525 local ScrollFrame = Create('Frame',{
4526 Name = "ScrollFrame";
4527 Position = horizontal and UDim2.new(0,0,1,-GUI_SIZE) or UDim2.new(1,-GUI_SIZE,0,0);
4528 Size = horizontal and UDim2.new(1,0,0,GUI_SIZE) or UDim2.new(0,GUI_SIZE,1,0);
4529 BackgroundTransparency = 1;
4530 Create('ImageButton',{
4531 Name = "ScrollDown";
4532 Position = horizontal and UDim2.new(1,-GUI_SIZE,0,0) or UDim2.new(0,0,1,-GUI_SIZE);
4533 Size = UDim2.new(0, GUI_SIZE, 0, GUI_SIZE);
4534 BackgroundColor3 = GuiColor.Button;
4535 BorderColor3 = GuiColor.Border;
4536 --BorderSizePixel = 0;
4537 });
4538 Create('ImageButton',{
4539 Name = "ScrollUp";
4540 Size = UDim2.new(0, GUI_SIZE, 0, GUI_SIZE);
4541 BackgroundColor3 = GuiColor.Button;
4542 BorderColor3 = GuiColor.Border;
4543 --BorderSizePixel = 0;
4544 });
4545 Create('ImageButton',{
4546 Name = "ScrollBar";
4547 Size = horizontal and UDim2.new(1,-GUI_SIZE*2,1,0) or UDim2.new(1,0,1,-GUI_SIZE*2);
4548 Position = horizontal and UDim2.new(0,GUI_SIZE,0,0) or UDim2.new(0,0,0,GUI_SIZE);
4549 AutoButtonColor = false;
4550 BackgroundColor3 = Color3.new(0.94902, 0.94902, 0.94902);
4551 BorderColor3 = GuiColor.Border;
4552 --BorderSizePixel = 0;
4553 Create('ImageButton',{
4554 Name = "ScrollThumb";
4555 AutoButtonColor = false;
4556 Size = UDim2.new(0, GUI_SIZE, 0, GUI_SIZE);
4557 BackgroundColor3 = GuiColor.Button;
4558 BorderColor3 = GuiColor.Border;
4559 --BorderSizePixel = 0;
4560 });
4561 });
4562 })
4563
4564 local graphicTemplate = Create('Frame',{
4565 Name="Graphic";
4566 BorderSizePixel = 0;
4567 BackgroundColor3 = GuiColor.Border;
4568 })
4569 local graphicSize = GUI_SIZE/2
4570
4571 local ScrollDownFrame = ScrollFrame.ScrollDown
4572 local ScrollDownGraphic = ArrowGraphic(graphicSize,horizontal and 'Right' or 'Down',true,graphicTemplate)
4573 ScrollDownGraphic.Position = UDim2.new(0.5,-graphicSize/2,0.5,-graphicSize/2)
4574 ScrollDownGraphic.Parent = ScrollDownFrame
4575 local ScrollUpFrame = ScrollFrame.ScrollUp
4576 local ScrollUpGraphic = ArrowGraphic(graphicSize,horizontal and 'Left' or 'Up',true,graphicTemplate)
4577 ScrollUpGraphic.Position = UDim2.new(0.5,-graphicSize/2,0.5,-graphicSize/2)
4578 ScrollUpGraphic.Parent = ScrollUpFrame
4579 local ScrollBarFrame = ScrollFrame.ScrollBar
4580 local ScrollThumbFrame = ScrollBarFrame.ScrollThumb
4581 do
4582 local size = GUI_SIZE*3/8
4583 local Decal = GripGraphic(Vector2.new(size,size),horizontal and 'Vertical' or 'Horizontal',2,graphicTemplate)
4584 Decal.Position = UDim2.new(0.5,-size/2,0.5,-size/2)
4585 Decal.Parent = ScrollThumbFrame
4586 end
4587
4588 local Class = setmetatable({
4589 GUI = ScrollFrame;
4590 ScrollIndex = 0;
4591 VisibleSpace = 0;
4592 TotalSpace = 0;
4593 PageIncrement = 1;
4594 },mt)
4595
4596 local UpdateScrollThumb
4597 if horizontal then
4598 function UpdateScrollThumb()
4599 ScrollThumbFrame.Size = UDim2.new(Class.VisibleSpace/Class.TotalSpace,0,0,GUI_SIZE)
4600 if ScrollThumbFrame.AbsoluteSize.x < GUI_SIZE then
4601 ScrollThumbFrame.Size = UDim2.new(0,GUI_SIZE,0,GUI_SIZE)
4602 end
4603 local barSize = ScrollBarFrame.AbsoluteSize.x
4604 ScrollThumbFrame.Position = UDim2.new(Class:GetScrollPercent()*(barSize - ScrollThumbFrame.AbsoluteSize.x)/barSize,0,0,0)
4605 end
4606 else
4607 function UpdateScrollThumb()
4608 ScrollThumbFrame.Size = UDim2.new(0,GUI_SIZE,Class.VisibleSpace/Class.TotalSpace,0)
4609 if ScrollThumbFrame.AbsoluteSize.y < GUI_SIZE then
4610 ScrollThumbFrame.Size = UDim2.new(0,GUI_SIZE,0,GUI_SIZE)
4611 end
4612 local barSize = ScrollBarFrame.AbsoluteSize.y
4613 ScrollThumbFrame.Position = UDim2.new(0,0,Class:GetScrollPercent()*(barSize - ScrollThumbFrame.AbsoluteSize.y)/barSize,0)
4614 end
4615 end
4616
4617 local lastDown
4618 local lastUp
4619 local scrollStyle = {BackgroundColor3=GuiColor.Border,BackgroundTransparency=0}
4620 local scrollStyle_ds = {BackgroundColor3=GuiColor.Border,BackgroundTransparency=0.7}
4621
4622 local function Update()
4623 local t = Class.TotalSpace
4624 local v = Class.VisibleSpace
4625 local s = Class.ScrollIndex
4626 if v <= t then
4627 if s > 0 then
4628 if s + v > t then
4629 Class.ScrollIndex = t - v
4630 end
4631 else
4632 Class.ScrollIndex = 0
4633 end
4634 else
4635 Class.ScrollIndex = 0
4636 end
4637
4638 if Class.UpdateCallback then
4639 if Class.UpdateCallback(Class) == false then
4640 return
4641 end
4642 end
4643
4644 local down = Class:CanScrollDown()
4645 local up = Class:CanScrollUp()
4646 if down ~= lastDown then
4647 lastDown = down
4648 ScrollDownFrame.Active = down
4649 ScrollDownFrame.AutoButtonColor = down
4650 local children = ScrollDownGraphic:GetChildren()
4651 local style = down and scrollStyle or scrollStyle_ds
4652 for i = 1,#children do
4653 Create(children[i],style)
4654 end
4655 end
4656 if up ~= lastUp then
4657 lastUp = up
4658 ScrollUpFrame.Active = up
4659 ScrollUpFrame.AutoButtonColor = up
4660 local children = ScrollUpGraphic:GetChildren()
4661 local style = up and scrollStyle or scrollStyle_ds
4662 for i = 1,#children do
4663 Create(children[i],style)
4664 end
4665 end
4666 ScrollThumbFrame.Visible = down or up
4667 UpdateScrollThumb()
4668 end
4669 Class.Update = Update
4670
4671 SetZIndexOnChanged(ScrollFrame)
4672
4673 local MouseDrag = Create('ImageButton',{
4674 Name = "MouseDrag";
4675 Position = UDim2.new(-0.25,0,-0.25,0);
4676 Size = UDim2.new(1.5,0,1.5,0);
4677 Transparency = 1;
4678 AutoButtonColor = false;
4679 Active = true;
4680 ZIndex = 10;
4681 })
4682
4683 local scrollEventID = 0
4684 ScrollDownFrame.MouseButton1Down:connect(function()
4685 scrollEventID = tick()
4686 local current = scrollEventID
4687 local up_con
4688 up_con = MouseDrag.MouseButton1Up:connect(function()
4689 scrollEventID = tick()
4690 MouseDrag.Parent = nil
4691 ResetButtonColor(ScrollDownFrame)
4692 up_con:disconnect(); drag = nil
4693 end)
4694 MouseDrag.Parent = GetScreen(ScrollFrame)
4695 Class:ScrollDown()
4696 wait(0.2) -- delay before auto scroll
4697 while scrollEventID == current do
4698 Class:ScrollDown()
4699 if not Class:CanScrollDown() then break end
4700 wait()
4701 end
4702 end)
4703
4704 ScrollDownFrame.MouseButton1Up:connect(function()
4705 scrollEventID = tick()
4706 end)
4707
4708 ScrollUpFrame.MouseButton1Down:connect(function()
4709 scrollEventID = tick()
4710 local current = scrollEventID
4711 local up_con
4712 up_con = MouseDrag.MouseButton1Up:connect(function()
4713 scrollEventID = tick()
4714 MouseDrag.Parent = nil
4715 ResetButtonColor(ScrollUpFrame)
4716 up_con:disconnect(); drag = nil
4717 end)
4718 MouseDrag.Parent = GetScreen(ScrollFrame)
4719 Class:ScrollUp()
4720 wait(0.2)
4721 while scrollEventID == current do
4722 Class:ScrollUp()
4723 if not Class:CanScrollUp() then break end
4724 wait()
4725 end
4726 end)
4727
4728 ScrollUpFrame.MouseButton1Up:connect(function()
4729 scrollEventID = tick()
4730 end)
4731
4732 if horizontal then
4733 ScrollBarFrame.MouseButton1Down:connect(function(x,y)
4734 scrollEventID = tick()
4735 local current = scrollEventID
4736 local up_con
4737 up_con = MouseDrag.MouseButton1Up:connect(function()
4738 scrollEventID = tick()
4739 MouseDrag.Parent = nil
4740 ResetButtonColor(ScrollUpFrame)
4741 up_con:disconnect(); drag = nil
4742 end)
4743 MouseDrag.Parent = GetScreen(ScrollFrame)
4744 if x > ScrollThumbFrame.AbsolutePosition.x then
4745 Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
4746 wait(0.2)
4747 while scrollEventID == current do
4748 if x < ScrollThumbFrame.AbsolutePosition.x + ScrollThumbFrame.AbsoluteSize.x then break end
4749 Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
4750 wait()
4751 end
4752 else
4753 Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
4754 wait(0.2)
4755 while scrollEventID == current do
4756 if x > ScrollThumbFrame.AbsolutePosition.x then break end
4757 Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
4758 wait()
4759 end
4760 end
4761 end)
4762 else
4763 ScrollBarFrame.MouseButton1Down:connect(function(x,y)
4764 scrollEventID = tick()
4765 local current = scrollEventID
4766 local up_con
4767 up_con = MouseDrag.MouseButton1Up:connect(function()
4768 scrollEventID = tick()
4769 MouseDrag.Parent = nil
4770 ResetButtonColor(ScrollUpFrame)
4771 up_con:disconnect(); drag = nil
4772 end)
4773 MouseDrag.Parent = GetScreen(ScrollFrame)
4774 if y > ScrollThumbFrame.AbsolutePosition.y then
4775 Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
4776 wait(0.2)
4777 while scrollEventID == current do
4778 if y < ScrollThumbFrame.AbsolutePosition.y + ScrollThumbFrame.AbsoluteSize.y then break end
4779 Class:ScrollTo(Class.ScrollIndex + Class.VisibleSpace)
4780 wait()
4781 end
4782 else
4783 Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
4784 wait(0.2)
4785 while scrollEventID == current do
4786 if y > ScrollThumbFrame.AbsolutePosition.y then break end
4787 Class:ScrollTo(Class.ScrollIndex - Class.VisibleSpace)
4788 wait()
4789 end
4790 end
4791 end)
4792 end
4793
4794 if horizontal then
4795 ScrollThumbFrame.MouseButton1Down:connect(function(x,y)
4796 scrollEventID = tick()
4797 local mouse_offset = x - ScrollThumbFrame.AbsolutePosition.x
4798 local drag_con
4799 local up_con
4800 drag_con = MouseDrag.MouseMoved:connect(function(x,y)
4801 local bar_abs_pos = ScrollBarFrame.AbsolutePosition.x
4802 local bar_drag = ScrollBarFrame.AbsoluteSize.x - ScrollThumbFrame.AbsoluteSize.x
4803 local bar_abs_one = bar_abs_pos + bar_drag
4804 x = x - mouse_offset
4805 x = x < bar_abs_pos and bar_abs_pos or x > bar_abs_one and bar_abs_one or x
4806 x = x - bar_abs_pos
4807 Class:SetScrollPercent(x/(bar_drag))
4808 end)
4809 up_con = MouseDrag.MouseButton1Up:connect(function()
4810 scrollEventID = tick()
4811 MouseDrag.Parent = nil
4812 ResetButtonColor(ScrollThumbFrame)
4813 drag_con:disconnect(); drag_con = nil
4814 up_con:disconnect(); drag = nil
4815 end)
4816 MouseDrag.Parent = GetScreen(ScrollFrame)
4817 end)
4818 else
4819 ScrollThumbFrame.MouseButton1Down:connect(function(x,y)
4820 scrollEventID = tick()
4821 local mouse_offset = y - ScrollThumbFrame.AbsolutePosition.y
4822 local drag_con
4823 local up_con
4824 drag_con = MouseDrag.MouseMoved:connect(function(x,y)
4825 local bar_abs_pos = ScrollBarFrame.AbsolutePosition.y
4826 local bar_drag = ScrollBarFrame.AbsoluteSize.y - ScrollThumbFrame.AbsoluteSize.y
4827 local bar_abs_one = bar_abs_pos + bar_drag
4828 y = y - mouse_offset
4829 y = y < bar_abs_pos and bar_abs_pos or y > bar_abs_one and bar_abs_one or y
4830 y = y - bar_abs_pos
4831 Class:SetScrollPercent(y/(bar_drag))
4832 end)
4833 up_con = MouseDrag.MouseButton1Up:connect(function()
4834 scrollEventID = tick()
4835 MouseDrag.Parent = nil
4836 ResetButtonColor(ScrollThumbFrame)
4837 drag_con:disconnect(); drag_con = nil
4838 up_con:disconnect(); drag = nil
4839 end)
4840 MouseDrag.Parent = GetScreen(ScrollFrame)
4841 end)
4842 end
4843
4844 function Class:Destroy()
4845 ScrollFrame:Destroy()
4846 MouseDrag:Destroy()
4847 for k in pairs(Class) do
4848 Class[k] = nil
4849 end
4850 setmetatable(Class,nil)
4851 end
4852
4853 Update()
4854
4855 return Class
4856 end
4857end
4858
4859----------------------------------------------------------------
4860----------------------------------------------------------------
4861----------------------------------------------------------------
4862----------------------------------------------------------------
4863---- Explorer panel
4864
4865local explorerPanel = D_E_X.ExplorerPanel
4866Create(explorerPanel,{
4867 BackgroundColor3 = GuiColor.Field;
4868 BorderColor3 = GuiColor.Border;
4869 Active = true;
4870})
4871
4872local SettingsRemote = explorerPanel.Parent:WaitForChild("SettingsPanel"):WaitForChild("GetSetting")
4873local GetApiRemote = explorerPanel.Parent:WaitForChild("PropertiesFrame"):WaitForChild("GetApi")
4874local GetAwaitRemote = explorerPanel.Parent:WaitForChild("PropertiesFrame"):WaitForChild("GetAwaiting")
4875local bindSetAwaiting = explorerPanel.Parent:WaitForChild("PropertiesFrame"):WaitForChild("SetAwaiting")
4876
4877local SaveInstanceWindow = explorerPanel.Parent:WaitForChild("SaveInstance")
4878local ConfirmationWindow = explorerPanel.Parent:WaitForChild("Confirmation")
4879local CautionWindow = explorerPanel.Parent:WaitForChild("Caution")
4880local TableCautionWindow = explorerPanel.Parent:WaitForChild("TableCaution")
4881
4882local RemoteWindow = explorerPanel.Parent:WaitForChild("CallRemote")
4883
4884local CurrentSaveInstanceWindow
4885local CurrentRemoteWindow
4886
4887local lastSelectedNode
4888
4889local listFrame = Create('Frame',{
4890 Name = "List";
4891 BackgroundTransparency = 1;
4892 ClipsDescendants = true;
4893 Position = UDim2.new(0,0,0,HEADER_SIZE);
4894 Size = UDim2.new(1,-GUI_SIZE,1,-HEADER_SIZE);
4895 Parent = explorerPanel;
4896})
4897
4898local scrollBar = ScrollBar(false)
4899scrollBar.PageIncrement = 1
4900Create(scrollBar.GUI,{
4901 Position = UDim2.new(1,-GUI_SIZE,0,HEADER_SIZE);
4902 Size = UDim2.new(0,GUI_SIZE,1,-HEADER_SIZE);
4903 Parent = explorerPanel;
4904})
4905
4906local scrollBarH = ScrollBar(true)
4907scrollBarH.PageIncrement = GUI_SIZE
4908Create(scrollBarH.GUI,{
4909 Position = UDim2.new(0,0,1,-GUI_SIZE);
4910 Size = UDim2.new(1,-GUI_SIZE,0,GUI_SIZE);
4911 Visible = false;
4912 Parent = explorerPanel;
4913})
4914
4915local headerFrame = Create('Frame',{
4916 Name = "Header";
4917 BackgroundColor3 = GuiColor.Background;
4918 BorderColor3 = GuiColor.Border;
4919 Position = UDim2.new(0,0,0,0);
4920 Size = UDim2.new(1,0,0,HEADER_SIZE);
4921 Parent = explorerPanel;
4922 Create('TextLabel',{
4923 Text = "Explorer";
4924 BackgroundTransparency = 1;
4925 TextColor3 = GuiColor.Text;
4926 TextXAlignment = 'Left';
4927 Font = FONT;
4928 FontSize = FONT_SIZE;
4929 Position = UDim2.new(0,4,0,0);
4930 Size = UDim2.new(1,-4,0.5,0);
4931 });
4932})
4933
4934local explorerFilter = Create('TextBox',{
4935 Text = "Filter Workspace";
4936 BackgroundTransparency = 0.8;
4937 TextColor3 = GuiColor.Text;
4938 TextXAlignment = 'Left';
4939 Font = FONT;
4940 FontSize = FONT_SIZE;
4941 Position = UDim2.new(0,4,0.5,0);
4942 Size = UDim2.new(1,-8,0.5,-2);
4943});
4944explorerFilter.Parent = headerFrame
4945
4946SetZIndexOnChanged(explorerPanel)
4947
4948local function CreateColor3(r, g, b) return Color3.new(r/255,g/255,b/255) end
4949
4950local Styles = {
4951 Font = Enum.Font.Arial;
4952 Margin = 5;
4953 Black = CreateColor3(0,0,0);
4954 White = CreateColor3(255,255,255);
4955}
4956
4957local DropDown = {
4958 Font = Styles.Font;
4959 FontSize = Enum.FontSize.Size14;
4960 TextColor = CreateColor3(0,0,0);
4961 TextColorOver = Styles.White;
4962 TextXAlignment = Enum.TextXAlignment.Left;
4963 Height = 20;
4964 BackColor = Styles.White;
4965 BackColorOver = CreateColor3(86,125,188);
4966 BorderColor = CreateColor3(216,216,216);
4967 BorderSizePixel = 2;
4968 ArrowColor = CreateColor3(160,160,160);
4969 ArrowColorOver = Styles.Black;
4970}
4971
4972local Row = {
4973 Font = Styles.Font;
4974 FontSize = Enum.FontSize.Size14;
4975 TextXAlignment = Enum.TextXAlignment.Left;
4976 TextColor = Styles.Black;
4977 TextColorOver = Styles.White;
4978 TextLockedColor = CreateColor3(120,120,120);
4979 Height = 24;
4980 BorderColor = CreateColor3(216,216,216);
4981 BackgroundColor = Styles.White;
4982 BackgroundColorAlternate = CreateColor3(246,246,246);
4983 BackgroundColorMouseover = CreateColor3(211,224,244);
4984 TitleMarginLeft = 15;
4985}
4986
4987local currentRightClickMenu
4988local CurrentInsertObjectWindow
4989local CurrentFunctionCallerWindow
4990
4991local RbxApi
4992
4993function ClassCanCreate(IName)
4994 local success,err = pcall(function() Instance.new(IName) end)
4995 if err then
4996 return false
4997 else
4998 return true
4999 end
5000end
5001
5002function GetClasses()
5003 if RbxApi == nil then return {} end
5004 local classTable = {}
5005 for i,v in pairs(RbxApi.Classes) do
5006 if ClassCanCreate(v.Name) then
5007 table.insert(classTable,v.Name)
5008 end
5009 end
5010 return classTable
5011end
5012
5013local function sortAlphabetic(t, property)
5014 table.sort(t,
5015 function(x,y) return x[property] < y[property]
5016 end)
5017end
5018
5019local function FunctionIsHidden(functionData)
5020 local tags = functionData["tags"]
5021 for _,name in pairs(tags) do
5022 if name == "deprecated"
5023 or name == "hidden"
5024 or name == "writeonly" then
5025 return true
5026 end
5027 end
5028 return false
5029end
5030
5031local function GetAllFunctions(className)
5032 local class = RbxApi.Classes[className]
5033 local functions = {}
5034
5035 if not class then return functions end
5036
5037 while class do
5038 if class.Name == "Instance" then break end
5039 for _,nextFunction in pairs(class.Functions) do
5040 if not FunctionIsHidden(nextFunction) then
5041 table.insert(functions, nextFunction)
5042 end
5043 end
5044 class = RbxApi.Classes[class.Superclass]
5045 end
5046
5047 sortAlphabetic(functions, "Name")
5048
5049 return functions
5050end
5051
5052function GetFunctions()
5053 if RbxApi == nil then return {} end
5054 local List = SelectionVar():Get()
5055
5056 if #List == 0 then return end
5057
5058 local MyObject = List[1]
5059
5060 local functionTable = {}
5061 for i,v in pairs(GetAllFunctions(MyObject.ClassName)) do
5062 table.insert(functionTable,v)
5063 end
5064 return functionTable
5065end
5066
5067function CreateInsertObjectMenu(choices, currentChoice, readOnly, onClick)
5068 local totalSize = explorerPanel.Parent.AbsoluteSize.y
5069 if #choices == 0 then return end
5070
5071 table.sort(choices, function(a,b) return a < b end)
5072
5073 local frame = Instance.new("Frame")
5074 frame.Name = "InsertObject"
5075 frame.Size = UDim2.new(0, 200, 1, 0)
5076 frame.BackgroundTransparency = 1
5077 frame.Active = true
5078
5079 local menu = nil
5080 local arrow = nil
5081 local expanded = false
5082 local margin = DropDown.BorderSizePixel;
5083
5084 --[[
5085 local button = Instance.new("TextButton")
5086 button.Font = Row.Font
5087 button.FontSize = Row.FontSize
5088 button.TextXAlignment = Row.TextXAlignment
5089 button.BackgroundTransparency = 1
5090 button.TextColor3 = Row.TextColor
5091 if readOnly then
5092 button.TextColor3 = Row.TextLockedColor
5093 end
5094 button.Text = currentChoice
5095 button.Size = UDim2.new(1, -2 * Styles.Margin, 1, 0)
5096 button.Position = UDim2.new(0, Styles.Margin, 0, 0)
5097 button.Parent = frame
5098 --]]
5099
5100 local function hideMenu()
5101 expanded = false
5102 --showArrow(DropDown.ArrowColor)
5103 if frame then
5104 --frame:Destroy()
5105 CurrentInsertObjectWindow.Visible = false
5106 end
5107 end
5108
5109 local function showMenu()
5110 expanded = true
5111 menu = Instance.new("ScrollingFrame")
5112 menu.Size = UDim2.new(0,200,1,0)
5113 menu.CanvasSize = UDim2.new(0, 200, 0, #choices * DropDown.Height)
5114 menu.Position = UDim2.new(0, margin, 0, 0)
5115 menu.BackgroundTransparency = 0
5116 menu.BackgroundColor3 = DropDown.BackColor
5117 menu.BorderColor3 = DropDown.BorderColor
5118 menu.BorderSizePixel = DropDown.BorderSizePixel
5119 menu.TopImage = "rbxasset://textures/blackBkg_square.png"
5120 menu.MidImage = "rbxasset://textures/blackBkg_square.png"
5121 menu.BottomImage = "rbxasset://textures/blackBkg_square.png"
5122 menu.Active = true
5123 menu.ZIndex = 5
5124 menu.Parent = frame
5125
5126 --local parentFrameHeight = script.Parent.List.Size.Y.Offset
5127 --local rowHeight = mouse.Y
5128 --if (rowHeight + menu.Size.Y.Offset) > parentFrameHeight then
5129 -- menu.Position = UDim2.new(0, margin, 0, -1 * (#choices * DropDown.Height) - margin)
5130 --end
5131
5132 local function choice(name)
5133 onClick(name)
5134 hideMenu()
5135 end
5136
5137 for i,name in pairs(choices) do
5138 local option = CreateRightClickMenuItem(name, function()
5139 choice(name)
5140 end,1)
5141 option.Size = UDim2.new(1, 0, 0, 20)
5142 option.Position = UDim2.new(0, 0, 0, (i - 1) * DropDown.Height)
5143 option.ZIndex = menu.ZIndex
5144 option.Parent = menu
5145 end
5146 end
5147
5148
5149 showMenu()
5150
5151
5152 return frame
5153end
5154
5155function CreateFunctionCallerMenu(choices, currentChoice, readOnly, onClick)
5156 local totalSize = explorerPanel.Parent.AbsoluteSize.y
5157 if #choices == 0 then return end
5158
5159 table.sort(choices, function(a,b) return a.Name < b.Name end)
5160
5161 local frame = Instance.new("Frame")
5162 frame.Name = "InsertObject"
5163 frame.Size = UDim2.new(0, 200, 1, 0)
5164 frame.BackgroundTransparency = 1
5165 frame.Active = true
5166
5167 local menu = nil
5168 local arrow = nil
5169 local expanded = false
5170 local margin = DropDown.BorderSizePixel;
5171
5172 local function hideMenu()
5173 expanded = false
5174 --showArrow(DropDown.ArrowColor)
5175 if frame then
5176 --frame:Destroy()
5177 CurrentInsertObjectWindow.Visible = false
5178 end
5179 end
5180
5181 local function showMenu()
5182 expanded = true
5183 menu = Instance.new("ScrollingFrame")
5184 menu.Size = UDim2.new(0,300,1,0)
5185 menu.CanvasSize = UDim2.new(0, 300, 0, #choices * DropDown.Height)
5186 menu.Position = UDim2.new(0, margin, 0, 0)
5187 menu.BackgroundTransparency = 0
5188 menu.BackgroundColor3 = DropDown.BackColor
5189 menu.BorderColor3 = DropDown.BorderColor
5190 menu.BorderSizePixel = DropDown.BorderSizePixel
5191 menu.TopImage = "rbxasset://textures/blackBkg_square.png"
5192 menu.MidImage = "rbxasset://textures/blackBkg_square.png"
5193 menu.BottomImage = "rbxasset://textures/blackBkg_square.png"
5194 menu.Active = true
5195 menu.ZIndex = 5
5196 menu.Parent = frame
5197
5198 --local parentFrameHeight = script.Parent.List.Size.Y.Offset
5199 --local rowHeight = mouse.Y
5200 --if (rowHeight + menu.Size.Y.Offset) > parentFrameHeight then
5201 -- menu.Position = UDim2.new(0, margin, 0, -1 * (#choices * DropDown.Height) - margin)
5202 --end
5203
5204 local function GetParameters(functionData)
5205 local paraString = ""
5206 paraString = paraString.."("
5207 for i,v in pairs(functionData.Arguments) do
5208 paraString = paraString..v.Type.." "..v.Name
5209 if i <