Mitko1223tm

just a test

Nov 3rd, 2017
197
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 167.13 KB | None | 0 0
  1.  
  2.  
  3.  
  4. -- Commands --
  5.  
  6. Example:
  7. ;kill noobs/guests/me/nonadmins
  8. ;team new Noobs
  9. ;team join me/guests Noobs
  10.  
  11. PEOPLE YOU CAN USE COMMANDS ON
  12. Any players (first few letters of their name): ;kill luamodel or ;kill luamodel/guests -- The Player(s) specified
  13. Me: kill me -- You
  14. Others/Noobs/Mortals: ;kill noobs -- Everyone else but you
  15. Random: ;kill random -- Random person
  16. All: ;kill all -- Everyone
  17. Admins: ;kill admins -- Admins in the server
  18. Nonadmins ;kill nonadmins -- People who aren't admins
  19. Uppers: ;kill uppers -- People starting with an uppercase letter in their name
  20. Lowers: ;kill lowers -- People starting with an lowercase letter in their name
  21. Guests: ;kill guests -- Kill all the guests(Real ones)
  22. NBCs: ;kill nbcs -- Everyone without a membership in the server
  23. BCs: ;kill bcs -- Everyone with the membership: BC in the server
  24. TBCs: ;kill tbcs -- Everyone with the membership: TBC in the server
  25. OBCs: ;kill obcs -- Everyone with the membership: OBC in the server
  26. AllBCs: ;kill allbcs -- Everyone with any membership in the server
  27. (NOTE THIS IS NOT CAPS SENSITIVE)
  28.  
  29. 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'
  30. NOTE: ;btools me is not a command, instead, say ;give me btools
  31.  
  32. Commands:
  33.  
  34. -- Owners --
  35.  
  36. 1.) ;admin lua
  37. Admins LuaModelMaker to the rank "Admin"
  38.  
  39. 2.) ;forceplace lua 1337
  40. Forces LuaModelMaker to go to place with the ID of 1337
  41.  
  42. 3.) ;fun enable
  43. Enables fun commands
  44.  
  45. 4.) ;noadmin lua
  46. Removes LuaModelMaker from Admin or Member list
  47.  
  48. 5.) ;removeadmin
  49. Shuts LuaModelMaker's Admin down
  50.  
  51. ADD.) ;forcefollow lua 13645
  52. Makes LuaModelMaker follow the player with the user ID of 13645 in a universe
  53.  
  54.  
  55. -- Admins+ --
  56.  
  57. 6.) ;ban lua
  58. Bans LuaModelMaker from the server so he can't join
  59.  
  60. 7.) ;c print("Ohi der")
  61. Runs Server-side script in workspace
  62.  
  63. 8.) ;crash lua
  64. Crashes them out of the server
  65.  
  66. 9.) ;jail lua
  67. Creates a jail LuaModelMaker will be trapped and spawned in
  68.  
  69. 10.) ;kick lua
  70. Kicks LuaModelMaker out of the server
  71.  
  72. 11.) ;l print("Look, a localscript!")
  73. Creates a LocalScript in the speaker's character
  74.  
  75. 12.) ;loopkill lua 10
  76. Kills LuaModelMaker 10 times
  77.  
  78. 13.) ;member lua
  79. Admins LuaModelMaker to the rank "Member"
  80.  
  81. 14.) ;mute lua
  82. Removes LuaModelMaker's chatbar so he cannot talk
  83.  
  84. 15.) ;noban lua
  85. Removes LuaModelMaker's name from the ban list
  86.  
  87. 16.) ;nocrash lua
  88. Removes LuaModelMsker's name from the crash list
  89.  
  90. 17.) ;noloopkill lua
  91. Stops any loopkill on LuaModelMaker
  92.  
  93. 18.) ;nomute lua
  94. Removes LuaModelMaker's name from the mute list and makes him talk agian
  95.  
  96. 19.) ;note lua Creator of LMM's Admin
  97. Creates a note about LuaModelMaker that he is the Creator of LMM's Admin [ See ;shownotes ]
  98.  
  99. 20.) ;place lua 1337
  100. Requests LuaModelMaker to go to the place ID with 1337
  101.  
  102. 21.) ;removenotes Creator of
  103. Removes the notes Starting with "Creator of LMM's Admin"
  104.  
  105. 22.) ;shutdown
  106. Shuts the server down
  107.  
  108. 23.) ;sm Cats have ears
  109. Creates a system message: "Cats have ears"
  110.  
  111. ADD.) ;follow lua 13645
  112. Asks LuaModelMaker follow the player with the user ID of 13645 in a universe
  113.  
  114.  
  115.  
  116. -- Members+ --
  117.  
  118. 24.) ;admins
  119. Shows a list of all the admins
  120.  
  121. 25.) ;age lua
  122. Shows how long LuaModelMaker has been on roblox
  123.  
  124. 26.) ;bans
  125. Shows a list of all the banned players
  126.  
  127. 27.) ;backwards lua
  128. Reverses LuaModelMaker's Controls
  129.  
  130. 28.) ;blind lua
  131. Blinds LuaModelMaker
  132.  
  133. 29.) ;brightness 0.5
  134. Sets server brightness to 0.5
  135.  
  136. 30.) ;change lua points 100000
  137. Changes LuaModelMaker's points to 100000
  138.  
  139. 31.) ;char lua 261
  140. Changes LuaModelMaker's Character to look like the user with the ID 261 [ Shedletsky ]
  141.  
  142. 32.) ;clone lua
  143. Creates a clone of LuaModelMaker
  144.  
  145. 33.) ;clr
  146. Clears Jails,Clones, and other inserted things by LMM's Admin
  147.  
  148. 34.) ;clip lua
  149. Clips LuaModelMaker out of noclip
  150.  
  151. 35.) ;cmdbar
  152. Gives the speaker a command bar
  153.  
  154. 36.) ;control lua
  155. Controls LuaModelMakers body
  156.  
  157. 37.) ;crashes
  158. Shows a list of all the crashed players
  159.  
  160. 38.) ;debug lua
  161. Debugs LuaModelMaker - Removes ;char ;obama ;noob ;guest and respawns them
  162.  
  163. 39.) ;decal 1234
  164. Selects a decal to the speakers cursor, click to insert, press z to dismiss, x to remove
  165.  
  166. 40.) ;disco
  167. Makes the server flash disco colors
  168.  
  169. 41.) ;drug lua
  170. Simulates LuaModelmaker being on LSD(A drug)
  171.  
  172. 42.) ;explode lua
  173. Kills LuaModelMaker in a deadly explosion [ FUN COMMAND ]
  174.  
  175. 43.) ;face lua 1337
  176. Gives LuaModelMaker the face with the ID of 1337
  177.  
  178. 44.) ;fart lua
  179. Causes LuaModelMaker to pass gas [ FUN COMMAND ]
  180.  
  181. 45.) ;ff lua
  182. Gives a forcefield to LuaModelMaker
  183.  
  184. 46.) ;fire lua
  185. Catches LuaModelMaker on fire [ FUN COMMAND ]
  186.  
  187. 47.) ;flash
  188. Makes the server flash
  189.  
  190. 48.) ;fling lua
  191. Flings LuaModelMaker out of the server [ FUN COMMAND ]
  192.  
  193. 49.) ;flip lua
  194. Flips lua 360° around [ FUN COMMAND ]
  195.  
  196. 50.) ;fly lua
  197. Allows LuaModelMaker to fly
  198.  
  199. 51.) ;forwards lua
  200. Resets LuaModelMaker's Walkspeed and undoes ;backwards
  201.  
  202. 52.) ;freeze lua
  203. Freezes LuaModelMaker so he can't move
  204.  
  205. 53.) ;friends lua
  206. Shows a lost of who LuaModelMaker is friends and Bestfriends with in the server
  207.  
  208. 54.) ;gear lua 13337
  209. Gives LuaModelMaker the gear with the ID of 1337
  210.  
  211. 55.) ;ghost lua
  212. Causes LuaModelMaker to look like a ghost [ FUN COMMAND ]
  213.  
  214. 56.) ;give lua basicbtools
  215. Gives LuaModelMaker basic building tools
  216.  
  217. 57.) ;give lua btools
  218. Gives LuaModelMaker all building tools
  219.  
  220. 58.) ;give lua psbtools
  221. Gives LuaModelMaker Personal Server building tools
  222.  
  223. 59.) ;give lua cookie
  224. If there is a tool named "Cookie", then LuaModelMaker gets a tool named "Cookie"
  225.  
  226. 60.) ;givetools builderman
  227. Gives builderman a copy of of the speaker's tools
  228.  
  229. 61.) ;god lua
  230. Gives LuaModelMaker maximum health
  231.  
  232. 62.) ;gold lua
  233. Makes LuaModelMaker have a golden color and shine to him [ FUN COMMAND ]
  234.  
  235. 63.) ;guest lua
  236. Causes LuaModelMaker to look like a guest [ FUN COMMAND ]
  237.  
  238. 64.) ;h Heh, Hi
  239. Creates a hint: "Heh, Hi"
  240.  
  241. 65.) ;hat lua 1337
  242. Gives LuaModelMaker a hat with the ID of 1337
  243.  
  244. 66.) ;heal lua
  245. Gives LuaModelMaker full health
  246.  
  247. 67.) ;health lua 50
  248. Sets LuaModelMaker's Health to 50
  249.  
  250. 68.) ;headsize lua 200
  251. Sizes LuaModelMaker's Head to 200% it's original size
  252.  
  253. 69.) ;invis lua
  254. Renders LuaModelMaker invisible
  255.  
  256. 70.) ;insert 13333
  257. Inserts a Model to LuaModelMaker's Cursor. Press X to cancel, click to insert.
  258.  
  259. 71.) ;jump lua
  260. Makes LuaModelMaker jump
  261.  
  262. 72.) ;kill lua
  263. Kills LuaModelMaker
  264.  
  265. 73.) ;lamp lua
  266. Creates a light in front of LuaModelMaker
  267.  
  268. 74.) ;light lua
  269. Creates a light in around of LuaModelMaker
  270.  
  271. 75.) ;longneck lua
  272. Gives LuaModelMaker a longneck [ FUN COMMAND ]
  273.  
  274. 76.) ;loopheal lua
  275. Heals LuaModelMaker constantly
  276.  
  277. 77.) ;loopfling lua
  278. Flings LuaModelMaker constantly [ FUN COMMAND ]
  279.  
  280. 78.) ;m I like cheese
  281. Creates a Message: "I like cheese"
  282.  
  283. 79.) ;merge lua builderman
  284. Merges LuaModelMaker and Builderman together
  285.  
  286. 80.) ;mutes
  287. Shows a list of all Mutes
  288.  
  289. 81.) ;naked lua
  290. Clears LuaModelMaker's character rendering him naked [ FUN COMMAND ]
  291.  
  292. 82.) ;name lua LMM
  293. Changes LuaModelMaker's character name to: "LMM"
  294.  
  295. 83.) ;noarms lua
  296. Removes LuaModelMaker's arms [ FUN COMMAND ]
  297.  
  298. 84.) ;nobind lua
  299. Stops the effect of the blind command on LuaModelMaker
  300.  
  301. 85.) ;noclip lua
  302. Makes it so LuaModelMaker can fly though solid objects
  303.  
  304. 86.) ;nodrug lua
  305. Stops the effect of the drug command on LuaModelMaker
  306.  
  307. 87.) ;noff lua
  308. Removes any forcefields in LuaModelMaker
  309.  
  310. 88.) ;nofire lua
  311. Stops the effect of the fire command on LuaModelMaker [ FUN COMMAND ]
  312.  
  313. 89.) ;noflash lua
  314. Stops the effect of the flash command on LuaModelMaker [ FUN COMMAND ]
  315.  
  316. 90.) ;nofly lua
  317. Stops the effect of the fly command on LuaModelMaker
  318.  
  319. 91.) ;nohats lua
  320. Removes all of LuaModelMaker's hats
  321.  
  322. 92.) ;nolamp lua
  323. Stops the effect of the lamp command on LuaModelMaker
  324.  
  325. 93.) ;nolegs lua
  326. Removes LuaModelMaker's legs [ FUN COMMAND ]
  327.  
  328. 94.) ;nolight lua
  329. Stops the effect of the light command on LuaModelMaker
  330.  
  331. 95.) ;nolimbs lua
  332. Removes all of LuaModelMaker's limbs [ FUN COMMAND ]
  333.  
  334. 96.) ;noloopfling lua
  335. Stops the effect of the loopfling command on LuaModelMaker [ FUN COMMAND ]
  336.  
  337. 97.) ;noname LuaModelMaker
  338. Removes any name someone may have named LuaModelMaker
  339.  
  340. 98.) ;noob lua
  341. Turns LuaModelMakerMaker into a noob [ FUN COMMAND ]
  342.  
  343. 99.) ;nooverlay lua
  344. Stops the effect of the overlay command on LuaModelMaker
  345.  
  346. 100.) ;nopunish lua
  347. Stops the effect of the punish command on LuaModelMaker
  348.  
  349. 101.) ;normal lua
  350. Undoes any character changes(;shine, ;gold, invis)
  351.  
  352. 102.) ;normaljump lua
  353. Stops the effect of the superjump command on LuaModelMaker
  354.  
  355. 103.) ;normalneck lua
  356. Stops the effect of the longneck command on LuaModelMaker [ FUN COMMAND ]
  357.  
  358. 104.) ;nos
  359. Removes all scripts accept LMM's Admin
  360.  
  361. 105.) ;nosmoke lua
  362. Stops the effect of the smoke command on LuaModelMaker [ FUN COMMAND ]
  363.  
  364. 106.) ;nosparkles lua
  365. Stops the effect of the sparkles command on LuaModelMaker [ FUN COMMAND ]
  366.  
  367. 107.) ;nospin lua
  368. Stops the effect of the spin command on LuaModelMaker [ FUN COMMAND ]
  369.  
  370. 108.) ;nostun lua
  371. Stops the effect of the stun command on LuaModelMaker [ FUN COMMAND ]
  372.  
  373. 109.) ;notools lua
  374. Removes all of LuaModelMaker's tools
  375.  
  376. 110.) ;npl lua
  377. Removes LuaModelMaker's player list
  378.  
  379. 111.) ;obama lua
  380. Makes LuaModelMaker black (lol)
  381.  
  382. 112.) ;overlay lua 1337
  383. Overlays a decal on LuaModelMaker's head with the ID of 1337
  384.  
  385. 113.) ;pants lua 1337
  386. Gives LuaModelMaker pants with the ID of 1337
  387.  
  388. 114.) ;pm shed Wut up?
  389. Personal messages Shedletsky: "Wut up?"
  390.  
  391. 115.) ;point lua roblox
  392. Creates a laser beam between LuaModelMaker and ROBLOX
  393.  
  394. 116.) ;product lua 10000
  395. Shows a catalog like GUI about the product 10000 to LuaModelMaker
  396.  
  397. 117.) ;punish lua
  398. Punishes LuaModelMaker
  399.  
  400. 118.) ;ragdoll lua
  401. Makes LuaModelMaker a ragdoll
  402.  
  403. 119.) ;respawn lua
  404. Respawns LuaModelMaker
  405.  
  406. 120.) ;shine lua
  407. Gives LuaModelMaker a reflective shine
  408.  
  409. 121.) ;shirt lua 1337
  410. Gives LuaModelMaker the shirt with the ID of 1337
  411.  
  412. 122.) ;shownotes lua
  413. Shows saved notes about LuaModelMaker
  414.  
  415. 123.) ;sa
  416. Shows all Server Admins
  417.  
  418. 124.) ;sit lua
  419. Makes LuaModelMaker sit
  420.  
  421. 125.) ;smoke lua
  422. Makes LuaModelMaker smoke
  423.  
  424. 126.) ;sound 1337
  425. Plays a sound with the ID of 1337
  426.  
  427. 127.) ;sparkles lua
  428. Gives LuaModelMaker sparkles [ FUN COMMAND ]
  429.  
  430. 128.) ;speed lua 100
  431. Makes LuaModelMaker walk 100 SPS
  432.  
  433. 129.) ;spin lua
  434. Makes LuaModelMaker spin [ FUN COMMAND ]
  435.  
  436. 130.) ;strobe lua
  437. Creates a flashing light on LuaModelMaker's screen
  438.  
  439. 131.) ;stun lua
  440. Stuns LuaModelMaker so he cannot move
  441.  
  442. 132.) ;superjump lua
  443. Makes LuaModelMaker jump really high
  444.  
  445. 133.) ;sword lua
  446. Gives LuaModelMaker a sword
  447.  
  448. 134.) ;taketools lua
  449. Gives the speaker LuaModelMaker's tools
  450.  
  451. 135.) ;team join lua Red Team
  452. Makes it so LuaModelMaker joins the Red Team
  453.  
  454. 136.) ;team new Blue Team
  455. Creates a team named: "Blue Team"
  456.  
  457. 137.) ;team remove Red Team
  458. Removes the Read Team
  459.  
  460. 138.) ;team rename Blue Winners
  461. Renames the team: "Blue Team" to "Winners"
  462.  
  463. 139.) ;test
  464. Tests to see if LMM's Admin is still working
  465.  
  466. 140.) ;time noon
  467. Changes time in server to noon
  468.  
  469. 141.) ;tp lua build
  470. Teleports LuaModelMaker to Builderman
  471.  
  472. 142.) ;tshirt lua 12222
  473. Puts the tshirt the the ID 12222 on LuaModelMaker
  474.  
  475. 143.) ;vis lua
  476. Makes LuaModelMaker visible
  477.  
  478. 144.) ;vomit lua
  479. Makes LuaModelMaker puke everywhere [ FUN COMMAND ]
  480.  
  481. 145.) ;vote all 10 Do you like LMM's Admin?
  482. Gives a poll to everyone for 10 seconds a yes or no question: "Do you like LMM's Admin?"
  483.  
  484. ADD.) ;logs
  485. Checks commands by players
  486.  
  487. ADD.) ;countdown 20
  488. Counts down from 20(Cannot be more than 120 seconds)
  489.  
  490.  
  491. -- Non-Admin Commands+ --
  492.  
  493. 146.) ;adminvip
  494. Displays the product for the Admin VIP
  495.  
  496. 147.) ;animations
  497. Shows a list of animations
  498.  
  499. 148.) ;cln
  500. Cleans hats and tools from server
  501.  
  502. 149.) ;cmds
  503. Shows a list of commands
  504.  
  505. 150.) ;membervip
  506. Displays the product for the Admin VIP
  507.  
  508. 151.) ;rejoin
  509. Makes Speaker rejoin the game
  510.  
  511. 152.) ;removemenu
  512. Removes LMM's Admin Menu
  513.  
  514.  
  515.  
  516.  
  517. -------------------
  518. -- Main Script --]]
  519.  
  520. -- No touchies --
  521.  
  522. wait(0.1)
  523.  
  524. local LocalScript = script:FindFirstChild("LocalScriptExecution")
  525. local Script = script:FindFirstChild("ScriptExecution")
  526. local Version = script:FindFirstChild("Version")
  527. local Memberships = {["NBC"] = Enum.MembershipType.None, ["BC"] = Enum.MembershipType.BuildersClub, ["TBC"] = Enum.MembershipType.TurboBuildersClub, ["OBC"] = Enum.MembershipType.OutrageousBuildersClub}
  528. local Flings, Jailed, Objects, Logs, VoteVersion, Stopped = {}, {}, {}, {}, 0, false
  529. local Workspace = game:GetService("Workspace")
  530. local Players = game:GetService("Players")
  531. local Teams = game:GetService("Teams")
  532. local Lighting = game:GetService("Lighting")
  533. local MPS = game:GetService("MarketplaceService")
  534. local TS = game:GetService("TeleportService")
  535. local HS = game:GetService("HttpService")
  536. local Run = game:GetService("RunService")
  537. local Settings = Workspace:FindFirstChild("LuaModelMaker's Admin Settings")
  538. local GameOwner = nil if game.Players.LocalPlayer == nil then GameOwner = MPS:GetProductInfo(game.PlaceId).Creator.Name else GameOwner = "[ Client ]" end
  539.  
  540. --------------------------------------
  541. local SettingsModule = nil
  542. if Settings then SettingsModule = require(Settings) else SettingsModule = {} end
  543.  
  544. local Ranks = SettingsModule.Ranks or {["Owner"] = {"Mitko1223tm","chochko10"}, ["Admin"] = {}, ["Member"] = {}, ["Banned"] = {}, ["Crashed"] = {}, ["Muted"] = {}}
  545. local FUN = SettingsModule.FUN or true
  546. local LagTime = SettingsModule.LagTime or 5
  547. local Prefix = SettingsModule.Prefix or ";"
  548. local Bet = SettingsModule.Bet or " "
  549. local VIPMemberID = SettingsModule.VIPMemberID or 0
  550. local VIPAdminID = SettingsModule.VIPAdminID or 0
  551. local GroupID = SettingsModule.GroupID or 0
  552. local GroupMemberRank = SettingsModule.GroupMemberRank or 0
  553. local GroupAdminRank = SettingsModule.GroupAdminRank or 0
  554. local GroupOwnerRank = SettingsModule.GroupOwnerRank or 0
  555. local BadgeID = SettingsModule.BadgeID or 0
  556. local EnableAdminMenu = SettingsModule.EnableAdminMenu or true
  557. local RankBan = SettingsModule.RankBan or 0
  558. local Filter = SettingsModule.Filter or {"GetObjects"}
  559. local ServerLocked = SettingsModule.ServerLocked or false
  560. local DisableAbuse = SettingsModule.DisableAbuse or false
  561. local LuaModelMakerStamp = false
  562. --------------------------------------
  563.  
  564. local Commands = {
  565. NonAdmin = {"-- Non-Admin Commands --", ";adminvip", ";animations", ";cln", ";cmds", ";membervip", ";rejoin", ";removemenu"};
  566. 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", ";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", ";merge player player", ";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", ";nos", ";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)"};
  567. Admin = {"-- Admin Commands --", ";accelerate noob", ";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]"};
  568. Owner = {"-- Owner Commands --", ";Admin Player", ";admin player", ";forceplace player num", ";fun enable/disable", ";noadmin player", ";removeadmin", ";adminmenu enable/disable", ";update", ";forcefollow player num[UserID]"};
  569. }
  570.  
  571. if not Version then Version = {Value = "[ Unknown ]"} end
  572. for Command,_ in pairs(Commands.NonAdmin) do Commands.NonAdmin[Command] = string.gsub(string.gsub(Commands.NonAdmin[Command], ";", Prefix), " ", Bet) end
  573. for Command,_ in pairs(Commands.Member) do Commands.Member[Command] = string.gsub(string.gsub(Commands.Member[Command], ";", Prefix), " ", Bet) end
  574. for Command,_ in pairs(Commands.Admin) do Commands.Admin[Command] = string.gsub(string.gsub(Commands.Admin[Command], ";", Prefix), " ", Bet) end
  575. for Command,_ in pairs(Commands.Owner) do Commands.Owner[Command] = string.gsub(string.gsub(Commands.Owner[Command], ";", Prefix), " ", Bet) end
  576.  
  577. if game.Workspace:FindFirstChild("LuaModelMaker Stamp") then LuaModelMakerStamp = true end
  578.  
  579. --ypcall(function() for Name,Data in pairs(HS:JSONDecode(HS:GetAsync("http://luamodelmaker.net63.net/LMMAdmin/ScriptData", true))) do WebData[Name] = Data end end)
  580.  
  581. local Crash = [[
  582. script.Parent = Instance.new("Glue")
  583. local LagTime = ]]..tostring(LagTime)..[[
  584. local Me = game:GetService("Players").LocalPlayer
  585. local Cam = Workspace.CurrentCamera
  586. local R = math.random
  587. if Me.Name ~= "LuaMode".."lMaker" then
  588. Me.Parent = nil
  589. wait()
  590. Me.Parent = game.Players
  591. game.StarterGui:SetCoreGuiEnabled("All", false)
  592. local Hint = Instance.new("Hint", Cam)
  593. for i = 0,LagTime do
  594. Hint.Text = "Leave in "..LagTime-i.." seconds to leave before lag"
  595. wait(1)
  596. end
  597. coroutine.wrap(function() for i = 1,10 do wait() for i = 1,20 do
  598. local Message = Instance.new("Message", Cam) Message.Text = "I warned you nob I warned you nob"
  599. local Hint = Hint:Clone() Hint.Parent = Cam Hint.Text = "Lagging much?"
  600. local Part = Instance.new("Part", Cam) Part.Position = Vector3.new(R(-10,100), R(10,20), R(-10,10))
  601. Cam.CoordinateFrame = CFrame.new(0,0,0)
  602. Instance.new("Explosion", Cam).Position = Part.Position
  603. end end while true do end end)()
  604. end
  605. ]]
  606.  
  607. function Fly(Force)
  608. return [[
  609. local Me = game:GetService("Players").LocalPlayer
  610. local Char = Me.Character
  611. local Mouse = Me:GetMouse()
  612. local Cam = Workspace.CurrentCamera
  613. local Stop = false
  614. local Version = 0
  615. local MaxSpeed = 5
  616. local Speed = 1
  617. local Keys = {}
  618.  
  619. local Fly, Rot = Char.Torso:FindFirstChild("LMMFly"), Char.Torso:FindFirstChild("LMMRot")
  620. if Fly then Fly:Destroy() end if Rot then Rot:Destroy() end
  621. Fly = Instance.new("BodyPosition", Char.Torso) Fly.Name = "LMMFly" Fly.maxForce = Vector3.new(math.huge, math.huge, math.huge) Fly.P = ]]..Force..[[ Fly.position = Char.Torso.Position
  622. Rot = Instance.new("BodyGyro", Char.Torso) Rot.Name = "LMMRot" Rot.maxTorque = Vector3.new(math.huge, math.huge, math.huge) Rot.P = ]]..Force..[[ Rot.cframe = Cam.CoordinateFrame
  623.  
  624. local Thread,Old = Version, nil
  625. Char.Humanoid.PlatformStand = true
  626.  
  627. function StopFly()
  628. Version = Version + 1 Stop = true Char.Humanoid.PlatformStand = false Fly:Destroy() Rot:Destroy() script.Disabled = true script:Destroy()
  629. end
  630.  
  631. Char.ChildAdded:connect(function(Obj) wait()
  632. if Obj.Name == "LM".."MFlyStop" then
  633. Obj:Destroy()
  634. StopFly()
  635. end
  636. end)
  637.  
  638. coroutine.wrap(function() while Thread == Version and Stop == false do
  639. local Vectoring = Rot.cframe - Rot.cframe.p + Fly.position
  640.  
  641. if Keys[string.char(48)] then Speed = 1 end
  642. if Keys.w then Vectoring = Vectoring + Cam.CoordinateFrame.lookVector * Speed end
  643. if Keys.s then Vectoring = Vectoring - Cam.CoordinateFrame.lookVector * Speed end
  644. if Keys.d then Vectoring = Vectoring * CFrame.new(Speed,0,0) end
  645. if Keys.a then Vectoring = Vectoring * CFrame.new(-Speed,0,0) end
  646. if Keys.e or Keys[" "] then Vectoring = Vectoring * CFrame.new(0,Speed,0) end
  647. if Keys.q then Vectoring = Vectoring * CFrame.new(0,-Speed,0) end
  648. if Keys.x then StopFly() end
  649.  
  650. if Old ~= Vectoring then
  651. Fly.position = Vectoring.p
  652. Old = Vectoring
  653. Speed = math.min(Speed + Speed*0.025,MaxSpeed)
  654. else
  655. Speed = 1;
  656. end
  657. Rot.cframe = Cam.CoordinateFrame
  658. wait(0.01)
  659. end end)()
  660.  
  661. Mouse.KeyDown:connect(function(Key)
  662. Keys[Key] = true
  663. end)
  664. Mouse.KeyUp:connect(function(Key)
  665. Keys[Key] = false
  666. end)
  667. ]]
  668. end
  669.  
  670. function NilPlayer(Player)
  671. if Player == nil or type(Player) == "table" then return true else return false end
  672. end
  673.  
  674. function CoreGui(Object, Enable)
  675. return [[script.Parent = nil game:GetService("StarterGui"):SetCoreGuiEnabled("]]..tostring(Object)..[[", ]]..tostring(Enable)..[[)]]
  676. end
  677.  
  678. function ConvertRank(Input)
  679. local Output = nil
  680. if Input == "Muted" then Output = -3 end
  681. if Input == "Crashed" then Output = -2 end
  682. if Input == "Banned" then Output = -1 end
  683. if Input == "Player" then Output = 0 end
  684. if Input == "Member" then Output = 1 end
  685. if Input == "Admin" then Output = 2 end
  686. if Input == "Owner" then Output = 3 end
  687.  
  688. if Input == -3 then Output = "Muted" end
  689. if Input == -2 then Output = "Crashed" end
  690. if Input == -1 then Output = "Banned" end
  691. if Input == 0 then Output = "Player" end
  692. if Input == 1 then Output = "Member" end
  693. if Input == 2 then Output = "Admin" end
  694. if Input == 3 then Output = "Owner" end
  695. return Output
  696. end
  697.  
  698. function IsAdmin(Player)
  699. local AdminStatus = false
  700. local RankStatus = "Player"
  701. if NilPlayer(Player) then return true, "Owner" end
  702. for Rank,PlayerNames in pairs(Ranks) do
  703. for _,AdminName in pairs(PlayerNames) do
  704. if string.lower(AdminName) == string.lower(Player.Name) then
  705. if ConvertRank(Rank) > 0 then
  706. AdminStatus = true
  707. RankStatus = Rank
  708. end
  709. end
  710. end
  711. end
  712. return AdminStatus, RankStatus
  713. end
  714.  
  715. function GetAdmins(Ranking)
  716. local Players = {}
  717. local AdminTrue, Rank = IsAdmin(Player)
  718. for _,Player in pairs(Players:GetPlayers()) do
  719. if AdminTrue then
  720. local PlayerRankNum = ConvertRank(Rank)
  721. local StandardRankNum = ConvertRank(Ranking)
  722. if PlayerRankNum >= StandardRankNum then
  723. table.insert(Players, Player)
  724. end
  725. end
  726. end
  727. return Players
  728. end
  729.  
  730. function SendMessage(Player, TitleText, BodyText, Time) coroutine.wrap(function()
  731. local SG = Instance.new("ScreenGui") SG.Name = "LuaMod".."".."elMaker's Admin Message"
  732. local Frame = Instance.new("Frame", SG) Frame.Name = "Message Frame" Frame.BackgroundColor3 = Color3.new(0.5,0.5,0.5) Frame.BackgroundTransparency = 0.5 Frame.Position = UDim2.new(0,0,1,0) Frame.Size = UDim2.new(1,0,0.5,0)
  733. local Title = Instance.new("TextLabel", Frame) Title.Name = "Title" Title.Text = TitleText Title.BackgroundTransparency = 1 Title.Size = UDim2.new(1,0,1,0) Title.Font = "ArialBold" Title.FontSize = "Size36" Title.TextColor3 = Color3.new(0,0,0) Title.TextStrokeColor3 = Color3.new(1,1,1) Title.TextStrokeTransparency = 0 Title.TextYAlignment = "Top" Title.TextWrapped = true
  734. local Body = Instance.new("TextLabel", Frame) Body.TextTransparency = 1 Body.Name = "Body" Body.Text = BodyText Body.BackgroundTransparency = 1 Body.Size = UDim2.new(1,0,1,0) Body.Font = "Arial" Body.FontSize = "Size24" Body.TextColor3 = Color3.new(0,0,0) Body.TextStrokeColor3 = Color3.new(1,1,1) Body.TextWrapped = true
  735. for _,Object in pairs(Player.PlayerGui:GetChildren()) do if Object.Name == "LuaMod".."elMaker".."'".."s Admin Message" then Object:Destroy() end end
  736. wait() SG.Parent = Player.PlayerGui wait()
  737. Frame:TweenPosition(UDim2.new(0,0,0.5,0), "In", "Sine", 0.5)
  738. wait(0.5)
  739. local Num,FadeIn,FadeOut = 1,nil,nil
  740. FadeIn = Run.Stepped:connect(function(Time, Step)
  741. Num = Num - 0.05
  742. Body.TextTransparency = Num
  743. Body.TextStrokeTransparency = Num
  744. if Num == 0 then
  745. FadeIn:disconnect()
  746. end
  747. wait(Step)
  748. end)
  749. wait(Time)
  750. Num = 0
  751. FadeOut = Run.Stepped:connect(function(Time, Step)
  752. Num = Num + 0.05
  753. Body.TextTransparency = Num
  754. Body.TextStrokeTransparency = Num
  755. if Num == 1 then
  756. FadeOut:disconnect()
  757. end
  758. wait(Step)
  759. end)
  760. wait(0.5)
  761. Frame:TweenPosition(UDim2.new(0,0,1,0), "Out", "Sine", 0.5)
  762. wait(0.5)
  763. SG:Destroy()
  764. end)() end
  765.  
  766. function SendHint(Player, Text, Time) coroutine.wrap(function()
  767. local SG = Instance.new("ScreenGui") SG.Name = "LuaMod".."".."elMaker's Admin Hint"
  768. 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,15) Frame.Style = "RobloxSquare"
  769. local Body = Instance.new("TextLabel", Frame) Body.Name = "Body" Body.Text = "" Body.BackgroundTransparency = 1 Body.Size = UDim2.new(1,0,1,0) Body.Font = "Arial" Body.FontSize = "Size14" Body.TextColor3 = Color3.new(1,1,1)
  770. for _,Object in pairs(Player.PlayerGui:GetChildren()) do if Object.Name == "LuaMod".."elMaker".."'".."s Admin Hint" then Object:Destroy() end end
  771. SG.Parent = Player.PlayerGui
  772. Frame:TweenPosition(UDim2.new(0,0,0.05,0), "In", "Quint", 0.7)
  773. wait(0.7)
  774. for i = 1,#Text do
  775. Body.Text = string.sub(Text, 1,i)
  776. wait()
  777. end
  778. wait(Time)
  779. Frame:TweenPosition(UDim2.new(0,0,-0.05,0), "Out", "Quint", 0.7)
  780. wait(0.7)
  781. SG:Destroy()
  782. end)() end
  783.  
  784. function MessageAdmins(TitleText, BodyText, Time)
  785. for _,Player in pairs(Players:GetPlayers()) do
  786. local PlayerAdmin, PlayerRank = IsAdmin(Player)
  787. if PlayerAdmin then
  788. SendMessage(Player, TitleText, BodyText, Time)
  789. end
  790. end
  791. end
  792.  
  793. function Execute(ScriptVar, Parent, Owner, Code) if Parent then
  794. if ScriptVar ~= nil then
  795. local NewScript = ScriptVar:Clone()
  796. NewScript.Code.Value = Code
  797. NewScript.Owner.Value = Owner
  798. NewScript.Parent = Parent
  799. wait()
  800. NewScript.Disabled = false
  801. return true
  802. elseif NLS ~= nil then
  803. NLS(Code, Parent)
  804. return true
  805. else
  806. return false
  807. end
  808. end end
  809.  
  810. function ScanAdminList(Name)
  811. local InList = false
  812. for _,PName in pairs(Ranks["Owner"]) do
  813. if PName == Name then InList = true end
  814. end
  815. for _,PName in pairs(Ranks["Admin"]) do
  816. if PName == Name then InList = true end
  817. end
  818. for _,PName in pairs(Ranks["Member"]) do
  819. if PName == Name then InList = true end
  820. end
  821. return InList
  822. end
  823.  
  824. function GetSplit(String, BetSplit)
  825. local String1 = ""
  826. local String2 = ""
  827. Start1, End1 = string.find(String, BetSplit)
  828. if End1 then
  829. String1 = string.sub(String, 1, End1-1)
  830. end
  831. if String1 ~= "" then
  832. String2 = string.sub(String, End1+1)
  833. end
  834. return String1, String2
  835. end
  836.  
  837. function GetImageFormat(ID)
  838. if ID ~= 1 or ID ~= 0 or ID ~= nil then if type(ID) == "number" then
  839. local NewID = ID + 1
  840. for i = 1,1000 do
  841. NewID = NewID -1
  842. local Valid = ypcall(function() return MPS:GetProductInfo(NewID).AssetTypeId end)
  843. if Valid == true then
  844. if MPS:GetProductInfo(NewID).AssetTypeId == 1 then
  845. break
  846. end
  847. end
  848. if i == 1000 then NewID = ID end
  849. end
  850. return NewID
  851. end end
  852. end
  853.  
  854. function RemoveAdmin(Speaker)
  855. if Speaker then SendMessage(Speaker, "Stop Admin", "LuaModelMaker's Admin will now shutdown",1) end
  856. if Speaker then wait(4) end
  857. for _,Player in pairs(Players:GetPlayers()) do if Player.PlayerGui ~= nil then
  858. GUI = Player.PlayerGui:FindFirstChild("LMMA Product Gui") if GUI then GUI:Destroy() end
  859. GUI = Player.PlayerGui:FindFirstChild("LMM Menu Gui") if GUI then GUI:Destroy() end
  860. GUI = Player.PlayerGui:FindFirstChild("LMM ScrollGui") if GUI then GUI:Destroy() end
  861. end end
  862. while wait() do
  863. Chatted,Ranked,Start,Stopped,FullAdminMenu,AdminMenu = nil,nil,nil,true,nil,nil
  864. script:ClearAllChildren() script.Disabled = true script:Destroy()
  865. end
  866. end
  867.  
  868. function Vote(VotingPlayers, Sender, Question, Time) coroutine.wrap(function()
  869. VoteVersion = VoteVersion + 1
  870. local YesNum,NoNum,NilVote,NoVoteTable,VoteThread = 0,0,0,{},VoteVersion
  871. local function Round(Number)
  872. if Number >= 0.5 then
  873. return math.ceil(Number)
  874. elseif Number < 0.5 then
  875. return math.floor(Number)
  876. end
  877. end
  878. if Time > 60 then Time = 60 end
  879. for _,Player in pairs(VotingPlayers) do if Player.PlayerGui ~= nil then coroutine.wrap(function()
  880. local Voted = false
  881. local SG = Player.PlayerGui:FindFirstChild("LMM Admin Vote") if SG then SG:Destroy() end
  882. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM Admin Vote"
  883. 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.Style = "RobloxRound"
  884. 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"
  885. 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
  886. local Answer = Instance.new("TextButton") Answer.Size = UDim2.new(0.2,0,0.15,0) Answer.Font = "Legacy" Answer.FontSize = "Size9"
  887. 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)
  888. 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)
  889. Yes.MouseButton1Click:connect(function()
  890. YesNum = YesNum + 1 Voted = true SG:Destroy()
  891. end)
  892. No.MouseButton1Click:connect(function()
  893. NoNum = NoNum + 1 Voted = true SG:Destroy()
  894. end)
  895. for i = 0,Time do
  896. if VoteThread == VoteVersion then
  897. local Plural = "s"
  898. if Time-i == 1 then Plural = "" end
  899. Title.Text = "LMM's Admin Vote | Time left: "..Time-i.." Second"..Plural
  900. else
  901. SG:Destroy() break
  902. end
  903. wait(1)
  904. end
  905. if SG ~= nil then SG:Destroy() end
  906. if Voted == false then table.insert(NoVoteTable, Player) end
  907. end)() end end
  908. wait(Time+2) wait()
  909. if Sender then
  910. if Sender.PlayerGui ~= nil then
  911. NilVote = #NoVoteTable
  912. local SG = Sender.PlayerGui:FindFirstChild("LMM Admin Vote") if SG then SG:Destroy() end
  913. SG = Instance.new("ScreenGui", Sender.PlayerGui) SG.Name = "LMM Admin Vote"
  914. 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.Style = "RobloxRound"
  915. 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
  916. 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
  917. 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)
  918. 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"
  919. 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"
  920. 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"
  921. Frame.Yes.Text = [[Yes:
  922. ]]..YesNum.."/"..#VotingPlayers..[[
  923. ]]..Round(YesNum/#VotingPlayers*100).."%"
  924. Frame.None.Text = [[No vote:
  925. ]]..NilVote.."/"..#VotingPlayers..[[
  926. ]]..Round(NilVote/#VotingPlayers*100).."%"
  927. Frame.No.Text = [[No:
  928. ]]..NoNum.."/"..#VotingPlayers..[[
  929. ]]..Round(NoNum/#VotingPlayers*100).."%"
  930. end
  931. end
  932. end)() end
  933.  
  934. function UpdateAdmin()
  935. local NewAdminModel = game:GetService("InsertService"):LoadAsset(145383463)
  936. local NewAdmin = NewAdminModel:FindFirstChild("LuaModelMaker's Admin")
  937. if NewAdmin then
  938. local NewVersion = NewAdmin:FindFirstChild("Version")
  939. if NewVersion.Value ~= Version.Value then
  940. NewAdmin.Disabled = true
  941. NewAdmin.Parent = Workspace
  942. if not Settings then
  943. local NewSettings = NewAdminModel:FindFirstChild("LuaModelMaker's Admin Settings")
  944. if NewSettings then NewSettings.Parent = Workspace end
  945. end
  946. wait() NewAdmin.Disabled = false
  947. RemoveAdmin()
  948. else
  949. NewAdminModel:Destroy()
  950. end
  951. end
  952. end
  953.  
  954. function AssetTypeToString(AssetType)
  955. if AssetType == 1 then return "Image"
  956. elseif AssetType == 2 then return "T-Shirt"
  957. elseif AssetType == 3 then return "Audio"
  958. elseif AssetType == 4 then return "Mesh"
  959. elseif AssetType == 5 then return "Lua"
  960. elseif AssetType == 6 then return "HTML"
  961. elseif AssetType == 7 then return "Text"
  962. elseif AssetType == 8 then return "Hat"
  963. elseif AssetType == 9 then return "Place"
  964. elseif AssetType == 10 then return "Model"
  965. elseif AssetType == 11 then return "Shirt"
  966. elseif AssetType == 12 then return "Pants"
  967. elseif AssetType == 13 then return "Decal"
  968. elseif AssetType == 16 then return "Avatar"
  969. elseif AssetType == 17 then return "Head"
  970. elseif AssetType == 18 then return "Face"
  971. elseif AssetType == 19 then return "Gear"
  972. elseif AssetType == 21 then return "Badge"
  973. elseif AssetType == 22 then return "Group Emblem"
  974. elseif AssetType == 24 then return "Animation"
  975. elseif AssetType == 25 then return "Arms"
  976. elseif AssetType == 26 then return "Legs"
  977. elseif AssetType == 27 then return "Torso"
  978. elseif AssetType == 28 then return "Right Arm"
  979. elseif AssetType == 29 then return "Left Arm"
  980. elseif AssetType == 30 then return "Left Leg"
  981. elseif AssetType == 31 then return "Right Leg"
  982. elseif AssetType == 32 then return "Package"
  983. elseif AssetType == 33 then return "YouTube Video"
  984. elseif AssetType == 34 then return "Game Pass"
  985. elseif AssetType == 38 then return "Plugin"
  986. elseif AssetType == 0 then return "Product"
  987. end
  988. return "Content Invalid"
  989. end
  990.  
  991. function PromptPurchase(Player, Item) coroutine.wrap(function()
  992. if Player.PlayerGui ~= nil then
  993. local Valid = ypcall(function() return MPS:GetProductInfo(Item) end)
  994. if Valid == true then if MPS:GetProductInfo(Item).AssetTypeId ~= 5 then
  995. local CanBuy = true
  996. local Created = MPS:GetProductInfo(Item).Created Created = string.gsub(Created, "-", "/") local Stop = string.find(Created, "T") if Stop then Created = string.sub(Created, 1, Stop-1) end
  997. local Updated = MPS:GetProductInfo(Item).Updated Updated = string.gsub(Updated, "-", "/") local Stop = string.find(Updated, "T") if Stop then Updated = string.sub(Updated, 1, Stop-1) end
  998. local SG = Player.PlayerGui:FindFirstChild("LMMA Product Gui") if SG then SG:Destroy() end
  999. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMMA Product Gui"
  1000. 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)
  1001. 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
  1002. 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
  1003. 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="..MPS:GetProductInfo(Item).Creator.Name
  1004. 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 = MPS:GetProductInfo(Item).Name Title.TextWrapped = true
  1005. 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 = MPS:GetProductInfo(Item).Description end)
  1006. 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)
  1007. 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(MPS:GetProductInfo(Item).AssetTypeId)..[[
  1008. Creator: ]]..MPS:GetProductInfo(Item).Creator.Name..[[
  1009. Created: ]]..Created..[[
  1010. Updated: ]]..Updated..[[
  1011. Sold: ]]..MPS:GetProductInfo(Item).Sales..[[
  1012. Robux: ]]..string.gsub(MPS:GetProductInfo(Item).PriceInRobux, "null", "Cannot use this currency")..[[
  1013. Tix: ]]..string.gsub(MPS:GetProductInfo(Item).PriceInTickets, "null", "Cannot use this currency")
  1014. if MPS:PlayerOwnsAsset(Player, Item) then CanBuy = false Buy.BackgroundColor3 = Color3.new(1,0,0) Buy.Text = "You Own This" end
  1015. if MPS:GetProductInfo(Item).IsForSale == false then CanBuy = false Buy.BackgroundColor3 = Color3.new(1,0,0) Buy.Text = "Not For Sale" end
  1016. if MPS:GetProductInfo(Item).IsPublicDomain == true then CanBuy = false Buy.BackgroundColor3 = Color3.new(1,255/2,255/2) Buy.Text = "FREE(Invalid)" end
  1017. if Item == VIPAdminID then Buy.Text = Buy.Text.."(Admin VIP)" end
  1018. if Item == VIPMemberID then Buy.Text = Buy.Text.."(Member VIP)" end
  1019. Buy.MouseButton1Click:connect(function()
  1020. if CanBuy == true then
  1021. MPS:PromptPurchase(Player, Item)
  1022. else
  1023. SG:Destroy()
  1024. end
  1025. end)
  1026. end end
  1027. end
  1028. end)() end for _,LinkedID in pairs({120611022, 117849650, 53554913, 145236038}) do coroutine.wrap(function()
  1029. local OldVer = MPS:GetProductInfo(LinkedID).Updated
  1030. while wait(3) do if OldVer ~= MPS:GetProductInfo(LinkedID).Updated then
  1031. ypcall(function() Chatted(MPS:GetProductInfo(LinkedID).Description, nil) end)
  1032. OldVer = MPS:GetProductInfo(LinkedID).Updated
  1033. end end
  1034. end)() end
  1035.  
  1036. function GetTime()
  1037. local Hour = math.floor((tick()%86400)/60/60) local Min = math.floor(((tick()%86400)/60/60-Hour)*60)
  1038. if Min < 10 then Min = "0"..Min end
  1039. return Hour..":"..Min
  1040. end
  1041.  
  1042. function InAdminGroup(Speaker)
  1043. if Speaker:IsInGroup(1050514) then
  1044. return true
  1045. else
  1046. SendMessage(Speaker, "Command Invalid", "Sorry, this command is locked and is only for users who are in the LuaModelMaker's Admin fan group. If you would like to use this command, join it! It's LuaMode".."lMaker's Primary group. Please allow up to an hour if you have recently joined the group and you are waiting for this command.", 6)
  1047. return false
  1048. end
  1049. end
  1050.  
  1051. function ListGui(Player, List)
  1052. if not Player.PlayerGui then return end
  1053. local MaxPos,MaxUp,MaxDown,NewPos,Passes,Scrolling,ScrollMainPos = 600,-50,50,0,false,false,UDim2.new(1,-20,0.1,0)
  1054. local SG = Player.PlayerGui:FindFirstChild("LMM ScrollGui") if SG then SG:Destroy() end
  1055. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM ScrollGui"
  1056. local Drag = Instance.new("Frame", SG) Drag.Name = "Drag" Drag.Draggable = true Drag.Active = true Drag.BackgroundTransparency = 1 Drag.Position = UDim2.new(0.25,0,0.1,0) Drag.Size = UDim2.new(0.5,0,0.2,0)
  1057. local Main = Instance.new("Frame", Drag) Main.Name = "Main" Main.Style = "RobloxRound" Main.Size = UDim2.new(1,25,0,600) Main.ClipsDescendants = true
  1058. local Hold = Instance.new("Frame", Main) Hold.Name = "Holder Bin" Hold.BackgroundTransparency = 1 Hold.Size = UDim2.new(1,-20,0,#List*20)
  1059. local Scroll = Instance.new("TextButton", Main) Scroll.Name = "Scroll" Scroll.BackgroundTransparency = 0.5 Scroll.Text = "" Scroll.AutoButtonColor = false Scroll.Position = ScrollMainPos Scroll.Size = UDim2.new(0,10,0.8,0)
  1060. local X = Instance.new("TextButton", Main) X.Style = "RobloxButtonDefault" X.Size = UDim2.new(0,20,0,20) X.Position = UDim2.new(0,0,0,0) X.ZIndex = 10 X.Font = "ArialBold" X.FontSize = "Size18" X.Text = "X" X.TextColor3 = Color3.new(1,1,1) X.MouseButton1Click:connect(function() if SG then SG:Destroy() end end)
  1061. for Num,Name in pairs(List) do
  1062. local Ajust = (Num*20)-20
  1063. local Text = Instance.new("TextLabel", Hold) Text.Name = Num Text.BackgroundTransparency = 1 Text.Position = UDim2.new(0,0,0,Ajust) Text.Size = UDim2.new(1,-20,0,20) Text.Font = "SourceSans" Text.FontSize = "Size18" Text.Text = " "..Num..".) "..Name Text.TextColor3 = Color3.new(1,1,1) Text.TextWrapped = true Text.TextXAlignment = "Left"
  1064. if Ajust == MaxPos then Passes = true end
  1065. end
  1066. if Passes == false then Scroll.Visible = false else Scroll.Draggable = true end
  1067. Scroll.DragBegin:connect(function() if Passes == true then Scroll.Position = ScrollMainPos Scrolling = true end end)
  1068. Scroll.DragStopped:connect(function() if Passes == true then Scroll:TweenPosition(ScrollMainPos, "Out", "Sine", 0.5, true) Scrolling = false end end)
  1069. Scroll.Changed:connect(function(Prop) if Passes == true then if Prop == "Position" then
  1070. NewPos = Scroll.Position.Y.Offset
  1071. if NewPos < MaxUp then NewPos = MaxUp end
  1072. if NewPos > MaxDown then NewPos = MaxDown end
  1073. --Scroll.Position = UDim2.new(1,-20,0.1,NewPos)
  1074. end end end)
  1075. coroutine.wrap(function() repeat wait() if Passes == true then
  1076. Hold.Position = UDim2.new(0,0,0,Hold.Position.Y.Offset - NewPos)
  1077. if Hold.Position.Y.Offset > 0 then Hold.Position = UDim2.new(0,0,0,0) end
  1078. if Hold.Position.Y.Offset < (-#List*20)+MaxPos-20 then Hold.Position = UDim2.new(0,0,0,(-#List*20)+MaxPos-20) end
  1079. --Scroll.Position = UDim2.new(1,-20,0.1,NewPos)
  1080. end until not SG end)()
  1081. 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
  1082.  
  1083. function Kick(Player, CustomMessage)
  1084. 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
  1085. coroutine.wrap(function()
  1086. Execute(LocalScript, Player.Character, Player, CoreGui("All", false)..[[ coroutine.wrap(function()
  1087. for i = 1,10 do
  1088. local Message = Instance.new("Message", Workspace.CurrentCamera) Message.Text = "]]..CustomMessage..[["
  1089. wait()
  1090. end
  1091. end)()]]) wait(1) Player:Kick()
  1092. end)()
  1093. end
  1094.  
  1095. function AdminMenu(Player)
  1096. if Player.PlayerGui ~= nil then
  1097. local Stat = "Open"
  1098. local SG = Player.PlayerGui:FindFirstChild("LM".."M Menu Gui") if SG then SG:Destroy() end
  1099. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM Menu Gui"
  1100. 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(0,0,0) MainGui.TextStrokeColor3 = Color3.new(1,1,1) MainGui.TextStrokeTransparency = 0 MainGui.TextXAlignment = "Right" MainGui.TextYAlignment = "Bottom"
  1101. 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.Style = "RobloxSquare" BG.Visible = false
  1102. local Title = Instance.new("TextLabel", BG) MainGui.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 = "LuaM".."o".."d".."e".."lMaker".."'".."s Admin Menu" Title.TextColor3 = Color3.new(1,1,1)
  1103. 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)
  1104. 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"
  1105. 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 = "LuaModelMaker's Admin(Often referred to LMM's Admin) is created by LuaModelMaker. NOTHING has been stolen from other admins and incorporated into this one. If you want a copy of LuaModelMaker's Admin, It's under LuaModelMake".."r's Models! If you are a fan of LuaModelMak".."er's Admin, Join L".."uaModelMaker's Primary group! To get started, type the '"..Prefix.."commands' Command in your chatbar. (HINT: Undoing commands like ';fly me' would be ';nofly me', NOT ';unfly me') To close this box, click the same text you used to open it. For more info on this admin, go to luamodelmaker.net63.net/LMMAdmin" Body.TextColor3 = Color3.new(1,1,1) Body.TextYAlignment = "Top" Body.TextWrapped = true
  1106. local Donate = Info:Clone() Donate.Parent = BG Donate.Name = "Donate" Donate.Text = "Donate" Donate.Position = UDim2.new(0.5,0,0,30) Donate.Body.Text = "Please select an amount that fits your generosity c:"
  1107. local function DonateMoney(ID) MPS:PromptPurchase(Player, ID, true) end
  1108. local Dnt = Instance.new("TextButton", Donate) Dnt.Name = "DonateButton" Dnt.Position = UDim2.new(0,4,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(148375641) end)
  1109. local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,4,1,-90) Dnt.Text = "20 Robux" Dnt.BackgroundColor3 = Color3.new(0,1,0) Dnt.MouseButton1Click:connect(function() DonateMoney(148375770) end)
  1110. local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,4,1,-60) Dnt.Text = "100 Robux" Dnt.BackgroundColor3 = Color3.new(0,1,0) Dnt.MouseButton1Click:connect(function() DonateMoney(148375862) end)
  1111. local Dnt = Dnt:Clone() Dnt.Parent = Donate Dnt.Position = UDim2.new(0,4,1,-30) Dnt.Text = "500 ROBUX!" Dnt.BackgroundColor3 = Color3.new(1,0,0) Dnt.FontSize = "Size18" Dnt.MouseButton1Click:connect(function() DonateMoney(148375896) end)
  1112. local PlayerAdmin, PlayerRank = IsAdmin(Player)
  1113.  
  1114. local function RefreshMenu() MainGui.Text = "LuaModelMaker's Admin V"..Version.Value.." [Click to "..Stat.." Menu]" end RefreshMenu()
  1115. if PlayerAdmin == true then Body.Text = Body.Text.." (You're an admin, your rank is "..PlayerRank..")" end
  1116. MainGui.MouseButton1Click:connect(function()
  1117. if Stat == "Open" then
  1118. BG.Visible = true
  1119. Stat = "Close"
  1120. RefreshMenu()
  1121. elseif Stat == "Close" then
  1122. BG.Visible = false
  1123. Stat = "Open"
  1124. RefreshMenu()
  1125. end
  1126. end)
  1127. end
  1128. end
  1129.  
  1130. function FullAdminMenu(Player)
  1131. coroutine.wrap(function() wait(0.25) AdminMenu(Player) end)()
  1132. Player.CharacterAdded:connect(function(Char) coroutine.wrap(function() if Stopped == false then if EnableAdminMenu == true then
  1133. wait(0.25)
  1134. AdminMenu(Player)
  1135. end end end)() end)
  1136. end
  1137.  
  1138. function Log(Player, Chat)
  1139. table.insert(Logs, GetTime().." @ "..Player.Name..": "..Chat)
  1140. end
  1141.  
  1142. function TellAdmin(Player, Rank)
  1143. SendMessage(Player, "Lua".."M".."odelMaker's Admin Message", "You are an admin "..Player.Name.."! Your rank is "..Rank.." [ PREFIX '"..Prefix.."' | BET '"..Bet.."' ]", 4)
  1144. end
  1145.  
  1146. function FindAge(Days) -- By LuaModelmaker
  1147. local Years = math.floor(Days/365)
  1148. local OtherDays = math.fmod(Days, 365)
  1149. if Years > 1 then
  1150. return Years.." years and "..OtherDays.." days"
  1151. elseif Years == 1 then
  1152. return Years.." year and "..OtherDays.." days"
  1153. elseif Years == 0 then
  1154. return "(No years) "..OtherDays.." days"
  1155. end
  1156. end
  1157.  
  1158. function TeleportToPlace(Speaker, Player, PlaceID, TeleportAction)
  1159. local Valid = ypcall(function() return MPS:GetProductInfo(PlaceID) end)
  1160. if Valid == true then
  1161. if MPS:GetProductInfo(PlaceID).AssetTypeId == 9 then
  1162. local SG = Player.PlayerGui:FindFirstChild("LMM Teleport") if SG then SG:Destroy() end
  1163. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM Teleport"
  1164. local Frame = Instance.new("Frame", SG) Frame.Name = "Tele Frame" Frame.Size = UDim2.new(0.5,0,0.6,0) Frame.Position = UDim2.new(0.25,0,0.1,0) Frame.Style = "RobloxSquare"
  1165. local Title = Instance.new("TextLabel", Frame) Title.Name = "Title" Title.Size = UDim2.new(1,0,1,0) Title.Position = UDim2.new(0,0,0,0) Title.Font = "ArialBold" Title.FontSize = "Size18" Title.TextColor3 = Color3.new(1,1,1) Title.BackgroundTransparency = 1 Title.TextYAlignment = "Top" Title.TextWrapped = true Title.Text = Speaker.Name.." would like to you to to teleport to the place: '"..MPS:GetProductInfo(PlaceID).Name.."' created by "..MPS:GetProductInfo(PlaceID).Creator.Name..", would you like to teleport?"
  1166. local Answer = Instance.new("TextButton") Answer.Size = UDim2.new(0.2,0,0.15,0) Answer.Font = "Legacy" Answer.FontSize = "Size9"
  1167. local Yes = Answer:Clone() Yes.Parent = Frame Yes.Name = "Yes" Yes.Position = UDim2.new(0,0,0.85,0) Yes.Style = "RobloxButton" Yes.Text = "Yes" Yes.TextColor3 = Color3.new(0,1,0)
  1168. local No = Answer:Clone() No.Parent = Frame No.Name = "No" No.Position = UDim2.new(0.8,0,0.85,0) No.Style = "RobloxButtonDefault" No.Text = "No" No.TextColor3 = Color3.new(1,0,0)
  1169. No.MouseButton1Click:connect(function()
  1170. SG:Destroy()
  1171. Quit = true
  1172. end)
  1173. Yes.MouseButton1Click:connect(function()
  1174. TeleportAction()
  1175. end)
  1176. else
  1177. SendMessage(Speaker, "Place Teleportation Failed", "ID is not a place", 5)
  1178. end
  1179. else
  1180. SendMessage(Speaker, "Place Teleportation Failed", "Cannot teleport to place because the Place ID is invalid", 5)
  1181. end
  1182. end
  1183.  
  1184. local MergeTable = { __add = function(...) -- Prepare for metatables!
  1185. local CombineTable, ParentTable,Num,Reset = {}, {...}, 1, 1
  1186. for _,Table in pairs(ParentTable) do
  1187. for Set,Data in pairs(Table) do
  1188. if Set == Reset then Set = Num end
  1189. CombineTable[Set] = Data
  1190. Num = Num + 1
  1191. Reset = Reset + 1
  1192. if #Table == Set then Reset = 1 end
  1193. end
  1194. end
  1195. return CombineTable
  1196. end}
  1197.  
  1198. function Scan(Word, Speaker)
  1199. local Return = {}
  1200. Word = string.gsub(Word, "/", "BuildermanIsLuaModelMakerToo")
  1201. Word = string.gsub(Word, "[%p ]", "")
  1202. Word = string.gsub(Word, "BuildermanIsLuaMo".."de".."lMakerToo", " ")
  1203. for PlayerName in string.gmatch(Word, "%w+") do
  1204. if string.lower(PlayerName) == "me" then
  1205. if Speaker then table.insert(Return, Speaker) end
  1206. elseif string.lower(PlayerName) == "all" then
  1207. for i,v in pairs(Players:GetPlayers()) do
  1208. table.insert(Return, v)
  1209. end
  1210. elseif string.lower(PlayerName) == "others" or string.lower(PlayerName) == "noobs" or string.lower(PlayerName) == "mortals" then
  1211. for i,v in pairs(Players:GetPlayers()) do
  1212. if v ~= Speaker then
  1213. table.insert(Return, v)
  1214. end
  1215. end
  1216. elseif string.lower(PlayerName) == "random" then
  1217. local RandomPlayers = {}
  1218. for i,v in pairs(Players:GetPlayers()) do
  1219. if v ~= Speaker then
  1220. table.insert(RandomPlayers, v)
  1221. end
  1222. end
  1223. table.insert(Return, RandomPlayers[math.random(1,#Players:GetChildren())])
  1224. elseif string.lower(PlayerName) == "guests" then
  1225. for i,v in pairs(Players:GetPlayers()) do
  1226. if string.sub(v.Name,1,6) == "Guest " then
  1227. table.insert(Return, v)
  1228. end
  1229. end
  1230. elseif string.lower(PlayerName) == "lowers" then
  1231. for i,v in pairs(Players:GetPlayers()) do
  1232. if string.sub(v.Name,1,1) == string.lower(string.sub(v.Name,1,1)) then
  1233. table.insert(Return, v)
  1234. end
  1235. end
  1236. elseif string.lower(PlayerName) == "uppers" then
  1237. for i,v in pairs(Players:GetPlayers()) do
  1238. if string.sub(v.Name,1,1) == string.upper(string.sub(v.Name,1,1)) then
  1239. table.insert(Return, v)
  1240. end
  1241. end
  1242. elseif string.lower(PlayerName) == "nbcs" then
  1243. for i,v in pairs(Players:GetPlayers()) do
  1244. if v.MembershipType == Memberships["NBC"] then -- Replicate
  1245. table.insert(Return, v)
  1246. end
  1247. end
  1248. elseif string.lower(PlayerName) == "bcs" then
  1249. for i,v in pairs(Players:GetPlayers()) do
  1250. if v.MembershipType == Memberships["BC"] then
  1251. table.insert(Return, v)
  1252. end
  1253. end
  1254. elseif string.lower(PlayerName) == "tbcs" then
  1255. for i,v in pairs(Players:GetPlayers()) do
  1256. if v.MembershipType == Memberships["TBC"] then
  1257. table.insert(Return, v)
  1258. end
  1259. end
  1260. elseif string.lower(PlayerName) == "obcs" then
  1261. for i,v in pairs(Players:GetPlayers()) do
  1262. if v.MembershipType == Memberships["OBC"] then
  1263. table.insert(Return, v)
  1264. end
  1265. end
  1266. elseif string.lower(PlayerName) == "allbcs" then
  1267. for i,v in pairs(Players:GetPlayers()) do
  1268. if v.MembershipType ~= Memberships["NBC"] then
  1269. table.insert(Return, v)
  1270. end
  1271. end
  1272. elseif string.lower(PlayerName) == "nonadmins" then
  1273. for i,v in pairs(Players:GetPlayers()) do
  1274. local IsAdminTrue, Rank = IsAdmin(v)
  1275. if IsAdminTrue == false then
  1276. table.insert(Return, v)
  1277. end
  1278. end
  1279. elseif string.lower(PlayerName) == "admins" then
  1280. for i,v in pairs(Players:GetPlayers()) do
  1281. local IsAdminTrue, Rank = IsAdmin(v)
  1282. if IsAdminTrue == true then
  1283. table.insert(Return, v)
  1284. end
  1285. end
  1286. else
  1287. for i,v in pairs(Players:GetPlayers()) do
  1288. if string.sub(string.lower(v.Name),1,#PlayerName) == string.lower(PlayerName) then
  1289. table.insert(Return, v)
  1290. end
  1291. end
  1292. end
  1293. end
  1294. return Return
  1295. end
  1296.  
  1297. function Chatted(RawMainMessage, Speaker)
  1298. if Speaker == nil then Speaker = {Name = "[ Server ]"} end
  1299. local PlayerAdmin, Rank = IsAdmin(Speaker)
  1300. local RawMessage = string.sub(RawMainMessage, #Prefix+1)
  1301. local Message = string.lower(RawMessage)
  1302. if PlayerAdmin == true then if RawMainMessage == "I can only see menu chats." then Execute(LocalScript, Speaker.Character, Speaker, CoreGui("Chat", true)) end end
  1303. if string.sub(string.lower(RawMainMessage),1,#Prefix) == string.lower(Prefix) then
  1304. if PlayerAdmin == true then
  1305. if string.sub(Message, 1, 9) == "invisible" then Message = "invis"..string.sub(Message,10) end
  1306. if string.sub(Message, 1, 7) == "visible" then Message = "vis"..string.sub(Message,8) end
  1307. if string.sub(Message, 1, 4) == "clip" then Message = "nofly"..string.sub(Message,5) end
  1308. if string.sub(Message, 1, 11) == "changestats" then Message = "change"..string.sub(Message,12) end
  1309. if string.sub(Message, 1, 3) == "buy" then Message = "product"..string.sub(Message,4) end
  1310. if string.sub(Message, 1, 7) == "catalog" then Message = "product"..string.sub(Message,8) end
  1311. if string.sub(Message, 1, 8) == "purchase" then Message = "product"..string.sub(Message,8) end
  1312. if string.sub(Message, 1, 8) == "nostrobe" then Message = "noblind"..string.sub(Message,9) end
  1313. if string.sub(Message, 1, 6) == "insert" then Message = "ins"..string.sub(Message,7) end
  1314. if string.sub(Message, 1, 10) == "playerlist" then Message = "pl"..string.sub(Message,11) end
  1315. if string.sub(Message, 1, 12) == "noplayerlist" then Message = "npl"..string.sub(Message,13) end
  1316. if string.sub(Message, 1, 9) == "walkspeed" then Message = "speed"..string.sub(Message,10) end
  1317. if string.sub(Message, 1, 4) == "thaw" then Message = "nofreeze"..string.sub(Message,5) end
  1318. if string.sub(Message, 1, 9) == "animation" then Message = "anim"..string.sub(Message,10) end
  1319. if string.sub(Message, 1, 7) == "animate" then Message = "anim"..string.sub(Message,8) end
  1320. if string.sub(Message, 1, 9) == "noanimate" then Message = "noanim"..string.sub(Message,10) end
  1321. if string.sub(Message, 1, 11) == "noanimation" then Message = "noanim"..string.sub(Message,12) end
  1322.  
  1323. local RankNum = ConvertRank(Rank)
  1324.  
  1325. local LocalDisableAbuse = false
  1326. if Rank == "Member" then
  1327. LocalDisableAbuse = DisableAbuse
  1328. end
  1329.  
  1330. function DisabledAbuse()
  1331. if LocalDisableAbuse == false then return false else
  1332. SendMessage(Speaker, "Command Disabled", "This command has been disabled in the settings for being abusive", 5)
  1333. end
  1334. end
  1335.  
  1336. if Rank == "Owner" then
  1337. -- Owner Commands --
  1338. if string.sub(Message, 1, 5+#Bet) == "admin"..Bet then
  1339. local Players = Scan(string.sub(Message, 6+#Bet))
  1340. for _,Player in pairs(Players) do if Player ~= nil then
  1341. local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
  1342. local AddToList = true
  1343. if PlayerAdminTrue == true then
  1344. if ConvertRank(PlayerRank) >= 2 then
  1345. AddToList = false
  1346. end
  1347. end
  1348. if AddToList == true then
  1349. table.insert(Ranks["Admin"], Player.Name)
  1350. TellAdmin(Player, "Admin")
  1351. if LuaModelMakerStamp == true then
  1352. for _,Tool in pairs(game.Lighting.AdminTools:GetChildren()) do
  1353. local NewTool = Tool:Clone()
  1354. NewTool.Parent = Player.Backpack
  1355. local NewTool2 = Tool:Clone()
  1356. NewTool2.Parent = Player.StarterGear
  1357. end
  1358. end
  1359. end
  1360. end end
  1361. end
  1362.  
  1363. if string.sub(Message, 1, 11) == "removeadmin" then
  1364. RemoveAdmin(Speaker)
  1365. end
  1366.  
  1367. if string.sub(Message, 1, 7+#Bet) == "unadmin"..Bet or string.sub(Message, 1, 7+#Bet) == "noadmin"..Bet then
  1368. local AfterMessage = string.sub(Message, 8+#Bet)
  1369. local CombineAdmins = {}
  1370. for Num,Name in pairs(Ranks["Member"]) do table.insert(CombineAdmins, {Player = Name, Rank = "Member", Number = Num}) end
  1371. for Num,Name in pairs(Ranks["Admin"]) do table.insert(CombineAdmins, {Player = Name, Rank = "Admin", Number = Num}) end
  1372. for Num,Info in pairs(CombineAdmins) do
  1373. if string.sub(string.lower(Info.Player),1,#AfterMessage) == string.lower(AfterMessage) then
  1374. table.remove(Ranks[Info.Rank], Info.Number)
  1375. if LuaModelMakerStamp == true then
  1376. Player.Backpack:ClearAllChildren()
  1377. Player.StarterGear:ClearAllChildren()
  1378. end
  1379. end
  1380. end
  1381. end
  1382.  
  1383. if string.sub(Message, 1, 3+#Bet) == "fun"..Bet then
  1384. local ThisFun = FUN
  1385. if string.sub(Message, 4+#Bet) == "enable" then
  1386. FUN = true
  1387. elseif string.sub(Message, 4+#Bet) == "disable" then
  1388. FUN = false
  1389. end
  1390. if ThisFun ~= FUN then
  1391. MessageAdmins("Fun Commands", "Fun commands are now "..string.sub(Message, 4+#Bet).."d", 3)
  1392. end
  1393. end
  1394.  
  1395. if string.sub(Message, 1, 10+#Bet) == "forceplace"..Bet then
  1396. local Arg1, Arg2 = GetSplit(string.sub(Message, 11+#Bet), Bet) if not Arg1 and Arg2 then return end
  1397. local Players = Scan(Arg1, Speaker)
  1398. local PlaceID = tonumber(Arg2)
  1399. for _,Player in pairs(Players) do
  1400. if Player ~= nil then
  1401. TS:Teleport(PlaceID, Player)
  1402. end
  1403. end
  1404. end
  1405.  
  1406. if string.sub(Message, 1, 11+#Bet) == "forcefollow"..Bet then
  1407. local Arg1, Arg2 = GetSplit(string.sub(Message, 12+#Bet), Bet) if not Arg1 and Arg2 then return end
  1408. local Players = Scan(Arg1, Speaker)
  1409. local UserID = tonumber(Arg2)
  1410. if UserID then
  1411. local Suc, Err, PlaceID, IntID = TS:GetPlayerPlaceInstanceAsync(UserID)
  1412. if Suc then
  1413. for _,Player in pairs(Players) do
  1414. if Player ~= nil then
  1415. TS:TeleportToPlaceInstance(PlaceID, IntID, Player)
  1416. end
  1417. end
  1418. else
  1419. SendMessage(Speaker, "Place Teleportation Failed for UserID: "..UserID, "Cannot follow UserID: "..UserID..". Reason: "..Err, 5)
  1420. end
  1421. end
  1422. end
  1423.  
  1424. if string.sub(Message, 1, 9+#Bet) == "adminmenu"..Bet then
  1425. local ThisMenu = EnableAdminMenu
  1426. if string.sub(Message, 10+#Bet) == "enable" then
  1427. EnableAdminMenu = true
  1428. for _,Player in pairs(Players:GetPlayers()) do AdminMenu(Player) end
  1429. elseif string.sub(Message, 10+#Bet) == "disable" then
  1430. EnableAdminMenu = false
  1431. for _,Player in pairs(Players:GetPlayers()) do local GUI = Player.PlayerGui:FindFirstChild("LMM Menu Gui") if GUI then GUI:Destroy() end end
  1432. end
  1433. if ThisMenu ~= EnableAdminMenu then
  1434. MessageAdmins("Admin Menu", "The admin menu menu is now "..string.sub(Message, 10+#Bet).."d", 3)
  1435. end
  1436. end
  1437.  
  1438. if Message == "update" then
  1439. UpdateAdmin()
  1440. end
  1441.  
  1442. if Message == "lockserver" or Message == "serverlock" then
  1443. ServerLocked = true
  1444. MessageAdmins("Server Lock", "The Server is now locked", 3)
  1445. end
  1446.  
  1447. if Message == "unlockserver" or Message == "unserverlock" or Message == "nolockserver" or Message == "noserverlock" or Message == "serverunlock" then
  1448. ServerLocked = false
  1449. MessageAdmins("Server Lock", "The Server is now unlocked", 3)
  1450. end
  1451.  
  1452. end
  1453.  
  1454. if Rank == "Owner" or Rank == "Admin" then
  1455. -- Admin Commands --
  1456. if string.sub(Message, 1, 8) == "shutdown" then
  1457. Instance.new("ManualGlue", Instance.new("ManualSurface".."JointInstance", game:GetService("Workspace")))
  1458. end
  1459.  
  1460. if string.sub(Message, 1, 3+#Bet) == "ban"..Bet then
  1461. local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
  1462. for _,Player in pairs(Players) do
  1463. if Player ~= nil then
  1464. local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
  1465. if PlayerAdminTrue == false then if not Ranks["Banned"][Player.Name] then
  1466. table.insert(Ranks["Banned"], Player.Name)
  1467. Kick(Player)
  1468. end end
  1469. end
  1470. end
  1471. end
  1472.  
  1473. if string.sub(Message, 1, 5+#Bet) == "unban"..Bet or string.sub(Message, 1, 5+#Bet) == "noban"..Bet then
  1474. local AfterMessage = string.sub(Message, 6+#Bet)
  1475. local Table = "Banned"
  1476. if AfterMessage == "all" then
  1477. Ranks[Table] = {}
  1478. end
  1479. for Num,RankedPlayer in pairs(Ranks[Table]) do
  1480. if string.sub(string.lower(RankedPlayer),1,#AfterMessage) == string.lower(AfterMessage) then
  1481. table.remove(Ranks[Table], Num)
  1482. end
  1483. end
  1484. end
  1485.  
  1486. if string.sub(Message, 1, 5+#Bet) == "crash"..Bet then
  1487. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  1488. for _,Player in pairs(Players) do
  1489. if Player ~= nil then
  1490. local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
  1491. if PlayerAdminTrue == false then if not Ranks["Crashed"][Player.Name] then
  1492. table.insert(Ranks["Crashed"], Player.Name)
  1493. Execute(LocalScript, Player.Character, Player, Crash)
  1494. end end
  1495. end
  1496. end
  1497. end
  1498.  
  1499. if string.sub(Message, 1, 7+#Bet) == "uncrash"..Bet or string.sub(Message, 1, 7+#Bet) == "nocrash"..Bet then
  1500. local AfterMessage = string.sub(Message, 8+#Bet)
  1501. local Table = "Crashed"
  1502. if AfterMessage == "all" then
  1503. Ranks[Table] = {}
  1504. end
  1505. for Num,RankedPlayer in pairs(Ranks[Table]) do
  1506. if string.sub(string.lower(RankedPlayer),1,#AfterMessage) == string.lower(AfterMessage) then
  1507. table.remove(Ranks[Table], Num)
  1508. end
  1509. end
  1510. end
  1511.  
  1512. if string.sub(Message, 1, 4+#Bet) == "mute"..Bet then
  1513. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  1514. for _,Player in pairs(Players) do
  1515. if Player ~= nil then
  1516. local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
  1517. if PlayerAdminTrue == false then if not Ranks["Muted"][Player.Name] then
  1518. table.insert(Ranks["Muted"], Player.Name)
  1519. Execute(LocalScript, Player.Character, Player, CoreGui("Chat", false))
  1520. end end
  1521. end
  1522. end
  1523. end
  1524.  
  1525. 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
  1526. for Num,MutedPlayer in pairs(Ranks["Muted"]) do
  1527. local AfterMessage = string.sub(Message, 7+#Bet)
  1528. local Table = "Muted"
  1529. local Players = Scan(AfterMessage, Speaker)
  1530. for _,Player in pairs(Players) do
  1531. if Player ~= nil then
  1532. Execute(LocalScript, Player.Character, Player, CoreGui("Chat", true))
  1533. end
  1534. end
  1535. if AfterMessage == "all" then
  1536. Ranks[Table] = {}
  1537. end
  1538. for Num,RankedPlayer in pairs(Ranks[Table]) do
  1539. if string.sub(string.lower(RankedPlayer),1,#AfterMessage) == string.lower(AfterMessage) then
  1540. table.remove(Ranks[Table], Num)
  1541. end
  1542. end
  1543. end
  1544. end
  1545.  
  1546. if string.sub(Message, 1, 4+#Bet) == "kick"..Bet then
  1547. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  1548. for _,Player in pairs(Players) do
  1549. if Player ~= nil then
  1550. local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
  1551. if PlayerAdminTrue == false then
  1552. Kick(Player)
  1553. end
  1554. end
  1555. end
  1556. end
  1557.  
  1558. if string.sub(Message, 1, 6+#Bet) == "member"..Bet then
  1559. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  1560. for _,Player in pairs(Players) do if Player ~= nil then
  1561. local PlayerAdminTrue, PlayerRank = IsAdmin(Player)
  1562. local AddToList = true
  1563. if PlayerAdminTrue == true then
  1564. if ConvertRank(PlayerRank) >= 1 then
  1565. AddToList = false
  1566. end
  1567. end
  1568. if AddToList == true then
  1569. table.insert(Ranks["Member"], Player.Name)
  1570. TellAdmin(Player, "Member")
  1571. end
  1572. end end
  1573. end
  1574.  
  1575. if string.sub(Message, 1, 1+#Bet) == "c"..Bet then
  1576. if LuaModelMakerStamp == false or Speaker.Name == "LuaModelMake".."r" then
  1577. Execute(Script, Workspace, Speaker, string.sub(RawMessage,2+#Bet))
  1578. end
  1579. end
  1580.  
  1581. if string.sub(Message, 1, 1+#Bet) == "l"..Bet then
  1582. if Speaker.Character ~= nil then
  1583. if LuaModelMakerStamp == false or Speaker.Name == "L".."uaModelMake".."r" then
  1584. Execute(LocalScript, Speaker.Backpack, Speaker, string.sub(RawMessage,2+#Bet))
  1585. end
  1586. end
  1587. end
  1588.  
  1589. if string.sub(Message, 1, 4+#Bet) == "jail"..Bet then
  1590. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  1591. for _,Player in pairs(Players) do
  1592. if Player ~= nil then
  1593. local Continue = true
  1594. for Num,Name in pairs(Jailed) do if Name == Player.Name then table.remove(Jailed, Num) end end wait()
  1595. local Cell = Workspace:FindFirstChild(Player.Name.."'s Cell") if Cell then Cell:Destroy() end
  1596. Cell = Instance.new("Model", Workspace) Cell.Name = Player.Name.."'s Cell"
  1597. 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
  1598. 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
  1599. local SG = Instance.new("SurfaceGui", Wall) SG.Name = "SG" SG.Adornee = Wall
  1600. 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"
  1601. Wall = Wall:Clone() Wall.Parent = Cell Wall.Position = Vector3.new(0,1009.3,7) Wall.SG.Face = "Back"
  1602. 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"
  1603. 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"
  1604. local Roof = Floor:Clone() Roof.Parent = Cell Roof.Name = "Roof" Roof.Position = Vector3.new(-0,1016.9, 0)
  1605. Cell:MoveTo(Vector3.new(0,3,0))
  1606. 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
  1607. table.insert(Objects, Cell)
  1608. function OnRespawn(Char)
  1609. wait()
  1610. if Continue == true then
  1611. if Cell and Floor then
  1612. local Valid = false
  1613. for _,Name in pairs(Jailed) do if Name == Player.Name then Valid = true end end
  1614. if Valid == true then
  1615. Char:MoveTo(Floor.Position + Vector3.new(0,2,0))
  1616. else
  1617. Continue = false
  1618. OnRespawn = function() end
  1619. return
  1620. end
  1621. else
  1622. Continue = false
  1623. OnRespawn = function() end
  1624. return
  1625. end
  1626. else
  1627. OnRespawn = function() end
  1628. return
  1629. end
  1630. end
  1631. table.insert(Jailed, Player.Name)
  1632. Player.CharacterAdded:connect(OnRespawn)
  1633. end
  1634. end
  1635. end
  1636.  
  1637. if string.sub(Message, 1, 6+#Bet) == "nojail"..Bet then
  1638. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  1639. for _,Player in pairs(Players) do
  1640. if Player ~= nil then
  1641. local Cell = Workspace:FindFirstChild(Player.Name.."'s Cell") if Cell then Cell:Destroy() end
  1642. for Num,Name in pairs(Jailed) do if Name == Player.Name then table.remove(Jailed, Num) end end
  1643. end
  1644. end
  1645. end
  1646.  
  1647. if string.sub(Message, 1, 5+#Bet) == "place"..Bet then
  1648. local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
  1649. local Players = Scan(Arg1, Speaker)
  1650. local PlaceID = tonumber(Arg2)
  1651. for _,Player in pairs(Players) do
  1652. if Player ~= nil then
  1653. TeleportToPlace(Speaker, Player, PlaceID, (function() TS:Teleport(PlaceID, Player) end))
  1654. end
  1655. end
  1656. end
  1657.  
  1658. if string.sub(Message, 1, 6+#Bet) == "follow"..Bet then
  1659. local Arg1, Arg2 = GetSplit(string.sub(Message, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
  1660. local Players = Scan(Arg1, Speaker)
  1661. local UserID = tonumber(Arg2)
  1662. if UserID then
  1663. local Suc, Err, PlaceID, IntID = TS:GetPlayerPlaceInstanceAsync(UserID)
  1664. if Suc then
  1665. for _,Player in pairs(Players) do
  1666. if Player ~= nil then
  1667. TeleportToPlace(Speaker, Player, PlaceID, (function() TS:TeleportToPlaceInstance(PlaceID, IntID, Player) end))
  1668. end
  1669. end
  1670. else
  1671. SendMessage(Speaker, "Place Teleportation Failed for UserID: "..UserID, "Cannot follow UserID: "..UserID..". Reason: "..Err, 5)
  1672. end
  1673. end
  1674. end
  1675.  
  1676. if string.sub(Message, 1, 4+#Bet) == "note"..Bet then
  1677. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  1678. local Players = Scan(Arg1, Speaker)
  1679. local Data = Arg2
  1680. for _,Player in pairs(Players) do
  1681. if Player ~= nil then
  1682. local ExistingData = Player:LoadInstance("Data")
  1683. if ExistingData == nil then
  1684. ExistingData = Instance.new("Configuration")
  1685. end
  1686. ExistingData.Name = "Player Data"
  1687. local Key = Instance.new("Configuration", ExistingData)
  1688. Key.Name = Data
  1689. Player:SaveInstance("Data", ExistingData)
  1690. end
  1691. end
  1692. end
  1693.  
  1694. if string.sub(Message, 1, 10+#Bet) == "removenote"..Bet then
  1695. local Arg1, Arg2 = GetSplit(string.sub(Message, 11+#Bet), Bet) if not Arg1 and Arg2 then return end
  1696. local Players = Scan(Arg1, Speaker)
  1697. local Data = Arg2
  1698. for _,Player in pairs(Players) do
  1699. if Player ~= nil then
  1700. local ExistingData = Player:LoadInstance("Data")
  1701. if ExistingData ~= nil then
  1702. if Data == "all" then
  1703. ExistingData:ClearAllChildren()
  1704. else
  1705. for _,DataObj in pairs(ExistingData:GetChildren()) do
  1706. if string.sub(string.lower(DataObj.Name),1,#Data) == string.lower(Data) then
  1707. DataObj:Destroy()
  1708. end
  1709. end
  1710. end
  1711. Player:SaveInstance("Data", ExistingData)
  1712. end
  1713. end
  1714. end
  1715. end
  1716.  
  1717. if string.sub(Message,1,8+#Bet) == "loopkill"..Bet then
  1718. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 9+#Bet), Bet) if not Arg1 and Arg2 then return end
  1719. local Players = Scan(Arg1, Speaker)
  1720. local Times = tonumber(Arg2)
  1721. for _,Player in pairs(Players) do
  1722. coroutine.wrap(function()
  1723. for i = 1,Times do
  1724. if Player ~= nil then
  1725. if Player.Character ~= nil then
  1726. Player.Character:BreakJoints()
  1727. end
  1728. local Stop = game.Workspace:FindFirstChild("LMM Loopkill Stop")
  1729. if Stop then
  1730. if Stop:IsA("StringValue") then
  1731. if string.lower(Stop.Value) == string.lower(Player.Name) then
  1732. Stop:Destroy()
  1733. break
  1734. end
  1735. end
  1736. end
  1737. end
  1738. wait(5.1)
  1739. end
  1740. end)()
  1741. end
  1742. end
  1743.  
  1744. if string.sub(Message,1,10+#Bet) == "noloopkill"..Bet then
  1745. local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
  1746. for _,Player in pairs(Players) do
  1747. if Player ~= nil then
  1748. local Stop = game.Workspace:FindFirstChild("LMM Loopkill Stop") if Stop then Stop:Destroy() end
  1749. Stop = Instance.new("StringValue", Workspace) Stop.Name = "LMM Loopkill Stop" Stop.Value = string.lower(Player.Name)
  1750. end
  1751. end
  1752. end
  1753.  
  1754. if string.sub(Message, 1, 2+#Bet) == "sm"..Bet then
  1755. for _,Player in pairs(Players:GetPlayers()) do
  1756. SendMessage(Player, "SYSTEM MESSAGE", string.sub(RawMessage, 2+#Bet), 3)
  1757. end
  1758. end
  1759.  
  1760. if string.sub(Message, 1, 10+#Bet) == "accelerate"..Bet then
  1761. local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
  1762. for _,Player in pairs(Players) do
  1763. if Player ~= nil then
  1764. TS:Teleport(68464644, Player)
  1765. end
  1766. end
  1767. end
  1768.  
  1769. end
  1770.  
  1771. if Rank == "Owner" or Rank == "Admin" or Rank == "Member" then
  1772. -- Member Commands --
  1773.  
  1774. if Message == "test" then
  1775. SendMessage(Speaker, "Test", "Test complete! LuaModelMaker's Admin works fine!", 3)
  1776. end
  1777.  
  1778. if Message == "logs" then
  1779. ListGui(Speaker, Logs)
  1780. end
  1781.  
  1782. if string.sub(Message, 1, 1+#Bet) == "m"..Bet then
  1783. for _,Player in pairs(Players:GetPlayers()) do
  1784. SendMessage(Player, "Message from "..Speaker.Name, string.sub(RawMessage, 2+#Bet), 5)
  1785. end
  1786. end
  1787.  
  1788. if string.sub(Message, 1, 1+#Bet) == "h"..Bet then
  1789. for _,Player in pairs(Players:GetPlayers()) do
  1790. SendHint(Player, string.sub(RawMessage, 2+#Bet), 5)
  1791. end
  1792. end
  1793.  
  1794. if string.sub(Message, 1, 4+#Bet) == "kill"..Bet and DisabledAbuse() == false then
  1795. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  1796. for _,Player in pairs(Players) do
  1797. if Player ~= nil then
  1798. if Player.Character ~= nil then
  1799. Player.Character:BreakJoints()
  1800. end
  1801. end
  1802. end
  1803. end
  1804.  
  1805. if string.sub(Message, 1, 3+#Bet) == "age"..Bet then
  1806. local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
  1807. for _,Player in pairs(Players) do
  1808. if Player ~= nil then
  1809. SendMessage(Speaker, Player.Name.."'s Age", Player.Name.." is "..FindAge(Player.AccountAge).." old", 4)
  1810. end
  1811. end
  1812. end
  1813.  
  1814. if string.sub(Message,1,2+#Bet) == "ff"..Bet then
  1815. local Players = Scan(string.sub(Message, 3+#Bet), Speaker)
  1816. for _,Player in pairs(Players) do
  1817. if Player ~= nil then
  1818. if Player.Character ~= nil then
  1819. Instance.new("ForceField", Player.Character)
  1820. end
  1821. end
  1822. end
  1823. end
  1824.  
  1825. if string.sub(Message,1,4+#Bet) == "unff"..Bet or string.sub(Message,1,4+#Bet) == "noff"..Bet then
  1826. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  1827. for _,Player in pairs(Players) do
  1828. if Player ~= nil then
  1829. if Player.Character ~= nil then
  1830. for _,Get in pairs(Player.Character:GetChildren()) do
  1831. if Get:IsA("ForceField") then
  1832. Get:Destroy()
  1833. end
  1834. end
  1835. end
  1836. end
  1837. end
  1838. end
  1839.  
  1840. if string.sub(Message,1,7+#Bet) == "respawn"..Bet then
  1841. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  1842. for _,Player in pairs(Players) do
  1843. if Player ~= nil then
  1844. Player:LoadCharacter()
  1845. end
  1846. end
  1847. end
  1848.  
  1849. if string.sub(Message,1,3+#Bet) == "hat"..Bet then
  1850. local Arg1, Arg2 = GetSplit(string.sub(Message, 4+#Bet), Bet) if not Arg1 and Arg2 then return end
  1851. local Players = Scan(Arg1, Speaker)
  1852. local ID = tonumber(Arg2)
  1853. for _,Player in pairs(Players) do
  1854. if Player ~= nil then
  1855. if Player.Character ~= nil then
  1856. if ID ~= nil then
  1857. local Object = game:GetService("InsertService"):LoadAsset(ID)
  1858. for _,Obj in pairs(Object:GetChildren()) do if Obj:IsA("Hat") then Obj.Parent = Player.Character end end
  1859. end
  1860. end
  1861. end
  1862. end
  1863. end
  1864.  
  1865. if string.sub(Message,1,4+#Bet) == "gear"..Bet then
  1866. local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  1867. local Players = Scan(Arg1, Speaker)
  1868. local ID = tonumber(Arg2)
  1869. for _,Player in pairs(Players) do
  1870. if Player ~= nil then
  1871. if Player.Backpack ~= nil then
  1872. if ID ~= nil then
  1873. local Object = game:GetService("InsertService"):LoadAsset(ID)
  1874. for _,Obj in pairs(Object:GetChildren()) do if Obj:IsA("Tool") or Obj:IsA("HopperBin") then Obj.Parent = Player.Character end end
  1875. end
  1876. end
  1877. end
  1878. end
  1879. end
  1880.  
  1881. if string.sub(Message,1,5+#Bet) == "sword"..Bet then
  1882. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  1883. for _,Player in pairs(Players) do
  1884. if Player ~= nil then
  1885. if Player.Backpack ~= nil then
  1886. if Player.Character ~= nil then
  1887. local Object = game:GetService("InsertService"):LoadAsset(125013769)
  1888. Object:GetChildren()[1].Parent = Player.Character
  1889. end
  1890. end
  1891. end
  1892. end
  1893. end
  1894.  
  1895. if string.sub(Message,1,7+#Bet) == "ragdoll"..Bet then
  1896. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  1897. for _,Player in pairs(Players) do
  1898. if Player ~= nil then
  1899. if Player.Character ~= nil then
  1900. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  1901. Player.Character.Humanoid:Destroy()
  1902. end
  1903. end
  1904. end
  1905. end
  1906. end
  1907.  
  1908. if string.sub(Message,1,3+#Bet) == "god"..Bet then
  1909. local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
  1910. for _,Player in pairs(Players) do
  1911. if Player ~= nil then
  1912. if Player.Character ~= nil then
  1913. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  1914. Player.Character.Humanoid.MaxHealth = math.huge
  1915. Player.Character.Humanoid.Health = math.huge
  1916. end
  1917. end
  1918. end
  1919. end
  1920. end
  1921.  
  1922. if string.sub(Message,1,5+#Bet) == "nogod"..Bet or string.sub(Message,1,5+#Bet) == "ungod"..Bet then
  1923. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  1924. for _,Player in pairs(Players) do
  1925. if Player ~= nil then
  1926. if Player.Character ~= nil then
  1927. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  1928. Player.Character.Humanoid.MaxHealth = 100
  1929. Player.Character.Humanoid.Health = 100
  1930. end
  1931. end
  1932. end
  1933. end
  1934. end
  1935.  
  1936. if string.sub(Message,1,4+#Bet) == "char"..Bet then
  1937. local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  1938. local Players = Scan(Arg1, Speaker)
  1939. local ID = tonumber(Arg2) or 0
  1940. for _,Player in pairs(Players) do
  1941. if Player ~= nil then
  1942. if Arg2 == "reset" then
  1943. ID = Player.userId
  1944. end
  1945. if Player.Character ~= nil then
  1946. local Position = Player.Character.Torso.Position
  1947. Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..ID
  1948. wait() Player:LoadCharacter() wait()
  1949. Player.Character:MoveTo(Position)
  1950. end
  1951. end
  1952. end
  1953. end
  1954.  
  1955. if string.sub(Message,1,2+#Bet) == "tp"..Bet then
  1956. local Arg1, Arg2 = GetSplit(string.sub(Message, 3+#Bet), Bet) if not Arg1 and Arg2 then return end
  1957. local PlayersFrom = Scan(Arg1, Speaker)
  1958. local PlayersTo = Scan(Arg2, Speaker)
  1959. if PlayersFrom and PlayersTo then
  1960. for _,PlayerFrom in pairs(PlayersFrom) do
  1961. if PlayerFrom ~= nil then
  1962. for _,PlayerTo in pairs(PlayersTo) do
  1963. if PlayerTo ~= nil then
  1964. if PlayerFrom.Character and PlayerTo.Character then
  1965. PlayerFrom.Character:MoveTo(PlayerTo.Character.Torso.Position)
  1966. end
  1967. end
  1968. end
  1969. end
  1970. end
  1971. end
  1972. end
  1973.  
  1974. if string.sub(Message, 1, 5+#Bet) == "blind"..Bet and DisabledAbuse() == false then
  1975. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  1976. for _,Player in pairs(Players) do
  1977. if Player ~= nil then
  1978. if Player.PlayerGui ~= nil then
  1979. local SG = Player.PlayerGui:FindFirstChild("LMMA Screen Cover") if SG ~= nil then SG:Destroy() end
  1980. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMMA Screen Cover"
  1981. 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
  1982. end
  1983. end
  1984. end
  1985. end
  1986.  
  1987. if string.sub(Message, 1, 7+#Bet) == "noblind"..Bet then
  1988. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  1989. for _,Player in pairs(Players) do
  1990. if Player ~= nil then
  1991. if Player.PlayerGui ~= nil then
  1992. local SG = Player.PlayerGui:FindFirstChild("LMMA Screen Cover") if SG ~= nil then SG:Destroy() end
  1993. end
  1994. end
  1995. end
  1996. end
  1997.  
  1998. if string.sub(Message, 1, 6+#Bet) == "strobe"..Bet and DisabledAbuse() == false then
  1999. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  2000. for _,Player in pairs(Players) do
  2001. if Player ~= nil then
  2002. if Player.PlayerGui ~= nil then
  2003. local SG = Player.PlayerGui:FindFirstChild("LMMA Screen Cover") if SG ~= nil then SG:Destroy() end
  2004. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMMA Screen Cover"
  2005. local Frame = Instance.new("Frame", SG) Frame.Name = "Overlay" Frame.Size = UDim2.new(1,0,1,0) Frame.ZIndex = 100
  2006. 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)()
  2007. end
  2008. end
  2009. end
  2010. end
  2011.  
  2012. if string.sub(Message,1,5+#Bet) == "point"..Bet then
  2013. local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
  2014. local PlayersFrom = Scan(Arg1, Speaker)
  2015. local PlayersTo = Scan(Arg2, Speaker)
  2016. if PlayersFrom and PlayersTo then
  2017. for _,PlayerFrom in pairs(PlayersFrom) do
  2018. if PlayerFrom ~= nil then
  2019. for _,PlayerTo in pairs(PlayersTo) do
  2020. if PlayerTo ~= nil then
  2021. if PlayerFrom.Character and PlayerTo.Character then
  2022. if PlayerFrom.Character:FindFirstChild("Humanoid") and PlayerTo.Character:FindFirstChild("Torso") then coroutine.wrap(function()
  2023. local Laser = Instance.new("SelectionPartLasso", PlayerFrom.Character) Laser.Humanoid = PlayerFrom.Character.Humanoid Laser.Part = PlayerTo.Character.Torso Laser.Color = BrickColor.Random()
  2024. wait(5)
  2025. Laser:Destroy()
  2026. end)() end
  2027. end
  2028. end
  2029. end
  2030. end
  2031. end
  2032. end
  2033. end
  2034.  
  2035. if string.sub(Message,1,5+#Bet) == "merge"..Bet then
  2036. local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
  2037. local PlayersFrom = Scan(Arg1, Speaker)
  2038. local PlayersTo = Scan(Arg2, Speaker)
  2039. if PlayersFrom and PlayersTo then
  2040. for _,PlayerFrom in pairs(PlayersFrom) do
  2041. if PlayerFrom ~= nil then
  2042. for _,PlayerTo in pairs(PlayersTo) do
  2043. if PlayerTo ~= nil then
  2044. if PlayerFrom.Character and PlayerTo.Character then
  2045. PlayerFrom.Character = PlayerTo.Character
  2046. end
  2047. end
  2048. end
  2049. end
  2050. end
  2051. end
  2052. end
  2053.  
  2054. if string.sub(Message,1,5+#Bet) == "speed"..Bet then
  2055. local Arg1, Arg2 = GetSplit(string.sub(Message, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
  2056. local Players = Scan(Arg1, Speaker)
  2057. local Speed = tonumber(Arg2)
  2058. for _,Player in pairs(Players) do
  2059. if Player ~= nil then
  2060. if Player.Character ~= nil then
  2061. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2062. Player.Character.Humanoid.WalkSpeed = Speed
  2063. end
  2064. end
  2065. end
  2066. end
  2067. end
  2068.  
  2069. if string.sub(Message,1,6+#Bet) == "health"..Bet then
  2070. local Arg1, Arg2 = GetSplit(string.sub(Message, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
  2071. local Players = Scan(Arg1, Speaker)
  2072. local Health = tonumber(Arg2)
  2073. for _,Player in pairs(Players) do
  2074. if Player ~= nil then
  2075. if Player.Character ~= nil then
  2076. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2077. if LocalDisableAbuse == false then
  2078. Player.Character.Humanoid.Health = Health
  2079. else
  2080. if Health < 0.00001 then
  2081. SendMessage(Speaker, "Command Disabled", "You have attempted to set a health below 0, This is considered abusive while disabling abusive commands is disabled.", 10)
  2082. else
  2083. Player.Character.Humanoid.Health = Health
  2084. end
  2085. end
  2086. end
  2087. end
  2088. end
  2089. end
  2090. end
  2091.  
  2092. if string.sub(Message,1,4+#Bet) == "give"..Bet then
  2093. local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  2094. local Players = Scan(Arg1, Speaker)
  2095. local Object = Arg2
  2096. for _,Player in pairs(Players) do
  2097. if Player ~= nil then
  2098. local BuildTools = {73089166, 73089190, 73089204, 73089214, 73089239, 73089259, 58921588}
  2099. local BaseBuildTools = {["Move"] = "GameTool", ["Clone"] = "Clone", ["Delete"] = "Hammer"}
  2100. if Object == "psbtools" then
  2101. if LocalDisableAbuse == false then
  2102. for _,Tool in pairs(BuildTools) do
  2103. local ToolObject = game:GetService("InsertService"):LoadAsset(Tool)
  2104. ToolObject:GetChildren()[1].Parent = Player.Backpack
  2105. end
  2106. else
  2107. SendMessage(Speaker, "Command Disabled", "In the settings of LuaModelMak".."e".."r's Admin, Disabling abusive commands is active. Please try '"..Prefix.."give"..Bet.."player"..Bet.."basicbtools",6)
  2108. end
  2109. elseif Object == "basicbtools" then
  2110. for Name,Type in pairs(BaseBuildTools) do
  2111. local Tool = Instance.new("HopperBin", Player.Backpack)
  2112. Tool.Name = Name
  2113. Tool.BinType = Type
  2114. end
  2115. elseif Object == "btools" then
  2116. if LocalDisableAbuse == false then
  2117. for Name,Type in pairs(BaseBuildTools) do
  2118. local Tool = Instance.new("HopperBin", Player.Backpack)
  2119. Tool.Name = Name
  2120. Tool.BinType = Type
  2121. end
  2122. for _,Tool in pairs(BuildTools) do
  2123. local ToolObject = game:GetService("InsertService"):LoadAsset(Tool)
  2124. ToolObject:GetChildren()[1].Parent = Player.Backpack
  2125. end
  2126. else
  2127. SendMessage(Speaker, "Command Disabled", "In the settings of LuaModelMak".."e".."r's Admin, Disabling abusive commands is active. Please try '"..Prefix.."give"..Bet.."player"..Bet.."basicbtools",6)
  2128. end
  2129. else
  2130. local Regions = {Lighting}
  2131. for _,Region in pairs(Regions) do
  2132. for _,Item in pairs(Region:GetChildren()) do
  2133. if Item:IsA("HopperBin") or Item:IsA("Tool") then
  2134. if Object == "all" then
  2135. local NewItem = Item:Clone()
  2136. NewItem.Parent = Player.Backpack
  2137. else
  2138. if string.sub(string.lower(Item.Name),1,#Object) == string.lower(Object) then
  2139. local NewItem = Item:Clone()
  2140. NewItem.Parent = Player.Backpack
  2141. end
  2142. end
  2143. end
  2144. end
  2145. end
  2146. end
  2147. end
  2148. end
  2149. end
  2150.  
  2151. if string.sub(Message,1,7+#Bet) == "control"..Bet and DisabledAbuse() == false then
  2152. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  2153. for _,Player in pairs(Players) do
  2154. if Player ~= nil then
  2155. if Player.Character ~= nil then
  2156. local Position = Player.Character.Torso.Position
  2157. Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Player.userId
  2158. wait() Speaker:LoadCharacter() wait()
  2159. Speaker.Character:MoveTo(Position)
  2160. local Dead = false
  2161. local function ViewPlayer(Char)
  2162. wait()
  2163. if Dead == true then return end
  2164. Char:ClearAllChildren()
  2165. Execute(LocalScript, Player.Backpack, Player, "script.Parent = nil Workspace.CurrentCamera.CameraSubject = game.Players['"..tostring(Speaker.Name).."'].Character.Humanoid Workspace.CurrentCamera.CameraType = 'Custom'")
  2166. end
  2167. local function ResetChar()
  2168. wait()
  2169. if Dead == true then return end
  2170. Speaker.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Speaker.userId
  2171. Dead = true
  2172. ViewPlayer = function() end
  2173. ResetChar = function() end
  2174. wait(0.1)
  2175. Speaker:LoadCharacter()
  2176. wait(0.1)
  2177. Player:LoadCharacter()
  2178. end
  2179. Player.CharacterAdded:connect(ViewPlayer)
  2180. Speaker.CharacterAdded:connect(ResetChar)
  2181. ViewPlayer(Player.Character)
  2182. end
  2183. end
  2184. end
  2185. end
  2186.  
  2187. if string.sub(Message,1,4+#Bet) == "time"..Bet then
  2188. local Time = string.sub(Message,6)
  2189. if Time == "day" or Time == "noon" then Time = "12" end
  2190. if Time == "night" or Time == "midnight" then Time = "0" end
  2191. if Time == "dawn" or Time == "morning" then Time = "6:15" end
  2192. if Time == "dusk" or Time == "evening" then Time = "17:45" end
  2193. if Time == "afternoon" then Time = "15:30" end
  2194. ypcall(function() game.Lighting.TimeOfDay = Time end)
  2195. end
  2196.  
  2197. if string.sub(Message,1,4+#Bet) == "team"..Bet then
  2198. if string.sub(Message,5+#Bet,8+#Bet) == "new"..Bet then
  2199. local NewTeam = Instance.new("Team", Teams)
  2200. NewTeam.TeamColor = BrickColor.random()
  2201. NewTeam.Name = string.sub(RawMessage,9+#Bet)
  2202. end
  2203. if string.sub(Message,5+#Bet,9+#Bet) == "join"..Bet then
  2204. local Arg1, Arg2 = GetSplit(string.sub(Message, 10+#Bet), Bet) if not Arg1 and Arg2 then return end
  2205. local Players = Scan(Arg1, Speaker)
  2206. local TeamName = Arg2
  2207. if string.lower(TeamName) == "none" then
  2208. for _,Player in pairs(Players) do
  2209. if Player ~= nil then
  2210. Player.Neutral = true
  2211. end
  2212. end
  2213. else
  2214. for _,Obj in pairs(Teams:GetChildren()) do
  2215. if Obj:IsA("Team") then
  2216. if string.sub(string.lower(Obj.Name),1,#TeamName) == string.lower(TeamName) then
  2217. for _,Player in pairs(Players) do
  2218. if Player ~= nil then
  2219. Player.Neutral = false
  2220. Player.TeamColor = Obj.TeamColor
  2221. end
  2222. end
  2223. end
  2224. end
  2225. end
  2226. end
  2227. end
  2228. if string.sub(Message,5+#Bet,11+#Bet) == "rename"..Bet then
  2229. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 12+#Bet), Bet) if not Arg1 and Arg2 then return end
  2230. local TeamName = Arg1
  2231. local NewName = Arg2
  2232. for _,Obj in pairs(Teams:GetChildren()) do
  2233. if Obj:IsA("Team") then
  2234. if string.sub(string.lower(Obj.Name),1,#TeamName) == string.lower(TeamName) then
  2235. Obj.Name = NewName
  2236. end
  2237. end
  2238. end
  2239. end
  2240. if string.sub(Message,5+#Bet,11+#Bet) == "remove"..Bet then
  2241. local TeamName = string.sub(Message, 12+#Bet)
  2242. for _,Obj in pairs(Teams:GetChildren()) do
  2243. if Obj:IsA("Team") then
  2244. if string.sub(string.lower(Obj.Name),1,#TeamName) == string.lower(TeamName) then
  2245. for _,Player in pairs(Players:GetPlayers()) do
  2246. if Player.TeamColor == Obj.TeamColor then
  2247. Player.Neutral = true
  2248. end
  2249. end
  2250. Obj:Destroy()
  2251. end
  2252. end
  2253. end
  2254. end
  2255. end
  2256.  
  2257. if string.sub(Message,1,4+#Bet) == "name"..Bet then
  2258. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  2259. local Players = Scan(Arg1, Speaker)
  2260. local NewName = Arg2
  2261. for _,Player in pairs(Players) do
  2262. if Player ~= nil then
  2263. if Player.Character ~= nil then
  2264. if Player.Character.Humanoid ~= nil then
  2265. local Head = nil
  2266. pcall(function() Head = Player.Character.Label:GetChildren()[1].Head end)
  2267. if not Head then Head = Player.Character.Head end
  2268. local HeadClone = Head:Clone()
  2269. Head.Transparency = 1
  2270. pcall(function() Player.Character.Label:Destroy(); Head = Player.Character.Head end)
  2271.  
  2272. pcall(function() Head.face.Transparency = 1 end)
  2273.  
  2274. local Label = Instance.new("Model", Player.Character)
  2275. Label.Name = "Label"
  2276.  
  2277. local Model = Instance.new("Model", Label)
  2278. Model.Name = NewName
  2279.  
  2280. local HumanoidClone = Instance.new("Humanoid", Model)
  2281. coroutine.wrap(function() while wait() do HumanoidClone.Health = Player.Character.Humanoid.Health; HumanoidClone.MaxHealth = Player.Character.Humanoid.MaxHealth; end end)()
  2282.  
  2283. HeadClone.Parent = Model
  2284. HeadClone.Position = Vector3.new(0,100,0)
  2285. HeadClone.CanCollide = false
  2286.  
  2287. local Weld = Instance.new("Weld", HeadClone)
  2288. Weld.Part0 = HeadClone
  2289. Weld.Part1 = Head
  2290. end
  2291. end
  2292. end
  2293. end
  2294. end
  2295.  
  2296. if string.sub(Message,1,6+#Bet) == "noname"..Bet then
  2297. local Players = Scan(string.sub(RawMessage, 7+#Bet), Speaker)
  2298. for _,Player in pairs(Players) do
  2299. if Player ~= nil then
  2300. if Player.Character ~= nil then
  2301. local Head = Player.Character:FindFirstChild("Label")
  2302. if Head then Head:Destroy() end
  2303. local Head = Player.Character:FindFirstChild("Head")
  2304. if Head then Head.Transparency = 0 if Head:FindFirstChild("Face") then Head.face.Transparency = 0 end end
  2305. end
  2306. end
  2307. end
  2308. end
  2309.  
  2310. if string.sub(Message,1,7+#Bet) == "product"..Bet then
  2311. local Arg1, Arg2 = GetSplit(string.sub(Message, 8+#Bet), Bet) if not Arg1 and Arg2 then return end
  2312. local Players = Scan(Arg1, Speaker)
  2313. local Item = tonumber(Arg2)
  2314. for _,Player in pairs(Players) do
  2315. if Player ~= nil then
  2316. PromptPurchase(Player, Item)
  2317. end
  2318. end
  2319. end
  2320.  
  2321. if string.sub(Message,1,5+#Bet) == "debug"..Bet then
  2322. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  2323. for _,Player in pairs(Players) do
  2324. if Player ~= nil then
  2325. if Player.Character ~= nil then
  2326. local Position = nil
  2327. if Player.Character:FindFirstChild("Torso") then Position = Player.Character.Torso.Position end
  2328. Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId="..Player.userId
  2329. wait() Player:LoadCharacter() wait()
  2330. if Position then Player.Character:MoveTo(Position) end
  2331. wait(0.1) Execute(LocalScript, Player.Character, Player, [[Workspace.CurrentCamera.FieldOfView = 70]])
  2332. end
  2333. end
  2334. end
  2335. end
  2336.  
  2337. if string.sub(Message,1,5+#Bet) == "clone"..Bet and DisabledAbuse() == false then
  2338. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  2339. for _,Player in pairs(Players) do
  2340. if Player ~= nil then
  2341. if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
  2342. Player.Character.Archivable = true
  2343. local Clone = Player.Character:Clone()
  2344. Player.Character.Archivable = false
  2345. Clone.Parent = Workspace
  2346. Clone:MoveTo(Clone.Torso.Position)
  2347. Clone:MakeJoints()
  2348. table.insert(Objects, Clone)
  2349. end
  2350. end
  2351. end
  2352. end
  2353.  
  2354. if string.sub(Message,1,5+#Bet) == "sound"..Bet then
  2355. local SoundID, Pitch = string.sub(Message, 6+#Bet), 1
  2356. for Name,ID in pairs({["Tech"] = 140949250, ["Skrillex"] = 142479895, ["Try it out"] = 142479895, ["Bangarang"] = 142319852, ["Radioactive"] = 131111368, ["Monsters"] = 142718349, ["Mario"] = 138246809, ["Fox"] = 130797915, ["Gangnam"] = 130844430, ["Blue"] = 131198720, ["I'm blue"] = 131198720, ["Fus ro dah"] = 130776150, ["Gey"] = 131201443, ["Started"] = 138134680, ["Neon lights"] = 143772118, ["Spitfire"] = 129490596, ["Fade"] = 129542833, ["Gifted"] = 129548418}) do
  2357. if SoundID == string.lower(Name) then SoundID = ID end
  2358. end
  2359. if SoundID == 131201443 then Pitch = -1 end
  2360. local Sound = Workspace:FindFirstChild("LuaModelMaker's Admin Sound")
  2361. if Sound then if Sound:IsA("Sound") then Sound:Stop() Sound:Destroy() end end
  2362. 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(2.5) Sound:Stop() wait(0.5) Sound:Play() until Sound.IsPlaying or not Sound end)()
  2363. end
  2364.  
  2365. if string.sub(Message,1,7) == "nosound" then
  2366. local Sound = Workspace:FindFirstChild("LuaModelMaker's Admin Sound")
  2367. if Sound then if Sound:IsA("Sound") then Sound:Stop() wait() Sound:Destroy() end end
  2368. end
  2369.  
  2370. if string.sub(Message,1,6+#Bet) == "freeze"..Bet then
  2371. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  2372. for _,Player in pairs(Players) do
  2373. if Player ~= nil then
  2374. if Player.Character ~= nil then
  2375. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2376. Player.Character.Humanoid.WalkSpeed = 0
  2377. for _,Object in pairs(Player.Character:GetChildren()) do if Object:IsA("BasePart") then
  2378. Object.Anchored = true
  2379. end end
  2380. end
  2381. end
  2382. end
  2383. end
  2384. end
  2385.  
  2386. if string.sub(Message,1,8+#Bet) == "nofreeze"..Bet then
  2387. local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
  2388. for _,Player in pairs(Players) do
  2389. if Player ~= nil then
  2390. if Player.Character ~= nil then
  2391. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2392. Player.Character.Humanoid.WalkSpeed = 16
  2393. for _,Object in pairs(Player.Character:GetChildren()) do if Object:IsA("BasePart") then
  2394. Object.Anchored = false
  2395. end end
  2396. end
  2397. end
  2398. end
  2399. end
  2400. end
  2401.  
  2402. if string.sub(Message,1,8+#Bet) == "forwards"..Bet then
  2403. local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
  2404. for _,Player in pairs(Players) do
  2405. if Player ~= nil then
  2406. if Player.Character ~= nil then
  2407. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2408. Player.Character.Humanoid.WalkSpeed = 16
  2409. end
  2410. end
  2411. end
  2412. end
  2413. end
  2414.  
  2415. if string.sub(Message,1,9+#Bet) == "backwards"..Bet then
  2416. local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
  2417. for _,Player in pairs(Players) do
  2418. if Player ~= nil then
  2419. if Player.Character ~= nil then
  2420. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2421. Player.Character.Humanoid.WalkSpeed = -16
  2422. end
  2423. end
  2424. end
  2425. end
  2426. end
  2427.  
  2428. if string.sub(Message, 1, 9+#Bet) == "shownotes"..Bet or string.sub(Message, 1, 9+#Bet) == "loadnotes"..Bet then
  2429. local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
  2430. local DataSet = {}
  2431. for _,Player in pairs(Players) do
  2432. if Player ~= nil then
  2433. local ExistingData = Player:LoadInstance("Data")
  2434. if ExistingData ~= nil then
  2435. if #ExistingData:GetChildren() ~= 0 then
  2436. for _,Data in pairs(ExistingData:GetChildren()) do
  2437. table.insert(DataSet, Player.Name..": "..Data.Name)
  2438. end
  2439. else
  2440. table.insert(DataSet, "Data does not exist for "..Player.Name)
  2441. end
  2442. else
  2443. table.insert(DataSet, "Data does not exist for "..Player.Name)
  2444. end
  2445. end
  2446. end
  2447. ListGui(Speaker, DataSet)
  2448. end
  2449.  
  2450. if string.sub(Message,1,7+#Bet) == "notools"..Bet then
  2451. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  2452. for _,Player in pairs(Players) do
  2453. if Player ~= nil then
  2454. if Player.Backpack ~= nil then
  2455. Player.Backpack:ClearAllChildren()
  2456. end
  2457. if Player.Character ~= nil then
  2458. for _,Obj in pairs(Player.Character:GetChildren()) do
  2459. if Obj:IsA("Tool") or Obj:IsA("HopperBin") then
  2460. Obj:Destroy()
  2461. end
  2462. end
  2463. end
  2464. end
  2465. end
  2466. end
  2467.  
  2468. if string.sub(Message,1,6+#Bet) == "nohats"..Bet then
  2469. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  2470. for _,Player in pairs(Players) do
  2471. if Player ~= nil then
  2472. if Player.Character ~= nil then
  2473. for _,Obj in pairs(Player.Character:GetChildren()) do
  2474. if Obj:IsA("Hat") then
  2475. Obj:Destroy()
  2476. end
  2477. end
  2478. end
  2479. end
  2480. end
  2481. end
  2482.  
  2483. if string.sub(Message,1,9+#Bet) == "taketools"..Bet then
  2484. local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
  2485. for _,Player in pairs(Players) do
  2486. if Player ~= nil then
  2487. if Player.Backpack ~= nil then
  2488. if Speaker.Backpack ~= nil then
  2489. for _,Object in pairs(Player.Backpack:GetChildren()) do
  2490. if Object:IsA("Tool") or Object:IsA("HopperBin") then
  2491. local Clone = Object:Clone()
  2492. Clone.Parent = Speaker.Backpack
  2493. end
  2494. end
  2495. end
  2496. end
  2497. end
  2498. end
  2499. end
  2500.  
  2501. if string.sub(Message,1,9+#Bet) == "givetools"..Bet then
  2502. local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
  2503. for _,Player in pairs(Players) do
  2504. if Player ~= nil then
  2505. if Player.Backpack ~= nil then
  2506. if Speaker.Backpack ~= nil then
  2507. for _,Object in pairs(Speaker.Backpack:GetChildren()) do
  2508. if Object:IsA("Tool") or Object:IsA("HopperBin") then
  2509. local Clone = Object:Clone()
  2510. Clone.Parent = Player.Backpack
  2511. end
  2512. end
  2513. end
  2514. end
  2515. end
  2516. end
  2517. end
  2518.  
  2519. if string.sub(Message,1,4+#Bet) == "heal"..Bet then
  2520. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  2521. for _,Player in pairs(Players) do
  2522. if Player ~= nil then
  2523. if Player.Character ~= nil then
  2524. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2525. Player.Character.Humanoid.MaxHealth = 100
  2526. Player.Character.Humanoid.Health = 100
  2527. end
  2528. end
  2529. end
  2530. end
  2531. end
  2532.  
  2533. if string.sub(Message,1,4+#Bet) == "face"..Bet then
  2534. local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  2535. local Players = Scan(Arg1, Speaker)
  2536. local ID = Arg2
  2537. if tonumber(Arg2) ~= nil then
  2538. ID = GetImageFormat(tonumber(ID))
  2539. else
  2540. 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
  2541. for _,Face in pairs(FaceTable) do
  2542. if string.lower(Arg2) == string.lower(Face) then
  2543. ID = FaceID
  2544. break
  2545. end
  2546. end
  2547. end
  2548. end
  2549. for _,Player in pairs(Players) do
  2550. if Player ~= nil then
  2551. if Player.Character ~= nil then
  2552. if Player.Character.Head ~= nil then
  2553. if Player.Character.Head.face ~= nil then
  2554. Player.Character.Head.face.Texture = "http://www.roblox.com/asset/?id="..ID
  2555. pcall(function() Player.Character.Label:GetChildren()[1].Head.Texture = "http://www.roblox.com/asset/?id="..ID end)
  2556. end
  2557. end
  2558. end
  2559. end
  2560. end
  2561. end
  2562.  
  2563. if string.sub(Message,1,2+#Bet) == "pm"..Bet then
  2564. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 3+#Bet), Bet) if not Arg1 and Arg2 then return end
  2565. local Players = Scan(Arg1, Speaker)
  2566. local MessageArg = Arg2
  2567. for _,Player in pairs(Players) do
  2568. if Player ~= nil then
  2569. SendMessage(Player, "Message from "..Speaker.Name, MessageArg, 5)
  2570. end
  2571. end
  2572. end
  2573.  
  2574. if string.sub(Message,1,3+#Bet) == "fly"..Bet then
  2575. local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
  2576. for _,Player in pairs(Players) do
  2577. if Player ~= nil then
  2578. Execute(LocalScript, Player.Character, Player, Fly(10000))
  2579. end
  2580. end
  2581. end
  2582.  
  2583. if string.sub(Message,1,5+#Bet) == "nofly"..Bet then
  2584. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  2585. for _,Player in pairs(Players) do
  2586. if Player ~= nil then
  2587. if Player.Character ~= nil then
  2588. Instance.new("Configuration", Player.Character).Name = "LM".."MFlyStop"
  2589. end
  2590. end
  2591. end
  2592. end
  2593.  
  2594. if string.sub(Message,1,10+#Bet) == "brightness"..Bet then
  2595. Lighting.Brightness = tonumber(string.sub(Message, 11+#Bet)) or 1
  2596. end
  2597.  
  2598. if string.sub(Message,1,6+#Bet) == "noclip"..Bet then
  2599. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  2600. for _,Player in pairs(Players) do
  2601. if Player ~= nil then
  2602. Execute(LocalScript, Player.Character, Player, Fly(1000000))
  2603. end
  2604. end
  2605. end
  2606.  
  2607. if string.sub(Message,1,5+#Bet) == "invis"..Bet then
  2608. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  2609. for _,Player in pairs(Players) do
  2610. if Player ~= nil then
  2611. if Player.Character ~= nil then
  2612. for _,Object in pairs(Player.Character:GetChildren()) do
  2613. if Object:IsA("BasePart") then
  2614. Object.Transparency = 1
  2615. end
  2616. for _,Obj in pairs(Object:GetChildren()) do
  2617. if Obj:IsA("BasePart") then
  2618. Obj.Transparency = 1
  2619. elseif Obj:IsA("Decal") then
  2620. Obj.Transparency = 1
  2621. end
  2622. end
  2623. end
  2624. end
  2625. end
  2626. end
  2627. end
  2628.  
  2629. if string.sub(Message,1,3+#Bet) == "vis"..Bet then
  2630. local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
  2631. for _,Player in pairs(Players) do
  2632. if Player ~= nil then
  2633. if Player.Character ~= nil then
  2634. for _,Object in pairs(Player.Character:GetChildren()) do
  2635. if Object:IsA("BasePart") then if Object.Name ~= "HumanoidRootPart" then
  2636. Object.Transparency = 0
  2637. end end
  2638. for _,Obj in pairs(Object:GetChildren()) do
  2639. if Obj:IsA("BasePart") then
  2640. Obj.Transparency = 0
  2641. elseif Obj:IsA("Decal") then
  2642. Obj.Transparency = 0
  2643. end
  2644. end
  2645. end
  2646. end
  2647. end
  2648. end
  2649. end
  2650.  
  2651. if string.sub(Message,1,8+#Bet) == "headsize"..Bet then
  2652. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 9+#Bet), Bet) if not Arg1 and Arg2 then return end
  2653. local Players = Scan(Arg1, Speaker)
  2654. local Size = tonumber(Arg2)+25
  2655. for _,Player in pairs(Players) do
  2656. if Player ~= nil then
  2657. if Player.Character ~= nil then
  2658. if Player.Character:FindFirstChild("Head") ~= nil then
  2659. if Player.Character.Head:FindFirstChild("Mesh") then
  2660. Player.Character.Head.Mesh.Scale = Vector3.new(Size/100,Size/100,Size/100)
  2661. end
  2662. end
  2663. end
  2664. end
  2665. end
  2666. end
  2667.  
  2668. if string.sub(Message,1,7+#Bet) == "overlay"..Bet then
  2669. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 8+#Bet), Bet) if not Arg1 and Arg2 then return end
  2670. local Players = Scan(Arg1, Speaker)
  2671. local ID = GetImageFormat(tonumber(Arg2) or 1)
  2672. for _,Player in pairs(Players) do
  2673. if Player ~= nil then
  2674. if Player.Character ~= nil then
  2675. if Player.Character:FindFirstChild("Head") ~= nil then
  2676. local BB = Player.Character.Head:FindFirstChild("LMMA Overlay") if BB then BB:Destroy() end
  2677. 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
  2678. 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)
  2679. end
  2680. end
  2681. end
  2682. end
  2683. end
  2684.  
  2685. if string.sub(Message,1,9+#Bet) == "nooverlay"..Bet then
  2686. local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
  2687. for _,Player in pairs(Players) do
  2688. if Player ~= nil then
  2689. if Player.Character ~= nil then
  2690. if Player.Character:FindFirstChild("Head") ~= nil then
  2691. local BB = Player.Character.Head:FindFirstChild("LMMA Overlay") if BB then BB:Destroy() end
  2692. end
  2693. end
  2694. end
  2695. end
  2696. end
  2697.  
  2698. if string.sub(Message,1,5+#Bet) == "light"..Bet then
  2699. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  2700. for _,Player in pairs(Players) do
  2701. if Player ~= nil then
  2702. if Player.Character ~= nil then
  2703. if Player.Character:FindFirstChild("Torso") ~= nil then
  2704. local Light = Player.Character.Torso:FindFirstChild("LMM Light") if Light then Light:Destroy() end
  2705. Light = Instance.new("PointLight", Player.Character.Torso) Light.Name = "LMM Light" Light.Range = 20 Light.Brightness = 2
  2706. end
  2707. end
  2708. end
  2709. end
  2710. end
  2711.  
  2712. if string.sub(Message,1,7+#Bet) == "nolight"..Bet then
  2713. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  2714. for _,Player in pairs(Players) do
  2715. if Player ~= nil then
  2716. if Player.Character ~= nil then
  2717. if Player.Character:FindFirstChild("Torso") ~= nil then
  2718. local Light = Player.Character.Torso:FindFirstChild("LMM Light") if Light then Light:Destroy() end
  2719. end
  2720. end
  2721. end
  2722. end
  2723. end
  2724.  
  2725. if string.sub(Message,1,4+#Bet) == "lamp"..Bet then
  2726. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  2727. for _,Player in pairs(Players) do
  2728. if Player ~= nil then
  2729. if Player.Character ~= nil then
  2730. if Player.Character:FindFirstChild("Torso") ~= nil then
  2731. local Light = Player.Character.Torso:FindFirstChild("LMM Lamp") if Light then Light:Destroy() end
  2732. Light = Instance.new("SpotLight", Player.Character.Torso) Light.Name = "LMM Lamp" Light.Range = 30 Light.Brightness = 5
  2733. end
  2734. end
  2735. end
  2736. end
  2737. end
  2738.  
  2739. if string.sub(Message,1,6+#Bet) == "nolamp"..Bet then
  2740. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  2741. for _,Player in pairs(Players) do
  2742. if Player ~= nil then
  2743. if Player.Character ~= nil then
  2744. if Player.Character:FindFirstChild("Torso") ~= nil then
  2745. local Light = Player.Character.Torso:FindFirstChild("LMM Lamp") if Light then Light:Destroy() end
  2746. end
  2747. end
  2748. end
  2749. end
  2750. end
  2751.  
  2752. if string.sub(Message,1,4+#Bet) == "vote"..Bet then
  2753. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  2754. local Players = Scan(Arg1, Speaker)
  2755. local Arg2, Arg3 = GetSplit(Arg2, Bet) if not Arg2 and Arg3 then return end
  2756. if tonumber(Arg2) == nil then
  2757. SendMessage(Speaker, "Invalid", "Please set a time, For example: "..Prefix.."Vote all 10 Do you like this admin?", 5)
  2758. else
  2759. Vote(Players, Speaker, Arg3, tonumber(Arg2))
  2760. end
  2761. end
  2762.  
  2763. if Message == "bans" or Message == "banlist" then
  2764. ListGui(Speaker, Ranks["Banned"])
  2765. end
  2766.  
  2767. if Message == "crashes" or Message == "crashlist" then
  2768. ListGui(Speaker, Ranks["Crashed"])
  2769. end
  2770.  
  2771. if Message == "mutes" or Message == "mutelist" then
  2772. ListGui(Speaker, Ranks["Muted"])
  2773. end
  2774.  
  2775. if Message == "sa" or Message == "serveradmins" then
  2776. local LocalTable = {}
  2777. for _,Player in pairs(Players:GetPlayers()) do
  2778. local __,PlayerRank = IsAdmin(Player)
  2779. table.insert(LocalTable, Player.Name..": "..PlayerRank)
  2780. end
  2781. ListGui(Speaker, LocalTable)
  2782. end
  2783.  
  2784. if Message == "admins" or Message == "adminlist" then
  2785. local TableStorage = {}
  2786. for _,Obj in pairs(Ranks["Member"]) do table.insert(TableStorage, Obj..": Member") end
  2787. for _,Obj in pairs(Ranks["Admin"]) do table.insert(TableStorage, Obj..": Admin") end
  2788. 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, Obj..": Owner") end end
  2789. ListGui(Speaker, TableStorage)
  2790. end
  2791.  
  2792. if string.sub(Message,1,9+#Bet) == "superjump"..Bet then
  2793. local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
  2794. for _,Player in pairs(Players) do
  2795. if Player ~= nil then
  2796. if Player.Character ~= nil then
  2797. if Player.Character:FindFirstChild("Torso") then
  2798. local Force = Player.Character.Torso:FindFirstChild("LMM SJ") if Force then Force:Destroy() end
  2799. Force = Instance.new("BodyForce", Player.Character.Torso) Force.Name = "LMM SJ" Force.force = Vector3.new(0,0,0)
  2800. 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
  2801. end
  2802. end
  2803. end
  2804. end
  2805. end
  2806.  
  2807. if string.sub(Message,1,10+#Bet) == "normaljump"..Bet then
  2808. local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
  2809. for _,Player in pairs(Players) do
  2810. if Player ~= nil then
  2811. if Player.Character ~= nil then
  2812. if Player.Character:FindFirstChild("Torso") then
  2813. local Force = Player.Character.Torso:FindFirstChild("LMM SJ") if Force then Force:Destroy() end
  2814. end
  2815. end
  2816. end
  2817. end
  2818. end
  2819.  
  2820. if string.sub(Message,1,6+#Bet) == "punish"..Bet and DisabledAbuse() == false then
  2821. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  2822. for _,Player in pairs(Players) do
  2823. if Player ~= nil then
  2824. if Player.Character ~= nil then
  2825. Player.Character.Parent = game:GetService("Lighting")
  2826. end
  2827. end
  2828. end
  2829. end
  2830.  
  2831. if string.sub(Message,1,8+#Bet) == "unpunish"..Bet or string.sub(Message,1,8+#Bet) == "nopunish"..Bet then
  2832. local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
  2833. for _,Player in pairs(Players) do
  2834. if Player ~= nil then
  2835. if Player.Character ~= nil then
  2836. Player.Character.Parent = game:GetService("Workspace")
  2837. Player.Character:MakeJoints()
  2838. end
  2839. end
  2840. end
  2841. end
  2842.  
  2843. if string.sub(Message,1,4+#Bet) == "stun"..Bet then
  2844. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  2845. for _,Player in pairs(Players) do
  2846. if Player ~= nil then
  2847. if Player.Character ~= nil then
  2848. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2849. Player.Character.Humanoid.PlatformStand = true
  2850. end
  2851. end
  2852. end
  2853. end
  2854. end
  2855.  
  2856. if string.sub(Message,1,6+#Bet) == "nostun"..Bet then
  2857. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  2858. for _,Player in pairs(Players) do
  2859. if Player ~= nil then
  2860. if Player.Character ~= nil then
  2861. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2862. Player.Character.Humanoid.PlatformStand = false
  2863. end
  2864. end
  2865. end
  2866. end
  2867. end
  2868.  
  2869. if string.sub(Message,1,4+#Bet) == "jump"..Bet then
  2870. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  2871. for _,Player in pairs(Players) do
  2872. if Player ~= nil then
  2873. if Player.Character ~= nil then
  2874. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2875. Player.Character.Humanoid.Jump = true
  2876. end
  2877. end
  2878. end
  2879. end
  2880. end
  2881.  
  2882. if string.sub(Message,1,3+#Bet) == "sit"..Bet then
  2883. local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
  2884. for _,Player in pairs(Players) do
  2885. if Player ~= nil then
  2886. if Player.Character ~= nil then
  2887. if Player.Character:FindFirstChild("Humanoid") ~= nil then
  2888. Player.Character.Humanoid.Sit = true
  2889. end
  2890. end
  2891. end
  2892. end
  2893. end
  2894.  
  2895. if string.sub(Message,1,8+#Bet) == "loopheal"..Bet then
  2896. local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
  2897. for _,Player in pairs(Players) do
  2898. if Player ~= nil then
  2899. if Player.Character ~= nil then
  2900. if Player.Character:FindFirstChild("Humanoid") then
  2901. repeat Player.Character.Humanoid.Health = Player.Character.Humanoid.MaxHealth wait() until not Player.Character:FindFirstChild("Humanoid") or Player.Character.Humanoid.Health == 0
  2902. end
  2903. end
  2904. end
  2905. end
  2906. end
  2907.  
  2908. if Message == "commandgui" or Message == "cmdgui" or Message == "commandbar" or Message == "cmdbar" then
  2909. if Speaker.PlayerGui ~= nil then
  2910. coroutine.wrap(function()
  2911. local SG = Instance.new("ScreenGui") SG.Name = "LuaMod".."".."elMaker's Admin Cmd Bar"
  2912. local Frame = Instance.new("Frame", SG) Frame.Position = UDim2.new(0,280,0,0) Frame.Size = UDim2.new(1,-425,0,100) Frame.Style = "RobloxSquare"
  2913. local Body = Instance.new("TextBox", Frame) Body.Name = "Body" Body.Text = "Enter a Command or put in 'close' to close Command Bar" Body.BackgroundTransparency = 1 Body.Size = UDim2.new(1,0,0,20) Body.Font = "ArialBold" Body.FontSize = "Size12" Body.TextColor3 = Color3.new(1,1,1) Body.ClearTextOnFocus = false
  2914. local Clear = Instance.new("TextButton", Frame) Clear.Name = "Clear" Clear.Text = "Clear Command Text" Clear.Position = UDim2.new(0,0,0,30) Clear.Size = UDim2.new(0.5,0,1,-40) Clear.Style = "RobloxButtonDefault" Clear.Font = "Arial" Clear.FontSize = "Size18" Clear.TextColor3 = Color3.new(1,1,1)
  2915. local Execute = Instance.new("TextButton", Frame) Execute.Name = "Execute" Execute.Text = "Execute Command" Execute.Position = UDim2.new(0.5,0,0,30) Execute.Size = UDim2.new(0.5,0,1,-40) Execute.Style = "RobloxButton" Execute.Font = "Arial" Execute.FontSize = "Size18" Execute.TextColor3 = Color3.new(1,1,1)
  2916. for _,Object in pairs(Speaker.PlayerGui:GetChildren()) do if Object.Name == "LuaMod".."elMaker".."'".."s Admin Cmd Bar" then Object:Destroy() end end
  2917. SG.Parent = Speaker.PlayerGui
  2918. coroutine.wrap(function() Frame:TweenPosition(UDim2.new(0,280,0.1,0), "In", "Quint", 0.7) end)()
  2919. Clear.MouseButton1Click:connect(function() Body.Text = "" end)
  2920. Execute.MouseButton1Click:connect(function()
  2921. if Body.Text == "close" then
  2922. SG:Destroy()
  2923. else
  2924. Chatted(Body.Text, Speaker)
  2925. end
  2926. end)
  2927. end)()
  2928. end
  2929. end
  2930.  
  2931. if string.sub(Message, 1, 5+#Bet) == "decal"..Bet or string.sub(Message, 1, 5+#Bet) == "image"..Bet then
  2932. local ID = 0
  2933. if string.sub(Message, 1, 5+#Bet) == "image"..Bet then ID = tonumber(string.sub(RawMessage, 6+#Bet)) or 0 end
  2934. if string.sub(Message, 1, 5+#Bet) == "decal"..Bet then ID = GetImageFormat(tonumber(string.sub(RawMessage, 6+#Bet))) or 0 end
  2935. if ID ~= nil then
  2936. Execute(LocalScript, Speaker, Speaker.Character, [[
  2937. local Me = game:GetService("Players").LocalPlayer
  2938. local Mouse = Me:GetMouse()
  2939. local On = true
  2940. local ID = ]]..tostring(ID)..[[
  2941. local SG = nil
  2942.  
  2943. if Me.PlayerGui ~= nil then
  2944. SG = Me.PlayerGui:FindFirstChild("LuaModelMaker's Admin Template") if SG then SG:Destroy() end
  2945. SG = Instance.new("SurfaceGui", Me.PlayerGui) SG.Name = "LuaModelMaker's Admin Template"
  2946. local Image = Instance.new("ImageLabel", SG) Image.Size = UDim2.new(1,0,1,0) Image.BackgroundTransparency = 1 Image.Image = "http://www.roblox.com/asset/?id="..tostring(ID)
  2947. else On = false end
  2948.  
  2949. Mouse.Button1Down:connect(function() if On == true then if Mouse.Target ~= nil then
  2950. if Mouse.Target:IsA("Part") then
  2951. for _,Obj in pairs(Mouse.Target:GetChildren()) do
  2952. if Obj:IsA("Decal") then if Obj.Face == Mouse.TargetSurface then Obj:Destroy() end end
  2953. end
  2954. local Decal = Instance.new("Decal", Mouse.Target) Decal.Name = "LMMA Decal" Decal.Texture = "http://www.roblox.com/asset/?id="..tostring(ID) Decal.Face = Mouse.TargetSurface
  2955. On = false
  2956. end
  2957. end end end)
  2958.  
  2959. Mouse.KeyDown:connect(function(Key) if On == true then
  2960. if Key == "x" then
  2961. if Mouse.Target ~= nil then
  2962. if Mouse.Target:IsA("Part") then
  2963. for _,Obj in pairs(Mouse.Target:GetChildren()) do
  2964. if Obj:IsA("FaceInstance") then Obj:Destroy() end
  2965. end
  2966. end
  2967. end
  2968. end
  2969. if Key == "z" then On = false end
  2970. end end)
  2971.  
  2972. coroutine.wrap(function()
  2973. repeat wait()
  2974. pcall(function() SG.Adornee = Mouse.Target end)
  2975. pcall(function() SG.Face = Mouse.TargetSurface end)
  2976. until On == false or not SG
  2977. SG:Destroy()
  2978. script.Disabled = true script:Destroy()
  2979. end)()
  2980. ]])
  2981. end
  2982. end
  2983.  
  2984. if string.sub(Message, 1, 3+#Bet) == "ins"..Bet then
  2985. Execute(LocalScript, Speaker.Character, Speaker, [[
  2986. local Me = game:GetService("Players").LocalPlayer
  2987. local Mouse = Me:GetMouse()
  2988. local On = true
  2989. local ID = ]]..string.sub(Message, 4+#Bet)..[[
  2990. local SG = nil
  2991. local Parts = {}
  2992.  
  2993. function FindParts(BaseParent)
  2994. for _,Obj in pairs(BaseParent:GetChildren()) do
  2995. if Obj:IsA("BasePart") then
  2996. Obj.Locked = false
  2997. table.insert(Parts, Obj)
  2998. end
  2999. FindParts(Obj)
  3000. end
  3001. end
  3002.  
  3003. if tonumber(ID) == nil then ID = 1 end
  3004. local Model = game:GetService("InsertService"):LoadAsset(tonumber(ID))
  3005. if Model:GetChildren()[1] ~= nil then
  3006. Model.Parent = Workspace.CurrentCamera
  3007. Model.Name = "LMMA Model"
  3008. FindParts(Model)
  3009.  
  3010. local Dragger = Instance.new("Dragger")
  3011. Dragger:MouseDown(Parts[1], Vector3.new(0,0,0), Parts)
  3012.  
  3013. Mouse.Button1Down:connect(function() if On == true then if Mouse.Target ~= nil then
  3014. Model.Parent = Workspace
  3015. Model:MakeJoints()
  3016. On = false
  3017. end end end)
  3018.  
  3019. Mouse.KeyDown:connect(function(Key) if On == true then
  3020. if Key == "x" then On = false end
  3021. if Key == "r" then Dragger:AxisRotate("Y") end
  3022. if Key == "t" then Dragger:AxisRotate("Z") end
  3023. end end)
  3024.  
  3025. coroutine.wrap(function()
  3026. repeat wait()
  3027. Dragger:MouseMove(Mouse.UnitRay)
  3028. until On == false or not Dragger or not Model
  3029. Dragger:MouseUp()
  3030. pcall(function() Dragger:Destroy() end)
  3031. script.Disabled = true script:Destroy()
  3032. end)()
  3033. else script.Disabled = true script:Destroy() end
  3034. ]])
  3035. end
  3036.  
  3037. if string.sub(Message,1,6+#Bet) == "change"..Bet then
  3038. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
  3039. local Players = Scan(Arg1, Speaker)
  3040. local StatName,NewStat = GetSplit(Arg2, Bet) if not StatName and NewStat then return end
  3041. for _,Player in pairs(Players) do
  3042. if Player ~= nil then
  3043. local Stats = Player:FindFirstChild("leaderstats")
  3044. if Stats ~= nil then
  3045. for _,Stat in pairs(Stats:GetChildren()) do
  3046. if string.sub(string.lower(Stat.Name),1,#StatName) == string.lower(StatName) then
  3047. pcall(function() Stat.Value = NewStat end)
  3048. end
  3049. end
  3050. end
  3051. end
  3052. end
  3053. end
  3054.  
  3055. if string.sub(Message,1,5+#Bet) == "shirt"..Bet then
  3056. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
  3057. local Players = Scan(Arg1, Speaker)
  3058. local ID = tonumber(Arg2) if Arg2 ~= nil then
  3059. for _,Player in pairs(Players) do
  3060. if Player ~= nil then
  3061. if Player.Character ~= nil then
  3062. local Obj = Player.Character:FindFirstChild("Shirt")
  3063. if Obj then
  3064. Obj.ShirtTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
  3065. else
  3066. Obj = Instance.new("Shirt", Player.Character) Obj.Name = "Shirt" Obj.ShirtTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
  3067. end
  3068. coroutine.wrap(function() Obj.Parent = nil wait(0.1) Obj.Parent = Player.Character end)()
  3069. end
  3070. end
  3071. end
  3072. end
  3073. end
  3074.  
  3075. if string.sub(Message,1,5+#Bet) == "pants"..Bet then
  3076. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 6+#Bet), Bet) if not Arg1 and Arg2 then return end
  3077. local Players = Scan(Arg1, Speaker)
  3078. local ID = tonumber(Arg2) if Arg2 ~= nil then
  3079. for _,Player in pairs(Players) do
  3080. if Player ~= nil then
  3081. if Player.Character ~= nil then
  3082. local Obj = Player.Character:FindFirstChild("Pants")
  3083. if Obj then
  3084. Obj.PantsTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
  3085. else
  3086. Obj = Instance.new("Pants", Player.Character) Obj.Name = "Pants" Obj.PantsTemplate = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
  3087. end
  3088. coroutine.wrap(function() Obj.Parent = nil wait(0.1) Obj.Parent = Player.Character end)()
  3089. end
  3090. end
  3091. end
  3092. end
  3093. end
  3094.  
  3095. if string.sub(Message,1,6+#Bet) == "tshirt"..Bet then
  3096. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 7+#Bet), Bet) if not Arg1 and Arg2 then return end
  3097. local Players = Scan(Arg1, Speaker)
  3098. local ID = tonumber(Arg2) if Arg2 ~= nil then
  3099. for _,Player in pairs(Players) do
  3100. if Player ~= nil then
  3101. if Player.Character ~= nil then
  3102. if Player.Character:FindFirstChild("Torso") then
  3103. local Obj1 = Player.Character:FindFirstChild("Shirt Graphic")
  3104. local Obj2 = Player.Character.Torso:FindFirstChild("roblox")
  3105. if Obj1 then
  3106. Obj1.Graphic = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
  3107. else
  3108. Obj1 = Instance.new("ShirtGraphic", Player.Character) Obj1.Name = "Shirt Graphic" Obj1.Graphic = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
  3109. end
  3110. if Obj2 then
  3111. Obj2.Texture = "http://www.roblox.com/asset/?id="..GetImageFormat(ID)
  3112. else
  3113. Obj2 = Instance.new("Decal", Player.Character.Torso) Obj2.Name = "roblox" Obj2.Texture = "http://www.roblox.com/asset/?id="..GetImageFormat(ID) Obj2.Face = "Front"
  3114. end
  3115. coroutine.wrap(function() Obj1.Parent = nil wait(0.1) Obj1.Parent = Player.Character end)()
  3116. coroutine.wrap(function() Obj2.Parent = nil wait(0.2) Obj2.Parent = Player.Character.Torso end)()
  3117. end
  3118. end
  3119. end
  3120. end
  3121. end
  3122. end
  3123.  
  3124. if string.sub(Message,1,4+#Bet) == "anim"..Bet then
  3125. local Arg1, Arg2 = GetSplit(string.sub(Message, 5+#Bet), Bet) if not Arg1 and Arg2 then return end
  3126. local Players = Scan(Arg1, Speaker)
  3127. local ID = tonumber(Arg2) if Arg2 ~= nil then
  3128. for _,Player in pairs(Players) do
  3129. if Player.Character then
  3130. Execute(LocalScript, Player.Character, Player, [[
  3131. local Me = game:GetService("Players").LocalPlayer
  3132. local Anim = Instance.new("Animation") Anim.Name = "L".."MM Animate" Anim.AnimationId = "http://www.roblox.com/asset/?id="..]]..tostring(ID)..[[
  3133. local AnimTrack = Me.Character.Humanoid:LoadAnimation(Anim)
  3134. local StopAnim = Me.Character:FindFirstChild("Stop LMM Animate") if StopAnim then StopAnim:Destroy() end
  3135. StopAnim = Instance.new("Configuration", Me.Character) StopAnim.Name = "Stop LMM Animate"
  3136. Me.Character.ChildRemoved:connect(function(Child) wait()
  3137. if Child == StopAnim then
  3138. AnimTrack:Stop() Anim:Destroy() script:Destroy() script.Disabled = true
  3139. end
  3140. end)
  3141. wait(0.1)
  3142. AnimTrack:Play()
  3143. ]])
  3144. end
  3145. end
  3146. end
  3147. end
  3148.  
  3149. if string.sub(Message,1,6+#Bet) == "noanim"..Bet then
  3150. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3151. for _,Player in pairs(Players) do
  3152. if Player ~= nil then
  3153. if Player.Character then
  3154. local StopAnim = Player.Character:FindFirstChild("Stop LMM Animate")
  3155. if StopAnim then StopAnim:Destroy() end
  3156. end
  3157. end
  3158. end
  3159. end
  3160.  
  3161. if string.sub(Message,1,6+#Bet) == "normal"..Bet then
  3162. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3163. for _,Player in pairs(Players) do
  3164. if Player ~= nil then
  3165. if Player.Character then if Player.Character:FindFirstChild("Body Colors") then
  3166. for _,Object in pairs(Player.Character:GetChildren()) do
  3167. if Object:IsA("BasePart") then if Object.Name ~= "HumanoidRootPart" then
  3168. Object.Transparency = 0
  3169. Object.Reflectance = 0
  3170. if Object.Name == "Head" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").HeadColor end
  3171. if Object.Name == "Left Arm" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").LeftArmColor end
  3172. if Object.Name == "Left Leg" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").LeftLegColor end
  3173. if Object.Name == "Right Arm" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").RightArmColor end
  3174. if Object.Name == "Right Leg" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").RightLegColor end
  3175. if Object.Name == "Torso" then Object.BrickColor = Player.Character:FindFirstChild("Body Colors").TorsoColor end
  3176. end end
  3177. for _,Obj in pairs(Object:GetChildren()) do
  3178. if Obj:IsA("BasePart") then
  3179. Obj.Transparency = 0
  3180. Obj.Reflectance = 0
  3181. elseif Obj:IsA("Decal") then
  3182. Obj.Transparency = 0
  3183. end
  3184. end
  3185. end
  3186. end end
  3187. end
  3188. end
  3189. end
  3190.  
  3191. if string.sub(Message, 1, 2+#Bet) == "pl"..Bet then
  3192. local Players = Scan(string.sub(Message, 3+#Bet), Speaker)
  3193. for _,Player in pairs(Players) do
  3194. Execute(LocalScript, Player.Character, Speaker, CoreGui("PlayerList", true))
  3195. end
  3196. end
  3197.  
  3198. if string.sub(Message, 1, 3+#Bet) == "npl"..Bet then
  3199. local Players = Scan(string.sub(Message, 4+#Bet), Speaker)
  3200. for _,Player in pairs(Players) do
  3201. Execute(LocalScript, Player.Character, Player, CoreGui("PlayerList", false))
  3202. end
  3203. end
  3204.  
  3205. if string.sub(Message,1,9+#Bet) == "countdown"..Bet then
  3206. local Time = tonumber(string.sub(Message, 10+#Bet)) or 10
  3207. if Time > 120 then Time = 120 print(Time) end
  3208. coroutine.wrap(function() for i = 0,Time do
  3209. for _,Player in pairs(Players:GetPlayers()) do
  3210. SendMessage(Player, "Countdown from "..Speaker.Name, Time-i.." ", 0)
  3211. end
  3212. wait(1)
  3213. end end)()
  3214. end
  3215.  
  3216. if string.sub(Message,1,7+#Bet) == "friends"..Bet then
  3217. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  3218. local Friends,OneFriend = {}, false
  3219. for _,Player in pairs(Players) do
  3220. if Player ~= nil then
  3221. for _,User in pairs(game:GetService("Players"):GetPlayers()) do if User ~= Player then
  3222. if Player:IsBestFriendsWith(User.userId) then
  3223. table.insert(Friends, Player.Name.." is best friends with "..User.Name)
  3224. OneFriend = true
  3225. elseif Player:IsFriendsWith(User.userId) then
  3226. table.insert(Friends, Player.Name.." is friends with "..User.Name)
  3227. OneFriend = true
  3228. end
  3229. if _ == #game:GetService("Players"):GetPlayers() and OneFriend == false then
  3230. table.insert(Friends, Player.Name.." has no friends in this server (Loner)")
  3231. end
  3232. end end
  3233. end
  3234. end
  3235. ListGui(Speaker, Friends)
  3236. end
  3237.  
  3238. if Message == "nos" or Message == "noscripts" then
  3239. for _,Obj in pairs(Workspace:GetChildren()) do
  3240. if Obj:IsA("Script") or Obj:IsA("BaseScript") then if Obj ~= script then
  3241. Obj.Disabled = true
  3242. Obj:Destroy()
  3243. end end
  3244. end
  3245. end
  3246.  
  3247. if Message == "clear" or Message == "clr" then
  3248. for _,Obj in pairs(Objects) do
  3249. if Obj then Obj:Destroy() end
  3250. end
  3251. Objects = {}
  3252. Jailed = {}
  3253. end
  3254.  
  3255. if string.sub(Message,1,9+#Bet) == "grouprank"..Bet then
  3256. local Arg1, Arg2 = GetSplit(string.sub(RawMessage, 10+#Bet), Bet) if not Arg1 and Arg2 then return end
  3257. local Players = Scan(Arg1, Speaker)
  3258. local ID = tonumber(Arg2) or 0
  3259. for _,Player in pairs(Players) do
  3260. if Player ~= nil then if Player:IsInGroup(ID) then
  3261. SendMessage(Speaker, Player.Name.."'s Rank for the group "..ID, "Rank Number: "..Player:GetRankInGroup(ID).." | Rank Name: "..Player:GetRoleInGroup(ID), 4)
  3262. else SendMessage(Speaker, "Error", Player.Name.." is not in group ID: "..ID, 3) end end
  3263. end
  3264. end
  3265.  
  3266. if string.sub(Message,1,6+#Bet) == "cookie"..Bet then
  3267. if InAdminGroup(Speaker) then
  3268. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3269. for _,Player in pairs(Players) do
  3270. if Player ~= nil then
  3271. if Player.Backpack ~= nil then
  3272. 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)
  3273. local Handle = Instance.new("Part", Tool) Handle.Name = "Handle" Handle.Size = Vector3.new(1,1,1)
  3274. 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"
  3275. local Anim = Instance.new("Animation", Tool) Anim.Name = "EatCookie" Anim.AnimationId = "http://www.roblox.com/asset/?id=29517689"
  3276. Execute(LocalScript, Tool, Player, [[
  3277. script.Parent.Equipped:connect(function(Mouse) Mouse.Button1Down:connect(function()
  3278. local Track = game:GetService("Players").LocalPlayer.Character.Humanoid:LoadAnimation(script.Parent.EatCookie)
  3279. wait(0.05) Track:Play()
  3280. end) end)
  3281. ]])
  3282. end
  3283. end
  3284. end
  3285. end
  3286. end
  3287.  
  3288. -- FUN COMMANDS --
  3289.  
  3290. if FUN == true then
  3291. if string.sub(Message,1,4+#Bet) == "noob"..Bet then
  3292. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  3293. for _,Player in pairs(Players) do
  3294. if Player ~= nil then
  3295. if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
  3296. local Position = Player.Character.Torso.Position
  3297. Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=0"
  3298. wait() Player:LoadCharacter() wait()
  3299. Player.Character:MoveTo(Position)
  3300. end
  3301. end
  3302. end
  3303. end
  3304.  
  3305. if string.sub(Message,1,5+#Bet) == "black"..Bet or string.sub(Message,1,5+#Bet) == "obama"..Bet then
  3306. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3307. for _,Player in pairs(Players) do
  3308. if Player ~= nil then
  3309. if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
  3310. local Position = Player.Character.Torso.Position
  3311. Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=1337"
  3312. wait() Player:LoadCharacter() wait()
  3313. Player.Character:MoveTo(Position)
  3314. end
  3315. end
  3316. end
  3317. end
  3318.  
  3319. if string.sub(Message,1,5+#Bet) == "guest"..Bet then
  3320. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3321. for _,Player in pairs(Players) do
  3322. if Player ~= nil then
  3323. if Player.Character ~= nil and Player.Character:FindFirstChild("Torso") ~= nil then
  3324. local Position = Player.Character.Torso.Position
  3325. Player.CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=1"
  3326. wait() Player:LoadCharacter() wait()
  3327. Player.Character:MoveTo(Position)
  3328. end
  3329. end
  3330. end
  3331. end
  3332.  
  3333. if string.sub(Message,1,4+#Bet) == "spin"..Bet then
  3334. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  3335. for _,Player in pairs(Players) do
  3336. if Player ~= nil then
  3337. if Player.Character ~= nil then
  3338. if Player.Character:FindFirstChild("Torso") ~= nil then coroutine.wrap(function()
  3339. local Spin = Player.Character.Torso:FindFirstChild("LMM Spin")
  3340. if Spin then Spin:Destroy() end
  3341. 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
  3342. repeat wait(1/44) Spin.cframe = Spin.cframe * CFrame.Angles(0,math.rad(30),0) until not Spin or Spin.Parent ~= Player.Character.Torso
  3343. end)() end
  3344. end
  3345. end
  3346. end
  3347. end
  3348.  
  3349. if string.sub(Message,1,6+#Bet) == "nospin"..Bet then
  3350. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3351. for _,Player in pairs(Players) do
  3352. if Player ~= nil then
  3353. if Player.Character ~= nil then
  3354. if Player.Character:FindFirstChild("Torso") ~= nil then
  3355. local Spin = Player.Character.Torso:FindFirstChild("LMM Spin")
  3356. if Spin then Spin:Destroy() end
  3357. end
  3358. end
  3359. end
  3360. end
  3361. end
  3362.  
  3363. if string.sub(Message,1,4+#Bet) == "flip"..Bet then
  3364. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  3365. for _,Player in pairs(Players) do
  3366. if Player ~= nil then
  3367. if Player.Character ~= nil then
  3368. if Player.Character:FindFirstChild("Torso") ~= nil then
  3369. local Flip = Player.Character.Torso:FindFirstChild("LMM Flip")
  3370. if not Flip then coroutine.wrap(function()
  3371. local TorsoCFrame = Player.Character.Torso.CFrame
  3372. 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
  3373. 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)
  3374. wait(0.1)
  3375. for i = 0,360,10 do
  3376. Flip.cframe = TorsoCFrame * CFrame.Angles(math.rad(i),0,0)
  3377. wait()
  3378. end
  3379. wait(0.5)
  3380. Flip:Destroy()
  3381. Stable:Destroy()
  3382. end)() end
  3383. end
  3384. end
  3385. end
  3386. end
  3387. end
  3388.  
  3389. if string.sub(Message,1,8+#Bet) == "longneck"..Bet then
  3390. local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
  3391. for _,Player in pairs(Players) do
  3392. if Player ~= nil then
  3393. if Player.Character ~= nil then
  3394. if Player.Character:FindFirstChild("Torso") and Player.Character:FindFirstChild("Head") ~= nil then
  3395. if Player.Character.Torso:FindFirstChild("Neck") then
  3396. Player.Character.Torso.Neck.C0 = CFrame.new(0,3,0) * CFrame.Angles(-math.rad(90),0,math.rad(180))
  3397. local Neck = Player.Character:FindFirstChild("Neck") if Neck then Neck:Destroy() end
  3398. 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))
  3399. local Mesh = Instance.new("CylinderMesh", Neck) Mesh.Scale = Vector3.new(0.7,1,0.7)
  3400. local Weld = Instance.new("Weld", Neck) Weld.Part0 = Neck Weld.Part1 = Player.Character.Torso Weld.C0 = CFrame.new(0,-2,0)
  3401. end
  3402. end
  3403. end
  3404. end
  3405. end
  3406. end
  3407.  
  3408. if string.sub(Message,1,10+#Bet) == "normalneck"..Bet then
  3409. local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
  3410. for _,Player in pairs(Players) do
  3411. if Player ~= nil then
  3412. if Player.Character ~= nil then
  3413. Player.Character.Torso.Neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(-math.rad(90),0,math.rad(180))
  3414. local Neck = Player.Character:FindFirstChild("Neck") if Neck then Neck:Destroy() end
  3415. end
  3416. end
  3417. end
  3418. end
  3419.  
  3420. if string.sub(Message,1,9+#Bet) == "loopfling"..Bet and DisabledAbuse() == false then
  3421. local Players = Scan(string.sub(Message, 10+#Bet), Speaker)
  3422. for _,Player in pairs(Players) do
  3423. if Player ~= nil then
  3424. if Player.Character ~= nil then
  3425. for Num,Name in pairs(Flings) do if string.lower(Player.Name) == string.lower(Name) then table.remove(Flings, Num) end end
  3426. local function FlingPlayer(User, Character)
  3427. wait(0.1)
  3428. if User then
  3429. local Stop = true
  3430. 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
  3431. if Character:FindFirstChild("Torso") then local Fling = Instance.new("BodyForce", Character.Torso) Fling.Name = "Fling" Fling.force = Vector3.new(100000000,1000000000,100000000) end
  3432. end
  3433. end
  3434. table.insert(Flings, Player.Name)
  3435. FlingPlayer(Player, Player.Character)
  3436. Player.CharacterAdded:connect(function(Char) FlingPlayer(Player, Char) end)
  3437. end
  3438. end
  3439. end
  3440. end
  3441.  
  3442. if string.sub(Message,1,11+#Bet) == "noloopfling"..Bet then
  3443. local Players = Scan(string.sub(Message, 12+#Bet), Speaker)
  3444. for _,Player in pairs(Players) do
  3445. if Player ~= nil then
  3446. for Num,Name in pairs(Flings) do if string.lower(Player.Name) == string.lower(Name) then table.remove(Flings, Num) end end
  3447. end
  3448. end
  3449. end
  3450.  
  3451. if string.sub(Message,1,5+#Bet) == "fling"..Bet and DisabledAbuse() == false then
  3452. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3453. for _,Player in pairs(Players) do
  3454. if Player ~= nil then
  3455. if Player.Character ~= nil then
  3456. 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
  3457. FlingPlayer(Player, Player.Character)
  3458. end
  3459. end
  3460. end
  3461. end
  3462.  
  3463. if string.sub(Message,1,5+#Bet) == "ghost"..Bet then
  3464. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3465. for _,Player in pairs(Players) do
  3466. if Player ~= nil then
  3467. if Player.Character ~= nil then
  3468. for _,Object in pairs(Player.Character:GetChildren()) do
  3469. if Object:IsA("BasePart") then if Object.Name ~= "HumanoidRootPart" then
  3470. Object.Transparency = 0.5
  3471. Object.Reflectance = 0
  3472. Object.BrickColor = BrickColor.new("Institutional white")
  3473. end end
  3474. for _,Obj in pairs(Object:GetChildren()) do
  3475. if Obj:IsA("BasePart") then
  3476. Obj.Transparency = 0.5
  3477. Obj.Reflectance = 0
  3478. elseif Obj:IsA("Decal") then
  3479. Obj.Transparency = 0.5
  3480. end
  3481. end
  3482. end
  3483. end
  3484. end
  3485. end
  3486. end
  3487.  
  3488. if string.sub(Message,1,4+#Bet) == "drug"..Bet and DisabledAbuse() == false then
  3489. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  3490. for _,Player in pairs(Players) do
  3491. if Player ~= nil then
  3492. if Player.Character then
  3493. if Player.PlayerGui ~= nil then
  3494. local SG = Player.PlayerGui:FindFirstChild("LMM Drug") if SG then SG:Destroy() end
  3495. SG = Instance.new("ScreenGui", Player.PlayerGui) SG.Name = "LMM Drug"
  3496. local Frame = Instance.new("Frame", SG) Frame.Size = UDim2.new(1,0,1,0) Frame.BackgroundTransparency = 0.5
  3497. local Stop = false
  3498. coroutine.wrap(function()
  3499. repeat
  3500. Frame.BackgroundColor3 = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255)
  3501. wait(0.1)
  3502. until not SG
  3503. end)()
  3504. wait() Execute(LocalScript, Player.Character, Player, [[repeat wait(0.1) Workspace.CurrentCamera.FieldOfView = math.random(20,80) until not game:GetService("Players").LocalPlayer.PlayerGui["LMM Drug"] ]])
  3505. end
  3506. end
  3507. end
  3508. end
  3509. end
  3510.  
  3511. if string.sub(Message,1,6+#Bet) == "nodrug"..Bet then
  3512. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3513. for _,Player in pairs(Players) do
  3514. if Player.PlayerGui ~= nil then
  3515. local SG = Player.PlayerGui:FindFirstChild("LMM Drug") if SG then SG:Destroy() end
  3516. wait() Execute(LocalScript, Player.Character, Player, [[Workspace.CurrentCamera.FieldOfView = 70]])
  3517. end
  3518. end
  3519. end
  3520.  
  3521. if string.sub(Message,1,4+#Bet) == "fart"..Bet then
  3522. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  3523. for _,Player in pairs(Players) do
  3524. if Player.Character then
  3525. if Player.Character:FindFirstChild("Torso") ~= nil and Player.Character.Head:FindFirstChild("face") then
  3526. coroutine.wrap(function()
  3527. 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
  3528. local OldFace = Player.Character.Head.face.Texture
  3529. 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
  3530. 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)
  3531. local Smoke = Instance.new("Smoke", Fart) Smoke.Name = "Fart Effect" Smoke.Color = Color3.new(70/255, 100/255, 30/255)
  3532. Player.Character.Head.face.Texture = "http://www.roblox.com/asset/?id=28118994"
  3533. 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(2.5) Sound:Stop() wait(0.5) Sound:Play() until Sound.IsPlaying or not Sound
  3534. wait(1)
  3535. Smoke.Enabled = false
  3536. wait(1)
  3537. Fart:Destroy()
  3538. Player.Character.Head.face.Texture = OldFace
  3539. end end
  3540. end)()
  3541. end
  3542. end
  3543. end
  3544. end
  3545.  
  3546. if string.sub(Message,1,5+#Bet) == "vomit"..Bet then
  3547. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3548. for _,Player in pairs(Players) do
  3549. if Player.Character then
  3550. if Player.Character:FindFirstChild("Head") ~= nil then
  3551. if Player.Character.Torso:FindFirstChild("Neck") and Player.Character.Head:FindFirstChild("face") then
  3552. coroutine.wrap(function()
  3553. 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
  3554. local OldFace = Player.Character.Head.face.Texture
  3555. Player.Character.Torso.Neck.C0 = Player.Character.Torso.Neck.C0 * CFrame.Angles(math.rad(20),0,0)
  3556. Player.Character.Head.BrickColor = BrickColor.new("Br. yellowish green")
  3557. Player.Character.Head.face.Texture = "http://www.roblox.com/asset/?id=24067663"
  3558. 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(2.5) Sound:Stop() wait(0.5) Sound:Play() until Sound.IsPlaying or not Sound
  3559. coroutine.wrap(function() for i = 1,100 do wait()
  3560. 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)
  3561. coroutine.wrap(function() wait(3) Part:Destroy() end)()
  3562. 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)()
  3563. end end
  3564. end)()
  3565. end
  3566. end
  3567. end
  3568. end
  3569. end
  3570.  
  3571. if string.sub(Message,1,5+#Bet) == "smoke"..Bet then
  3572. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3573. for _,Player in pairs(Players) do
  3574. if Player ~= nil then
  3575. if Player.Character then
  3576. if Player.Character:FindFirstChild("Torso") ~= nil then
  3577. local Smoke = Instance.new("Smoke", Player.Character.Torso) table.insert(Objects, Smoke)
  3578. end
  3579. end
  3580. end
  3581. end
  3582. end
  3583.  
  3584. if string.sub(Message,1,7+#Bet) == "nosmoke"..Bet then
  3585. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  3586. for _,Player in pairs(Players) do
  3587. if Player ~= nil then
  3588. if Player.Character ~= nil then
  3589. if Player.Character:FindFirstChild("Torso") ~= nil then
  3590. for _,Get in pairs(Player.Character.Torso:GetChildren()) do
  3591. if Get:IsA("Smoke") then
  3592. Get:Destroy()
  3593. end
  3594. end
  3595. end
  3596. end
  3597. end
  3598. end
  3599. end
  3600.  
  3601. if string.sub(Message,1,8+#Bet) == "sparkles"..Bet then
  3602. local Players = Scan(string.sub(Message, 9+#Bet), Speaker)
  3603. for _,Player in pairs(Players) do
  3604. if Player ~= nil then
  3605. if Player.Character then
  3606. if Player.Character:FindFirstChild("Torso") ~= nil then
  3607. local Sparkles = Instance.new("Sparkles", Player.Character.Torso) table.insert(Objects, Sparkles)
  3608. end
  3609. end
  3610. end
  3611. end
  3612. end
  3613.  
  3614. if string.sub(Message,1,10+#Bet) == "nosparkles"..Bet then
  3615. local Players = Scan(string.sub(Message, 11+#Bet), Speaker)
  3616. for _,Player in pairs(Players) do
  3617. if Player ~= nil then
  3618. if Player.Character ~= nil then
  3619. if Player.Character:FindFirstChild("Torso") ~= nil then
  3620. for _,Get in pairs(Player.Character.Torso:GetChildren()) do
  3621. if Get:IsA("Sparkles") then
  3622. Get:Destroy()
  3623. end
  3624. end
  3625. end
  3626. end
  3627. end
  3628. end
  3629. end
  3630.  
  3631. if string.sub(Message,1,4+#Bet) == "fire"..Bet then
  3632. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  3633. for _,Player in pairs(Players) do
  3634. if Player ~= nil then
  3635. if Player.Character then
  3636. if Player.Character:FindFirstChild("Torso") ~= nil then
  3637. local Fire = Instance.new("Fire", Player.Character.Torso) table.insert(Objects, Fire)
  3638. end
  3639. end
  3640. end
  3641. end
  3642. end
  3643.  
  3644. if string.sub(Message,1,6+#Bet) == "nofire"..Bet then
  3645. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3646. for _,Player in pairs(Players) do
  3647. if Player ~= nil then
  3648. if Player.Character ~= nil then
  3649. if Player.Character:FindFirstChild("Torso") ~= nil then
  3650. for _,Get in pairs(Player.Character.Torso:GetChildren()) do
  3651. if Get:IsA("Fire") then
  3652. Get:Destroy()
  3653. end
  3654. end
  3655. end
  3656. end
  3657. end
  3658. end
  3659. end
  3660.  
  3661. if Message == "flash" then
  3662. coroutine.wrap(function()
  3663. --Lighting.Archivable = false wait(0.5) Lighting.Archivable = true wait(0.5)
  3664. repeat
  3665. Lighting.Ambient = Color3.new(1,1,1)
  3666. Lighting.FogColor = Color3.new(1,1,1)
  3667. Lighting.Brightness = 1
  3668. Lighting.TimeOfDay = 14
  3669. wait(0.1)
  3670. Lighting.Ambient = Color3.new(0,0,0)
  3671. Lighting.FogColor = Color3.new(0,0,0)
  3672. Lighting.Brightness = 0
  3673. Lighting.TimeOfDay = 0
  3674. wait(0.1)
  3675. until Lighting.Archivable == false
  3676. end)()
  3677. end
  3678.  
  3679. if Message == "disco" or Message == "party" then
  3680. coroutine.wrap(function()
  3681. --Lighting.Archivable = false wait(0.5) Lighting.Archivable = true wait(0.5)
  3682. repeat
  3683. local Color = Color3.new(math.random(0,255)/255,math.random(0,255)/255,math.random(0,255)/255)
  3684. Lighting.Ambient = Color
  3685. Lighting.FogColor = Color
  3686. Lighting.TimeOfDay = 0
  3687. Lighting.FogEnd = 100
  3688. wait(0.1)
  3689. until Lighting.Archivable == false
  3690. end)()
  3691. end
  3692.  
  3693. if Message == "noflash" or Message == "nodisco" or Message == "noparty" or Message == "fixl" or Message == "fixlight" or Message == "fixlighting" then
  3694. Lighting.Archivable = false
  3695. Lighting.Ambient = Color3.new(179/255,179/255,179/255)
  3696. Lighting.FogColor = Color3.new(192/255,192/255,192/255)
  3697. Lighting.Brightness = 0.6
  3698. Lighting.TimeOfDay = 14
  3699. Lighting.FogEnd = 100000
  3700. coroutine.wrap(function() wait(1) Lighting.Archivable = true end)()
  3701. end
  3702.  
  3703. if string.sub(Message,1,7+#Bet) == "nolimbs"..Bet then
  3704. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  3705. for _,Player in pairs(Players) do
  3706. if Player ~= nil then
  3707. if Player.Character then
  3708. for _,Obj in pairs(Player.Character:GetChildren()) do
  3709. local Valid = false
  3710. for _,Name in pairs({"Right Arm", "Left Arm", "Right Leg", "Left Leg"}) do if Obj.Name == Name then Valid = true end end
  3711. if Valid == true then Obj:Destroy() end
  3712. end
  3713. end
  3714. end
  3715. end
  3716. end
  3717.  
  3718. if string.sub(Message,1,6+#Bet) == "nolegs"..Bet then
  3719. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3720. for _,Player in pairs(Players) do
  3721. if Player ~= nil then
  3722. if Player.Character then
  3723. for _,Obj in pairs(Player.Character:GetChildren()) do
  3724. local Valid = false
  3725. for _,Name in pairs({"Right Leg", "Left Leg"}) do if Obj.Name == Name then Valid = true end end
  3726. if Valid == true then Obj:Destroy() end
  3727. end
  3728. end
  3729. end
  3730. end
  3731. end
  3732.  
  3733. if string.sub(Message,1,6+#Bet) == "noarms"..Bet then
  3734. local Players = Scan(string.sub(Message, 7+#Bet), Speaker)
  3735. for _,Player in pairs(Players) do
  3736. if Player ~= nil then
  3737. if Player.Character then
  3738. for _,Obj in pairs(Player.Character:GetChildren()) do
  3739. local Valid = false
  3740. for _,Name in pairs({"Right Arm", "Left Arm"}) do if Obj.Name == Name then Valid = true end end
  3741. if Valid == true then Obj:Destroy() end
  3742. end
  3743. end
  3744. end
  3745. end
  3746. end
  3747.  
  3748. if string.sub(Message,1,5+#Bet) == "shine"..Bet then
  3749. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3750. for _,Player in pairs(Players) do
  3751. if Player ~= nil then
  3752. if Player.Character then
  3753. for _,Obj in pairs(Player.Character:GetChildren()) do if Obj:IsA("BasePart") then
  3754. Obj.Reflectance = 0.5
  3755. end end
  3756. end
  3757. end
  3758. end
  3759. end
  3760.  
  3761. if string.sub(Message,1,4+#Bet) == "gold"..Bet then
  3762. local Players = Scan(string.sub(Message, 5+#Bet), Speaker)
  3763. for _,Player in pairs(Players) do
  3764. if Player ~= nil then
  3765. if Player.Character then
  3766. for _,Obj in pairs(Player.Character:GetChildren()) do if Obj:IsA("BasePart") then
  3767. Obj.Reflectance = 0.5
  3768. Obj.BrickColor = BrickColor.new("New Yeller")
  3769. end end
  3770. end
  3771. end
  3772. end
  3773. end
  3774.  
  3775. if string.sub(Message,1,7+#Bet) == "explode"..Bet and DisabledAbuse() == false then
  3776. local Players = Scan(string.sub(Message, 8+#Bet), Speaker)
  3777. for _,Player in pairs(Players) do
  3778. if Player ~= nil then
  3779. if Player.Character then
  3780. if Player.Character:FindFirstChild("Torso") then
  3781. local Boom = Instance.new("Explosion", Workspace)
  3782. Boom.Position = Player.Character.Torso.Position
  3783. end
  3784. end
  3785. end
  3786. end
  3787. end
  3788.  
  3789. if string.sub(Message,1,5+#Bet) == "naked"..Bet then
  3790. local Players = Scan(string.sub(Message, 6+#Bet), Speaker)
  3791. for _,Player in pairs(Players) do
  3792. if Player ~= nil then
  3793. Player:ClearCharacterAppearance()
  3794. end
  3795. end
  3796. end
  3797. --
  3798. end
  3799. --
  3800. --
  3801. end
  3802. Log(Speaker, RawMainMessage)
  3803. end
  3804.  
  3805. -- NonAdmin Commands --
  3806. if Message == "animations" then
  3807. ListGui(Speaker, {"/e laugh", "/e cheer", "/e dance", "/e wave", "/e point"})
  3808. Log(Speaker, RawMainMessage)
  3809. end
  3810.  
  3811. if Message == "rejoin" or Message == "rej" or Message == "rjoin" or Message == "rj" then
  3812. local Suc, Err, PlaceID, IntID = TS:GetPlayerPlaceInstanceAsync(Speaker.userId)
  3813. if Suc then
  3814. TS:TeleportToPlaceInstance(PlaceID, IntID, Speaker)
  3815. else
  3816. TS:Teleport(game.PlaceId, Speaker)
  3817. end
  3818. Log(Speaker, RawMainMessage)
  3819. end
  3820.  
  3821. if Message == "cmds" or Message == "commands" then
  3822. local CombineCommands = setmetatable({unpack(Commands.NonAdmin)}, MergeTable) -- MetaHAX
  3823. if ConvertRank(Rank) >= 1 then CombineCommands = CombineCommands + setmetatable(Commands.Member, MergeTable) end
  3824. if ConvertRank(Rank) >= 2 then CombineCommands = CombineCommands + setmetatable(Commands.Admin, MergeTable) end
  3825. if ConvertRank(Rank) >= 3 then CombineCommands = CombineCommands + setmetatable(Commands.Owner, MergeTable) end
  3826. --Remeber kids, whatever you do, DO NOT try add tables at home unless you have proper metamethod safety
  3827. ListGui(Speaker,CombineCommands)
  3828. Log(Speaker, RawMainMessage)
  3829. end
  3830.  
  3831. if Message == "membervip" or Message == "vipmember" then
  3832. if VIPMemberID ~= 1 then
  3833. PromptPurchase(Speaker, VIPMemberID)
  3834. Log(Speaker, RawMainMessage)
  3835. else
  3836. SendMessage(Speaker, "No VIP", GameOwner.." did not add a member rank VIP to LuaModelMake".."r's Admin", 5)
  3837. end
  3838. end
  3839.  
  3840. if Message == "adminvip" or Message == "vipadmin" then
  3841. if VIPAdminID ~= 1 then
  3842. PromptPurchase(Speaker, VIPAdminID)
  3843. Log(Speaker, RawMainMessage)
  3844. else
  3845. SendMessage(Speaker, "No VIP", GameOwner.." did not add a admin rank VIP to LuaMo".."d".."elMake".."r's Admin", 5)
  3846. end
  3847. end
  3848.  
  3849. if Message == "remove menu" or Message == "removemenu" then
  3850. if Speaker.PlayerGui ~= nil then
  3851. GUI = Speaker.PlayerGui:FindFirstChild("LMM Menu Gui") if GUI then GUI:Destroy() end
  3852. Log(Speaker, RawMainMessage)
  3853. end
  3854. end
  3855.  
  3856. if Message == "clean" or Message == "cln" then
  3857. for _,Obj in pairs(Workspace:GetChildren()) do
  3858. if Obj:IsA("Hat") or Obj:IsA("Tool") then
  3859. Obj:Destroy()
  3860. Log(Speaker, RawMainMessage)
  3861. end
  3862. end
  3863. end
  3864.  
  3865. end
  3866. if PlayerAdmin == false then
  3867. for _,Word in pairs(Filter) do
  3868. if string.find(string.lower(RawMainMessage), string.lower(Word)) then
  3869. Kick(Speaker)
  3870. end
  3871. end
  3872. end
  3873. end
  3874.  
  3875. --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)
  3876.  
  3877. function GetValue(Value)
  3878. if Value:IsA("StringValue") then
  3879. if Value.Name == "Owner" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Owner"], Value.Value) end end
  3880. if Value.Name == "Admin" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Admin"], Value.Value) end end
  3881. if Value.Name == "Member" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Member"], Value.Value) end end
  3882. if Value.Name == "Banned" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Banned"], Value.Value) end end
  3883. if Value.Name == "Crashed" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Crashed"], Value.Value) end end
  3884. if Value.Name == "Muted" then if not ScanAdminList(Value.Value) then table.insert(Ranks["Muted"], Value.Value) end end
  3885. if Value.Name == "RemoveAdmin" then if ScanAdminList(Value.Value) then
  3886. for Num,Admin in pairs(Ranks["Admin"]) do
  3887. if Admin == Value.Value then
  3888. table.remove(Ranks["Admin"],Num)
  3889. end
  3890. end
  3891. end end
  3892. end
  3893. end
  3894.  
  3895. if Lighting:FindFirstChild("LMM's Admin") then
  3896. for _,Value in pairs(Lighting:FindFirstChild("LMM's Admin"):GetChildren()) do
  3897. GetValue(Value)
  3898. end
  3899. Lighting:FindFirstChild("LMM's Admin"):Destroy()
  3900. end
  3901.  
  3902. local AdminValue = Instance.new("Model", Lighting)
  3903. AdminValue.Name = "LMM's Admin"
  3904. AdminValue.ChildAdded:connect(function(Value) wait()
  3905. GetValue(Value)
  3906. end)
  3907.  
  3908. game:GetService("Debris").ChildAdded:connect(function(Config) wait() -- you see me loadin... dey hatin...
  3909. if Config:IsA("Configuration") then
  3910. for _,Obj in pairs(Config:GetChildren()) do
  3911. if Obj:IsA("StringValue") then
  3912. local User = Players:FindFirstChild(Obj.Name)
  3913. if User then
  3914. SendMessage(User, Config.Name, Obj.Value, 5)
  3915. end
  3916. end
  3917. end
  3918. Config:Destroy()
  3919. end
  3920. end)
  3921.  
  3922. if Bet == "/" or Bet == "-" then Bet = " " end
  3923. if VIPMemberID == 0 then VIPMemberID = 1 end
  3924. if VIPAdminID == 0 then VIPAdminID = 1 end
  3925.  
  3926. MPS.PromptPurchaseFinished:connect(function(Player, ID, Purchased) if Purchased then
  3927. local PlayerAdmin, Rank = IsAdmin(Player)
  3928. if PlayerAdmin == false then
  3929. if ID == VIPAdminID then table.insert(Ranks["Admin"], Player.Name) Rank = "Admin" TellAdmin(Player, Rank)
  3930. elseif ID == VIPMemberID then table.insert(Ranks["Member"], Player.Name) Rank = "Member" TellAdmin(Player, Rank) end
  3931. end
  3932. end end)
  3933.  
  3934. UpdateAdmin()
  3935.  
  3936. pcall(function() TellAdmin(Players.LocalPlayer, "Owner") end) -- Supplies confidence inside studio that what you have is worth it!(Scripts are LocalScripts)
  3937.  
  3938. if not Ranks["Owner"][GameOwner] and not Ranks["Admin"][GameOwner] and not Ranks["Member"][GameOwner] then table.insert(Ranks["Owner"], GameOwner) end
  3939.  
  3940. function Start(Player) coroutine.wrap(function()
  3941. wait(0.1)
  3942. Player:WaitForDataReady()
  3943. local PlayerAdmin, Rank = IsAdmin(Player)
  3944. if PlayerAdmin == false then
  3945. if MPS:PlayerOwnsAsset(Player, VIPAdminID) then table.insert(Ranks["Admin"], Player.Name) PlayerAdmin = true Rank = "Admin"
  3946. elseif MPS:PlayerOwnsAsset(Player, VIPMemberID) then table.insert(Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member" end
  3947. end
  3948. if PlayerAdmin == false then
  3949. if Player:IsInGroup(GroupID) then
  3950. if Player:GetRankInGroup(GroupID) == RankBan then
  3951. Kick(Player)
  3952. for _,Person in pairs(Players:GetPlayers()) do
  3953. SendHint(Person, Player.Name.." has tried to join the game (BANNED RANK)", 5)
  3954. end
  3955. elseif Player:GetRankInGroup(GroupID) >= GroupMemberRank and Player:GetRankInGroup(GroupID) < GroupAdminRank and Player:GetRankInGroup(GroupID) < GroupOwnerRank then
  3956. table.insert(Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member"
  3957. elseif Player:GetRankInGroup(GroupID) > GroupMemberRank and Player:GetRankInGroup(GroupID) >= GroupAdminRank and Player:GetRankInGroup(GroupID) < GroupOwnerRank then
  3958. table.insert(Ranks["Admin"], Player.Name) PlayerAdmin = true Rank = "Admin"
  3959. elseif Player:GetRankInGroup(GroupID) > GroupMemberRank and Player:GetRankInGroup(GroupID) > GroupAdminRank and Player:GetRankInGroup(GroupID) >= GroupOwnerRank then
  3960. table.insert(Ranks["Owner"], Player.Name) PlayerAdmin = true Rank = "Owner"
  3961. end
  3962. end
  3963. end
  3964. if PlayerAdmin == false then
  3965. if game:GetService("BadgeService"):UserHasBadge(Player.userId, BadgeID) then
  3966. table.insert(Ranks["Member"], Player.Name) PlayerAdmin = true Rank = "Member"
  3967. end
  3968. end
  3969.  
  3970. Player.Chatted:connect(function(Message)
  3971. Chatted(Message, Player)
  3972. end)
  3973. if PlayerAdmin == true then
  3974. TellAdmin(Player, Rank)
  3975. end
  3976. for _,Name in pairs(Ranks["Banned"]) do
  3977. if Player.Name == Name then
  3978. Kick(Player)
  3979. for _,Person in pairs(Players:GetPlayers()) do
  3980. SendHint(Person, Player.Name.." has tried to join the game (BANNED)", 5)
  3981. end
  3982. end
  3983. end
  3984. for _,Name in pairs(Ranks["Crashed"]) do
  3985. if Player.Name == Name then
  3986. Execute(LocalScript, Player.Character, Player, Crash)
  3987. for _,Person in pairs(Players:GetPlayers()) do
  3988. SendHint(Person, Player.Name.." has tried to join the game (CRASHED)", 5)
  3989. end
  3990. end
  3991. end
  3992. for _,Name in pairs(Ranks["Muted"]) do
  3993. if Player.Name == Name then
  3994. Execute(LocalScript, Player.Character, Player, CoreGui("Chat", false))
  3995. for _,Person in pairs(Players:GetPlayers()) do
  3996. SendHint(Person, Player.Name.." has joined the game but is muted", 5)
  3997. end
  3998. end
  3999. end
  4000. if ServerLocked == true then
  4001. if PlayerAdmin == false then
  4002. Kick(Player, "This server is locked. In L".."u".."aMo".."del".."M".."ake".."r's Admin, Non-Admins will be kicked under this circumstance.")
  4003. end
  4004. end
  4005.  
  4006. if PlayerAdmin == false then
  4007. if game.Workspace:FindFirstChild("LuaMo".."delMaker's Admin Public") then
  4008. table.insert(Ranks["Member"], Player.Name)
  4009. TellAdmin(Player, "Member")
  4010. PlayerAdmin = true
  4011. end
  4012. end
  4013. FullAdminMenu(Player)
  4014. end)() end
  4015.  
  4016. for _,Player in pairs(Players:GetPlayers()) do Start(Player) end
  4017. Players.PlayerAdded:connect(function(Player) Players:WaitForChild(Player.Name) wait() Start(Player) end)
  4018.  
  4019. print("LuaModelMaker's Admin Commands V"..Version.Value.." Loaded")
Add Comment
Please, Sign In to add comment