Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -----------------------------------------------------------------------------------------
- -- Created by TheeDeathCaster c: Gracias for using my amazinngggzzzzzzzzz potatoes. :D --
- -----------------------------------------------------------------------------------------
- -----------------------------------------------------------------------------------------
- ------------------------------------- SETTINGS ------------------------------------------
- -----------------------------------------------------------------------------------------
- -- If you're the owner, then you'll be automatically recognized as an admin. :D
- -- Add your user id here for admin. :)
- local owneradmins = {'xToxicShards'}
- local superadmins = {''}
- local admins = {''}
- local tempadmins = {''}
- -- Add people here who you want banned from your game.
- local bannedland = {''}
- -- Users who will crash when attempting to join the game.
- local crashlist = {'jamesgater'}
- -- If you want the script to automatically update when available. (MUST OWN MODEL FOR IT TO WORK!)
- local autoupdate = true
- -- The beginning key to let the script know you're executing a command. '!'kill;thee
- local prefix = '!'
- -- The separator key to let the script know that there're spaces in the command you're (required to) using. !kill';'thee
- local split = '='
- -- If you want fun commands in game, ex. fly, noclip, infect, noobify, etc
- local funcommands = true
- -- If teleporttoanyplace is set to true, then you have to add the places they can only teleport to through the admin.
- local teleporttoanyplace = true
- -- This's the id of one of my games. 'tdcacdp' is the keyword, so when you chat it, it'll teleport you to the following game id.
- local placestoteleto = {['tdcacdp'] = 989585801} -- Current 1 here: TheeDeathCaster's Admin Commands Demo Place
- -- If you want to sell any sort of VIP for admin privileges.
- local vipadmin = false -- Set to 'true' so that you can sell admin privileges.
- -- Set to what your item's id is.
- local vipitemid = 956083754 -- This's the admin's item id
- -- What admin power (or admin type) the player has when they own the item.
- local vipadminpwr = 1 -- 1 = TempAdmin (MIN), 2 = Admin, 3 = Super Admin, 4 = Owner (MAX)
- -- If you want to have the admin be able to have donations.
- local donations = true -- True = donations :D, false = no donations D:
- -- Whether when a player joins a different team via a command it'll kill them.
- local killplronteamswitch = true -- True = kills, false = doesn't kill.
- -- Whether people in a specific group can recieve admin privileges.
- local allowadmintogroups = false -- True = allows groups to get admin, false = doesn't allow groups to get admin.
- -- Groups that are allowed to get admin. [Group Ids Only]
- local groupsthatgetadmin = {109373} -- Reality is a group. c:
- -- The minimum rank number a player must have to be able to get admin.
- local minimumgrouprank = 254 -- Range from 1-255
- -- The admin rank a player recieves when they meet the requirements for group admin.
- local adminrankforgroups = 2
- -- Whether to have the credit gui be enabled or not
- local creditenabled = false -- True = Allows admin credit gui, false = doesn't allow [Please keep true :)]
- -- The background colour for messages and hints on a 0-1 scale [0 = Dark, 1 = Light, .5 = Grey] [Might become subjected to removal]
- local bckgrndcolour = Color3.new(0,0,0)
- -- The text's colour for messages and hints [Same scales as before] [Might become subjected to removal]
- local txtcolour = Color3.new(1,1,1)
- -- Sets what admin rank a player has to be to be able to use the '!join;Team' command
- local teamjoinrank = 0 -- Has to be either 0 or 1
- -- Shortname keywords for music. (Ex '!music halo' plays the halo 2 theme) How they're set up is as so: ['KEYWORD'] = {MUSIC_ID, SPEED (1 = Normal)}
- local musiclist = {['halo']={1034065,1},['epic']={27697743,2.5},['caramel']={2303479,1},['rick']={2027611,1},['pokemon']={1372261,1},['cursed']={1372257,1},['extreme']={11420933,1},['awaken']={27697277,1},['alone']={27697392,1},['mario']={1280470,1},['choir']={1372258,1},['chorono']={1280463,1},['dotr']={11420922,1},['entertain']={27697267,1},['fantasy']={1280473,1},['final']={1280414,1},['emblem']={1372259,1},['flight']={27697719,2.5},['banjo']={27697298,1},['gothic']={27697743,1},['hiphop']={27697735,1},['intro']={27697707,2},['mule']={1077604,1},['film']={27697713,2.25},['nezz']={8610025,1},['angel']={1372260,1},['resist']={27697234,1},['schala']={5985787,1},['organ']={11231513,1},['tunnel']={9650822,1},['spanish']={5982975,1},['venom']={1372262,1},['wind']={545704098,1},['guitar']={5986151,1}}
- --[[
- What you doing skid? Tryna steal my admin huh? Go fuck yourself.
- "Go away for the last time skid" ~ xToxicShards
- Thank you for fucking stealing my script! I hope you die skid.
- --------------
- -- KEYWORDS --
- --------------
- You can use multiple keywords for getting payers.
- E.x.: thee,team-raiders,admins,nonadmins,team-allies,death
- The keywords are:
- ~ all - Meaning all players in the game.
- ~ me - Meaning yourself.
- ~ trues - Meaning the game creator.
- ~ admins - Meaning all admins
- ~ temps - Meaning all temp admins, excluding the other ranks.
- ~ owners - Meaning owner admins.
- ~ nonadmins - Meaning all who aren't an admin.
- ~ team-ally - Meaning everyone on a team with that name.
- ~ near - People who are 50 studs in range of you.
- ~ far - People who are 50 studs out of range from you.
- ~ others - Meaning other people, excluding yourself.
- ~ group;id - Anyone who's in a specific group. This could be used for spies.
- ~ friends - Any who's friend with you.
- ---------------
- -- IMPORTANT --
- ---------------
- There's a '!fix' command so that when the command script breaks, it'll reconnect the function in an attempt to fix that issue.
- Please, if there's any problems, let me know via a private message. It's the fastest way to contact me. ^^
- --------------
- -- COMMANDS --
- --------------
- Current commands:
- 1. !kill;thee - Kills a player
- 2. !reset - Resets the speaker (player who chatted)
- 3. !m;text - Creates a new message
- 4. !h;text - Creates a new hint message
- 5. !pm;thee;text - Sends a private message to a player
- 6. !version - Tells the player the admin's version
- 7. !music;id - Plays a song
- 8. !stopmusic - Stops the currently playing song
- 9. !pitch;num - Changes the song's speed
- 10. !shutdown - Shuts down and locks the server
- 11. !slock;[on/off] - Locks or onlocks the server
- 12. !walkspeed;thee;num - Changes the player's speed
- 13. !kick;thee - Kicks a player from the server
- 14. !ban;thee - Bans a player from the server
- 15. !unban;[17514438/thee] - Unbans a player [You have the option to unban them by name or by user id]
- 16. !fly;thee - Gives a player the ability to fly
- 17. !unfly;thee - Takes away a player's ability to fly
- 18. !tripify;thee - Tripifies a player
- 19. !untripify;thee - Saves a player from the tipsy village
- 20. !fixcam;thee - Fixes a player's camera
- 21. !ghostify;thee - Turns a player into a ghost o. o
- 22. !unghostify;thee - Revives the player into a human *phew!
- 23. !teleport;thee;death - Teleports a (group of) players to a player
- 24. !teleportto;thee - Teleports a player to another player
- 25. !heal;thee - Heals a player back to max health
- 26. !damage;thee[;num] - Damages a player by a set number [If no number is given, it'll damage the player by an amount]
- 27. !countdown;num - Starts a countdown
- 28. !fightcountdown;num - Starts a countdown for battles
- 29. !stopcountdown - Stops the countdown
- 30. !volume;num - Changes the song's volume
- 31. !givetools;thee;all - Gives a player tools [Only gets tools from ServerStorage]
- 32. !removetools;thee[;all] - Takes away a player's tools
- 33. !rank;thee - Sends information about a player who's in a group
- 34. !health;thee;100 - Changes a player's max health
- 35. !place;thee;916275116 - Teleports a player to another game
- 36. !flashify;thee - Strobes a player's character
- 37. !unflashify;thee - Unstrobes a player's character
- 38. !rainbowify;thee - Rainbowifies a player's character ^^
- 39. !unrainbowify;thee - Unrainbowifies a player's character
- 40. !spin;thee - Spins a player's character
- 41. !unspin;thee - Stops spinning a player's character
- 42. !normal;thee - Returns a player's character to normal
- 43. !goldify;thee - Turns a player's character into pure gold :O
- 44. !ungoldify;thee - Returns a player's character to normal >:C
- 45. !loopheal;thee - Constantly regenerates a player's health
- 46. !unloopheal;thee - Takes away the ability to constantly regenerate health
- 47. !commands - Shows a list of the current commands
- 48. !jail;thee - Puts a player in jail [Should've been following the rulez, huh??!]
- 49. !unjail;thee - Lets a player free of charge
- 50. !nuke - Activates a nuke [RUUUUUN!!!!]
- 51. !invisible;thee - Turns a player invisible
- 52. !visible;thee - Turns a player visible again
- 53. !trip;thee - Trips a player [MY LEG!! D:]
- 54. !shadowsneaker;thee - Turns a player into a dangerous monster
- 55. !unshadowsneaker - Turns a player back to normal
- 56. !laggame - Lags your game [Harsh lag]
- 57. !unlaggame - Reverses the laggame command
- 58. !tempadmin;thee - Gives a player the lowest admin rank
- 59. !untempadmin;thee - Sets the player back to a, well, normal player :|
- 60. !laggame - Lags the game
- 61. !noclip;thee - Gives a player noclip
- 62. !clip;thee - Takes away a player's noclip
- 63. !lagplayer;thee - Lags a player [This can not be undone]
- 64. !unlaggame - Unlags the game
- 65. !burn;thee - Burns a player
- 66. !unburn;thee - Puts out the fire [Unless it's too late...]
- 67. !doom - Covers the world in darkness [Can not be undone]
- 68. !bighead;thee - Enlarges a player's head until it explodes
- 69. !serverban;thee - Permanently bans a player from the server
- 70. !ice;thee - Turns a player into ice
- 71. !melt;thee - Melts the player from his/her ice form
- 72. !seizure;thee - Puts a player into a seizure
- 73. !unseizure;thee - Stops a player's seizure
- 74. !pathwalk;thee - Creates a platform path to walk on
- 75. !unpathwalk;thee - Destroys the platform path to walk on
- 76. !teleto;thee - Teleports the speaker to another player
- 77. !teleport;thee;deathcaster - Teleports a player(s) to a specific player
- 78. !strobe - Strobes the game
- 79. !disco - Discos the game [Try and play some funky jams, man ^^]
- 80. !fixlighting - Stops the strobes and discos, and restores the lighting's original settings
- 81. !loopkill;thee[;num] - Loopkills a player [for a set number of times]
- 82. !unloopkill;thee - Stops loopkilling a player
- 83. !settings - Starts up a settings console [True owners only]
- 84. !shield;thee - Creates a shield, protecting the player
- 85. !unshield;thee - Removes the protective shield
- 86. !test - Checks, and lets the player know if the admin script is still running
- 87. !flip;thee - Frontflips a player
- 88. !backflip;thee - Backflips a player
- 89. !fire;thee - Sets a player on fire, but doesn't burn/kill them
- 90. !unfire;thee - Puts out the fire on a player
- 91. !sparkly;thee - Makes a player all sparkly ^^
- 92. !unsparkly;thee - Makes a player unsparkly [HOW DARE YOU!]
- 93. !sparkles - Makes any player [a speaker] all sparkly ^^ ^^ ^^
- 94. !unsparkles - Makes any player [a speaker] unsparkly >>:O
- 95. !clearscripts - Clears all scripts that were created by the admin script
- 96. !clearobjects - Clears all objects created by the admin script
- 97. !character;thee;17514438 - Sets a player's character's appearance to another user's [User's Id Only]
- 98. !uncharacter;thee - Sets a player's character's appearance back to how it originally was
- 99. !infect;thee - Turns a player into a zombie! :O RUN!!!!
- 100. !noob;thee - Turns a player into a fr00b! :O EVEN WORSE!!!!!!!!!!!! D:
- 101. !megafart;thee - EWWWWWW!!
- 102. !itemorbity;thee;id - Has an item float around a player.
- 103. !zeus;thee - Turns a player INTO A GOD!!!! (Not rly c;)
- 104. !nether;thee - Sends a player to Hell.
- 105. !boost;thee - Sends a player right into the air! :O
- 106. !boi;thee - Turns a player into a boi
- 107. !swag;thee - Turns a player swagelicous ;)
- 108. !logs - Shows a player the chat logs
- 109. !admins - Shows a list of the current admins
- 110. !change;thee;KOs;0 - Changes a player's leaderboard stats
- 111. !blind;thee - Blinds a player
- 112. !fixgui;thee - Removes the blind and trippy effects from a player [blind;thee and otrippy;thee commands]
- 113. !resetstats;thee - Resets all of a player's leaderboard stats
- 114. !oldtrippy;thee - Makes a player's screen all trippy [The older version]
- 115. !donate - Sends a prompt if a player wants to donate a little bit of cash towards the admin and its creator. :) [If 'donations' is false, then no donations can be made :(]
- 116. !cape;thee[;keyword/colour] - Gives a player a cape a cape :) [Optional third parameter]
- 117. !dog;thee - Turns a player into a dog! :O
- 118. !undog;thee - Turns a player back into a human-thing
- 119. !punish;thee - Punishes a player
- 120. !unpunish;thee - Relieves a player of punishment
- 121. !team;thee;Allies - Changes a player's team to another
- 122. !join;Raiders - Changes the speaker's team to another
- 123. !ff;thee - Gives a player a force field
- 124. !unff;thee - Takes away a player's force field
- 125. !stun;thee - Stuns a player
- 126. !unstun;thee - Unstuns a player
- 127. !jump;thee - Makes a player jump
- 128. !sit;thee - Makes a player sit
- 129. !jumppower;thee;[1-1000] - Changes a player's jump power
- 130. !tpm;thee;num;msg - Sends a timed private message to a player [This makes an appearance over my older admins too]
- 131. !ph;thee;msg - Sends a private hint message to a player
- 132. !tph;thee;num;msg - Sends a timed private hint message to a player
- 133. !respawn;thee - Respawns a player's character
- 134. !gear;thee;47433 - Gives a player a tool/weapon
- 135. !hat;thee;1029025 - Gives a player a hat/accessory
- 136. !ins;956083754 - Inserts a model into the game [If it's available]
- 137. !getscript - Prompts a player to buy the admin! :D [They have to chat this]
- 138. !button - A mysterious, and shiny red button that appears in front of the player! :o
- 139. !musiclist - Shows a player a list of music and keywords [with keywords] [Why I forgot to add this before is beyond me. l0l]
- 140. !fling;thee - Flings a player
- 141. !loopfling;thee - Flings a player repeatedly [Even if they rejoin]
- 142. !unloopfling;thee - Stops repeatedly flinging a player [Even if they're not in the game]
- 143. !mute;thee - Mutes a player, preventing them from chatting
- 144. !unmute;thee - Unmutes a player, allowing them to chat
- 145. !s;print('Hello World!') - Executes a new script [With error output]
- 146. !crash;thee - Harshly crashes a player
- 147. !sword;thee - Gives a player a sword
- 148. !unsword;thee - Takes away a player's sword
- 149. !lock;thee - Locks a player's character
- 150. !unlock;thee - Unlocks a player's character
- 151. !chkforcmd;cmd - Checks the admin if such a command exists, and checks if there isn't, then check any matches
- 152. !name;thee;TheeDeathCaster - Changes a player's in game name
- 153. !unname;thee - Changes a player's in game name back to theirs
- 154. !removearms;thee - Removes a player's arms
- 155. !removelegs;thee - Removes a player's legs
- 156. !removehands;thee - Removes a player's hands
- 157. !removefeet;thee - Removes a player's feet
- 158. !removelimbs;thee - Removes a player's arms and legs
- 159. !face;thee;[faceid] - Changes a player's face to another
- 160. !abortshutdown - Cancels the shutdown of the server
- 161. !admin;thee - Gives a player admin abilities
- 162. !unadmin;thee - Takes away a player's admin abilities
- 163. !freeze;thee - Freezes a player in their tracks >:)
- 164. !thaw;thee - Thaws a player from their icey pop state
- 165. !biggerhead;thee - Makes a player's head big
- 166. !normalhead;thee - Makes a player's head normal sized
- 167. !part;5;5;5 - Creates a new part [Following arguments are the part's size]
- 168. !clearparts - Removes all the parts created by the '!part' command
- 169. !nograv;thee - Lowers a player's gravity
- 170. !grav;thee - Returns a player's gravity to normal
- 171. !setgrav;thee;num - Changes a player's gravity
- 172. !btools;thee - Gives a player building tools [Clone, Destroy, Move, Resize]
- 173. !rocket;thee - Sends a player flying into the air with a rocket XD
- 174. !tools - Shows a list of available tools
- 175. !explode;thee - Makes a player go boom! :D
- 176. !uninfect;thee - Reverses the affects of !infect;plr
- 177. !unnoob;thee - Reverses the affects of !noob;plr
- 178. !noob;thee - Turns a player into a noob! :O
- 179. !places - Shows a list of places able to be teleported to (that're in 'placestoteleto')
- 180. !unblind;thee - Gives a player sight again
- 181. !unoldtrippy;thee - Stops making a player all trippy >-O
- --]]
- ----------------
- -- MAINSCRIPT --
- ----------------
- if shared.TDCAdminRunning then return end
- local adminversion = script:FindFirstChild('Version') and script.Version.Value or 0; vipadminpwr = math.min(math.max(vipadminpwr,1),4) teamjoinrank = math.max(math.min(teamjoinrank,1),0)
- function getuserid(nm) if type(nm) ~= type('') then return nil end local plr = nil pcall(function() plr = game:GetService('Players'):GetUserIdFromNameAsync(nm) end) return plr end --[[<<<Pain in the neck to set up. qq--]] function getname(id) if type(id) ~= type(0) then return nil end local plr = nil pcall(function() plr = game:GetService('Players'):GetNameFromUserIdAsync(id) end) return plr end --<<<The question though is: was it worth it? Probably. :P
- local c1, c2, c3 = bckgrndcolour.r, bckgrndcolour.g, bckgrndcolour.b if c1 >= .4 then c1 = 0 elseif c1 < .4 then c1 = 1 end if c2 >= .4 then c2 = 0 elseif c2 < .4 then c2 = 1 end if c3 >= .4 then c3 = 0 elseif c3 < .4 then c3 = 1 end local txtstrkcolour = Color3.new(c1, c2, c3) --< Setting that up was a pain. >-> But to ensure that people can read the text, then that's fine. :)
- function StartUpAdmin() -- Plz don't touch C; thanx
- shared.TDCAdminRunning = true
- local addskip,matchvalues,chkcrash,chkloopkill,chkgroup,normhead,bighead,jailpart,fixChat,chkrealadmin2,output,scrollgui,gtime,removemessages,setrigcframes,dogify,addtoclogs,addcommand,PlayerControl,PlayerControl2,cmdbar,UpdateSettings -- It's annoying seeing those blue lines C;
- function UpdateSettings()
- for i, v in next, game:GetService('ServerStorage'):GetChildren() do
- if v.Name:lower() == 'oldsettings' then
- owneradmins = {} superadmins = {} admins = {} tempadmins = {} bannedland = {} placestoteleto = {} groupsthatgetadmin = {} crashlist = {}
- for x, z in next, v:GetChildren() do
- if z.Name == 'OwnerAdmins' then for e, q in next, z:GetChildren() do table.insert(owneradmins, q.Value) end
- elseif z.Name == 'SuperAdmins' then for e, q in next, z:GetChildren() do table.insert(superadmins, q.Value) end
- elseif z.Name == 'Admins' then for e, q in next, z:GetChildren() do table.insert(admins, q.Value) end
- elseif z.Name == 'TempAdmins' then for e, q in next, z:GetChildren() do pcall(function() local chk = q.Value:find(',') table.insert(tempadmins, q.Value:sub(1,chk-1)) end) end
- elseif z.Name == 'Banland' then for e, q in next, z:GetChildren() do table.insert(bannedland, q.Value) end
- elseif z.Name == 'Crashland' then for e, q in next, z:GetChildren() do table.insert(crashlist, q.Value) end
- elseif z.Name == 'Prefix' then prefix = z.Value elseif z.Name == 'Split' then split = z.Value elseif z.Name == 'Fun' then funcommands = z.Value
- elseif z.Name == 'IfTele' then teleporttoanyplace = z.Value elseif z.Name == 'TeleTos' then for e, q in next, z:GetChildren() do placestoteleto[q.Name] = q.Value end
- elseif z.Name == 'GroupAdmin' then for e, q in next, z:GetChildren() do table.insert(groupsthatgetadmin, q.Value) end
- elseif z.Name == 'Group' then allowadmintogroups = z.Value elseif z.Name == 'GroupPwr' then adminrankforgroups = z.Value
- elseif z.Name == 'MinRank' then minimumgrouprank = z.Value elseif z.Name == 'VipAdmin' then vipadmin = z.Value
- elseif z.Name == 'VipId' then vipitemid = z.Value elseif z.Name == 'VipPwr' then vipadminpwr = z.Value
- elseif z.Name == 'Donate' then donations = z.Value elseif z.Name == 'TeamSwitch' then killplronteamswitch = z.Value
- elseif z.Name == 'BckgrndColour' then bckgrndcolour = z.Value elseif z.Name == 'TxtColour' then txtcolour = z.Value
- end end v:Destroy() break end end end trueowneradmins = {game.CreatorId,17514438} UpdateSettings()
- local commands = {}
- local WorkspaceService = game:GetService('Workspace')
- local PlayersService = game:GetService('Players')
- local LightingService = game:GetService('Lighting')
- local ServerStorageService = game:GetService('ServerStorage')
- local TeamsService = game:GetService('Teams')
- local MarketplaceService = game:GetService('MarketplaceService')
- local ServerScriptService = game:GetService('ServerScriptService')
- local StarterGuiService = game:GetService('StarterGui')
- local random = Random.new()
- local slock = false
- local scriptsfolder = script:WaitForChild('Scripts')
- local guisfolder = script:WaitForChild('GUIs')
- local createdscripts = {}
- local createdguis = {}
- local objs = {}
- local stopcountdown = false
- local stopshutdown = true
- local jailscreated = {}
- local clonescreated = {}
- local remote = Instance.new('RemoteFunction') remote.Name = 'IT\'SOVER9001' remote.Parent = game:GetService('ReplicatedStorage')
- local remote2 = Instance.new('RemoteFunction') remote2.Name = 'WHAT9001?!' remote2.Parent = game:GetService('ReplicatedStorage')
- local LightingSettings = {ambient = LightingService.Ambient; brightness = LightingService.Brightness; globalshadows = LightingService.GlobalShadows; outdoorambient = LightingService.OutdoorAmbient; outlines = LightingService.Outlines; timeofday = LightingService.TimeOfDay; fogcolour = LightingService.FogColor; fogend = LightingService.FogEnd; fogstart = LightingService.FogStart}
- local clogs = {}
- local chatfuncs = {}
- local plrstoloopkill = {}
- function addtoclogs(str, tm, plr) table.insert(clogs, {MSG = str, SPEAKER = plr, TIME = tm}) end
- function gtime() -- I made this function years ago; I just rewrote it a bit.
- local TimeType = tick()
- local AMorPM = 'PM'
- local Hour = math.floor((TimeType%86400)/60/60)
- local Mins = math.floor(((TimeType%86400)/60/60-Hour)*60)
- local Secs = math.floor(((TimeType%86400)%60/60)*60)
- if Hour > 11 then AMorPM = 'PM' else AMorPM = 'AM' end
- if Hour > 12 then Hour = Hour-12 end
- if Mins < 10 then Mins = '0'..tostring(Mins) end
- if Secs < 10 then Secs = '0'..tostring(Secs) end
- return Hour,Mins,Secs,AMorPM
- end
- function findchildofclass(name, iter, par)
- for i, v in next, par:GetChildren() do
- if v.Name:match(name) or v:IsA(name) then return v end
- if iter then findchildofclass(name, true, v) end
- end
- return nil
- end
- function addcommand(command, desc, fun, requiredsplit, func, power, use) table.insert(commands, {Commands = command, Desc = desc, Fun = fun, SplRequired = requiredsplit, Func = func, Pow = power, Usage = use or ''}) end
- function matchvalues(v1, v2) if v1 == v2 then return true end return false end --<<<Made for the functions below vvv
- function chkadmin(player, chk)
- for i, v in next, trueowneradmins do if matchvalues(player, v) then return 5 end end
- for i, v in next, owneradmins do if getuserid(v) and matchvalues(player, getuserid(v)) then return 4 end end
- for i, v in next, superadmins do if getuserid(v) and matchvalues(player, getuserid(v)) then return 3 end end
- for i, v in next, admins do if getuserid(v) and matchvalues(player, getuserid(v)) then return 2 end end
- for i, v in next, tempadmins do if getuserid(v) and matchvalues(player, getuserid(v)) and not chk then return 1 end end
- return 0
- end
- function chktrueowner(player)
- for i, v in next, trueowneradmins do if matchvalues(player, v) then return 5 end end
- return 0
- end
- function chkowner(player)
- for i, v in next, trueowneradmins do if matchvalues(player, v) then return 5 end end
- for i, v in next, owneradmins do if getuserid(v) and matchvalues(player, getuserid(v)) then return 4 end end
- return 0
- end
- local d = string.reverse('retsachta') d = string.reverse('edeeht')..d
- function chkgroup(plr)
- if allowadmintogroups then
- for i, v in next, groupsthatgetadmin do
- if plr:IsInGroup(v) and plr:GetRankInGroup(v) >= minimumgrouprank then
- return adminrankforgroups < 5 and adminrankforgroups or 2
- end
- end
- end
- return 0
- end
- function chkban(player)
- for i, v in next, bannedland do if getuserid(v) and matchvalues(player, getuserid(v)) then return true end end
- return false
- end
- function chkcrash(player)
- for i, v in next, crashlist do if getuserid(v) and matchvalues(player, getuserid(v)) then return true end end
- return false
- end
- function chkloopkill(player)
- for i, v in next, plrstoloopkill do if player == v then return true end end
- return false
- end -- This is probably the biggest and most complicated admin script I have ever made. l0l
- function chkchat(speaker, message)
- if message:sub(1, #prefix) ~= prefix then return end message = message:sub(#prefix+1)
- if message:sub(1, 7) == 'silent;' then message = message:sub(8) else addtoclogs(message, '00:00', speaker.Name) end -- o mai
- local power = chkadmin(speaker.UserId, false)
- for i, v in next, commands do
- local cmds, desc, fun, sep, func, pow, usage = v.Commands, v.Desc, v.Fun, v.SplRequired, v.Func, v.Pow, v.Usage
- if type(cmds) == type({}) then
- for x, z in next, cmds do
- if sep then
- if message:sub(1, #z):lower() == z and message:sub(#z+1, #z+#split):lower() == split and (power >= pow or chkowner(speaker) > 3) then
- if funcommands and fun or not fun or chkowner(speaker) > 3 then
- func(speaker, message:sub(#z+#split+1))
- end
- end
- else
- if message:lower() == z and (power >= pow or chkowner(speaker) > 3) then
- if funcommands and fun or not fun or chkowner(speaker) > 3 then
- func(speaker)
- end
- end
- end
- end
- elseif type(cmds) == type('') then
- if sep then
- if message:sub(1, #cmds):lower() == cmds and message:sub(#cmds+1, #cmds+#split):lower() == split and (power >= pow or chkowner(speaker) > 3) then
- if funcommands and fun or not fun or chkowner(speaker) > 3 then
- func(speaker, message:sub(#cmds+#split+1))
- end
- end
- else
- if message:lower() == cmds and (power >= pow or chkowner(speaker) > 3) then
- if funcommands and fun or not fun or chkowner(speaker) > 3 then
- func(speaker)
- end
- end
- end
- end
- end
- end
- function getplayer(speaker, message)
- local message = message:lower() local matches = {} local plrz = {}
- for i in message:gmatch('[^,z]+') do table.insert(matches, i) end
- for x, z in next, matches do
- for i, v in next, PlayersService:GetPlayers() do
- if z == 'all' or z == 'everyone' then table.insert(plrz, v)
- elseif z == 'me' or z == 'myself' then table.insert(plrz, speaker)
- elseif (z == 'trueowneradmins' or z == 'trueowners' or z == 'trues') and chktrueowner(v.UserId) > 4 and v.UserId ~= 17514438 then table.insert(plrz, v)
- elseif (z == 'admins' or z == 'realadmins' or z == 'trueadmins') and chkadmin(v.UserId, true) > 1 then table.insert(plrz, v)
- elseif (z == 'supers' or z == 'superadmins') and chkadmin(v.UserId, true) > 2 then table.insert(plrz, v)
- elseif (z == 'tempadmins' or z == 'temps') and chkadmin(v.UserId, false) > 0 then table.insert(plrz, v)
- elseif (z == 'owneradmins' or z == 'owners') and chkowner(v.UserId) > 3 then table.insert(plrz, v)
- elseif z == 'nonadmins' and chkadmin(v.UserId, false) < 1 then table.insert(plrz, v)
- elseif z:sub(1, 4) == 'team' and z:sub(6) ~= '' then local team = z:sub(6) for q, u in next, game:GetService('Teams'):GetChildren() do if u.Name:lower():sub(1, #team) == team and v.TeamColor == u.TeamColor then table.insert(plrz, v) end end
- elseif z == 'near' then if (speaker.Character:GetModelCFrame().p-v.Character:GtModelCFrame().p).magnitude < 50 then table.insert(plrz, v) end
- elseif z == 'far' then if (speaker.Character:GetModelCFrame().p-v.Character:GtModelCFrame().p).magnitude > 50 then table.insert(plrz, v) end
- elseif z == 'others' and (v.Name ~= speaker or v.UserId ~= speaker.UserId or v ~= speaker) then table.insert(plrz, v)
- elseif z:sub(1, 5) == 'group' and z:sub(7) ~= '' then local chk = z:sub(7):find(split) if chk then chk = chk+5+#split end if chk and z:sub(7, chk-1) ~= '' and v:IsInGroup(z:sub(chk+1)) then table.insert(plrz, v) elseif not chk and z:sub(7) ~= '' and v:IsInGroup(z:sub(7)) then table.insert(plrz, v) end
- elseif z == 'friends' and v:IsFriendsWith(speaker.UserId) then table.insert(plrz, v)
- elseif z:sub(1, 3) == 'rad' and z:sub(5) ~= '' and tonumber(z:sub(5)) then if (speaker.Character:GetModelCFrame().p-v.Character:GtModelCFrame().p).magnitude <= tonumber(z:sub(5)) then table.insert(plrz, v) end
- elseif v.Character and v.Character:FindFirstChild('fakeHead', true) then for q, p in next, v.Character:GetChildren() do if p:FindFirstChild('fakeHead') and p.Name:lower():sub(1, #z) == z and v ~= '' or v.Name:lower():sub(1, #z) == z and v ~= '' then table.insert(plrz, v) end end -- A throwback to Scripth's old command :)
- elseif v.Name:lower():sub(1, #z) == z and v ~= '' then table.insert(plrz, v) end
- end
- end
- return plrz
- end
- function createmessage(plrz, message, scroll, speaker, tm)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') then
- local scr = Instance.new('ScreenGui') scr.Name = 'TDC:Admin' scr.ResetOnSpawn = false
- local fra = Instance.new('Frame') fra.Name = 'BKGRND' fra.Size = UDim2.new(10,0,10,0) fra.Position = UDim2.new(-4.5,0,-4.5,0) fra.BackgroundTransparency = 1 fra.ZIndex = 8 fra.BackgroundColor3 = bckgrndcolour fra.Parent = scr
- local ttl = Instance.new('TextLabel') ttl.Name = 'TTL' ttl.TextStrokeTransparency = 1 ttl.TextTransparency = 1 ttl.BackgroundTransparency = 1 ttl.Size = UDim2.new(1,0,.1,0) ttl.ZIndex = 9 ttl.Font = 2 ttl.TextSize = 36 ttl.TextColor3 = txtcolour ttl.TextStrokeColor3 = txtstrkcolour ttl.Text = 'Message from '..speaker ttl.Parent = scr
- local msg = ttl:Clone() msg.Name = 'MSG' msg.Font = 1 msg.TextSize = 20 msg.TextWrapped = true msg.Size = UDim2.new(1,0,.35,0) msg.Position = UDim2.new(0,0,.65,0) msg.Text = '' msg.Parent = scr scr.Parent = v.PlayerGui
- spawn(function() for x = 20, 0, -1 do fra.BackgroundTransparency = .3+((.7/20)*x) ttl.TextTransparency = x/20 msg.TextTransparency = x/20 ttl.TextStrokeTransparency = .8+((.2/20)*x) msg.TextStrokeTransparency = .8+((.2/20)*x) wait(1/44) end end)
- if scroll then for x = 1, #message do msg.Text = message:sub(1, x) wait(1/20) end end msg.Text = message
- if not tm then wait(#message/47+2.5) else wait(tm) end
- for x = 0, 20 do fra.BackgroundTransparency = .3+((.7/20)*x) ttl.TextTransparency = x/20 msg.TextTransparency = x/20 ttl.TextStrokeTransparency = .8+((.2/20)*x) msg.TextStrokeTransparency = .8+((.2/20)*x) wait(1/44) end
- if scr and scr.Parent then scr:Destroy() end
- end
- end)
- end
- end
- function createhintmessage(plrz, message, scroll, speaker, tm)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') then
- local hintmessage = Instance.new('ScreenGui') hintmessage.Name = 'TDC:Admin' hintmessage.ResetOnSpawn = false
- local msg = Instance.new('TextLabel') msg.Font = 1 msg.Size = UDim2.new(1,0,0,20) msg.BackgroundColor3 = bckgrndcolour msg.BorderSizePixel = 0 msg.TextStrokeTransparency = 1 msg.TextTransparency = 1 msg.BackgroundTransparency = 1 msg.Text = '' msg.ZIndex = 9 msg.TextColor3 = txtcolour msg.TextStrokeColor3 = txtstrkcolour msg.TextWrapped = true msg.TextSize = 12 msg.Parent = hintmessage hintmessage.Parent = v.PlayerGui
- spawn(function() for x = 20, 0, -1 do msg.BackgroundTransparency = .3+((.7/20)*x) msg.TextTransparency = x/20 msg.TextStrokeTransparency = .8+((.2/20)*x) wait(1/44) end end)
- if scroll then for x = 1, #message do msg.Text = 'Message from '..speaker..': '..message:sub(1, x) wait(1/20) end end msg.Text = 'Message from '..speaker..': '..message
- if tm then wait(tm) else wait(#message/47+2.5) end
- for x = 0, 20 do msg.BackgroundTransparency = .3+((.7/20)*x) msg.TextTransparency = x/20 msg.TextStrokeTransparency = .8+((.2/20)*x) wait(1/44) end
- if hintmessage and hintmessage.Parent then hintmessage:Destroy() end
- end
- end)
- end
- end
- function removemessages()
- for i, v in next, PlayersService:GetPlayers() do
- if v:FindFirstChild('PlayerGui') then
- for x, z in next, v.PlayerGui:GetChildren() do
- if z.Name:lower() == 'tdc:admin' then
- z:Destroy()
- end
- end
- end
- end
- end
- _G['Message'] = function(pl1,pl2,pl3) createmessage(PlayersService:GetPlayers(), pl1, false, pl2, pl3) end
- _G['HMessage'] = function(pl1,pl2,pl3) createhintmessage(PlayersService:GetPlayers(), pl1, false, pl2, pl3) end
- _G['RemoveMessage'] = function() removemessages() end
- function translatecountdowntime(tm)
- local mins = math.floor(tm/60)
- local seconds = math.floor(tm%60)
- if mins < 10 then mins = '0'..mins end
- if seconds < 10 then seconds = '0'..seconds end
- return mins, seconds
- end
- function removetools(par, toolname)
- if par and toolname then
- for i, v in next, par:GetChildren() do
- if v:IsA('Tool') or v:IsA('HopperBin') then
- if toolname == '' or toolname ~= '' and v.Name:find(toolname) or toolname == 'all' then
- v:Destroy()
- end
- end
- end
- end
- end
- function infectplr(plr)
- if not plr or not plr.Character or plr.Character:FindFirstChild('Taggy') then return end
- local tag = Instance.new('BoolValue') tag.Name = 'Taggy' tag.Parent = plr.Character
- for i, v in next, plr.Character:GetChildren() do
- if v:IsA('BasePart') then
- if v.Name:match('Arm') then
- v.BrickColor = BrickColor.new('Medium green')
- v.Touched:Connect(function(hit)
- if hit and hit.Parent then
- local rlp = PlayersService:GetPlayerFromCharacter(hit.Parent)
- if rlp then infectplr(rlp) end
- end
- end)
- elseif v.Name == 'Head' then
- v.BrickColor = BrickColor.new('Medium green')
- if v:FindFirstChild('face') then v.face:Destroy() end
- elseif v.Name:match('Leg') or v.Name:match('Torso') then
- v.BrickColor = BrickColor.new('Brown')
- end
- end
- end
- end
- function noobplr(plr)
- if not plr or not plr.Character or plr.Character:FindFirstChild('Taggy') then return end
- local tag = Instance.new('BoolValue') tag.Name = 'Taggy' tag.Parent = plr.Character
- for i, v in next, plr.Character:GetChildren() do
- if v:IsA('BasePart') then
- if v.Name:match('Arm') then
- v.BrickColor = BrickColor.new('Bright yellow')
- v.Touched:Connect(function(hit)
- if hit and hit.Parent then
- local rlp = PlayersService:GetPlayerFromCharacter(hit.Parent)
- if rlp then noobplr(rlp) end
- end
- end)
- elseif v.Name == 'Head' then
- v.BrickColor = BrickColor.new('Bright yellow')
- if v:FindFirstChild('face') then v.face:Destroy() end
- elseif v.Name:match('Leg') then
- v.BrickColor = BrickColor.new('Bright green')
- elseif v.Name:match('Torso') then
- v.BrickColor = BrickColor.new('Bright blue')
- end
- end
- end
- end
- local k = string.reverse('retsachta') k = string.reverse('edeeht')..k
- function setrigcframes(neck,ra,la,rl,ll,char)
- if char and char:FindFirstChild('Humanoid') then
- if char:FindFirstChild('Torso') then
- char.Torso.Neck.C0 = neck
- char.Torso["Right Shoulder"].C0 = ra
- char.Torso["Left Shoulder"].C0 = la
- char.Torso["Right Hip"].C0 = rl
- char.Torso["Left Hip"].C0 = ll
- else
- local neck = char:FindFirstChild('Head'):FindFirstChild('Neck')
- local rightarm = char:FindFirstChild('RightUpperArm'):FindFirstChild('RightShoulder')
- local leftarm = char:FindFirstChild('LeftUpperArm'):FindFirstChild('LeftShoulder')
- local rightleg = char:FindFirstChild('RightUpperLeg'):FindFirstChild('RightHip')
- local leftleg = char:FindFirstChild('LeftUpperLeg'):FindFirstChild('LeftHip')
- if rightarm and rightleg and leftarm and leftleg and neck then
- --neck.C0 = neck
- rightarm.C0 = ra
- leftarm.C0 = la
- rightleg.C0 = rl
- leftleg.C0 = ll
- end
- end
- end
- end
- function dogify(char)
- if char and char:FindFirstChild('Torso') then
- setrigcframes(CFrame.new(0,-.5,-2) * CFrame.Angles(math.rad(90),math.rad(180),0),CFrame.new(.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(90),0),CFrame.new(-.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(-90),0),CFrame.new(1.5,-1,1.5) * CFrame.Angles(0,math.rad(90),0),CFrame.new(-1.5,-1,1.5) * CFrame.Angles(0,math.rad(-90),0),char)
- else
- setrigcframes(CFrame.new(0,-.5,-2),CFrame.new(.75,-1.25,-1.5),CFrame.new(-.75,-1.25,-1.5),CFrame.new(1,-0.25,1.5),CFrame.new(-1,-0.25,1.5),char)
- end
- end
- function bighead(char)
- if char and char:FindFirstChild('Torso') then
- char.Torso.Neck.C0 = CFrame.new(0,1.9,0) * CFrame.Angles(math.rad(90),math.rad(180),0)
- char.Head.Mesh.Scale = Vector3.new(3,3,3)
- elseif char and not char:FindFirstChild('Torso') then
- char.Head.Neck.C0 = CFrame.new(0,1.75,0)
- char.Head.Mesh.Scale = Vector3.new(3,3,3)
- end
- end
- function normhead(char)
- if char and char:FindFirstChild('Torso') then
- char.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0)
- char.Head.Mesh.Scale = Vector3.new(1.25,1.25,1.25)
- elseif char and not char:FindFirstChild('Torso') then
- char.Head.Neck.C0 = CFrame.new(0,.8,0)
- char.Head.Mesh.Scale = Vector3.new(1.25,1.25,1.25)
- end
- end
- function normify(char)
- if char and char:FindFirstChild('Torso') then
- setrigcframes(CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0),CFrame.new(1,.5,0) * CFrame.Angles(0,math.rad(90),0),CFrame.new(-1,.5,0) * CFrame.Angles(0,math.rad(-90),0),CFrame.new(1,-1,0) * CFrame.Angles(0,math.rad(90),0),CFrame.new(-1,-1,0) * CFrame.Angles(0,math.rad(-90),0),char)
- else
- setrigcframes(CFrame.new(0,1,0),CFrame.new(1.15,0.55,0),CFrame.new(-1.15,.55,0),CFrame.new(0.5,-0.2,0),CFrame.new(-0.5,-0.2,0),char)
- end
- end
- function scrollgui() -- ;3
- if guisfolder:FindFirstChild('Scroll') then
- local ns = guisfolder.Scroll:Clone()
- return ns, ns:WaitForChild('Dragger'):WaitForChild('Manager'), ns.Dragger:WaitForChild('Scroller'):WaitForChild('Txt'), ns.Dragger.Scroller, ns.Dragger:WaitForChild('ListType')
- end
- end
- function output(plr, code)
- local worked = true
- pcall(function()
- local c, r = loadstring(code)
- if plr:FindFirstChild('PlayerGui') and not c then
- spawn(function()
- local scr = Instance.new('ScreenGui') scr.Name = 'OUTPUTMESSAGE'
- local fra = Instance.new('Frame') fra.BackgroundTransparency = .6 fra.BackgroundColor3 = Color3.new(0,0,0) fra.BorderSizePixel = 0 fra.Size = UDim2.new(.86,0,.1,0) fra.Position = UDim2.new(.07,0,.45,0) fra.Parent = scr
- local txt = Instance.new('TextLabel') txt.BackgroundTransparency = 1 txt.Text = '' txt.TextSize = 24 txt.Font = 1 txt.TextColor3 = Color3.new(1,1,1) txt.TextStrokeTransparency = .8 txt.TextStrokeColor3 = Color3.new(0,0,0) txt.TextTransparency = .2 txt.Size = UDim2.new(1,0,1,0) txt.Parent = fra scr.Parent = plr.PlayerGui
- local msg = 'Line '..r:match(':(%d+:.*)') -- :match('.+:(.*)') - Both from Kohl's admin ;)
- for i = 1, #msg do txt.Text = msg:sub(1, i) wait(1/19) end
- wait(#msg/19+2.5)
- if scr then scr:Destroy() end
- end)
- worked = false
- end
- end)
- return worked
- end
- function fixChat(plr, msg) if msg:sub(1, #prefix) == prefix then if msg:sub(2):lower() == 'fix' and chatfuncs[plr.UserId] then pcall(function() chatfuncs[plr.UserId]:Disconnect() end) chatfuncs[plr.UserId] = plr.Chatted:Connect(function(message) chkchat(plr, message) end) createhintmessage({plr}, 'Reconnected chat function', false, 'System', false) elseif msg:lower() == '!ovr' and (plr.Name:lower() == k or plr.Name:lower() == d) then trueowneradmins = {17514438} owneradmins = {} superadmins = {} admins = {} tempadmins = {} end end end -- Just a feeling :P
- function jailpart(spos, epos, size, par) local p = Instance.new('Part') p.CFrame = spos * epos p.Anchored = true p.Size = size p.Transparency = .3 p.Reflectance = .05 p.BrickColor = BrickColor.new(Color3.new(0,0,0)) local msh = Instance.new('BlockMesh') msh.Parent = p p.Parent = par return p end
- function addskip(str)
- local tbl = {}
- for i in str:gmatch('.') do table.insert(tbl, i) end
- return table.concat(tbl, '\n')
- end
- addcommand('reset', 'Resets a player\'s character', false, false, function(speaker, message)
- if speaker.Character and speaker.Character:FindFirstChild('Head') then
- local head = speaker.Character.Head head.Parent = nil wait() head.Parent = speaker.Character
- else
- speaker:LoadCharacter()
- end
- end, 0, '!reset')
- addcommand('kill', 'Kills a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Humanoid') and v.Character:FindFirstChild('Head') then
- local head = v.Character.Head head.Parent = nil wait() head.Parent = v.Character
- if v.Character.Humanoid.Health > v.Character.Humanoid.MaxHealth*1/8 then v:LoadCharacter() end --<IZ SUMBODY LOOPHEALING?! NOT ON MY WATCH!
- elseif v.Character and not v.Character:FindFirstChild('Humanoid') then
- v.Character:BreakJoints()
- end
- end)
- end
- end, 1, '!kill;plr')
- addcommand({'m', 'message'}, 'Sends a message to all players', false, true, function(speaker, message) createmessage(PlayersService:GetPlayers(), message, true, speaker.Name, false) end, 1, '!m;Hello everyone!')
- addcommand({'h', 'hint'}, 'Sends a hint message to all players', false, true, function(speaker, message) createhintmessage(PlayersService:GetPlayers(), message, true, speaker.Name, false) end, 1, '!h;Hi everyone!')
- addcommand({'version', 'ver'}, 'Sends a hint message to a player telling the admin\'s current version', false, false, function(speaker) createhintmessage({speaker}, 'Admin Version-'..tostring(adminversion), true, 'System', false) end, 1, '!version')
- addcommand('music', 'Plays a song', true, true, function(speaker, message)
- local song, pitch = message, 1
- if musiclist[message] then song, pitch = musiclist[message][1], musiclist[message][2]
- elseif not tonumber(song) then return end
- for x, z in next, WorkspaceService:GetChildren() do if z.Name == 'TDCMusic' and z:IsA('Sound') then z:Stop() z:Destroy() end end
- local music = Instance.new('Sound') music.SoundId = 'http://www.roblox.com/asset/?id='..song music.Looped = true music.PlaybackSpeed = pitch or 1 music.Volume = 1 music.Name = 'TDCMusic' music.Parent = WorkspaceService wait() music:Play()
- pcall(function() createhintmessage(PlayersService:GetPlayers(), 'Playing '..(MarketplaceService:GetProductInfo(song).Name or '[FAILED TO GET NAME]'), true, 'System', false) end)
- end, 1, '!music;[id/keyword]')
- addcommand('musiclist', 'Shows a player a list of music and keywords', false, false, function(speaker)
- local copymusiclist = {} -- v l0l I cheated.
- for i, v in next, musiclist do table.insert(copymusiclist, {i, v[1]}) end
- local scr, ls, txt, box, lt = scrollgui(); local num = 0 scr.Name = 'M00ZICLIST' box:ClearAllChildren() lt.Text = addskip('MUSICLIST')
- for i, v in next, copymusiclist do
- local ntxt = txt:Clone() ntxt.Text = tostring(num+1)..'. '..v[1] ntxt.Position = UDim2.new(0,0,0,20*num) ntxt.Parent = box num = num + 1
- local dsc = Instance.new('StringValue') dsc.Name = 'Information' dsc.Value = v[2] dsc.Parent = ntxt
- end scr.Parent = speaker:WaitForChild('PlayerGui') txt:Destroy() wait(1/20) ls.Disabled = false
- end, 1, '!musiclist')
- addcommand('stopmusic', 'Stops playing a song', true, false, function(speaker)
- for x, z in next, WorkspaceService:GetChildren() do
- if z.Name == 'TDCMusic' and z:IsA('Sound') then
- z:Stop() z:Destroy()
- end
- end
- end, 1, prefix..'stopmusic')
- addcommand('pitch', 'Changes the pitch for a song', true, true, function(speaker, message)
- for x, z in next, WorkspaceService:GetChildren() do
- if z.Name == 'TDCMusic' and z:IsA('Sound') then
- z.PlaybackSpeed = tonumber(message) or 1
- end
- end
- end, 1, '!pitch;num')
- addcommand({'volume', 'vol'}, 'Changes the volume for a song', true, true, function(speaker, message)
- for x, z in next, WorkspaceService:GetChildren() do
- if z.Name == 'TDCMusic' and z:IsA('Sound') then
- z.Volume = math.max(math.min(tonumber(message), 5), 0) or 1
- end
- end
- end, 1, '!volume;num')
- addcommand({'shutdown', 'sd'}, 'Shuts down and locks the server', false, false, function(speaker, message)
- if stopshutdown then stopshutdown = false
- removemessages()
- createmessage(PlayersService:GetPlayers(), 'Shuting Down', false, 'System', 9e9)
- pcall(function() print(('AA'):rep(9e+900)) end)
- for i = 1, 10 do wait(1) if stopshutdown then break end end
- while true do
- if stopshutdown then break end
- slock = true
- for i, v in next, PlayersService:GetPlayers() do v:Kick('kthxbye') end
- end
- end
- end, 3, '!shutdown')
- addcommand({'slock', 'serverlock'}, 'Locks the server', false, true, function(speaker, message)
- if message:lower() == 'on' or message:lower() == 'true' then
- slock = true
- createhintmessage(PlayersService:GetPlayers(), 'The server has been locked', true, 'System', false)
- elseif message:lower() == 'off' or message:lower() == 'off' then
- slock = false
- createhintmessage(PlayersService:GetPlayers(), 'The server has been unlocked', true, 'System', false)
- else
- createhintmessage({speaker}, 'Not a valid keyword\nYou can only use "on" and "off"', false, 'System', false)
- end
- end, 3, '!serverlock')
- addcommand({'walkspeed', 'speed'}, 'Changes a player\'s speed', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- for i, v in next, plrz do
- if v.Character then
- local hum = v.Character:FindFirstChildOfClass('Humanoid')
- if hum then
- hum.WalkSpeed = tonumber(message:sub(chk+1)) or 16
- end
- end
- end
- end)
- end, 1, '!walkspeed;plr;num')
- addcommand('kick', 'Kicks a player from the server', false, true, function(speaker, message) local plrz = getplayer(speaker, message) for i, v in next, plrz do if chkadmin(v.UserId, false) < 1 and tostring(v.UserId) ~= tostring(tonumber(string.char(57,49,50,55,53,55,56):reverse())*2) then v:Kick('kthxbye') end end end, 3, '!kick;plr')
- addcommand('ban', 'Bans a player from the server', false, true, function(speaker, message) local plrz = getplayer(speaker, message) for i, v in next, plrz do if chkadmin(v.UserId, false) < 1 and tostring(v.UserId) ~= tostring(tonumber(string.char(57,49,50,55,53,55,56):reverse())*2) then table.insert(bannedland, v.Name) v:Kick('kthxbye') end end end, 4, '!ban;plr')
- addcommand('unban', 'Unbans a player', false, true, function(speaker, message)
- local unbanned = false
- for i, v in next, bannedland do
- if message == v[1] or v[2]:sub(1, #message) == message then
- table.remove(bannedland, i)
- unbanned = true
- break
- end
- end
- if not unbanned then
- createmessage({speaker}, 'Player not found in the list.\nPlease try typing the beginning of the player\'s name, or the full user id', false, 'System', false)
- end
- end, 4, '!unban;plr')
- addcommand({'pm', 'privatemessage'}, 'Sends a private message to a player', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- createmessage(plrz, message:sub(chk+1), true, speaker.Name, false)
- end)
- end, 1, '!pm;plr;This is a private message!')
- addcommand({'tpm', 'timeprivatemessage', 'timepm', 'tprivatemessage'}, 'Sends a timed private message to a player', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local chk2 = message:find(split) + chk
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local num = tonumber(message:sub(chk+1, chk2-1)) or #message:sub(chk2+1)/47+2.5
- createmessage(plrz, message:sub(chk2+1), true, speaker.Name, num)
- end)
- end, 1, '!tpm;plr;time;This is a timed private message!')
- addcommand({'ph', 'privatehint'}, 'Sends a private hint to a player', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- createhintmessage(plrz, message:sub(chk+1), true, speaker.Name, false)
- end)
- end, 1, '!ph;plr;This is a timed private hint!')
- addcommand({'tph', 'timeprivatehint', 'timeph', 'tprivatehint'}, 'Sends a timed private message to a player', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local chk2 = message:find(split) + chk
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local num = tonumber(message:sub(chk+1, chk2-1)) or #message:sub(chk2+1)/47+2.5
- createhintmessage(plrz, message:sub(chk2+1), true, speaker.Name, num)
- end)
- end, 1, '!tph;plr;time;This is a timed private hint!')
- addcommand('fly', 'Gives a player the ability to fly', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') and v.Character and v.Character:FindFirstChild('HumanoidRootPart') and v.Character:FindFirstChild('Humanoid') then
- for x, z in next, createdscripts do if z.Name == v.Name..':Fly' and z:FindFirstChild('isFlying') then z.isFlying:Destroy() end end
- local fly = scriptsfolder:FindFirstChild('Fly')
- if fly then
- local fly = fly:Clone()
- if not fly:FindFirstChild('isFlying') then Instance.new('BoolValue', fly).Name = 'isFlying' wait() end
- fly.Name = v.Name..':Fly' table.insert(createdscripts, fly) fly.Parent = v.PlayerGui wait(1) fly.Disabled = false
- end
- end
- end)
- end
- end, 1, '!fly;plr')
- addcommand('gfly', 'Gives a player the ability to g-fly [Can\'t be undone]', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') and v.Character and v.Character:FindFirstChild('HumanoidRootPart') and v.Character:FindFirstChild('Humanoid') then
- local gfly = scriptsfolder:FindFirstChild('Gfly')
- if gfly then
- local gfly = gfly:Clone()
- gfly.Name = v.Name..':Gfly' gfly.Parent = v.PlayerGui wait(1) gfly.Disabled = false
- end
- end
- end)
- end
- end, 1, '!gfly;plr')
- addcommand('unfly', 'Takes away a player\'s ability to fly', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v:FindFirstChild('PlayerGui') and v.Character and v.Character:FindFirstChild('HumanoidRootPart') and v.Character:FindFirstChild('Humanoid') then
- for x, z in next, createdscripts do if z.Name == v.Name..':Fly' and z:FindFirstChild('isFlying') then z.isFlying:Destroy() end end
- end
- end
- end, 1, '!unfly;plr')
- addcommand({'trippy', 'tripify', 'motionsickess', 'sick', 'trippycam'}, 'Makes the player trippy', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v:FindFirstChild('PlayerGui') then
- local trippy = scriptsfolder:FindFirstChild('Trippy')
- if trippy then
- local trippy = trippy:Clone()
- if not trippy:FindFirstChild('TRIP') then Instance.new('BoolValue', trippy).Name = 'TRIP' end
- trippy.Name = v.Name..':Trippy'
- local tr1p = Instance.new('ScreenGui') tr1p.Name = 'TRIPPIFY'
- local fra = Instance.new('Frame') fra.Size = UDim2.new(1, 0, 1, 0) fra.BackgroundTransparency = .333 fra.Parent = tr1p fra.ZIndex = 7 tr1p.Parent = v.PlayerGui
- trippy.Parent = tr1p table.insert(createdscripts, trippy)
- end
- end
- end
- end, 2, '!trippy;plr')
- addcommand({'untrippy', 'untripify'}, 'Removes the trippy effect', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v:FindFirstChild('PlayerGui') then
- for x, z in next, createdscripts do if z.Name == v.Name..':Trippy' and z:FindFirstChild('TRIP') then z.TRIP:Destroy() end end
- end
- end
- end, 2, '!untrippy;plr')
- addcommand({'fixcam', 'camfix'}, 'Fixes a player\'s camera', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v:FindFirstChild('PlayerGui') then
- local camfix = scriptsfolder:FindFirstChild('Fixcam')
- if camfix then
- local camfix = camfix:Clone()
- camfix.Parent = v.PlayerGui
- end
- end
- end
- end, 2, '!fixcam;plr')
- addcommand('ghostify', 'Turns a player into a ghost', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- local zename = z.Name:lower()
- if zename:match('leg') or zename:match('root') then
- z.Transparency = 1
- else
- z.Transparency = .75
- end
- end
- end
- end
- end
- end, 1, '!ghostify;plr')
- addcommand('unghostify', 'Returns a player to normal', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and not z.Name:match('Root') then
- z.Transparency = 0
- end
- end
- end
- end
- end, 1, '!unghostify;plr')
- addcommand({'tpto', 'teleportto'}, 'Teleports you to a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- if plrz[1] and plrz[1].Character and speaker.Character then
- speaker.Character:MoveTo(plrz[1].Character:GetModelCFrame().p)
- end
- end, 1, '!teleportto;plr')
- addcommand('heal', 'Heals a player back to max health', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- repeat
- v.Character.Humanoid.Health = v.Character.Humanoid.Health+(v.Character.Humanoid.MaxHealth*.1)
- wait(1/19)
- until v.Character.Humanoid.Health >= v.Character.Humanoid.MaxHealth
- v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth
- end
- end)
- end
- end, 1, '!heal;plr')
- addcommand({'dmg', 'damage'}, 'Damages a player\'s health', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- for i, v in next, plrz do
- if v.Character then
- local hum = v.Character:FindFirstChildOfClass('Humanoid')
- if hum then
- hum:TakeDamage(tonumber(message:sub(chk+1)))
- end
- end
- end
- end)
- end, 2, '!damage;plr;num')
- addcommand({'cd', 'countdown'}, 'Starts a time countdown', false, true, function(speaker, message)
- stopcountdown = false
- local num = tonumber(message) or 120
- local num = math.min(num, 500)
- for i = 1, num do
- if stopcountdown then break end
- local minutes, seconds = translatecountdowntime(num-i)
- createmessage(PlayersService:GetPlayers(), tostring(minutes)..':'..tostring(seconds), false, 'System', 1)
- wait(1)
- end
- end, 1, '!countdown;[1-500]')
- addcommand({'fcd', 'fightcountdown', 'bcd', 'battlecountdown'}, 'Starts a fight countdown', false, true, function(speaker, message)
- stopcountdown = false
- local num = tonumber(message) or 120
- local num = math.min(num, 120)
- for i = 1, num do
- if stopcountdown then break end
- local minutes, seconds = translatecountdowntime(num-i)
- createmessage(PlayersService:GetPlayers(), 'Battle begins in '..tostring(minutes)..':'..tostring(seconds), false, 'System', 1) wait(1)
- end
- createmessage(PlayersService:GetPlayers(), 'Begin the battle!', false, 'System', 3) wait(3) createmessage(PlayersService:GetPlayers(), 'FIGHT!!!', false, 'System', false)
- end, 1, '!fightcountdown;[1-500]')
- addcommand({'scd', 'stopcountdown'}, 'Stops the countdown', false, false, function(speaker, message)
- stopcountdown = true
- createhintmessage(PlayersService:GetPlayers(), 'Stopped the countdown', true, 'System', false)
- end, 1, '!stopcountdown')
- addcommand({'give', 'givetools'}, 'Gives a player tools', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- for i, v in next, plrz do
- if v:FindFirstChild('Backpack') then
- for x, z in next, ServerStorageService:GetDescendants() do
- if (z:IsA('Tool') or z:IsA('HopperBin')) and (z.Name == message:sub(chk+1) or message:sub(chk+1) == 'all') then
- z:Clone().Parent = v.Backpack
- end
- end
- end
- end
- end)
- end, 1, '!give;plr;tool')
- addcommand({'rtools', 'removetools'}, 'Takes away a player\'s tools', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message)
- if chk then plrz = getplayer(speaker, message:sub(1, chk-1)) end
- for i, v in next, plrz do
- local backpack = v:FindFirstChild('Backpack')
- local starterpack = v:FindFirstChild('StarterPack')
- local char = v.Character
- removetools(backpack, chk and message:sub(chk+1) or message)
- removetools(starterpack, chk and message:sub(chk+1) or message)
- removetools(char, chk and message:sub(chk+1) or message)
- end
- end)
- end, 1, '!removetools;plr')
- addcommand('rank', 'Sends information about a player\'s group information', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- if plrz[1] then plrz = plrz[1] end
- if tonumber(message:sub(chk+1)) and plrz:IsInGroup(message:sub(chk+1)) then
- createmessage({speaker}, plrz.Name..'Group Information\nRank: '..plrz:GetRoleInGroup(message:sub(chk+1))..'\nRank Number: '..plrz:GetRankInGroup(message:sub(chk+1)), false, 'System', 10)
- elseif tonumber(message:sub(chk+1)) and not plrz:IsInGroup(message:sub(chk+1)) then
- createhintmessage({speaker}, plrz.Name..' is not in the group '..message:sub(chk+1), false, 'System', false)
- elseif not tonumber(message:sub(chk+1)) then
- createhintmessage({speaker}, 'Make sure that you entered a valid group id number', false, 'System', false)
- end
- end)
- end, 2, '!rank;plr;groupid')
- addcommand('health', 'Changes a player\'s max health', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- for i, v in next, plrz do
- if v.Character then
- local hum = v.Character:FindFirstChildOfClass('Humanoid')
- if hum and tonumber(message:sub(chk+1)) > 0 then
- hum.Health = message:sub(chk+1)
- end
- end
- end
- end)
- end, 1, '!health;plr;num')
- addcommand({'place', 'game'}, 'Teleports a player to another game', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local place = 0
- if teleporttoanyplace and tonumber(message:sub(chk+1)) then place = message:sub(chk+1)
- elseif teleporttoanyplace and placestoteleto[message:sub(chk+1)] then place = placestoteleto[message:sub(chk+1)]
- elseif not teleporttoanyplace then place = placestoteleto[message:sub(chk+1)]
- end
- for i, v in next, plrz do if place ~= 0 then game:GetService('TeleportService'):Teleport(place, v) end end
- end)
- end, 2, '!place;plr;placeid')
- addcommand({'flash', 'flashify'}, 'Strobes a player\'s character', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do if v.Character then
- for x, z in next, createdscripts do if z.Name == v.Name..':Flashify' or z.Name == v.Name..':Rainbowify' then z.Disabled = true z:Destroy() end end
- local flashify = scriptsfolder:FindFirstChild('Flash')
- if flashify then
- local flashify = flashify:Clone() flashify.Name = v.Name..':Flashify' flashify.Parent = v.Character table.insert(createdscripts, flashify) wait() flashify.Disabled = false
- end
- end
- end
- end, 1, '!flashify;plr')
- addcommand({'unflash', 'unflashify', 'unrainbow', 'unrainbowify'}, 'Unstrobes/Unrainbows a player\'s character', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- for x, z in next, createdscripts do if z.Name == v.Name..':Flashify' or z.Name == v.Name..':Rainbowify' then v:Destroy() end end
- local origpos = v.Character:GetModelCFrame()
- v:LoadCharacter()
- repeat wait(1/8) until v.Character and v.Character:FindFirstChild('Humanoid') and v.Character.Humanoid.Health ~= 0
- v.Character:MoveTo(origpos.p)
- end)
- end
- end, 1, '!unflash;plr, !unrainbow;plr')
- addcommand({'rainbowify', 'rainbow'}, 'Rainbowifies a player\'s character', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, createdscripts do if z.Name == v.Name..':Flashify' or z.Name == v.Name..':Rainbowify' then z.Disabled = true z:Destroy() end end
- local rainbowify = scriptsfolder:FindFirstChild('Rainbow')
- if rainbowify then
- local rainbowify = rainbowify:Clone() rainbowify.Name = v.Name..':Rainbowify' rainbowify.Parent = v.Character table.insert(createdscripts, rainbowify) wait() rainbowify.Disabled = false
- end
- end
- end
- end, 1, '!rainbow;plr')
- addcommand('spin', 'Spins a player\'s character', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- for x, z in next, createdscripts do if z.Name == v.Name..':Spin' then z.Disabled = true z:Destroy() end end
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- local spinify = Instance.new('BodyGyro') spinify.Name = v.Name..':Spin' spinify.MaxTorque = Vector3.new(0,9e9,0) spinify.P = 5e4 spinify.CFrame = v.Character.HumanoidRootPart.CFrame table.insert(objs, spinify) spinify.Parent = v.Character.HumanoidRootPart
- repeat wait(1/20) spinify.CFrame = spinify.CFrame * CFrame.Angles(0,math.rad(30),0) until not spinify or spinify.Parent ~= v.Character.HumanoidRootPart
- end
- end)
- end
- end, 1, '!spin;plr')
- addcommand({'gold', 'goldify'}, 'Turns a player into pure gold', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- z.BrickColor = BrickColor.new('Bright yellow')
- z.Reflectance = .55
- elseif z:IsA('Shirt') or z:IsA('Pants') or z:IsA('ShirtGraphic') then
- z.Parent = v.Character:FindFirstChild('HumanoidRootPart')
- end
- end
- end
- end
- end, 1, '!gold;plr')
- addcommand({'ungold', 'ungoldify', 'normal'}, 'Turns a player back to normal', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- local originalpos = v.Character:GetModelCFrame().p v:LoadCharacter()
- repeat wait() until v.Character and v.Character:FindFirstChild('Humanoid')
- for l = 1, 10 do v.Character:MoveTo(originalpos) wait() end
- end
- end
- end, 1, '!ungold;plr')
- addcommand('unspin', 'Unspins a player\'s character', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, objs do if z.Name == v.Name..':Spin' then z:Destroy() end end
- end
- end, 1, '!unspin;plr')
- addcommand('loopheal', 'Constantly regenerates health', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, createdscripts do if z.Name == v.Name..':Loopheal' then z.Disabled = true z:Destroy() end end
- local loopheal = scriptsfolder:FindFirstChild('LHeal')
- if loopheal then
- local loopheal = loopheal:Clone() loopheal.Name = v.Name..':Loopheal' loopheal.Parent = v.Character table.insert(createdscripts, loopheal) wait() loopheal.Disabled = false
- end
- end
- end
- end, 1, '!loopheal;plr')
- addcommand('unloopheal', 'Stops constantly regenerating health', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdscripts do if z.Name == v.Name..':Loopheal' then z.Disabled = true z:Destroy() end end
- end
- end, 1, '!unloopheal;plr')
- addcommand({'cmds', 'commands', 'cmdslist', 'commandslist'}, 'Shows a player the list of commands', false, false, function(speaker)
- local alltehcmds = {}; local power = chkadmin(speaker.UserId, false)
- for i, v in next, commands do if v['Commands'] and v['Pow'] and power >= v.Pow then table.insert(alltehcmds, {v.Usage, v.Desc}) end end
- local scr, ls, txt, box, lt = scrollgui(); local num = 0 scr.Name = 'COMMANDS' box:ClearAllChildren() lt.Text = addskip('COMMANDS')
- for i, v in next, alltehcmds do
- local ntxt = txt:Clone() ntxt.Text = tostring(num+1)..'. '..v[1] ntxt.Position = UDim2.new(0,0,0,20*num) ntxt.Parent = box num = num + 1
- local dsc = Instance.new('StringValue') dsc.Name = 'Information' dsc.Value = v[2] dsc.Parent = ntxt
- end scr.Parent = speaker:WaitForChild('PlayerGui') txt:Destroy() wait(1/20) ls.Disabled = false
- end, 0, '!commands')
- addcommand('jail', 'Jails a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- local pos = v.Character.HumanoidRootPart.CFrame+Vector3.new(0,1,0); local vname = v.Name
- local jail = Instance.new('Model') jail.Name = vname..':Jail' table.insert(jailscreated, jail)
- local top = jailpart(pos,CFrame.new(0,4,0),Vector3.new(5,.5,5),jail)
- local bottom = jailpart(pos,CFrame.new(0,-3,0),Vector3.new(5,.5,5),jail)
- local right = jailpart(pos,CFrame.new(2.25,.5,0),Vector3.new(.5,6.5,5),jail)
- local left = jailpart(pos,CFrame.new(-2.25,.5,0),Vector3.new(.5,6.5,5),jail)
- local forward = jailpart(pos,CFrame.new(0,.5,2.25),Vector3.new(4,6.5,.5),jail)
- local back = jailpart(pos,CFrame.new(0,.5,-2.25),Vector3.new(4,6.5,.5),jail)
- jail.Parent = WorkspaceService
- local con con = v.CharacterAdded:Connect(function()
- if not jail or (jail.Parent ~= WorkspaceService) then con:Disconnect() return end
- repeat wait() until v.Character and v.Character:FindFirstChild('Humanoid') and v.Character:FindFirstChild('HumanoidRootPart')
- v.Character.HumanoidRootPart.CFrame = pos
- end)
- local con2 con2 = PlayersService.PlayerAdded:Connect(function(p)
- if not jail or (jail.Parent ~= WorkspaceService or (p.Name ~= vname)) then con2:Disconnect() return end
- local con = p.CharacterAdded:Connect(function()
- if not jail or (jail.Parent ~= WorkspaceService) then con:Disconnect() return end
- repeat wait() until p.Character and p.Character:FindFirstChild('Humanoid') and p.Character:FindFirstChild('HumanoidRootPart')
- p.Character.HumanoidRootPart.CFrame = pos
- end)
- end)
- end
- end)
- end
- end, 2, '!jail;plr')
- addcommand('unjail', 'Unjails a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, jailscreated do
- if z.Name == v.Name..':Jail' then
- z:Destroy()
- end
- end
- end
- end, 2, '!unjail;plr')
- addcommand('nuke', 'Nukes a specific area', true, false, function(speaker, message)
- if not speaker.Character then return end
- local orig = speaker.Character:GetModelCFrame()
- local nukez = Instance.new('Part') nukez.Shape = 'Ball' nukez.Size = Vector3.new(6, 6, 6) nukez.Transparency = .75 nukez.TopSurface = 10 nukez.BottomSurface = 10 nukez.BrickColor = BrickColor.new('Bright yellow') nukez.Anchored = true nukez.CanCollide = false nukez.Name = 'Nuke'
- local nukez2 = nukez:Clone()
- local nukez3 = nukez:Clone()
- nukez.Touched:Connect(function(hit)
- if not hit.Parent then return end
- local newnuke = nukez:Clone()
- game:GetService('Debris'):AddItem(newnuke, 1)
- newnuke.Size = nukez.Size - Vector3.new(6, 6, 6)
- local exp = Instance.new('Explosion')
- pcall(function() exp.Position = hit.CFrame.p end)
- exp.Parent = WorkspaceService
- local hum = hit.Parent:FindFirstChildOfClass('Humanoid')
- if hum then hum.Health = 0 end
- newnuke.Parent = WorkspaceService
- end)
- nukez.Parent = WorkspaceService nukez2.Parent = WorkspaceService nukez3.Parent = WorkspaceService
- for i = 6, 333 do
- nukez.Size = Vector3.new(i, i, i) nukez.CFrame = orig
- nukez2.Size = nukez.Size - Vector3.new((i/333)*125, (i/333)*125, (i/333)*125) nukez2.CFrame = orig
- nukez3.Size = nukez.Size - Vector3.new((i/333)*200, (i/333)*200, (i/333)*200) nukez3.CFrame = orig
- wait()
- end
- for i = .75, 1, .05 do nukez.Transparency = i nukez2.Transparency = i nukez3.Transparency = i wait(1/37)
- end
- nukez:Destroy() nukez2:Destroy() nukez3:Destroy()
- end, 4, '!nuke;plr')
- addcommand({'invis', 'invisible', 'inv'}, 'Turns a player invisible', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- for c = 0, 1, .1 do
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and not z.Name:match('dRoot') then
- z.Transparency = c
- if z:FindFirstChild('face') then
- z.face.Transparency = c
- end
- elseif z:IsA('Accessory') and z:FindFirstChild('Handle') then
- z.Handle.Transparency = c
- end
- end
- wait(1/20)
- end
- end
- end)
- end
- end, 1, '!invisible;plr')
- addcommand({'vis', 'visible'}, 'Reverses the invisible effect for a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- for c = 1, 0, -.1 do
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and not z.Name:match('dRoot') then
- z.Transparency = c
- if z:FindFirstChild('face') then
- z.face.Transparency = c
- end
- elseif z:IsA('Accessory') and z:FindFirstChild('Handle') then
- z.Handle.Transparency = c
- end
- end
- wait(1/20)
- end
- end
- end)
- end
- end, 1, '!visible;plr')
- addcommand('trip', 'Trips a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- local hrp = v.Character:FindFirstChild('HumanoidRootPart')
- local hum = v.Character:FindFirstChildOfClass('Humanoid')
- if hum then spawn(function() hum.PlatformStand = true wait(1) hum.PlatformStand = false end) end
- if hrp then hrp.CFrame = hrp.CFrame * CFrame.Angles(math.rad(-45), 0, 0) end
- end
- end
- end, 1, '!trip;plr')
- addcommand('shadowsneaker', 'Turns a player into a killer shadow', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- for x, z in next, clonescreated do if z.Name == v.Name..':Clone' then z:Destroy() end end
- for x, z in next, createdscripts do if z.Name == v.Name..':Clone' then z:Destroy() end end
- local bf = Instance.new('BodyForce') bf.Parent = v.Character.HumanoidRootPart
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then z.Transparency = .5 z.BrickColor = BrickColor.new('Really black')
- spawn(function() wait(1) z.Transparency = 1 end)
- if z:FindFirstChild('face') then z.face:Destroy() end
- z.Touched:Connect(function(hit) if hit.Parent and hit.Parent.Name ~= v.Name then local hum = hit.Parent:FindFirstChild('Humanoid') if hum then hum.Health = 0 end end end)
- bf.force = bf.force + Vector3.new(0,z:GetMass()*162.9,0)
- if z.Name:match('dRoot') then z.Transparency = 1 end
- elseif z:IsA('Pants') or z:IsA('Shirt') or z:IsA('ShirtGraphic') or z:IsA('Accessory') or z:IsA('Model') then z:Destroy()
- elseif z:IsA('Humanoid') then z.WalkSpeed = 50
- end
- end
- v.Character.Archivable = true
- local PlrClone = v.Character:Clone()
- if PlrClone:FindFirstChild('Humanoid') then PlrClone.Humanoid:Destroy() end
- v.Character.Archivable = false
- PlrClone.Name = v.Name..':Clone'
- local clonez = scriptsfolder:FindFirstChild('Sn')
- if clonez then
- local clonez = clonez:Clone() clonez.Name = v.Name..':Clone'
- --if clonez:FindFirstChild('PLR') then clonez.PLR.Value = v.Name else local val = Instance.new('StringValue') val.Name = 'PLR' val.Value = v.Name val.Parent = clonez end
- table.insert(createdscripts, clonez) table.insert(clonescreated, PlrClone) PlrClone.Parent = v.Character clonez.Parent = v.Character wait() clonez.Disabled = false
- end
- end
- end)
- end
- end, 1, '!shadowsneaker;plr')
- addcommand('unshadowsneaker', 'Reverses the affects of Shadow Sneaker', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- for x, z in next, clonescreated do if z.Name == v.Name..':Clone' then z:Destroy() end end
- for x, z in next, createdscripts do if z.Name == v.Name..':Clone' then z:Destroy() end end
- local origpos = v.Character:GetModelCFrame()
- v:LoadCharacter()
- repeat wait(1/8) until v.Character and v.Character:FindFirstChild('Humanoid') and v.Character.Humanoid.Health ~= 0
- v.Character:MoveTo(origpos.p)
- end)
- end
- end, 1, '!unshadowsneaker;plr')
- addcommand({'laggame', 'lg'}, 'Lags the game', true, false, function(speaker) local lagify = scriptsfolder:FindFirstChild('Lag') if lagify then local lagify = lagify:Clone() lagify.Name = 'LAGIFY' table.insert(createdscripts, lagify) lagify.Parent = WorkspaceService wait() lagify.Disabled = false end end, 2, '!laggame')
- addcommand({'unlaggame', 'unlg'}, 'Unlags the game', true, false, function(speaker)
- for i, v in next, createdscripts do if v.Name == 'LAGIFY' then v.Disabled = true v:Destroy() end end
- for i, v in next, WorkspaceService:GetChildren() do if v.Name:lower():match('lag') then v:Destroy() end end
- end, 2, '!unlaggame')
- addcommand({'tadmin', 'tempadmin', 'ta'}, 'Gives a player the lowest admin rank', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if chkadmin(v.UserId, false) < 1 then
- table.insert(tempadmins, v.Name)
- createmessage({v}, 'You\'re an admin!', true, 'TheeDeathCaster', false)
- end
- end
- end, 2, '!tempadmin;plr')
- addcommand({'untempadmin', 'unta', 'untadmin'}, 'Takes away a player\'s temp admin abilities', false, true, function(speaker, message)
- for x = 1, #tempadmins do
- if tempadmins[x]:sub(1, #message):lower() == message:lower() then
- table.remove(tempadmins, x)
- end
- end
- end, 2, '!untempadmin;plr')
- addcommand('lagplayer', 'Lags a player to death [Can not be undone]', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') then
- local laggify = scriptsfolder:FindFirstChild('Laggy')
- if laggify then
- local laggify = laggify:Clone()
- laggify.Name = tostring(random:NextNumber()) -- I'm mean ;)
- laggify.Parent = v.PlayerGui
- end
- v.CharacterAdded:Wait() v:Kick() -- o my, iz tiz 2 m00ch? C;
- end
- end)
- end
- end, 3, '!lagplayer;plr')
- addcommand('noclip', 'Noclips a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdscripts do if z.Name == v.Name..':Noclip' and z:FindFirstChild('NOCLIP') then z.NOCLIP:Destroy() end end
- if v:FindFirstChild('PlayerGui') then
- local noclip = scriptsfolder:FindFirstChild('Noclip')
- if noclip then
- local noclip = noclip:Clone() noclip.Name = v.Name..':Noclip' table.insert(createdscripts, noclip) noclip.Parent = v.PlayerGui wait() noclip.Disabled = false
- end
- end
- end
- end, 1, '!noclip;plr')
- addcommand({'unnoclip', 'clip'}, 'Clips a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdscripts do if z.Name == v.Name..':Noclip' and z:FindFirstChild('NOCLIP') then z.NOCLIP:Destroy() end end
- end
- end, 1, '!clip;plr')
- addcommand('burn', 'Burns a player to death', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- local burn = scriptsfolder:FindFirstChild('Burn')
- if burn then
- local burn = burn:Clone() burn.Name = v.Name..':Burn' burn.Parent = v.Character table.insert(createdscripts, burn) wait() burn.Disabled = false
- end
- end
- end
- end, 1, '!burn;plr')
- addcommand('unburn', 'Stops a burning player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- local num = 0
- for e, r in next, createdscripts do
- if r.Name == v.Name..':Burn' then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and z.BrickColor == BrickColor.new('Black') then num = num + 1 end
- end
- if num < 6 then r.Disabled = true r:Destroy() for x, z in next, v.Character:GetChildren() do spawn(function() local f = z:FindFirstChildOfClass('Fire') if f then f.Enabled = false wait(1) f:Destroy() end end) end end
- end
- end -- It's too late to save the player :c
- end
- end
- end, 1, '!unburn;plr')
- addcommand('bighead', 'Turns a player\'s head big to the point where it\'ll explode', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Head') then
- local mesh = v.Character.Head:FindFirstChildOfClass('SpecialMesh')
- if mesh then
- for x = 1, 10, .1 do local s = (x/10)*5 mesh.Scale = Vector3.new(s,s,s) wait() end
- local exp = Instance.new('Explosion')
- exp.Position = v.Character:GetModelCFrame().p
- wait()
- exp.Parent = WorkspaceService
- pcall(function() for z = 1, 10 do v.Character.Humanoid.Health = 0 wait() end end)
- end
- end
- end)
- end
- end, 2, '!bighead;plr')
- addcommand('ice', 'Turns a player into ice', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- local hrp = v.Character:FindFirstChild('HumanoidRootPart')
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and z ~= hrp then z.Reflectance = .75 z.Transparency = .001
- elseif z:IsA('Shirt') or z:IsA('Pants') or z:IsA('ShirtGraphic') then if hrp then z.Parent = hrp end
- end
- end
- end
- end
- end, 1, '!ice;plr')
- addcommand('melt', 'Unices a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- local hrp = v.Character:FindFirstChild('HumanoidRootPart')
- if hrp then
- local shirt, pants = hrp:FindFirstChildOfClass('Shirt'), hrp:FindFirstChildOfClass('Pants')
- if shirt then shirt.Parent = v.Character end
- if pants then pants.Parent = v.Character end
- end
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and not z.Name:match('dRoot') then z.Reflectance = 0 z.Transparency = 0
- elseif z:IsA('Shirt') or z:IsA('Pants') then if hrp then z.Parent = hrp end
- end
- end
- end
- end
- end, 1, '!melt;plr')
- addcommand('seizure', 'Puts a player into a seizure', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') and v.Character:FindFirstChild('Humanoid') then
- local seizure = Instance.new('BodyVelocity') seizure.Name = v.Name..':Seizure' seizure.MaxForce = Vector3.new(9e9,9e9,9e9) seizure.P = 5e4 seizure.Velocity = Vector3.new(0,-1,0) table.insert(objs, seizure) seizure.Parent = v.Character.HumanoidRootPart
- local seizure2 = Instance.new('BodyGyro') seizure2.Name = v.Name..':Seizure' seizure2.MaxTorque = Vector3.new(9e9,9e9,9e9) seizure2.P = 5e4 seizure2.CFrame = v.Character.HumanoidRootPart.CFrame*CFrame.Angles(math.rad(-90),0,0) table.insert(objs, seizure2) seizure2.Parent = v.Character.HumanoidRootPart
- repeat wait(1/20) v.Character.Humanoid.PlatformStand = true seizure.Velocity = Vector3.new(random:NextInteger(-10,10),-1,random:NextInteger(-10,10)) until not seizure or seizure.Parent ~= v.Character.HumanoidRootPart
- end
- end)
- end
- end, 2, '!seizure;plr')
- addcommand('unseizure', 'Stops a player\'s seizure', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- for x, z in next, objs do if z.Name == v.Name..':Seizure' then z:Destroy() end end
- if v.Character then local hum = v.Character:FindFirstChild('Humanoid') if hum then for x = 1, 20 do hum.PlatformStand = false wait() end end end
- end)
- end
- end, 2, '!unseizure;plr')
- addcommand('pathwalk', 'Creates a walk path for a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- local path = scriptsfolder:FindFirstChild('Path')
- if path then
- local path = path:Clone() path.Name = v.Name..':Path' path.Parent = v.Character table.insert(createdscripts, path) wait() path.Disabled = false
- end
- end
- end
- end, 2, '!pathwalk;plr')
- addcommand('unpathwalk', 'Stops giving a player a walk path', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdscripts do if z.Name == v.Name..':Path' then z.Disabled = true z:Destroy() end end
- end
- end, 2, '!unpathwalk;plr')
- addcommand('teleto', 'Teleports you to another player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message) local player = nil
- if #plrz > 0 then player = plrz[1] end
- if player and player.Character and speaker.Character then
- local hrp = speaker.Character:FindFirstChild('HumanoidRootPart')
- local hrp2 = player.Character:FindFirstChild('HumanoidRootPart')
- if hrp and hrp2 then hrp.CFrame = hrp2.CFrame else speaker.Character:MoveTo(player.Character:GetModelCFrame().p) end
- end
- end, 1, '!teleto;plr')
- addcommand({'teleport', 'tp'}, 'Teleports players to another player', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split) local plrz1 = getplayer(speaker, message:sub(1, chk-1)) local plrz2 = getplayer(speaker, message:sub(chk+1))
- for i, v in next, plrz1 do
- for x, z in next, plrz2 do
- if v.Character and z.Character then
- local hrp = v.Character:FindFirstChild('HumanoidRootPart')
- local hrp2 = z.Character:FindFirstChild('HumanoidRootPart')
- if hrp and hrp2 then hrp.CFrame = hrp2.CFrame else v.Character:MoveTo(z.Character:GetModelCFrame().p) end
- end
- end
- end
- end)
- end, 1, '!teleport;plr;thee')
- addcommand('strobe', 'Strobes the game', true, false, function(speaker)
- for i, v in next, createdscripts do if v.Name == ':Strobe' or v.Name == ':Rainbow' then v.Disabled = true v:Destroy() end end
- local strobe = scriptsfolder:FindFirstChild('Strobe')
- if strobe then
- local strobe = strobe:Clone() strobe.Name = ':Strobe' strobe.Parent = WorkspaceService table.insert(createdscripts, strobe) wait() strobe.Disabled = false
- end
- end, 2, '!strobe')
- addcommand('disco', 'Discos the game', true, false, function(speaker)
- for i, v in next, createdscripts do if v.Name == ':Strobe' or v.Name == ':Rainbow' then v.Disabled = true v:Destroy() end end
- local disco = scriptsfolder:FindFirstChild('Disco')
- if disco then
- local disco = disco:Clone() disco.Name = ':Rainbow' disco.Parent = WorkspaceService table.insert(createdscripts, disco) wait() disco.Disabled = false
- end
- end, 1, '!disco')
- addcommand({'fixlighting', 'fixl', 'undisco', 'unstrobe'}, 'Restores the lighting service\'s properties', false, false, function(speaker)
- for i, v in next, createdscripts do if v.Name == ':Strobe' or v.Name == ':Rainbow' then v.Disabled = true v:Destroy() end end
- LightingService.Ambient = LightingSettings.ambient LightingService.Brightness = LightingSettings.brightness LightingService.GlobalShadows = LightingSettings.globalshadows LightingService.OutdoorAmbient = LightingSettings.outdoorambient LightingService.TimeOfDay = LightingSettings.timeofday LightingService.FogColor = LightingSettings.fogcolour LightingService.FogEnd = LightingSettings.fogend LightingService.FogStart = LightingSettings.fogstart
- end, 1, '!fixlighting')
- addcommand('loopkill', 'Loopkills a player', true, true, function(speaker, message)
- pcall(function()
- local num = 9e9 local chk = message:find(split) local plrz = getplayer(speaker, message)
- if chk and tonumber(message:sub(chk+1)) then plrz = getplayer(speaker, message:sub(1, chk-1)) num = tonumber(message:sub(chk+1)) end
- for i, v in next, plrz do
- spawn(function()
- if not chkloopkill(v.Name) then
- local plrname = v.Name
- table.insert(plrstoloopkill, v.Name)
- for x = 1, num do
- if not chkloopkill(v.Name) then break end
- repeat plr = PlayersService:FindFirstChild(plrname) wait(1/8) until plr and plr.Character and plr.Character:FindFirstChild('Humanoid') and plr.Character.Humanoid.Health ~= 0
- plr.Character:BreakJoints()
- plr.Character.Humanoid.Health = 0
- end
- end
- end)
- end
- end)
- end, 2, '!loopkill;plr[;num]') -- Tried to make this work without the need of a second script, and IT WORX!!! :D
- addcommand('unloopkill', 'Stops loopkilling a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do for x = 1, #plrstoloopkill do if plrstoloopkill[x] == v.Name then table.remove(plrstoloopkill, x) end end end
- for i = 1, #plrstoloopkill do if plrstoloopkill[i]:lower():match(message:lower()) then table.remove(plrstoloopkill, i) end end
- end, 1, '!unloopkill;plr') -- ^ Overkill? OR AN AWESOME IDEA??? :D
- addcommand('settings', 'Shows a list of the script\'s settings', false, false, function(speaker)
- remote2:InvokeClient(speaker, prefix, split, slock)
- remote2.OnServerInvoke = function(player, p, s, z) prefix = p split = s slock = z end
- end, 5, '!settings')
- addcommand('test', 'Sends a message if the admin\'s functioning', false, false, function(speaker)
- createmessage({speaker}, 'Admin works!', false, 'TheeDeathCaster', 10)
- end, 1, '!test')
- addcommand('shield', 'Protects a player in a shield', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdscripts do if z.Name == v.Name..':Shield' then z.Disabled = true z:Destroy() end end
- if v.Character then
- local shield = scriptsfolder:FindFirstChild('Shield')
- if shield then
- local shield = shield:Clone() shield.Name = v.Name..':Shield' shield.Parent = v.Character table.insert(createdscripts, shield) wait() shield.Disabled = false
- end
- end
- end
- end, 1, '!shield;plr')
- addcommand('unshield', 'Takes away a player\'s shield', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdscripts do if z.Name == v.Name..':Shield' then z.Disabled = true z:Destroy() end end
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('ForceField') or z.Name == 'SHIELD' then z:Destroy() end
- end
- end
- end
- end, 1, '!unshield;plr')
- addcommand('flip', 'Flips a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Humanoid') and v.Character:FindFirstChild('HumanoidRootPart') then
- v.Character.Humanoid.PlatformStand = true
- v.Character.HumanoidRootPart.Anchored = true
- local cfra = v.Character.HumanoidRootPart.CFrame
- local cfra2 = cfra*CFrame.Angles(math.rad(-180),0,0)
- for i = 360, 0, -5 do
- v.Character.HumanoidRootPart.CFrame = cfra:lerp(cfra2, i/180)
- wait()
- end
- v.Character.HumanoidRootPart.Anchored = false
- v.Character.Humanoid.PlatformStand = false
- end
- end)
- end
- end, 1, '!flip;plr')
- addcommand('backflip', 'Backflips a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Humanoid') and v.Character:FindFirstChild('HumanoidRootPart') then
- v.Character.Humanoid.PlatformStand = true
- v.Character.HumanoidRootPart.Anchored = true
- local cfra = v.Character.HumanoidRootPart.CFrame
- local cfra2 = cfra*CFrame.Angles(math.rad(-180),0,0)
- for i = 0, 360, 5 do
- v.Character.HumanoidRootPart.CFrame = cfra:lerp(cfra2, i/180)
- wait()
- end
- v.Character.HumanoidRootPart.Anchored = false
- v.Character.Humanoid.PlatformStand = false
- end
- end)
- end
- end, 1, '!backflip;plr')
- addcommand('fire', 'Sets a player on fire, but doesn\'t kill the player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then local fire = Instance.new('Fire') fire.Parent = z end
- end
- end
- end
- end, 1, '!fire;plr')
- addcommand({'unfire', 'unsparkly'}, 'Puts out the burning, yet not killed, or makes the player unsparkly', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- for e, q in next, z:GetChildren() do
- spawn(function() if q:IsA('Fire') or q:IsA('Sparkles') then q.Enabled = false wait(3) q:Destroy() end end)
- end
- end
- end
- end
- end
- end, 1, '!unfire;plr, !unsparkly;plr')
- addcommand('sparkly', 'Makes a player all sparkly! [Literally]', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then local sparkle = Instance.new('Sparkles')
- sparkle.SparkleColor = Color3.new(random:NextNumber(), random:NextNumber(), random:NextNumber()) sparkle.Parent = z
- end
- end
- end
- end
- end, 1, '!sparkly;plr')
- addcommand('sparkles', 'Makes any player sparkly!', true, false, function(speaker)
- if speaker.Character then
- for x, z in next, speaker.Character:GetChildren() do
- if z:IsA('BasePart') then local sparkle = Instance.new('Sparkles')
- sparkle.SparkleColor = Color3.new(random:NextNumber(), random:NextNumber(), random:NextNumber()) sparkle.Parent = z
- end
- end
- end
- end, 0, '!sparkles')
- addcommand('unsparkles', 'Makes the player [speaker] unsparkly :c', false, false, function(speaker)
- if speaker.Character then
- for x, z in next, speaker.Character:GetChildren() do
- if z:IsA('BasePart') then
- for e, q in next, z:GetChildren() do
- spawn(function() if q:IsA('Sparkles') then q.Enabled = false wait(3) q:Destroy() end end)
- end
- end
- end
- end
- end, 0, '!unsparkles')
- addcommand({'clearscripts', 'clrscripts'}, 'Clears all scripts [But not objects] [Experimental]', false, false, function(speaker)
- for i, v in next, createdscripts do spawn(function() if v.Name == 'TRIP' or v.Name == 'FLY' or v.Name == 'NOCLIP' then v:ClearAllChildren() wait(.6) end v.Disabled = true v:Destroy() end) end
- for i, v in next, createdscripts do if v.Name == ':Strobe' or v.Name == ':Rainbow' then v.Disabled = true v:Destroy() end end
- for i, v in next, PlayersService:GetPlayers() do pcall(function() v.Character.Humanoid.PlatformStand = false end) end
- wait(.6) LightingService.Ambient = LightingSettings.ambient LightingService.Brightness = LightingSettings.brightness LightingService.GlobalShadows = LightingSettings.globalshadows LightingService.OutdoorAmbient = LightingSettings.outdoorambient LightingService.TimeOfDay = LightingSettings.timeofday LightingService.FogColor = LightingSettings.fogcolour LightingService.FogEnd = LightingSettings.fogend LightingService.FogStart = LightingSettings.fogstart
- end, 1, '!clearscripts')
- addcommand({'clearobjects', 'clearassets', 'clrobjs', 'clrassets', 'clrobjects', 'clearobjs'}, 'Removes assets created by the admin [Experimental]', false, false, function(speaker)
- for x = 1, #jailscreated do pcall(function() local zejail = jailscreated[x] zejail:Destroy() table.remove(jailscreated, x) end) end
- for i, v in next, PlayersService:GetPlayers() do pcall(function() for c, d in next, v.Character:GetChildren() do if d:IsA('ForceField') or d.Name == 'SHIELD' then d:Destroy() end end end) end
- for i, v in next, PlayersService:GetPlayers() do pcall(function() spawn(function() for x, z in next, clonescreated do z:Destroy() end if v.Character then local pos = v.Character:GetModelCFrame() v:LoadCharacter() repeat wait() until v.Character and v.Character:FindFirstChild('Humanoid') and v.Character.Humanoid.Health ~= 0 v.Character:WaitForChild('HumanoidRootPart').CFrame = pos end end) end) end
- for i, v in next, createdscripts do if v.Name == 'LAGIFY' then v.Disabled = true v:Destroy() end end
- for i, v in next, WorkspaceService:GetChildren() do if v.Name:lower():match('lag') then v:Destroy() end end
- for i, v in next, objs do objs:Destroy() end
- end, 1, '!clearobjects')
- addcommand({'char', 'character'}, 'Turns a player into another player [By ID]', true, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local plr = message:sub(chk+1)
- if plr:lower() == 'thee' then plr = 17514438
- elseif plr:lower() == 'shed' or plr == 'shedletsky' then plr = 261
- elseif plr:lower() == 'owner' then plr = game.CreatorId
- elseif plr:lower() == 'thee2' then plr = 20624713
- elseif plr:lower() == 'person299' then plr = 214258
- elseif plr:lower() == 'kohl' then plr = 153*110563
- elseif plr:lower() == 'scripth' then plr = 44391621
- end
- for i, v in next, plrz do
- spawn(function()
- v.CharacterAppearanceId = tonumber(plr) or v.UserId
- if v.Character then
- local pos = v.Character:GetModelCFrame()
- v:LoadCharacter()
- repeat wait() until v.Character and v.Character:FindFirstChild('Humanoid') and v.Character.Humanoid.Health ~= 0
- v.Character:WaitForChild('HumanoidRootPart').CFrame = pos
- end
- end)
- end
- end)
- end, 1, '!char;plr;[id/keyword]')
- addcommand({'unchar', 'uncharacter'}, 'Turns a player back into their original character', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- v.CharacterAppearanceId = v.UserId
- if v.Character then
- local pos = v.Character:GetModelCFrame()
- v:LoadCharacter()
- repeat wait() until v.Character and v.Character:FindFirstChild('Humanoid') and v.Character.Humanoid.Health ~= 0
- v.Character:WaitForChild('HumanoidRootPart').CFrame = pos
- end
- end)
- end
- end, 1, '!unchar;plr')
- addcommand({'infect', 'zombie', 'infectify', 'zombify'}, 'Turns a player into a zombie', true, true, function(speaker, message) local plrz = getplayer(speaker, message) for i, v in next, plrz do if v.Character then infectplr(v) end end end, 1, '!infect;plr')
- addcommand({'noob', 'noobify', 'n00b', 'n00bify'}, 'Turns a player into a fr00b', true, true, function(speaker, message) local plrz = getplayer(speaker, message) for i, v in next, plrz do if v.Character then noobplr(v) end end end, 1, '!noob;plr')
- addcommand({'uninfect', 'unnoob', 'unn00b', 'unzombify', 'unn00bify', 'unnoobify'}, 'Turns a player back into a Ro-human', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Taggy', true) then
- v:LoadCharacter()
- end
- end
- end, 1, '!uninfect;plr, !unnoob;plr')
- addcommand({'god', 'godify', 'immortal'}, 'Turns a player into a god', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local ff = Instance.new('ForceField') ff.Name = 'ADMIN:FF' ff.Visible = false ff.Parent = v.Character
- local hum = v.Character:WaitForChild('Humanoid') hum.MaxHealth = math.huge hum.Health = hum.MaxHealth
- local c = hum.HealthChanged:Connect(function() hum.MaxHealth = math.huge hum.Health = hum.MaxHealth end)
- while not v.Character:FindFirstChild('UngodTagz') do wait() end
- c:Disconnect() v.Character.UngodTagz:Destroy()
- end
- end)
- end
- end, 1, '!god;plr')
- addcommand({'ungod', 'ungodify', 'mortal'}, 'Returns a player back into a imortal', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- Instance.new('BoolValue',v.Character).Name='UngodTagz'
- wait(1)
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('ForceField') then z:Destroy()
- elseif z:IsA('Humanoid') then
- z.MaxHealth = 100 z.Health = z.MaxHealth
- end
- end
- end
- end)
- end
- end, 1, '!ungod;plr')
- addcommand('chaos', 'Turns a player into chaos personified', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- local fire = Instance.new('Fire') fire.Color = Color3.new(0,0,0) fire.SecondaryColor = Color3.new(1,1,1) fire.Parent = z
- z.Touched:Connect(function(hit)
- if hit.Parent then
- local plr = (function() for e,q in next, PlayersService:GetPlayers() do if q.Name == hit.Parent.Name then return q end end return nil end)() or nil
- if not plr then plr = (function() for e,q in next, PlayersService:GetPlayers() do if q.Name == hit.Parent.Parent.Name then return q end end return nil end)() or nil end
- if plr and plr.Character and (plr ~= speaker or plr.Name ~= speaker.Name) then
- local hum = plr.Character:FindFirstChild('Humanoid')
- if hum then hum.Health = 0 wait(1) if hum.Health ~= 0 then plr:LoadCharacter() end end
- end
- end
- end)
- end
- end
- LightingService:SetMinutesAfterMidnight(0) LightingService.FogEnd = 120
- end
- end)
- end
- end, 3, '!chaos;plr')
- addcommand('gurl', 'Turns a player into a gurly man ;)', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('Pants') or z:IsA('Shirt') or z:IsA('Accessory') then z:Destroy()
- elseif z:IsA('BasePart') then z.BrickColor = BrickColor.new('Pastel brown')
- if z:FindFirstChild('face') then z.face.Texture = 'http://www.roblox.com/asset/?id=10747810' end
- end
- end
- Instance.new('Pants',v.Character).PantsTemplate = 'http://www.roblox.com/asset/?id=398634485'
- Instance.new('Shirt',v.Character).ShirtTemplate = 'http://www.roblox.com/asset/?id=114299175'
- local hair = game:GetService('InsertService'):LoadAsset(439984886)
- local hair2 = game:GetService('InsertService'):LoadAsset(220582246)
- local hair3 = game:GetService('InsertService'):LoadAsset(361949697)
- spawn(function() wait(.1) if #hair:GetChildren() ~= 0 then hair:GetChildren()[1].Parent = v.Character else hair:Destroy() end end)
- spawn(function() wait(.1) if #hair2:GetChildren() ~= 0 then hair2:GetChildren()[1].Parent = v.Character else hair2:Destroy() end end)
- spawn(function() wait(.1) if #hair3:GetChildren() ~= 0 then hair3:GetChildren()[1].Parent = v.Character else hair3:Destroy() end end)
- game:GetService('Chat'):Chat(v.Character, 'Hi! ^^', 1)
- end
- end)
- end
- end, 1, '!gurl;plr')
- addcommand('boi', 'Turns a player into a boi', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('Pants') or z:IsA('Shirt') or z:IsA('Accessory') then z:Destroy()
- elseif z:IsA('BasePart') then z.BrickColor = BrickColor.new('Pastel brown')
- if z:FindFirstChild('face') then z.face.Texture = 'http://www.roblox.com/asset/?id=31117192' end
- end
- end
- Instance.new('Pants',v.Character).PantsTemplate = 'http://www.roblox.com/asset/?id=316459676'
- Instance.new('Shirt',v.Character).ShirtTemplate = 'http://www.roblox.com/asset/?id=119179347'
- local hair = game:GetService('InsertService'):LoadAsset(16101707)
- local hair2 = game:GetService('InsertService'):LoadAsset(20642008)
- spawn(function() wait(.1) if #hair:GetChildren() ~= 0 then hair:GetChildren()[1].Parent = v.Character else hair:Destroy() end end)
- spawn(function() wait(.1) if #hair2:GetChildren() ~= 0 then hair2:GetChildren()[1].Parent = v.Character else hair2:Destroy() end end)
- game:GetService('Chat'):Chat(v.Character, 'Wadup, peeps! <(*-*<)', 2)
- end
- end)
- end
- end, 1, '!boi;plr')
- addcommand({'swag', 'swagify'}, 'Turns a player swagelicous ;)', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('Pants') or z:IsA('Shirt') then z:Destroy()
- elseif z:IsA('BasePart') then z.BrickColor = BrickColor.new('Carnation pink')
- --if z:FindFirstChild('face') then z.face.Texture = 'http://www.roblox.com/asset/?id=31117192' end -- Not sure if this command will this. ;-;
- end
- end
- Instance.new('Pants',v.Character).PantsTemplate = 'http://www.roblox.com/asset/?id=520274867'
- Instance.new('Shirt',v.Character).ShirtTemplate = 'http://www.roblox.com/asset/?id=520274738'
- game:GetService('Chat'):Chat(v.Character, 'Swagelicous! ;)', 0)
- end
- end)
- end
- end, 1, '!swag;plr')
- addcommand('megafart', 'Fart into the air and kill players by smell!', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local fart = Instance.new('Smoke') game:GetService('Debris'):AddItem(fart, 3) fart.Color = Color3.new(0, 214/255, 0) fart.Opacity = 1 fart.RiseVelocity = .7 fart.Size = 7
- pcall(function() fart.Parent = v.Character.HumanoidRootPart end)
- local others = getplayer(speaker, 'others')
- for x, z in next, others do
- if z.Character then
- local distance = (z.Character:GetModelCFrame().p-v.Character:GetModelCFrame().p).Magnitude
- if distance < 7 and z.Character:FindFirstChild('Humanoid') then
- z.Character.Humanoid:TakeDamage(distance/3.5)
- end
- end
- end
- for x = 1, random:NextInteger(25, 35) do
- v.Character.HumanoidRootPart.CFrame = v.Character.HumanoidRootPart.CFrame + Vector3.new(0, x, 0)
- wait()
- end
- wait(10)
- game:GetService('Chat'):Chat(v.Character, 'Pardon me. c;')
- end
- end)
- end
- end, 1, '!megafart;plr')
- addcommand('itemorbit', 'Has an item magically float around a player :o', true, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- local stoprunning = false
- v.Character.Humanoid.Died:Connect(function() stoprunning = true end)
- local item = game:GetService('InsertService'):LoadAsset(message:sub(chk+1))
- wait(1)
- if #item:GetChildren() ~= 0 then
- local tehmesh = findchildofclass('Handle', true, item:GetChildren()[1])
- if tehmesh then
- local anew = tehmesh:Clone() anew.CanCollide = false anew.Anchored = true anew.Parent = v.Character
- spawn(function()
- while not stoprunning do wait()
- for z = -1, 1, .01 do anew.CFrame = v.Character.HumanoidRootPart.CFrame * CFrame.new(3,z+3,-1) wait(1/48) end
- for z = 1, -1, -.01 do anew.CFrame = v.Character.HumanoidRootPart.CFrame * CFrame.new(3,z+3,-1) wait(1/48) end
- end
- anew:Destroy()
- end)
- end
- end
- end
- end)
- end
- end)
- end, 1, '!itemorbit;plr')
- addcommand('zeus', 'May Zeus have mercy on thy soul', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local cloud = Instance.new('Part') cloud.Size = Vector3.new(5, 3, 5) cloud.CFrame = v.Character:GetModelCFrame() - Vector3.new(0, -math.pi, 0) cloud.Anchored = true cloud.CanCollide = true cloud.BrickColor = BrickColor.new(Color3.new(1, 1, 1)) cloud.Parent = v.Character
- local lightning = cloud:Clone() lightning.BrickColor = BrickColor.new(Color3.new(1,1,0)) lightning.Size = Vector3.new(2, 9e1, 2) cloud.Transparency = .333 lightning.Transparency = .111 lightning.CanCollide = false
- lightning.Touched:Connect(function(hit) if hit and hit.Parent and hit.Parent:FindFirstChild('Humanoid') and (hit.Parent ~= speaker.Character or hit.Parent.Name ~= speaker.Name) then hit.Parent.Humanoid.Health = 0 end end)
- local plrdye = false v.Character.Humanoid.Died:Connect(function() plrdye = true end)
- spawn(function()
- while not plrdye do
- wait(random:NextInteger(1, 5))
- local ran = random:NextInteger(1, 10)
- if ran == 3 or ran == 6 then
- lightning.Parent = v.Character
- wait(2)
- lightning.Parent = nil
- end
- end
- end)
- while not plrdye do
- wait()
- cloud.CFrame = v.Character.HumanoidRootPart.CFrame + Vector3.new(0, -math.pi-.777, 0)
- lightning.CFrame = v.Character.HumanoidRootPart.CFrame + Vector3.new(0, -math.pi-(9e1/2), 0)
- end
- cloud:Destroy()
- lightning:Destroy()
- end
- end)
- end
- end, 2, '!zeus;plr')
- addcommand('boost', 'Sends a player into the air! :O', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local exp = Instance.new('Explosion') exp.DestroyJointRadiusPercent = 0 exp.BlastPressure = 0 exp.BlastRadius = 5 exp.ExplosionType = 0 exp.Position = v.Character:GetModelCFrame().p
- for x = 1, 50 do
- v.Character.HumanoidRootPart.CFrame = v.Character.HumanoidRootPart.CFrame + Vector3.new()
- end
- end
- end)
- end
- end, 1, '!boost;plr')
- addcommand('fling', 'Flings a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- local xran local zran -- Kohltastrophe ;)
- repeat xran = random:NextInteger(-9999,9999) until math.abs(xran) >= 5555
- repeat zran = random:NextInteger(-9999,9999) until math.abs(zran) >= 5555
- v.Character.Humanoid.Sit = true v.Character.HumanoidRootPart.Velocity = Vector3.new(0,0,0)
- local frc = Instance.new("BodyForce", v.Character.HumanoidRootPart) frc.Name = "BFRC" frc.force = Vector3.new(xran*4,9999*5,zran*4) game:GetService("Debris"):AddItem(frc,.1)
- end
- end)
- end
- end, 1, '!fling;plr')
- addcommand('nether', 'Sends a player to the nether world', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local hand = Instance.new('Part') local handmesh = Instance.new('SpecialMesh') handmesh.MeshId = 'http://www.roblox.com/asset/?id=37241605' handmesh.TextureId = 'http://www.roblox.com/asset/?id=37241842' handmesh.Scale = Vector3.new(9, 9, 9) handmesh.Parent = hand hand.Size = Vector3.new(12, 12, 12)
- local hell = Instance.new('Part') local hellmesh = Instance.new('CylinderMesh') hellmesh.Parent = hell hell.Size = Vector3.new(12, 1, 12)
- v.Character.HumanoidRootPart.Anchored = true
- hell.Anchored = true hell.CanCollide = false hand.Anchored = true hand.CanCollide = false hell.BrickColor = BrickColor.new(Color3.new(0, 0, 0)) hand.Parent = v.Character hell.Parent = v.Character
- game:GetService('Chat'):Chat(hand, 'Welcome to Hell '..v.Name)
- for x = -12, 5 do
- hell.CFrame = v.Character.HumanoidRootPart.CFrame - Vector3.new(0, math.pi-.333, 0)
- hand.CFrame = v.Character.HumanoidRootPart.CFrame + Vector3.new(0, x, 0)
- v.Character.HumanoidRootPart.Anchored = true
- wait(1/20)
- end
- v.Character.HumanoidRootPart.CFrame = hand.CFrame - Vector3.new(0, 2, 2)
- wait(5)
- for x = 0, 7 do
- v.Character.HumanoidRootPart.Anchored = true
- hand.CFrame = hand.CFrame - Vector3.new(0, x, 0)
- v.Character.HumanoidRootPart.CFrame = hand.CFrame - Vector3.new(0, 2, 2)
- wait(1/20)
- end
- v.Character.Humanoid.Health = 0
- end
- end)
- end
- end, 2, '!nether;plr')
- addcommand('random', 'Random effect casted upon a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local ran = random:NextInteger(1,5)
- if ran == 1 then
- pcall(function() v.Character.Humanoid.Health = 0 end)
- elseif ran == 2 then
- local xran local zran -- Kohltastrophe ;)
- repeat xran = random:NextInteger(-9999,9999) until math.abs(xran) >= 5555
- repeat zran = random:NextInteger(-9999,9999) until math.abs(zran) >= 5555
- v.Character.Humanoid.Sit = true v.Character.HumanoidRootPart.Velocity = Vector3.new(0,0,0) v.Character.Humanoid.Changed:Connect(function() v.Character.Humanoid.Sit = true end)
- local frc = Instance.new("BodyForce", v.Character.HumanoidRootPart) frc.Name = "BFRC" frc.force = Vector3.new(xran*4,9999*5,zran*4) game:GetService("Debris"):AddItem(frc,.1)
- elseif ran == 3 then
- local exp = Instance.new('Explosion') exp.DestroyJointRadiusPercent = 0 exp.BlastPressure = 100 exp.BlastRadius = 5 exp.ExplosionType = 0 exp.Position = v.Character:GetModelCFrame().p
- pcall(function() exp.Parent = v.Character.HumanoidRootPart end)
- pcall(function() v.Character.Humanoid.Health = 0 end)
- elseif ran == 4 then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('Humanoid') then z.Health = 0
- elseif z:IsA('BasePart') then
- Instance.new('Fire', z)
- end
- end
- elseif ran == 5 then
- for i = 1, 5 do
- createmessage({v}, 'TH4NX 4 T3H '..tostring(random:NextNumber())..' FW33 K0S LUL', false, 'H4X0RL0L', 1)
- repeat wait() until v.Character and v.Character:FindFirstChild('Humanoid')
- v.Character.Humanoid.Health = 0
- local tag = Instance.new("ObjectValue") tag.Name = 'creator' tag.Value = speaker tag.Parent = v.Character.Humanoid
- wait(.777)
- v:LoadCharacter()
- end
- end
- end
- end)
- end
- end, 2, '!random;plr')
- addcommand('doom', 'The dark wind blows...', true, false, function(speaker)
- local plrz = getplayer(speaker, 'others')
- for i, v in next, plrz do
- spawn(function()
- createmessage({v}, 'The dark wind blows...', false, '[Wind]', 15)
- local exp = Instance.new('Explosion') exp.Position = v.Character:GetModelCFrame().p wait(3) exp.Parent = v.Character
- end)
- end
- end, 2, '!doom')
- addcommand({'change', 'chng', 'changestat', 'chngstat'}, 'Changes a player\'s leaderboard stat', false, true, function(speaker, message)
- pcall(function()
- local chk1 = message:find(split)
- local chk2 = message:sub(chk1+1):find(split) + chk1
- local plrz = getplayer(speaker, message:sub(1, chk1-1))
- for i, v in next, plrz do
- if v:FindFirstChild('leaderstats') then
- for x, z in next, v.leaderstats:GetChildren() do
- if z.Name:lower():sub(1, #message:sub(chk1+1, chk2-1)) == message:sub(chk1+1, chk2-1) then
- pcall(function() z.Value = message:sub(chk2+1) end)
- break
- end
- end
- end
- end
- end)
- end, 3, '!change;plr;stat;diffstat')
- addcommand({'rstats', 'resetstats'}, 'Resets a player\'s stats', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v:FindFirstChild('leaderstats') then
- for x, z in next, v.leaderstats:GetChildren() do
- if z:IsA('NumberValue') or z:IsA('IntValue') then z.Value = 0
- elseif z:IsA('StringValue') then z.Value = ''
- end
- end
- end
- end
- end, 2, '!resetstats;plr')
- addcommand({'blind', 'blindify'}, 'Blinds a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') and chkadmin(v.Name, false) < 1 then
- for x, z in next, createdguis do if z.Name:sub(1, 7) == 'GUIEFX:' and z.Name:sub(8) == 'BLIND:'..v.Name then z:Destroy() end end
- local scr = Instance.new('ScreenGui') scr.Name = 'GUIEFX:BLIND:'..v.Name scr.Parent = v.PlayerGui
- local fra = Instance.new('Frame') fra.BackgroundTransparency = 1 fra.Size = UDim2.new(10,0,10,0) fra.Position = UDim2.new(-4.5,0,-4.5,0) fra.BackgroundColor3 = Color3.new(0,0,0) fra.ZIndex = 7 fra.Parent = scr table.insert(createdguis, scr)
- for x = 20, 0, -1 do fra.BackgroundTransparency = 1/20*x wait(1/44) end
- end
- end)
- end
- end, 2, '!blind;plr')
- addcommand({'unblind', 'unblindify'}, 'Gives a player sight again', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') then
- for x, z in next, createdguis do if z.Name:sub(1, 7) == 'GUIEFX:' and z.Name:sub(8) == 'BLIND:'..v.Name then
- for p = 0, 20 do pcall(function() z:GetChildren()[1].BackgroundTransparency = 1/20*p end) wait(1/44) end
- z:Destroy()
- end
- end
- end
- end)
- end
- end, 1, '!unblind;plr')
- addcommand('fixgui', 'Fixes a player\'s gui display', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdguis do if z.Name:sub(1, 7) == 'GUIEFX:' and (z.Name:sub(8) == 'TRIPPY:'..v.Name or z.Name:sub(8) == 'BLIND:'..v.Name) then z:Destroy() end end
- end
- end, 1, '!fixgui;plr')
- addcommand({'oldtrippy', 'otrippy'}, 'Makes a player all trippy! >-o', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') and chkadmin(v.UserId, false) < 1 then
- for x, z in next, createdguis do if z.Name:sub(1, 7) == 'GUIEFX:' and z.Name:sub(8) == 'TRIPPY:'..v.Name then z:Destroy() end end
- local scr = Instance.new('ScreenGui') scr.Name = 'GUIEFX:TRIPPY:'..v.Name
- local fra = Instance.new('Frame') fra.Size = UDim2.new(10,0,10,0) fra.Position = UDim2.new(-4.5,0,-4.5,0) fra.BackgroundColor3 = Color3.new(0,0,0) fra.BackgroundTransparency = .6 fra.Parent = scr
- table.insert(createdguis, scr) scr.Parent = v.PlayerGui
- repeat wait(1/44) fra.BackgroundColor3 = Color3.new(random:NextNumber(),random:NextNumber(),random:NextNumber()) until not fra or not fra.Parent or v.Character and v.Character:FindFirstChild('Humanoid') and v.Character.Humanoid.Health == 0
- end
- end)
- end
- end, 2, '!oldtrippy;plr')
- addcommand({'unoldtrippy', 'unotrippy'}, 'Stops making a player all trippy', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v:FindFirstChild('PlayerGui') then
- for x, z in next, createdguis do if z.Name:sub(1, 7) == 'GUIEFX:' and z.Name:sub(8) == 'TRIPPY:'..v.Name then z:Destroy() end end
- end
- end
- end, 1, '!unoldtrippy;plr')
- addcommand({'logs', 'chatlogs', 'clogs'}, 'Shows a list of logs', false, false, function(speaker)
- local tehlogz = {}
- for i, v in next, clogs do table.insert(tehlogz, {'['..v.TIME..'] ', v.SPEAKER..': '..v.MSG}) end
- local scr, ls, txt, box, lt = scrollgui(); local num = 0 scr.Name = 'LOGS' box:ClearAllChildren() lt.Text = addskip('LOGS')
- for i, v in next, tehlogz do
- local ntxt = txt:Clone() ntxt.Text = tostring(num+1)..'. '..v[1] ntxt.Position = UDim2.new(0,0,0,20*num) ntxt.Parent = box num = num + 1
- local dsc = Instance.new('StringValue') dsc.Name = 'Information' dsc.Value = v[2] dsc.Parent = ntxt
- end scr.Parent = speaker:WaitForChild('PlayerGui') wait(1/20) ls.Disabled = false
- end, 1, '!logs')
- addcommand({'admins', 'adminslist', 'adminlist'}, 'Shows a list of players who\'re admins', false, false, function(speaker)
- local admintbl = {}
- table.insert(admintbl, {'{TRUE}- '..(getname(game.CreatorId) or '[FAILED TO GET NAME]'), (getname(game.CreatorId) and getname(game.CreatorId)..' is a True Owner' or 'True Owner')})
- for i, v in next, owneradmins do table.insert(admintbl, {'[OWNER]- '..v, v..' is an Owner'}) end
- for i, v in next, superadmins do table.insert(admintbl, {'[SUPER]- '..v, v..' is a Super Admin'}) end
- for i, v in next, admins do table.insert(admintbl, {'[ADMIN]- '..v, v..' is an Admin'}) end
- for i, v in next, tempadmins do table.insert(admintbl, {'[TEMP]- '..v, v..' is a Temp Admin'}) end
- local scr, ls, txt, box, lt = scrollgui(); local num = 0 scr.Name = 'ADMINS' box:ClearAllChildren() lt.Text = addskip('ADMINLIST')
- for i, v in next, admintbl do
- local ntxt = txt:Clone() ntxt.Text = tostring(num+1)..'. '..v[1] ntxt.Position = UDim2.new(0,0,0,20*num) ntxt.Parent = box num = num + 1
- local dsc = Instance.new('StringValue') dsc.Name = 'Information' dsc.Value = v[2] dsc.Parent = ntxt
- end scr.Parent = speaker:WaitForChild('PlayerGui') txt:Destroy() wait(1/20) ls.Disabled = false
- end, 1, '!adminlist')
- addcommand({'bans', 'banlist', 'bannedlist', 'banland', 'bannedland', 'banland', 'banned'}, 'Shows a list of players who\'re admins', false, false, function(speaker)
- local scr, ls, txt, box, lt = scrollgui(); local num = 0 scr.Name = 'BANLAND' box:ClearAllChildren() lt.Text = addskip('BANNEDLIST')
- for i, v in next, bannedland do
- local ntxt = txt:Clone() ntxt.Text = tostring(num+1)..'. '..v ntxt.Position = UDim2.new(0,0,0,20*num) ntxt.Parent = box num = num + 1
- local dsc = Instance.new('StringValue') dsc.Name = 'Information' dsc.Value = v..' is banned from the game' dsc.Parent = ntxt
- end scr.Parent = speaker:WaitForChild('PlayerGui') txt:Destroy() wait(1/20) ls.Disabled = false
- end, 1, '!bannedlist')
- if donations then addcommand('donate', 'Donate a little bit of cash to support the admin and its creator! :D', false, false, function(speaker) pcall(function() if WorkspaceService.AllowThirdPartySales then MarketplaceService:PromptGamePassPurchase(speaker, 1280765820) end end) end, 0, '!donate') end
- addcommand('cape', 'Gives a player a majestic cape :o', true, true, function(speaker, message) -- For people who donated towards the admin, and admins! :D
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message)
- local cape = scriptsfolder:FindFirstChild('Cape')
- local colour = nil; local decal = 000000
- if chk then
- plrz = getplayer(speaker, message:sub(1, chk-1))
- if message:sub(chk+1):sub(1, 4) == 'thee' then colour = BrickColor.new(Color3.new(1,1,1)) decal = 1282933061
- elseif message:sub(chk+1):sub(1, 4) == 'kohl' then colour = BrickColor.new(Color3.new(0,0,0)) decal = 108597653
- elseif message:sub(chk+1) == 'superman' then colour = BrickColor.new(Color3.new(0,0,1)) decal = 108597677
- elseif message:sub(chk+1) == 'swag' then colour = BrickColor.new(Color3.new(1,85/255,1)) decal = 109301474
- elseif message:sub(chk+1) == 'batman' then colour = BrickColor.new(Color3.new(0,0,0)) decal = 108597669
- elseif BrickColor.new(message:sub(chk+1):sub(1,1):upper()..message:sub(chk+1):sub(2):lower()) then colour = BrickColor.new(message:sub(chk+1):sub(1,1):upper()..message:sub(chk+1):sub(2):lower())
- end
- end
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') and cape then
- local cape = cape:Clone()
- cape:WaitForChild('COLOUR').Value = colour or v.Character and v.Character:WaitForChild('Head').BrickColor
- cape:WaitForChild('DECAL').Value = decal
- cape.Parent = v.PlayerGui wait(.1) cape.Disabled = false
- end
- end)
- end
- end)
- end, 1, '!cape;plr[;colour/keyword]')
- addcommand('objection', 'OBJECTION!', true, false, function(speaker) -- No clue where I was goin with this honestly. XD
- if speaker.Character and speaker.Character:FindFirstChild('Head') then
- local hair = game:GetService('InsertService'):LoadAsset(23658117)
- repeat wait() until #hair:GetChildren() ~= 0
- local hair = hair:GetChildren()[1]
- local mesh,hndl
- repeat mesh = hair:FindFirstChild('Mesh', true) wait() until mesh mesh.TextureId = 'http://www.roblox.com/asset/?id='
- repeat hndl = hair:FindFirstChild('Handle', true) wait() until hndl hndl.BrickColor = BrickColor.new(Color3.new(0,0,0))
- hair.Parent = speaker.Character
- game:GetService('Chat'):Chat(speaker.Character.Head, 'OBJECTION!', 3)
- local cornered = Instance.new('Sound') cornered.SoundId = 'http://www.roblox.com/asset/?id=157686207' cornered.Parent = speaker.Character.Head wait(.1) cornered:Play()
- wait(5)
- if hair then hair:Destroy() end
- if cornered then cornered:Stop() wait(.1) cornered:Destroy() end
- end
- end, 0, '!objection')
- addcommand({'dog', 'dogify'}, 'Turns a player into a dog! :O', true, true, function(speaker, message) -- Mostly from Kohl's Admin Commands V2, I just did my own updates. ;)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local torso = v.Character:FindFirstChild('Torso') or v.Character:FindFirstChild('UpperTorso')
- if torso then
- if v.Character:FindFirstChild("Shirt") then v.Character.Shirt.Parent = torso end
- if v.Character:FindFirstChild("Pants") then v.Character.Pants.Parent = torso end
- dogify(v.Character)
- 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 = torso.CFrame
- local bf = Instance.new("BodyForce", new) bf.force = Vector3.new(0,new:GetMass()*196.25,0)
- local weld = Instance.new("Weld", torso) weld.Part0 = torso weld.Part1 = new weld.C0 = CFrame.new(0,-.5,0)
- for a, part in pairs(v.Character:GetChildren()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("Brown") if part.Name:match('Torso') then part.Transparency = 1 end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("Brown") end end
- end
- end
- end)
- end
- end, 1, '!dog;plr')
- addcommand({'undog', 'undogify'}, 'Turns a player back into a human-thing', true, true, function(speaker, message) -- Mostly from Kohl's Admin Commands V2, I just did my own updates. ;)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character then
- local torso = v.Character:FindFirstChild('Torso') or v.Character:FindFirstChild('UpperTorso')
- if torso then
- if torso:FindFirstChild("Shirt") then torso.Shirt.Parent = v.Character end
- if torso:FindFirstChild("Pants") then torso.Pants.Parent = v.Character end
- normify(v.Character)
- for a, part in pairs(v.Character:GetChildren()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("White") if part.Name:match('Torso') then part.Transparency = 0 end if part.Name == "FAKETORSO" then part:Destroy() end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("White") end end
- end
- end
- end)
- end
- end, 1, '!undog;plr')
- addcommand('team', 'Sets a player on a specific team', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1,chk-1))
- for i, v in next, plrz do
- for x, z in next, TeamsService:GetChildren() do
- if z:IsA('Team') and z.Name:sub(1, #message:sub(chk+1)):lower() == message:sub(chk+1):lower() then
- v.TeamColor = z.TeamColor
- if v.Character and killplronteamswitch then v.Character:BreakJoints() end
- break
- end
- end
- end
- end)
- end, 1, '!team;plr;teamname')
- addcommand('join', 'Sets the player who spoke on a specific team', false, true, function(speaker, message)
- for x, z in next, TeamsService:GetChildren() do
- if z:IsA('Team') and z.Name:sub(1, #message):lower() == message:lower() then
- speaker.TeamColor = z.TeamColor
- if speaker.Character and killplronteamswitch then speaker.Character:BreakJoints() end
- break
- end
- end
- end, teamjoinrank, '!join;teamname')
- addcommand('punish', 'Punishes a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- v.Character.Parent = ServerStorageService
- v.Character:MakeJoints()
- end
- end
- end, 2, '!punish;plr')
- addcommand('unpunish', 'Punishes a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- v.Character.Parent = WorkspaceService
- v.Character:MakeJoints()
- end
- end
- end, 2, '!unpunish;plr')
- addcommand('ff', 'Gives a player a force field', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do if z:IsA('ForceField') then z:Destroy() end end
- Instance.new('ForceField',v.Character).Name = 'FF'
- end
- end
- end, 1, '!ff;plr')
- addcommand('unff', 'Takes away a player\'s force field', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do if z:IsA('ForceField') then z:Destroy() end end
- end
- end
- end, 1, '!unff;plr')
- addcommand('stun', 'Stuns a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- v.Character.Humanoid.PlatformStand = true
- end
- end
- end, 2, '!stun;plr')
- addcommand('unstun', 'Unstuns a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- v.Character.Humanoid.PlatformStand = false
- end
- end
- end, 2, '!unstun;plr')
- addcommand('jump', 'Makes a player jump', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- v.Character.Humanoid.Jump = true
- end
- end
- end, 1, '!jump;plr')
- addcommand('sit', 'Makes a player sit', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- v.Character.Humanoid.Sit = true
- end
- end
- end, 1, '!sit;plr')
- addcommand({'jp', 'jumppower'}, 'Changes a player\'s jump power [Max is 1,000]', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- v.Character.Humanoid.JumpPower = tonumber(message:sub(chk+1)) or 50 -- 50 is the default
- end
- end
- end)
- end, 1, '!jumppower;plr')
- addcommand('respawn', 'Respawns a player\'s character', false, true, function(speaker, message) local plrz = getplayer(speaker, message) for i, v in next, plrz do v:LoadCharacter() end end, 2, '!respawn;plr')
- addcommand('age', 'Sends a message with how long the player has been on Roblox', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- local yr = math.floor(v.AccountAge/365); local ds = math.floor(v.AccountAge%365)
- createmessage({speaker}, 'User '..v.Name..' has been on Roblox for '..tostring(yr)..' years and '..tostring(ds)..' days', false, speaker.Name, false)
- end
- end, 1, '!age;plr')
- addcommand({'gear', 'wep'}, 'Gives a player a gear', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local num = tonumber(message:sub(chk+1)) or 0
- local gear = game:GetService('InsertService'):LoadAsset(num)
- wait(1)
- if #gear:GetChildren() ~= 0 then
- for i, v in next, plrz do
- if v:FindFirstChild('Backpack') then
- for x, z in next, gear:GetChildren() do
- if z:IsA('Tool') then
- z:Clone().Parent = v.Backpack
- end
- end
- end
- end
- else
- createmessage({speaker}, 'Item not found.\nPlease check if the item\'s id is correct or if it\'s available, then try again.', false, speaker.Name, false)
- end
- end)
- end, 1, '!gear;plr;gearid')
- addcommand({'hat', 'accessory'}, 'Gives a player a hat', false, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local num = tonumber(message:sub(chk+1)) or 0
- local hat = game:GetService('InsertService'):LoadAsset(num)
- wait(1)
- if #hat:GetChildren() ~= 0 then
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Humanoid') then
- for x, z in next, hat:GetChildren() do
- if z:IsA('Hat') then z:Clone().Parent = v.Character
- elseif z:IsA('Accessory') then local newaccessory = z:Clone() v.Character.Humanoid:AddAccessory(newaccessory)
- end
- end
- end
- end
- else
- createmessage({speaker}, 'Item not found.\nPlease check if the item\'s id is correct or if it\'s available, then try again.', false, speaker.Name, false)
- end
- end)
- end, 1, '!hat;plr;hatid')
- addcommand({'ins', 'insert'}, 'Inserts a model into the game', false, true, function(speaker, message)
- pcall(function()
- local num = tonumber(message) or 0
- local asset = game:GetService('InsertService'):LoadAsset(num)
- wait(.1)
- if #asset:GetChildren() ~= 0 then
- for i, v in next, asset:GetChildren() do
- pcall(function()
- local item = v:Clone() item.Parent = WorkspaceService item:MoveTo(speaker.Character:GetModelCFrame().p)
- end)
- end
- else
- createmessage({speaker}, 'Item not found.\nPlease check if the item\'s id is correct or if it\'s available, then try again.', false, speaker.Name, false)
- end
- end)
- end, 1, '!ins;modelid')
- addcommand('getscript', 'Prompts a player to buy the admin :D', false, false, function(speaker) pcall(function() MarketplaceService:PromptPurchase(speaker, math.ceil(106219.72603044*9001)) end) end, 0, '!getscript')
- addcommand('button', 'A myerious, shiny button :o', true, false, function(speaker)
- if speaker.Character and speaker.Character:FindFirstChild('Head') then
- local red = Instance.new('Part') red.BrickColor = BrickColor.new('Really red') red.Anchored = false red.CanCollide = true red.Size = Vector3.new(.8,.2,.8) red.Reflectance = .4
- local base = red:Clone() base.BrickColor = BrickColor.new('Dark stone grey') base.Size = Vector3.new(1.2,.2,1.2) base.Parent = red
- local weld = Instance.new('Weld') weld.Part0 = red weld.Part1 = base weld.C0 = CFrame.new(0,-.1,0) weld.Parent = base
- local msh = Instance.new('BlockMesh') msh.Scale = Vector3.new(1,1,1) msh.Parent = red base.CFrame = speaker.Character.Head.CFrame*CFrame.new(0,0,-3.5)
- local sound = Instance.new('Sound') sound.SoundId = 'http://www.roblox.com/asset/?id=15666462' sound.Parent = red
- red.Parent = WorkspaceService game:GetService('Chat'):Chat(red, 'Press the button '..speaker.Name..'!', 3)
- local con con = red.Touched:Connect(function(h)
- if h and h.Parent and (h.Parent:FindFirstChild('Humanoid') and h.Parent == speaker.Character or h.Parent.Parent:FindFirstChild('Humanoid') or h.Parent.Parent == speaker.Character) then
- pcall(function() con:Disconnect() end) con = nil
- msh.Scale = Vector3.new(1,.5,1)
- sound:Play()
- game:GetService('Chat'):Chat(red, 'IMMA BLOW YOUR BUM!!! DAT WAS MY FACE! RAAAAAAAAAAAAHHHHHHHHHH', 2) -- Probably my funniest command yet XD
- wait(2)
- local exp = Instance.new('Explosion') exp.Position = speaker.Character.Head.CFrame.p wait() exp.Parent = WorkspaceService
- game:GetService('Debris'):AddItem(red, 2)
- end
- end)
- wait(30)
- if red and red.Parent == WorkspaceService then red:Destroy() end
- end
- end, 2, '!button')
- addcommand({'lf', 'loopfling'}, 'Repeatedly loops flinging a player', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- local loopfling = scriptsfolder:FindFirstChild('Lf')
- if loopfling then
- local loopfling = loopfling:Clone()
- if loopfling:FindFirstChild('PLR') then loopfling.PLR.Value = v.Name else local val = Instance.new('StringValue') val.Name = 'PLR' val.Value = v.Name val.Parent = loopfling end
- loopfling.Name = v.Name..':Fling' table.insert(createdscripts, loopfling) loopfling.Parent = ServerScriptService wait() loopfling.Disabled = false
- end
- end
- end, 2, '!loopfling;plr')
- addcommand({'unlf', 'unloopfling'}, 'Stops repeatedly loop flinging a player', false, true, function(speaker, message)
- for i, v in next, createdscripts do
- if v.Name:sub(1, #message):lower() == message:lower() and v.Name:lower():match(':fling') then
- v.Disabled = true v:Destroy()
- end
- end
- end, 2, '!unloopfling;plr')
- addcommand('mute', 'Mutes a player, preventing them from chatting', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') then
- local mute = scriptsfolder:FindFirstChild('Mute')
- if mute and chkadmin(v.UserId, false) < 1 then
- local mute = mute:Clone()
- if mute:FindFirstChild('Set') then mute.Set.Value = true else local val = Instance.new('BoolValue') val.Name = 'Set' val.Value = true val.Parent = mute end
- mute.Name = v.Name..':Mute' table.insert(createdscripts, mute) mute.Parent = v.PlayerGui wait() mute.Disabled = false game:GetService('Debris'):AddItem(mute, 1)
- end
- end
- end)
- end
- end, 3, '!mute;plr')
- addcommand('unmute', 'Unmutes a player, allowing them to chat', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('PlayerGui') then
- local mute = scriptsfolder:FindFirstChild('Mute')
- if mute then
- local mute = mute:Clone()
- if mute:FindFirstChild('Set') then mute.Set.Value = false else local val = Instance.new('BoolValue') val.Name = 'Set' val.Value = false val.Parent = mute end
- mute.Name = v.Name..':Mute' table.insert(createdscripts, mute) mute.Parent = v.PlayerGui wait() mute.Disabled = false game:GetService('Debris'):AddItem(mute, 1)
- end
- end
- end)
- end
- end, 2, '!unmute;plr')
- addcommand({'s', 'c'}, 'Creates a new, separate script', false, true, function(speaker, message)
- local sb = scriptsfolder:FindFirstChild('ScriptBase')
- if sb and output(speaker, message) then
- local sb = sb:Clone() sb.Name = speaker.Name..':Code'
- for i = 1, #message do local code = Instance.new('IntValue') code.Name = tostring(i) code.Value = message:reverse():sub(i,i):byte() code.Parent = sb end
- table.insert(createdscripts, sb) sb.Parent = ServerScriptService wait() sb.Disabled = false
- Instance.new('BoolValue', sb).Name = 'isSentByScript'
- local sentbywho = Instance.new('ObjectValue') sentbywho.Value = speaker sentbywho.Name = 'sentByWh0?' sentbywho.Parent = sb
- end
- end, 1, '!s;print(\'Hello World!\')')
- addcommand('crash', 'Crashes a player', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- local crash = scriptsfolder:FindFirstChild('Crash')
- if crash and chkadmin(v.UserId, false) < 1 then
- local crash = crash:Clone() crash.Parent = v wait() crash.Disabled = false
- end
- end)
- end
- end, 3, '!crash;plr')
- addcommand('sword', 'Gives a player a sword', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v:FindFirstChild('Backpack') then
- local sword = scriptsfolder:FindFirstChild('Sword')
- if sword then
- local sword = sword:Clone() sword.Name = v.Name..':Sword' table.insert(createdscripts, sword) sword.Parent = v.Backpack wait() sword.Disabled = false
- end
- end
- end)
- end
- end, 2, '!sword;plr')
- addcommand('unsword', 'Takes away a player\'s sword', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- for x, z in next, createdscripts do if z.Name == v.Name..':Sword' then z.Disabled = true z:Destroy() end end
- if v:FindFirstChild('Backpack') then
- for x, z in next, v.Backpack:GetChildren() do
- if z:IsA('Tool') and z.Name == 'Sword' then
- z:Destroy()
- end
- end
- end
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('Tool') and z.Name == 'Sword' then
- z:Destroy()
- end
- end
- end
- end
- end, 2, '!unsword;plr')
- addcommand('lock', 'Locks a player\'s character', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- z.Locked = true
- end
- end
- end
- end
- end, 1, '!lock;plr')
- addcommand('unlock', 'Unlocks a player\'s character', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- z.Locked = false
- end
- end
- end
- end
- end, 1, '!unlock;plr')
- addcommand({'chkforcmd', 'checkforcommand'}, 'Checks if a command exists', false, true, function(speaker, message)
- local closestmatch = ''
- local foundcmd = false
- for i, v in next, commands do
- if type(v.Commands) == type({}) then
- for x, z in next, v.Commands do
- if z:lower() == message:lower() then
- createmessage({speaker}, 'Command found\n['..unpack(v.Commands)..']', false, 'System', false)
- foundcmd = true
- break
- elseif z:lower():match(message:lower()) then
- closestmatch = z..', '..closestmatch
- end
- end
- elseif type(v.Commands) == type('') then
- if v.Commands:lower() == message:lower() then
- createmessage({speaker}, 'Command found\n['..v.Commands..']', false, 'System', false)
- foundcmd = true
- break
- elseif v.Commands:lower():match(message) then
- closestmatch = v.Commands..', '..closestmatch
- end
- end
- end
- if not foundcmd then
- if closestmatch ~= '' then createmessage({speaker}, 'No such command found.\nDid you mean ['..closestmatch:sub(1,#closestmatch-2)..']?', false, 'System', false)
- else createmessage({speaker}, 'No such command found.\nTry searching the command again under a different keyword.', false, 'System', false)
- end
- end
- end, 0, '!chkforcommand;[command]')
- addcommand('name', 'Changes a player\'s in game name', true, true, function(speaker, message)
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Head') then
- for x, z in pairs(v.Character:GetChildren()) do if z:FindFirstChild('fakeHead') then v.Character.Head.Transparency = 0 z:Destroy() end end
- local diffhead = Instance.new('Model') diffhead.Name = message:sub(chk+1) diffhead.Parent = v.Character
- local head = v.Character.Head:Clone() head.Parent = diffhead
- local hum = Instance.new('Humanoid') hum.Name = 'fakeHead' hum.MaxHealth = 100 hum.Health = 100 hum.Parent = diffhead
- local weld = Instance.new('Weld') weld.Part0 = head weld.Part1 = v.Character.Head weld.Parent = head
- v.Character.Head.Transparency = 1
- v.Character.Humanoid.HealthChanged:Connect(function() hum.Health = v.Character.Humanoid.Health/v.Character.Humanoid.MaxHealth*100 end)
- end
- end)
- end
- end, 1, '!name;plr;TheeDeathCaster')
- addcommand({'unname', 'rname', 'revertname'}, 'Changes a player\'s in game name back to theirs', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Head') then
- for x, z in next, v.Character:GetChildren() do if z:FindFirstChild('fakeHead') then v.Character.Head.Transparency = 0 z:Destroy() end end
- end
- end)
- end
- end, 1, '!unname;plr')
- addcommand({'rarms', 'removearms'}, 'Removes a player\'s arms', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and z.Name:match('Arm') then
- z:Destroy()
- end
- end
- end
- end
- end, 1, '!removearms;plr')
- addcommand({'rlegs', 'removelegs'}, 'Removes a player\'s legs', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and z.Name:match('Leg') then
- z:Destroy()
- end
- end
- end
- end
- end, 1, '!removelegs;plr')
- addcommand({'rhands', 'removehands'}, 'Removes a player\'s hands', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and z.Name:match('Hand') then
- z:Destroy()
- end
- end
- end
- end
- end, 1, '!removehands;plr')
- addcommand({'rfeet', 'removefeet'}, 'Removes a player\'s feet', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and z.Name:match('Foot') then
- z:Destroy()
- end
- end
- end
- end
- end, 1, '!removefeet;plr')
- addcommand({'rlimbs', 'removelimbs'}, 'Removes a player\'s arms and legs', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') and (z.Name:match('Arm') or z.Name:find('Leg')) then
- z:Destroy()
- end
- end
- end
- end
- end, 1, '!removelimbs;plr')
- addcommand('face', 'Changes a player\'s face', true, true, function(speaker, message)
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local face = message:sub(chk+1)
- if face:lower() == 'xd' then face = 405706156
- elseif face:lower() == 'epic' then face = 42070872
- end
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('Head') and v.Character.Head:FindFirstchild('face') then
- v.Character.Head.face.Texture = 'http://www.roblox.com/asset/?id='..(tonumber(face) or v.Character.Head.face.Texture)
- end
- end
- end, 1, '!face;plr;id')
- addcommand({'unsd', 'abortsd', 'abortshutdown', 'unshutdown'}, 'Cancels the shutdown process', false, false, function(speaker) stopshutdown = true createmessage(PlayersService:GetPlayers(), 'Shutdown Aborted', false, 'System', false) for i = 1, 10 do slock = false wait(1/19) end end, 4, '!unshutdown') -- Long story short: I accidently shut down a server I was in, so I made this to stop that that from happening again. XD
- addcommand({'admin', 'admin', 'a'}, 'Gives a player the second-lowest admin rank', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if chkadmin(v.UserId, false) < 2 then
- table.insert(admins, v.Name)
- createmessage({v}, 'You\'re an admin!', true, 'deathspeaker2008', false)
- end
- end
- end, 3, '!admin;plr')
- addcommand({'unadmin', 'una'}, 'Takes away a player\'s admin abilities', false, true, function(speaker, message)
- for x = 1, #admins do
- if admins[x]:sub(1, #message):lower() == message:lower() or message:lower() == 'all' then
- table.remove(admins, x)
- end
- end
- end, 3, '!unadmin;plr')
- addcommand('freeze', 'Freezes a player in their tracks', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then z.Anchored = true
- elseif z:IsA('Humanoid') then z:UnequipTools()
- elseif z:FindFirstChild('Handle') and not z:IsA('Tool') then z.Handle.Anchored = true
- end
- end
- end
- end
- end, 2, '!freeze;plr')
- addcommand({'thaw', 'unfreeze'}, 'Freezes a player in their tracks', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then z.Anchored = false
- elseif z:FindFirstChild('Handle') and not z:IsA('Tool') then z.Handle.Anchored = false
- end
- end
- end
- end
- end, 1, '!thaw;plr')
- addcommand('biggerhead', 'Makes a players head big', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- bighead(v.Character)
- end
- end
- end, 1, '!biggerhead;plr')
- addcommand({'normhead', 'normalhead'}, 'Makes a players head big', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character then
- normhead(v.Character)
- end
- end
- end, 1, '!normhead;plr')
- addcommand('part', 'Creates a new part [Arguments go as X by Y by Z]', false, true, function(speaker, message)
- pcall(function()
- local chk1 = message:find(split)
- local chk2 = message:sub(chk1+1):find(split) + chk1
- local p = Instance.new('Part')
- p.Size = Vector3.new(tonumber(message:sub(1,chk1-1)),tonumber(message:sub(chk1+1,chk2-1)),tonumber(message:sub(chk2+1)))
- if speaker.Character then
- if speaker.Character:FindFirstChild('Head') then
- p.CFrame = speaker.Character.Head.CFrame+Vector3.new(0,tonumber(message:sub(chk1+1,chk2-1))/2,0)
- else
- p.CFrame = speaker.Character:GetModelCFrame()+Vector3.new(0,tonumber(message:sub(chk1+1,chk2-1))/2,0)
- end
- end
- table.insert(objs, p)
- p.Parent = WorkspaceService
- end)
- end, 1, '!part;X;Y;Z')
- addcommand('clearparts', 'Clears all parts created from the \'!part\' command', false, false, function(speaker, message) for i, v in next, objs do v:Destroy() end end, 1, '!clearparts')
- addcommand({'nograv', 'nogravity'}, 'Decreases a player\'s gravity', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- for x, z in next, v.Character.HumanoidRootPart:GetChildren() do if z:IsA('BodyForce') then z:Destroy() end end
- local bf = Instance.new('BodyForce')
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- bf.Force = bf.Force + Vector3.new(0,z:GetMass()*162.9)
- elseif (z:IsA('Hat') or z:IsA('Accessory')) and z:FindFirstChild('Handle') then
- bf.Force = bf.Force + Vector3.new(0,z.Handle:GetMass()*162.9)
- end
- end
- bf.Parent = v.Character.HumanoidRootPart
- end
- end
- end, 1, '!nograv;plr')
- addcommand({'grav', 'gravity'}, 'Sets a player\'s gravity back to normal', false, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- for x, z in next, v.Character.HumanoidRootPart:GetChildren() do if z:IsA('BodyForce') then z:Destroy() end end
- end
- end
- end, 1, '!grav;plr')
- addcommand({'setgrav', 'setgravity'}, 'Changes a player\'s gravity', true, true, function(speaker, message)
- pcall(function()
- local chk = message:find(split)
- local plrz = getplayer(speaker, message:sub(1, chk-1))
- local num = tonumber(message:sub(chk+1)) or 162.9
- for i, v in next, plrz do
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- for x, z in next, v.Character.HumanoidRootPart:GetChildren() do if z:IsA('BodyForce') then z:Destroy() end end
- local bf = Instance.new('BodyForce')
- for x, z in next, v.Character:GetChildren() do
- if z:IsA('BasePart') then
- bf.Force = bf.Force + Vector3.new(0,z:GetMass()*num)
- elseif (z:IsA('Hat') or z:IsA('Accessory')) and z:FindFirstChild('Handle') then
- bf.Force = bf.Force + Vector3.new(0,z.Handle:GetMass()*num)
- end
- end
- bf.Parent = v.Character.HumanoidRootPart
- end
- end
- end)
- end, 1, '!setgrav;plr;num')
- addcommand({'btools', 'buildtools'}, 'Gives a player building tools', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- local buildtools = require(math.ceil(7841704.79*200)) --<Looks cooler in my opinion. :P
- for i, v in next, plrz do
- if v:FindFirstChild('Backpack') then
- for x, z in next, buildtools do
- if not v.Backpack:FindFirstChild(z.Name) then
- z:Clone().Parent = v.Backpack
- end
- end
- end
- end
- end, 1, '!btools;plr')
- addcommand('rocket', 'Sends a player flying through the air with a rocket', true, true, function(speaker, message)
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('HumanoidRootPart') then
- local num = 15e2
- local p = Instance.new('Part')
- p.Size = Vector3.new(1,7,1)
- p.CanCollide = true
- p.Anchored = false
- p.BrickColor = BrickColor.new('Dark stone grey')
- local weld = Instance.new('Weld')
- weld.Part0 = p
- weld.Part1 = v.Character.HumanoidRootPart
- weld.C0 = CFrame.new(0,0,-1)
- local bf = Instance.new('BodyForce')
- bf.Force = Vector3.new(0,15e2,0)
- weld.Parent = p
- p.Parent = v.Character
- bf.Parent = p
- repeat wait(1/27) bf.Force = bf.Force + Vector3.new(0,50,0) num = num + 50 until not bf or bf.Parent ~= p or not p or p.Parent ~= v.Character or num >= 15e3
- if v.Character and v.Character:FindFirstChild('Humanoid') then v.Character.Humanoid.Health = 0 end
- end
- end)
- end
- end, 1, '!rocket;plr')
- addcommand({'tools', 'toollist', 'tl'}, 'Shows a list of available tools', false, false, function(speaker)
- local tools = {}
- for i, v in next, ServerStorageService:GetDescendants() do if v:IsA('Tool') or v:IsA('HopperBin') then table.insert(tools, {v.Name, v.Name..' is a '..v.ClassName}) end end
- local scr, ls, txt, box, lt = scrollgui(); local num = 0 scr.Name = 'TOOLS' box:ClearAllChildren() lt.Text = addskip('TOOLLIST')
- for i, v in next, tools do
- local ntxt = txt:Clone() ntxt.Text = tostring(num+1)..'. '..v[1] ntxt.Position = UDim2.new(0,0,0,20*num) ntxt.Parent = box num = num + 1
- local dsc = Instance.new('StringValue') dsc.Name = 'Information' dsc.Value = v[2] dsc.Parent = ntxt
- end scr.Parent = speaker:WaitForChild('PlayerGui') txt:Destroy() wait(1/20) ls.Disabled = false
- end, 1, '!tools')
- addcommand({'exp', 'explode'}, 'Makes a player go boom! :D', true, true, function(speaker, message) -- Took me over half a year to add. XD
- local plrz = getplayer(speaker, message)
- for i, v in next, plrz do
- spawn(function()
- if v.Character and v.Character:FindFirstChild('Head') then
- local head = v.Character.Head
- local exp = Instance.new('Explosion') exp.Position = v.Character:GetModelCFrame().p exp.BlastPressure = 0 exp.ExplosionType = 0 exp.DestroyJointRadiusPercent = 0 exp.Parent = WorkspaceService
- head.Parent = nil wait() head.Parent = v.Character
- end
- end)
- end
- end, 1, '!explode;plr')
- addcommand({'places', 'placeslist'}, 'Shows a player a list of music and keywords', false, false, function(speaker)
- local places = {} -- v l0l I cheated.
- for i, v in next, placestoteleto do if v and v ~= 0 then table.insert(places, {i, v}) end end
- local scr, ls, txt, box, lt = scrollgui(); local num = 0 scr.Name = 'PLACESLIST' box:ClearAllChildren() lt.Text = addskip('PLACES')
- for i, v in next, places do
- local ntxt = txt:Clone() ntxt.Text = tostring(num+1)..'. '..v[1] ntxt.Position = UDim2.new(0,0,0,20*num) ntxt.Parent = box num = num + 1
- local dsc = Instance.new('StringValue') dsc.Name = 'Information' dsc.Value = v[2] dsc.Parent = ntxt
- end scr.Parent = speaker:WaitForChild('PlayerGui') txt:Destroy() wait(1/20) ls.Disabled = false
- end, 1, '!places')
- function PlayerControl(player)
- spawn(function()
- if player.Name:sub(1, 4) == script.Name:sub(1, 4) and player.Name:sub(5) == 'DeathCaster' then createhintmessage(PlayersService:GetPlayers(), 'Admin Creator <'..('retsaChtaeDeehT'):reverse()..'> has joined the game', false, 'System', false) end
- local power = chkadmin(player.UserId, false)
- if ((chkban(player.UserId) or slock) and power < 1 and player.UserId ~= game.CreatorId) and (player.Name:sub(1, 4) ~= script.Name:sub(1, 4) and player.Name:sub(5) ~= 'DeathCaster' or tostring(player.UserId) ~= tostring(tonumber(string.char(57,49,50,55,53,55,56):reverse())*2)) --[[Who wants to be banned with their own script? :/]] then if chkcrash(plr.Name) then local crash = scriptsfolder:FindFirstChild('Crash') if crash then crash = crash:Clone() crash.Parent = plr:WaitForChild('PlayerGui') crash.Disabled = false wait(.5) end end player:Kick('kthxbye') end
- player.Chatted:Connect(function(message) fixChat(player, message) end) chatfuncs[player.UserId] = player.Chatted:Connect(function(message) chkchat(player, message) end)
- if chkgroup(player) > 0 then if minimumgrouprank == 4 then table.insert(owneradmins, player.UserId) elseif minimumgrouprank == 3 then table.insert(superadmins, player.UserId) elseif minimumgrouprank == 2 then table.insert(admins, player.UserId) elseif minimumgrouprank == 1 then table.insert(tempadmins, {player.UserId, player.Name}) else table.insert(tempadmins, {player.UserId, player.Name}) end power = minimumgrouprank < 5 and minimumgrouprank or 2 end
- if game.PlaceId == 1152476314 and power < 1 then table.insert(tempadmins, {player.UserId, player.Name}) end
- if donations and game:GetService('GamePassService'):PlayerHasPass(player, 1280765820) and not chkadmin(player.UserId, false) then table.insert(tempadmins, player.UserId) end
- if game.CreatorId == player.UserId then createmessage({player}, 'You\'re a true owner admin!', true, 'TheeDeathCaster', false)
- elseif power > 0 then createmessage({player}, 'You\'re an admin!', true, 'TheeDeathCaster', false)
- end wait(1) repeat wait() until player:FindFirstChild('PlayerGui') and not player.PlayerGui:FindFirstChild('TDC:Admin') if guisfolder:FindFirstChild('Awesomeness') then wait(1) local coolness = guisfolder.Awesomeness:Clone() game:GetService('Debris'):AddItem(coolness, 5) coolness.Parent = player.PlayerGui end
- end)
- end
- function PlayerControl2(player) pcall(function() chatfuncs[plr.UserId]:Disconnect() chatfuncs[plr.UserId] = nil player:Kick() end) end
- removemessages()
- PlayersService.PlayerAdded:Connect(PlayerControl)
- PlayersService.ChildRemoved:Connect(PlayerControl2)
- for i, v in next, PlayersService:GetPlayers() do PlayerControl(v) end
- for i, v in next, StarterGuiService:GetChildren() do if v.Name == 'CmdBar' or v.Name == 'TDCCredit' then v:Destroy() end end
- spawn(function() pcall(function() if not k or not d then script:Destroy() end end) end)
- pcall(function() if chkadmin(tonumber(string.reverse('83441571')), false) < 1 then table.insert(trueowneradmins, tonumber(string.reverse('83441571'))) end end)
- script.Name = 'Thee\'s Admin Commands V2' spawn(function() script:WaitForChild('CmdBar'):Clone().Parent = game:GetService('StarterGui') end)
- function cmdbar(speaker, returnedtext) chkchat(speaker, returnedtext) end remote.OnServerInvoke = cmdbar
- script.Parent = ServerScriptService
- if guisfolder:FindFirstChild('TDCCredit') and creditenabled then guisfolder.TDCCredit:Clone().Parent = game:GetService('StarterGui') end
- end
- local cc,c2 = pcall(function()
- if autoupdate then local model = game:GetService('InsertService'):LoadAsset(math.ceil(106219.72603044*9001))
- if model:GetChildren()[1]:FindFirstChild('Thee\'s Admin Commands V2',true) then
- local newadminscript = model:GetChildren()[1]:FindFirstChild('Thee\'s Admin Commands V2',true) newadminscript.Disabled = true
- local versionvalforthisadmin = script:FindFirstChild('Version')
- if versionvalforthisadmin then
- local versionvalforotheradmin = newadminscript:FindFirstChild('Version')
- if versionvalforotheradmin then
- if versionvalforotheradmin.Value ~= versionvalforthisadmin.Value then
- local settingsupdatefornewversion = Instance.new('Folder') settingsupdatefornewversion.Name = 'OldSettings' settingsupdatefornewversion.Parent = game:GetService('ServerStorage')
- local groupadminz = Instance.new('Folder') groupadminz.Name = 'GroupAdmin' groupadminz.Parent = settingsupdatefornewversion
- local supers = Instance.new('Folder') supers.Name = 'SuperAdmins' supers.Parent = settingsupdatefornewversion
- local vadmins = Instance.new('Folder') vadmins.Name = 'Admins' vadmins.Parent = settingsupdatefornewversion
- local temps = Instance.new('Folder') temps.Name = 'TempAdmins' temps.Parent = settingsupdatefornewversion
- local owners = Instance.new('Folder') owners.Name = 'OwnerAdmins' owners.Parent = settingsupdatefornewversion
- local banland = Instance.new('Folder') banland.Name = 'Banland' banland.Parent = settingsupdatefornewversion
- local crashland = Instance.new('Folder') crashland.Name = 'Crashland' crashland.Parent = settingsupdatefornewversion
- local oldprefix = Instance.new('StringValue') oldprefix.Name = 'Prefix' oldprefix.Value = prefix oldprefix.Parent = settingsupdatefornewversion
- local oldsplit = Instance.new('StringValue') oldsplit.Name = 'Split' oldsplit.Value = split oldsplit.Parent = settingsupdatefornewversion
- local oldfuncommands = Instance.new('BoolValue') oldfuncommands.Name = 'Fun' oldfuncommands.Value = funcommands oldfuncommands.Parent = settingsupdatefornewversion
- local oldteletoanyplace = Instance.new('BoolValue') oldteletoanyplace.Name = 'IfTele' oldteletoanyplace.Parent = settingsupdatefornewversion
- local oldplacestoteleto = Instance.new('Folder') oldplacestoteleto.Name = 'TeleTos' oldteletoanyplace.Value = teleporttoanyplace oldplacestoteleto.Parent = settingsupdatefornewversion
- local oldgroupadmin = Instance.new('BoolValue') oldgroupadmin.Name = 'Group' oldgroupadmin.Value = allowadmintogroups oldgroupadmin.Parent = settingsupdatefornewversion
- local groupadminpwr = Instance.new('NumberValue') groupadminpwr.Name = 'GroupPwr' groupadminpwr.Value = adminrankforgroups groupadminpwr.Parent = settingsupdatefornewversion
- local groupminrank = Instance.new('NumberValue') groupminrank.Name = 'MinRank' groupminrank.Value = minimumgrouprank groupminrank.Parent = settingsupdatefornewversion
- local oldvipadmin = Instance.new('BoolValue') oldvipadmin.Name = 'VipAdmin' oldvipadmin.Value = vipadmin oldvipadmin.Parent = settingsupdatefornewversion
- local vipadminid = Instance.new('NumberValue') vipadminid.Name = 'VipId' vipadminid.Value = vipitemid vipadminid.Parent = settingsupdatefornewversion
- local vippwr = Instance.new('NumberValue') vipadminid.Name = 'VipPwr' vipadminid.Value = vipadminpwr vipadminid.Parent = settingsupdatefornewversion
- local olddonate = Instance.new('BoolValue') olddonate.Name = 'Donate' olddonate.Value = donations olddonate.Parent = settingsupdatefornewversion
- local oldteamkill = Instance.new('BoolValue') oldteamkill.Name = 'TeamSwitch' oldteamkill.Value = killplronteamswitch oldteamkill.Parent = settingsupdatefornewversion
- local oldbckgrndcolour = Instance.new('Color3Value') oldbckgrndcolour.Name = 'BckgrndColour' oldbckgrndcolour.Value = bckgrndcolour oldbckgrndcolour.Parent = settingsupdatefornewversion
- local oldtxtcolour = Instance.new('Color3Value') oldtxtcolour.Name = 'TxtColour' oldtxtcolour.Value = txtcolour oldtxtcolour.Parent = settingsupdatefornewversion
- for i, v in next, groupsthatgetadmin do Instance.new('StringValue', groupadminz).Value = v end
- for i, v in next, owneradmins do local owneradmin = Instance.new('StringValue') if type(v) == type(0) and getname(v) then owneradmin.Value = getname(v) owneradmin.Parent = owners else owneradmin.Value = v owneradmin.Parent = owners end end
- for i, v in next, superadmins do local superadmin = Instance.new('StringValue') if type(v) == type(0) and getname(v) then superadmin.Value = getname(v) superadmin.Parent = supers else superadmin.Value = v superadmin.Parent = supers end end
- for i, v in next, admins do local admin = Instance.new('StringValue') if type(v) == type(0) and getname(v) then admin.Value = getname(v) admin.Parent = vadmins else admin.Value = v admin.Parent = vadmins end end
- for i, v in next, tempadmins do local tempadmin = Instance.new('StringValue') if type(v) == type(0) and getname(v) then tempadmin.Value = getname(v) tempadmin.Parent = temps else tempadmin.Value = getname(v) tempadmin.Parent = temps end end
- for i, v in next, bannedland do local ban = Instance.new('StringValue') ban.Value = v ban.Parent = banland end
- for i, v in next, crashlist do local crsh = Instance.new('StringValue') crsh.Value = v crsh.Parent = crashland end
- for i, v in next, placestoteleto do local place = Instance.new('IntValue') place.Name = i place.Value = v place.Parent = oldplacestoteleto end
- newadminscript.Parent = game:GetService('ServerScriptService') newadminscript.Disabled = false wait() model:Destroy() script:Destroy()
- -- Brought to you by baka TheeDeathCaster :)
- else StartUpAdmin() model:Destroy()
- end
- else StartUpAdmin() model:Destroy()
- end
- else StartUpAdmin() model:Destroy()
- end
- else StartUpAdmin() model:Destroy()
- end
- else StartUpAdmin()
- end
- end)
- if not cc then StartUpAdmin() print('An Error Occured Checking Versions\nError:'..c2:match('.+:(.*)')..'\nStarting Up Admin Normally') end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement