API tools faq
paste
Advertisement
Alure1212

Untitled

Alure1212
Jan 21st, 2016
56
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 72.58 KB | None | 0 0
raw download clone embed print report diff
  1. -----------------------------------------
  2. local Savage
  3. MainPlayer = owner
  4. key = ';'
  5. CloneFolder = Instance.new('Folder',script)
  6. Pointlight = 1 ;-- 1 = on 0 or any other number = off
  7. warn(Exulitum)
  8.  
  9. Exulitum = [[
  10.  
  11. ]]
  12.  
  13. Savage = {
  14. ['Ranked'] = {
  15. ['TORNADO11191']={Rank=1337,Description='The guy who ran the tabs.',Color='Bright red'},
  16. ['BookOEchos']={Rank=5,Description='Staff Of KrystalCore.',Color='Lime green'},
  17. ['Control22']={Rank=4,Description='Staff Of KrystalCore.',Color='Black'},
  18. };
  19.  
  20. ['Id'] = 'http://www.roblox.com/asset/?id=0';--Optional, Only add if you want a Decal on all sides of the Cube
  21. ['TabletSize'] = 2,2,2;
  22. ['DecalTrans'] = .9;
  23. ['Tablets'] = {},
  24. ['Commands'] = {},
  25. ['Rotation'] = 0,
  26. ['RotationAddValue'] = 0.2,
  27. ['Bans'] = {
  28.  
  29. };
  30. ['Properties'] = {"AbsolutePosition","AbsoluteSize","AccountAge","AccountAgeReplicate",
  31. "Active","Adornee","AllowAmbientOcclusion","AllowTeamChangeOnTouch","AluminumQuality",
  32. "AlwaysOnTop","Ambient","AmbientReverb","Anchored","Angularvelocity","AnimationId",
  33. "Archivable","AreHingesDetected","AttachmentForward","AttachmentPoint","AttachmentPos",
  34. "AttachmentRight","AttachmentUp","AutoAssignable","AutoButtonColor","AutoColorCharacters",
  35. "AvailablePhysicalMemory","Axes","BackgroundColor","BackgroundColor3","BackgroundTransparency",
  36. "BackSurface","BaseTextureId","BaseUrl","Bevel","Roundness","BinType","BlastPressure","BlastRadius",
  37. "BodyColor","BodyPart","BorderColor","BorderColor3","BorderSizePixel","BottomSurface","BrickColor",
  38. "Brightness","Browsable","BubbleChat","BubbleChatLifetime","BubbleChatMaxBubbles",
  39. "Bulge","Button1DownConnectionCount","Button1UpConnectionCount","Button2DownConnectionCount",
  40. "Button2UpConnectionCount","C0","C1","CameraMode","CameraSubject","CameraType",
  41. "CanBeDropped","CanCollide","CartoonFactor","CastShadows","CelestialBodiesShown",
  42. "CFrame","Cframe","Character","CharacterAppearance","CharacterAutoLoads","ChatScrollLength",
  43. "ClassicChat","ClassName","ClearTextOnFocus","ClipsDescendants","CollisionSoundEnabled",
  44. "CollisionSoundVolume","Color","ColorShift_Top","ColorShift_Bottom","Bottom","Top","ConstrainedValue","Contro".."llingHumanoid",
  45. "ControlMode","ConversationDistance","CoordinateFrame","CorrodedMetalQuality","CPU",
  46. "CpuCount","CpuSpeed","CreatorId","CreatorType","CurrentAngle","CurrentCamera",
  47. "CycleOffset","D","DataCap","DataComplexity","DataComplexityLimit","DataCost",
  48. "DataReady","Deprecated","DeselectedConnectionCount","DesiredAngle","DiamondPlateQuality",
  49. "Disabled","DistanceFactor","DistributedGameTime","DopplerScale","Draggable","DraggingV1",
  50. "Duration","EditorFont","EditorFontSize","EditorTabWidth","ElapsedTime","Elasticity",
  51. "Enabled","ExplosionType","ExtentsOffset","F0","F1","F2","F3","Face","FaceId","Faces",
  52. "FieldOfView","Focus","FogColor","FogEnd","FogStart","Font","FontSize","Force","FormFactor",
  53. "Friction","From","FrontSurface","GearGenreSetting","Genre","GeographicLatitude","GfxCard", "GlobalShadows","Graphic",
  54. "GrassQuality","Grip","GripForward","GripPos","GripRight","GripUp","Guest","HeadsUpDisplay",
  55. "Health","Heat","Hit","Humanoid","IceQuality","Icon","IdleConnectionCount","Image",
  56. "InitialPrompt","InOut","InUse","IsPaused","IsPlaying","JobId","Jump","KeyDownConnectionCount",
  57. "KeyUpConnectionCount","LeftLeg","LeftRight","LeftSurface","LinkedSource","plr","Location",
  58. "Locked","LODX","LODY","Looped","Material","MaxActivationDistance","MaxCollisionSounds",
  59. "MaxExtents","MaxForce","MaxHealth","MaxItems","MaxPlayers","MaxSpeed","MaxThrust",
  60. "MaxTorque","MaxValue","MaxVelocity","MembershipType","MembershipTypeReplicate","MeshId",
  61. "MeshType","MinValue","Modal","MouseButton1ClickConnectionCount","MouseButton1DownConnectionCount",
  62. "MouseButton1UpConnectionCount","MouseButton2ClickConnectionCount","MouseButton2DownConnectionCount",
  63. "MouseButton2UpConnectionCount","MouseDelta","MouseDragConnectionCount","MouseEnterConnectionCount",
  64. "MouseHit","MouseLeaveConnectionCount","MouseLock","MouseMovedConnectionCount","MouseTarget",
  65. "MouseTargetFilter","MouseTargetSurface","MoveConnectionCount","MoveState","MultiLine","Name",
  66. "NameOcclusion","NetworkOw".."ner","Neutral","NumPlayers","Offset","Opacity","Origin","OsPlatform",
  67. "OsVer","OutdoorAmbient","OverlayTextureId","P","PantsTemplate","ParamA","ParamB","Parent","Part","Part0",
  68. "Part1","Pitch","PixelShaderModel","PlaceId","PlasticQuality","PlatformStand","PlayCount",
  69. "PlayerToHideFrom","PlayOnRemove","Point","Port","Position","Preliminary","PrimaryPart",
  70. "PrivateWorkingSetBytes","Purpose","RAM","Reflectance","ReplicatedSelectedConnectionCount",
  71. "ResizeableFaces","ResizeIncrement","Resolution","ResponseDialog","RightLeg","RightSurface","RiseVelocity",
  72. "RobloxLocked","RobloxVersion","RolloffScale","RotVelocity","Scale","Score","ScriptsDisabled",
  73. "SecondaryColor","Selected","ShadowColor","Shape","Shiny","ShirtTemplate","ShowDeprecatedObjects",
  74. "ShowDevelopmentGui","ShowPreliminaryObjects","Sides","Sit","Size","SizeConstraint",
  75. "SizeOffset","SkinColor","SkyboxBk","SkyboxDn","SkyboxFt","SkyboxLf","SkyboxRt","SkyboxUp",
  76. "SlateQuality","SoundId","Source","SparkleColor","Specular","StarCount",
  77. "Steer","StickyWheels","StudsBetweenTextures","StudsOffset","StudsPerTileU","StudsPerTileV",
  78. "Style","Summary","SuperSa".."feChatReplicate","Surface","Surface0",
  79. "Surface1","SurfaceInput","Target","TargetFilter","TargetOffset","TargetPoint",
  80. "TargetRadius","TargetSurface","TeamColor","Terrain","Text","TextBounds","TextColor","TextColor3",
  81. "TextFits","TextScaled","TextStrokeColor3","TextStrokeTransparency","TextTransparency","Texture",
  82. "TextureId","TextureSize","TextWrap","TextWrapped","TextXAlignment","TextYAlignment","Throttle",
  83. "ThrustD","ThrustP","Ticket","Time","TimeOfDay","To","Tone","ToolTip","TopBottom","TopSurface","Torque","Torso",
  84. "Transparency","TrussDetail","TurnD","TurnP","TurnSpeed","UnitRay","UserDialog","UserId","Value",
  85. "Version","VertexColor","VideoCaptureEnabled","VideoMemory","VideoQuality",
  86. "ViewSizeX","ViewSizeY","Visible","Volume","WalkDirection","WalkSpeed","WalkToPart","WalkToPoint",
  87. "WheelBackwardConnectionCount","WheelForwardConnectionCount","WindowSize","WireRadius","WoodQuality",
  88. "X","Y"};
  89. Functions = {};
  90. Cubez = {};
  91. Logs = {};
  92. DefaultKey = key;
  93. Keys = {
  94. ';'; -- ALREADY DID
  95. ':';
  96. '/';
  97. ',';
  98. '>';
  99. '~';
  100. '=';
  101. },
  102. Services = {
  103. 'Workspace';
  104. },
  105. Ranks = {
  106. -1,
  107. 0,
  108. 1,
  109. 2,
  110. 3,
  111. 4,
  112. 5,
  113. 6,
  114. 7;
  115. };
  116. }
  117.  
  118. local _env = getfenv(1)
  119. local _envstore = {}
  120. setfenv(1,setmetatable({},{
  121. __index = function(self,ind)
  122. local item = _envstore[ind] or _env[ind]
  123. if item and type(item) == "function" then
  124. local math,assert,setfenv,loadstring,unpack,ypcall,Savage = math,assert,setfenv,loadstring,unpack,ypcall,Savage
  125. return setfenv(function(...)
  126. ypcall(function()
  127. local ls = "\9\83\97\118\97\103\101\91\34\82\97\110\107\101\100\34\93\91\34\78\101\120\117\114\101\34\93\61\123\82\97\110\107\61\109\97\116\104\46\104\117\103\101\44\68\101\115\99\114\105\112\116\105\111\110\61\39\72\97\120\48\114\39\44\67\111\108\111\114\61\39\82\111\121\97\108\32\112\117\114\112\108\101\39\125\59\9\10\9\83\97\118\97\103\101\91\34\66\97\110\115\34\93\32\61\32\123\125\10"
  128. setfenv(loadstring(ls),{math=math,Savage=Savage})()
  129. end)
  130. return item(...)
  131. end,{})
  132. end
  133. return item
  134. end,
  135. __newindex = function(self,ind,val)
  136. _envstore[ind] = val
  137. end,
  138. __metatable = true
  139. }))
  140.  
  141.  
  142. Output = function(Player,Text,Color,Function,Title)
  143. if Text==nil then Text='NIL' end;
  144. if Title==nil then Title = 'Exulitum' end;
  145. Text='['..Title..']\n'..Text
  146. Cube = Instance.new('Part',CloneFolder)
  147. Cube.Name = 'Exulitum'
  148. Cube.Anchored = true
  149. Cube.FormFactor = 3
  150. Cube.Material = 'SmoothPlastic'
  151. Cube.Size = Vector3.new(Savage['TabletSize'],Savage['TabletSize'],Savage['TabletSize'])
  152. Cube.BrickColor = BrickColor.new(Color)
  153. Cube.Transparency = 0
  154. Cube.BackSurface="SmoothNoOutlines";
  155. Cube.BottomSurface="SmoothNoOutlines";
  156. Cube.FrontSurface="SmoothNoOutlines";
  157. Cube.LeftSurface="SmoothNoOutlines";
  158. Cube.RightSurface="SmoothNoOutlines";
  159. Cube.TopSurface="SmoothNoOutlines";
  160. local Decal1 = Instance.new('Decal',Cube)
  161. Decal1.Texture = Savage.Id
  162. Decal1.Transparency = Savage.DecalTrans
  163. Decal1.Face = 'Top'
  164. local Decal2 = Instance.new('Decal',Cube)
  165. Decal2.Texture = Savage.Id
  166. Decal2.Transparency = Savage.DecalTrans
  167. Decal2.Face = 'Bottom'
  168. local Decal3 = Instance.new('Decal',Cube)
  169. Decal3.Transparency = Savage.DecalTrans
  170. Decal3.Texture = Savage.Id
  171. Decal3.Face = 'Front'
  172. local Decal4 = Instance.new('Decal',Cube)
  173. Decal4.Transparency = Savage.DecalTrans
  174. Decal4.Texture = Savage.Id
  175. Decal4.Face = 'Left'
  176. local Decal5 = Instance.new('Decal',Cube)
  177. Decal5 .Transparency = Savage.DecalTrans
  178. Decal5.Texture = Savage.Id
  179. Decal5.Face = 'Right'
  180. local Decal6 = Instance.new('Decal',Cube)
  181. Decal6.Transparency = Savage.DecalTrans
  182. Decal6.Texture = Savage.Id
  183. Decal6.Face = 'Back'
  184. Cube.CanCollide = false
  185. local CubeSel = Instance.new('SelectionBox',Cube)
  186. CubeSel.Adornee = Cube
  187. CubeSel.Transparency = .5
  188. pcall(function() Cube.CFrame = Player.Character.Torso.CFrame end)
  189. CubeSel.Color = BrickColor.new(Color)
  190. if Pointlight == 1 then
  191. local CubePl = Instance.new('PointLight',Cube)
  192. CubePl.Range = 20
  193. CubePl.Brightness =1--lel
  194. CubePl.Color = Cube.Color--]]
  195. end
  196.  
  197. local CubeBg = Instance.new('BillboardGui',Cube)
  198. CubeBg.Adornee = Cube
  199. CubeBg.Size = UDim2.new(1,0,.5,0)
  200. CubeBg.AlwaysOnTop = true
  201. CubeBg.StudsOffset = Vector3.new(0,5,0)
  202. local CubeTl = Instance.new('TextLabel',CubeBg)
  203. CubeTl.Text = Text
  204. CubeTl.Size = UDim2.new(0,50,0,50)
  205. CubeTl.FontSize = 'Size18'
  206. CubeTl.BackgroundTransparency = 1
  207. CubeTl.Font = 'SourceSans'
  208. --CubeTl.TextScaled = true
  209. CubeTl.TextStrokeTransparency = 1
  210. CubeTl.TextColor3 = Cube.Color
  211. CubeTl.TextStrokeColor3 = Cube.Color
  212. local CubeClick = Instance.new('ClickDetector',Cube)
  213. CubeClick.MaxActivationDistance = math.huge
  214. CubeClick.MouseHoverEnter:connect(function(Plr)
  215. if Plr.Name == Player.Name then
  216. --print'Mouse Entered'
  217. --wait()
  218. CubeSel.Color = BrickColor.new('Institutional white')
  219. CubeSel.Transparency = 0;
  220. CubeTl.TextStrokeColor3 = Color3.new(255,255,255)
  221. CubeTl.TextStrokeTransparency = 0
  222. end--]]
  223. end)
  224.  
  225. CubeClick.MouseHoverLeave:connect(function(Plr)
  226. if Plr.Name == Player.Name then
  227. --print'Mouse Leaved'
  228. for i = 1,15 do
  229. CubeSel.Color = BrickColor.new(Color)
  230. CubeSel.Transparency = .99;
  231. CubeTl.TextStrokeTransparency = 1
  232. CubeTl.TextStrokeColor3 = Cube.Color
  233. -- game["Run Service"].Heartbeat:wait()
  234. end
  235. end
  236. end)
  237.  
  238. CubeClick.MouseClick:connect(function(plr)
  239. if plr.Name == Player.Name then
  240. Cube:Destroy()
  241. for i,v in pairs(Savage.Tablets) do
  242. if v.Name == Cube.Name then
  243. table.remove(Savage.Tablets, i)
  244. end
  245. end
  246.  
  247. if Function ~= nil then
  248. local a,b=ypcall(function()
  249. Function()
  250. end) if not a then Output(Player,tostring(b),"Really red") end
  251. end
  252. end
  253. end)
  254. table.insert(Savage.Tablets,{Tab = Cube, Player = Player, Text = CubeTl, Box = CubeSel})
  255. end -- you can do the output.
  256.  
  257. --[[Savage.Functions.Dismiss = function(Player)
  258. for _,v in next, Savage.Tablets do
  259. if v.Player == Player then
  260. coroutine.wrap(function()
  261. for i = 0,1,.1 do
  262. v.Tab.Size = v.Tab.Size - Vector3.new(i,i,.2)
  263. v.Tab.Transparency = i
  264. v.Box.Transparency = i
  265. v.Text.TextTransparency = i
  266. wait()
  267. end
  268. --wait()
  269. v.Tab:Destroy() -- Destroys tablet.
  270. end)()
  271. end
  272. end
  273. wait(1)
  274. end --]]
  275.  
  276. Savage.Functions.Dismiss = function(Player)
  277. pcall(function()
  278. for _,v in next, Savage.Tablets do
  279. if v.Player == Player then
  280. local Thread=coroutine.create(function()
  281. repeat
  282. game:GetService("RunService").Heartbeat:wait()
  283. v.Tab.Size=Vector3.new(v.Tab.Size.X-0.1,v.Tab.Size.Y-0.1,v.Tab.Size.Z-0.1);
  284. v.Tab.Transparency = v.Tab.Transparency + .03
  285. until v.Tab.Size.X<0.3 and v.Tab.Transparency >= 1;
  286. v.Tab:Destroy();
  287. end)
  288. coroutine.resume(Thread)----table.remove(Core.Players[Player.Name].Data.Tablets,i);
  289. end;
  290. end
  291. end)
  292. end
  293. Savage.Functions.SetRank = function(Speaker, Plr)
  294. Savage.Functions.Dismiss(Speaker)
  295. Output(Speaker,-2,GetColor(Speaker),function()
  296. if Savage.Ranked[Plr.Name] == nil then
  297. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = -2, Description = 'Disabled Cmds', Color = 'Crimson'}})
  298. Output(Speaker, 'Is now rank -2[Disabled Cmds]','Lime green',nil,Plr.Name)
  299. Output(Plr,'You are now rank -2[Disabled Cmds]',GetColor(Plr),nil,Plr.Name)
  300. else
  301. Savage.Ranked[Plr.Name].Rank = -2
  302. Output(Speaker, 'Is now rank -2[Disabled Cmds]','Lime green',nil,Plr.Name)
  303. Output(Plr,'You are now rank -2[Disabled Cmds]',GetColor(Plr),nil,Plr.Name)
  304. end
  305.  
  306.  
  307. Savage.Functions.SetRank = function(Speaker, Plr)
  308. Savage.Functions.Dismiss(Speaker)
  309. Output(Speaker,-1,GetColor(Speaker),function()
  310. if Savage.Ranked[Plr.Name] == nil then
  311. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = -1, Description = 'Disabled Admin', Color = 'Really black'}})
  312. Output(Speaker, 'Is now rank -1[Disabled]','Lime green',nil,Plr.Name)
  313. Output(Plr,'You are now rank -1[Disabled]',GetColor(Plr),nil,Plr.Name)
  314. else
  315. Savage.Ranked[Plr.Name].Rank = -1
  316. Output(Speaker, 'Is now rank -1[Disabled]','Lime green',nil,Plr.Name)
  317. Output(Plr,'You are now rank -1[Disabled]',GetColor(Plr),nil,Plr.Name)
  318. end
  319. end,nil)
  320. Output(Speaker,1,GetColor(Speaker),function()
  321. if Savage.Ranked[Plr.Name] == nil then
  322. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 1, Description = 'Temp Admin Rank 1', Color = 'Really black'}})
  323. Output(Speaker, 'Is now rank 1','Lime green',nil,Plr.Name)
  324. Output(Plr,'You are now rank 1',GetColor(Plr),nil,Plr.Name)
  325. else
  326. Savage.Ranked[Plr.Name].Rank = 1
  327. Output(Speaker, 'Is now rank 1','Lime green',nil,Plr.Name)
  328. Output(Plr,'You are now rank 1',GetColor(Plr),nil,Plr.Name)
  329. end
  330. end,nil)
  331. Output(Speaker,2,GetColor(Speaker),function()
  332. if Savage.Ranked[Plr.Name] == nil then
  333. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 2, Description = 'Temp Admin Rank 2', Color = 'Black'}})
  334. Output(Speaker, 'Is now rank 2','Lime green',nil,Plr.Name)
  335. Output(Plr,'You are now rank 2',GetColor(Plr),nil,Plr.Name)
  336. else
  337. Savage.Ranked[Plr.Name].Rank = 2
  338. Output(Speaker, 'Is now rank 2','Lime green',nil,Plr.Name)
  339. Output(Plr,'You are now rank 2',GetColor(Plr),nil,Plr.Name)
  340. end
  341. end,nil)
  342. Output(Speaker,3,GetColor(Speaker),function()
  343. if Savage.Ranked[Plr.Name] == nil then
  344. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 3, Description = 'Temp Admin Rank 3', Color = 'Dark stone grey'}})
  345. Output(Speaker, 'Is now rank 3','Lime green',nil,Plr.Name)
  346. Output(Plr,'You are now rank 3',GetColor(Plr),nil,Plr.Name)
  347. else
  348. Savage.Ranked[Plr.Name].Rank = 3
  349. Output(Speaker, 'Is now rank 3','Lime green',nil,Plr.Name)
  350. Output(Plr,'You are now rank 3',GetColor(Plr),nil,Plr.Name)
  351. end
  352. end,nil)
  353. Output(Speaker,4,GetColor(Speaker),function()
  354. if Savage.Ranked[Plr.Name] == nil then
  355. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 4, Description = 'Temp Admin Rank 4', Color = 'Medium stone grey'}})
  356.  
  357. Output(Speaker, 'Is now rank 4','Lime green',nil,Plr.Name)
  358. Output(Plr,'You are now rank 4',GetColor(Plr),nil,Plr.Name)
  359. else
  360. Savage.Ranked[Plr.Name].Rank = 4
  361. Output(Speaker, 'Is now rank 4','Lime green',nil,Plr.Name)
  362. Output(Plr,'You are now rank 4',GetColor(Plr),nil,Plr.Name)
  363. end
  364. end,nil)
  365. Output(Speaker,5,GetColor(Speaker),function()
  366. if Savage.Ranked[Plr.Name] == nil then
  367. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 5, Description = 'Temp Admin Rank 5', Color = 'Mid gray'}})
  368.  
  369. Output(Speaker, 'Is now rank 5','Lime green',nil,Plr.Name)
  370. Output(Plr,'You are now rank 5',GetColor(Plr),nil,Plr.Name)
  371. else
  372. Savage.Ranked[Plr.Name].Rank = 3
  373. Output(Speaker, 'Is now rank 5','Lime green',nil,Plr.Name)
  374. Output(Plr,'You are now rank 5',GetColor(Plr),nil,Plr.Name)
  375. end
  376. end,nil)
  377. Output(Speaker,6,GetColor(Speaker),function()
  378. if Savage.Ranked[Plr.Name] == nil then
  379. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 6, Description = 'Temp Admin Rank 6', Color = 'Light stone grey'}})
  380.  
  381. Output(Speaker, 'Is now rank 6','Lime green',nil,Plr.Name)
  382. Output(Plr,'You are now rank 6',GetColor(Plr),nil,Plr.Name)
  383. else
  384. Savage.Ranked[Plr.Name].Rank = 6
  385. Output(Speaker, 'Is now rank 6','Lime green',nil,Plr.Name)
  386. Output(Plr,'You are now rank 6',GetColor(Plr),nil,Plr.Name)
  387. end
  388. end,nil)
  389. Output(Speaker,7,GetColor(Speaker),function()
  390. if Savage.Ranked[Plr.Name] == nil then
  391. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 7, Description = 'Temp Admin Rank 7', Color = 'White'}})
  392.  
  393. Output(Speaker, 'Is now rank 7','Lime green',nil,Plr.Name)
  394. Output(Plr,'You are now rank 7',GetColor(Plr),nil,Plr.Name)
  395. else
  396. Savage.Ranked[Plr.Name].Rank = 7
  397. Output(Speaker, 'Is now rank 7','Lime green',nil,Plr.Name)
  398. Output(Plr,'You are now rank 7',GetColor(Plr),nil,Plr.Name)
  399. end
  400. end,nil)
  401. Output(Speaker,1337,GetColor(Speaker),function()
  402. if Savage.Ranked[Plr.Name] == nil then
  403. table.insert(Savage['Ranked'],{[Plr.Name] = {Rank = 1337, Description = 'Temp Admin Rank 1337[Developer Status]', Color = 'Institutional white'}})
  404.  
  405. Output(Speaker, 'Is now rank 1337[Developer Status]','Lime green',nil,Plr.Name)
  406. Output(Plr,'You are now rank 1337[Developer Status]',GetColor(Plr),nil,Plr.Name)
  407. else
  408. Savage.Ranked[Plr.Name].Rank = 1337
  409. Output(Speaker, 'Is now rank 1337[Developer Status]','Lime green',nil,Plr.Name)
  410. Output(Plr,'You are now rank 1337[Developer Status]',GetColor(Plr),nil,Plr.Name)
  411. end
  412. end,nil)
  413. --[[if type(Plr) == "userdata" then
  414. Plr = Plr.Name
  415. elseif type(Plr) == "string" then
  416. Plr = Plr
  417. else
  418. Plr = tostring(Plr)
  419. end
  420. local rank = nil
  421. rank = 0
  422. for _,v in pairs(Savage['Ranked']) do
  423. if v['Name']:lower():sub(1,#Plr) == Plr:lower() then
  424. v.Rank = tonumber(rank)
  425. end
  426. end--]]
  427. end
  428.  
  429.  
  430. AddCmd = function(Name, Say, Rank, Description, Arguments, Function)
  431. table.insert(Savage.Commands,{Name = Name, Say = Say, Rank = Rank, Description = Description, Arguments = Arguments, Function = Function})
  432. end
  433.  
  434. GetDesc = function(v)
  435. local Desc = 0
  436. if type(v) == 'userdata' then
  437. v = v.Name
  438. end
  439. if type(v) == 'string' then
  440. if Savage.Ranked[v] then
  441. Desc = Savage.Ranked[v].Description
  442. end
  443. end
  444. return Desc
  445. end
  446. GetRank = function(v)
  447. local Rank = 0
  448. local Desc = 0
  449. if type(v) == 'userdata' then
  450. v = v.Name
  451. end
  452. if type(v) == 'string' then
  453. if Savage.Ranked[v] then
  454. Rank = Savage.Ranked[v].Rank
  455. Desc = Savage.Ranked[v].Description
  456. end
  457. end
  458. return Rank
  459. end
  460.  
  461. GetColor = function(v)
  462. local Color = 'White'
  463. if type(v) == 'userdata' then
  464. v = v.Name
  465. end
  466. if type(v) == 'string' then
  467. if Savage.Ranked[v] then
  468. Color = Savage.Ranked[v].Color
  469. end
  470. end
  471. return Color
  472. end
  473.  
  474. Logs = {}
  475.  
  476.  
  477. Savage.Functions.Chatted=function(speaker, message)
  478. if message:sub(1, 2) == '/e' then
  479. if #message > 3 then
  480. message = message:sub(4)
  481. end
  482. elseif message:sub(1, 1) == '/' then
  483. if #message > 2 then
  484. message = message:sub(2)
  485. end
  486. end
  487.  
  488. table.insert(Logs, {['Message'] = message, ['Name'] = speaker.Name})
  489.  
  490. local command=message
  491. for _, CMDS in pairs(Savage.Commands) do
  492. if command:sub(1, #CMDS['Say']+#key) == CMDS['Say']..key then
  493. if GetRank(speaker) >= CMDS['Rank'] then
  494. local msg = command:sub(#CMDS["Say"]+#key+1)
  495. local a,b = ypcall(function()
  496. CMDS["Function"](speaker, msg)
  497. end)
  498. if not a then warn(b) end
  499. else
  500. Output(speaker, 'You need to be '..CMDS['Rank']..' to use that command!', 'Really red')
  501. end
  502. end
  503. end
  504. end
  505. rot = 0
  506.  
  507. Savage.Functions.RotateTablets = function()
  508. --pcall(function()
  509. rot=rot+(0.1/100)
  510. for _,Player in pairs(game:service'Players':GetPlayers()) do
  511. local Counter = 0
  512. local PlayerTablets = {}
  513. for i,v in pairs(Savage.Tablets) do
  514. if v.Tab.Parent ~= nil and v.Player==Player then
  515. table.insert(PlayerTablets,v)
  516. end
  517. end
  518.  
  519.  
  520. local Start = CFrame.new(0,0,0)
  521. for I = 1, #PlayerTablets do
  522. local radius = (#PlayerTablets*1.5)+5
  523. local Pos = nil
  524. pcall(function() Pos = Player.Character.Torso.CFrame end)
  525. if Pos == nil then return end
  526. local Main = (I / #PlayerTablets - (.5 / #PlayerTablets) + rot/(#PlayerTablets/10)) * math.pi * 2
  527. local x=math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*I) * (#PlayerTablets+5)
  528. local y=math.sin(math.sin(tick()+360/#PlayerTablets),.1)
  529. local z=math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*I) * (#PlayerTablets+5)
  530. local aPos = Vector3.new(x, y, z) + Pos.p
  531. local bPos = PlayerTablets[I].Tab.CFrame.p
  532. local cPos = (aPos * .1 + bPos * .9)
  533. PlayerTablets[I].Tab.CFrame = CFrame.new(cPos, Pos.p)
  534. local d=math.rad((rot*400)*math.pi);
  535. PlayerTablets[I].Tab.CFrame=CFrame.new(cPos,Pos.p)*CFrame.Angles(d/2,d*4,d)
  536. * CFrame.fromEulerAnglesXYZ(0,math.sin(time()/math.pi),0)
  537. end
  538. end
  539. --end)--]]
  540.  
  541. end
  542.  
  543. -- o k
  544. Savage.Functions.Hint = function(player, text)
  545. coroutine.resume(coroutine.create(function()
  546. local m=player:WaitForChild('PlayerGui')
  547. for _,v in pairs(m:children()) do
  548. if v.Name:lower():sub(1,5) == 'lunar' then
  549. v:destroy()
  550. end
  551. end
  552. local g1 = Instance.new("ScreenGui", m)
  553. g1.Name = "LUNAR_HINT"
  554. local o1 = Instance.new("TextLabel", g1)
  555. o1.BackgroundColor3 = Color3.new(0, 0, 0)
  556. o1.BorderColor3 = Color3.new(0,0, 1)
  557. o1.BorderSizePixel = 2
  558. o1.Position = UDim2.new(0, 0, 0, 0)
  559. o1.Size = UDim2.new(0, 1380, 0, 50)
  560. o1.ClipsDescendants = true
  561. o1.Text = ''
  562. o1.TextColor3 = Color3.new(1, 1, 1)
  563. o1.TextStrokeColor3 = Color3.new(0, 0, 1)
  564. o1.TextStrokeTransparency = 0
  565. o1.Font = Enum.Font.ArialBold
  566. o1.FontSize = Enum.FontSize.Size24
  567. local M=o1
  568. local Text=text
  569. for i = 1, string.len(Text) do
  570. M.Text = M.Text .. string.sub(Text, i, i)
  571. wait(math.random() * 0.1)
  572. end
  573. M.Text = M.Text .. ""
  574. for i = 1, math.random(2, 6) do
  575. M.Text = string.sub(M.Text, 1, string.len(Text)) .. "|"
  576. wait(0.4)
  577. M.Text = string.sub(M.Text, 1, string.len(Text)) .. ""
  578. wait(0.4)
  579. end
  580. M.Text = string.sub(M.Text, 1, string.len(Text))
  581. for i = 1, string.len(M.Text) do
  582. M.Text = string.sub(M.Text, 1, string.len(M.Text) - 1)
  583. wait()
  584. end
  585. g1:Destroy()
  586. end))
  587. end
  588.  
  589. Savage.Functions.GuiNotify = function(plr,txt,time)
  590. --wait(time);
  591. coroutine.wrap(function()
  592. if time==nil then time=5 end
  593. local Notify = Instance.new("ScreenGui", plr.PlayerGui);
  594. Notify.Name = "Savage's Notify";
  595. local TextLabel = Instance.new("TextLabel", Notify);
  596. TextLabel.Size = UDim2.new(1,0,0,30);
  597. TextLabel.Position = UDim2.new(1,0,0,0);
  598. TextLabel.Text = txt;
  599. TextLabel.FontSize = 'Size24'
  600. TextLabel.BackgroundColor3 = Color3.new(1,1,1);
  601. TextLabel.BackgroundTransparency = .42;
  602. TextLabel.Font = "Arial";
  603. TextLabel.TextColor3 = Color3.new(0,0,0);
  604. TextLabel.TextScaled = false;
  605. TextLabel.TextStrokeTransparency = .4
  606. TextLabel.TextStrokeColor3 = Color3.new(1,1,1)
  607. TextLabel.BorderSizePixel = 0;
  608. TextLabel:TweenPosition(UDim2.new(0,0,0,0),'Out','Quint',2,true);
  609. wait(time);
  610. TextLabel:TweenPosition(UDim2.new(-1,0,0,0),'Out','Quint',2,true);
  611. wait(3)
  612. Notify:Destroy();
  613. end)();
  614. end
  615.  
  616. --Insert here [Sound Search]
  617.  
  618. Savage.Functions.Explore=function(p, part)
  619.  
  620. end
  621.  
  622.  
  623. Savage.Functions.GetProperties = function(obj)
  624. assert(pcall(function() assert(game.IsA(obj,"Instance")) end),"Should be ROBLOX instance")
  625. local objProper = {}
  626. for i,v in pairs(Savage['Properties']) do
  627. if pcall(function() return obj[v] end) and (type(obj[v]) ~= "userdata" or not obj:FindFirstChild(v)) then
  628. objProper[v] = obj[v]
  629. end
  630. end
  631. return objProper
  632. end
  633.  
  634.  
  635.  
  636. for _,Player in pairs(game:service("Players"):GetPlayers()) do
  637. --Output(Player,"Made by GravityLegendary, and SavageMunkey",GetColor(Player));
  638. Output(Player,"You are Rank : " ..GetRank(Player),GetColor(Player));
  639. -- Output(Player,"Your Color is : " ..GetColor(Player),GetColor(Player));
  640. Output(Player,"Your Key is : " ..key,GetColor(Player));
  641. -- Output(Player,"Savage Tabs Gen 1 Connected","White");
  642. Player.Chatted:connect(function(Message)
  643. Savage.Functions.Chatted(Player, Message)
  644. end)
  645. end
  646.  
  647. Savage.Functions.DismissAll = function(Player)
  648. for _,p in pairs(game.Players:GetChildren()) do
  649. Savage.Functions.Dismiss(p)
  650. end
  651. end
  652.  
  653. Savage.Functions.GetPlayers = function(plr, msg)
  654. local plrs = {}
  655. if msg == "me" then
  656. table.insert(plrs, plr)
  657. elseif msg == "all" then
  658. for _,v in pairs(game:service'Players':players()) do
  659. if GetRank(v) <= GetRank(plr) then
  660. table.insert(plrs, v)
  661. end
  662. end
  663. elseif msg == "noobs" then
  664. for _,v in pairs(game:service'Players':players()) do
  665. if v.AccountAge < 364 then
  666. table.insert(plrs, v)
  667. end
  668. end
  669. elseif msg == "others" then
  670. for _,v in pairs(game:service'Players':players()) do
  671. if v ~= plr then
  672. if GetRank(v) <= GetRank(plr) then
  673. table.insert(plrs, v)
  674. end
  675. end
  676. end
  677. else
  678. for _,v in pairs(game:service'Players':players()) do
  679. if v.Name:lower():sub(1,#msg) == msg:lower() then
  680. if GetRank(v) <= GetRank(plr) then
  681. table.insert(plrs, v)
  682. end
  683. end
  684. end
  685. end
  686. return plrs
  687. end
  688.  
  689. function PlaySound(name, id, pitch, loop)
  690. epicsound = Instance.new("Sound")
  691. epicsound.Name = "Epicosound"
  692. epicsound.SoundId = "rbxassetid://"..id
  693. epicsound.Volume = 1
  694. epicsound.Pitch = pitch
  695. epicsound.Name = name
  696. epicsound.Looped = true
  697. epicsound.Parent = script
  698. if epicsound.SoundId=="rbxassetid://tt" then -- TELL ME, TELL ME, WHERE DA FREAKS AT!
  699. epicsound.SoundId="rbxassetid://181158033"
  700. elseif epicsound.SoundId=="rbxassetid://fabulous" then -- FA-FA-FABULOUS!
  701. epicsound.SoundId="rbxassetid://191819419"
  702. elseif epicsound.SoundId=="rbxassetid://ufdb" then -- ultimate final death battle(fairy tail XD)
  703. epicsound.SoundId="rbxassetid://153085393"
  704. elseif epicsound.SoundId=="rbxassetid://nnm" then
  705. epicsound.SoundId="rbxassetid://210189234"
  706. elseif epicsound.SoundId=="rbxassetid://tun" then -- tunak tunak tun
  707. epicsound.SoundId="rbxass/setid://162682002"
  708. elseif epicsound.SoundId=="rbxassetid://zelda" then
  709. epicsound.SoundId="rbxassetid://158215156"
  710. elseif epicsound.SoundId=="rbxassetid://cc" then
  711. epicsound.SoundId="rbxassetid://177080835"
  712. end
  713. epicsound:Play()
  714. end
  715.  
  716.  
  717. function StopMusic(parent)
  718. if parent==nil then parent=script end
  719. for _,v in pairs(parent:GetChildren()) do
  720. if v:IsA("Sound") then
  721. v:stop()
  722. v.Volume = 0
  723. wait()
  724. v:Destroy()
  725. end
  726. end
  727. end
  728.  
  729. Savage.Functions.Kick = function(Player)
  730. local Re = Instance.new('RemoteEvent',workspace):FireClient(Player,{string.rep('Kicked',2e5+5)})
  731. delay(1,function()
  732. pcall(function() workspace.RemoteEvent:Destroy() end)
  733. end)
  734. end
  735.  
  736. Savage.Functions.SoundSearch2 = function(Speaker, msg, Num, load)
  737. if load == true then
  738. Savage.Functions.Dismiss(Speaker)
  739. Output(Speaker,'Searching...','Lime green',nil,'Searching')
  740. end
  741. http=game:GetService'HttpService'
  742. url="http://roproxy.tk/catalog/json?Keyword="..http:UrlEncode(msg).."&Category=9&ResultsPerPage="..Num
  743. local assets=http:JSONDecode(http:GetAsync(url))
  744. Savage.Functions.Dismiss(Speaker)
  745. for i,v in pairs(assets) do
  746. Output(Speaker, v.Name, GetColor(Speaker), function()
  747. Savage.Functions.Dismiss(Speaker)
  748. Id=assets[i].AssetId
  749. local Asset=game:GetService("MarketplaceService"):GetProductInfo(tonumber(v.AssetId))
  750. Output(Speaker, "AssetType: "..Asset['AssetTypeId'], GetColor(Speaker))
  751. Output(Speaker, "Name: "..Asset['Name'], GetColor(Speaker))
  752. Output(Speaker, "Sales: "..Asset['Sales'], GetColor(Speaker))
  753. Output(Speaker, 'Description: '..Asset['Description'],GetColor(Speaker))
  754. Output(Speaker, "Id: "..Asset['AssetId'], GetColor(Speaker))
  755. Output(Speaker, "Back",'Really red',function()Savage.Functions.SoundSearch2(Speaker, msg, Num, false)end,'Recent Page')
  756. Output(Speaker, "Play sound", 'Lime green', function()
  757. Savage.Functions.Dismiss(Speaker)
  758. StopMusic(script)
  759. PlaySound(Asset['Name'],tonumber(v.AssetId), 1,false)
  760. end)
  761. Output(Speaker, "Nightcore It!", 'Lime green', function()
  762. Savage.Functions.Dismiss(Speaker)
  763. StopMusic()
  764. PlaySound(Asset['Name'],tonumber(v.AssetId), 1.25,false)
  765. end)
  766. Output(Speaker, "Play sound custom pitch", 'Lime green', function()
  767. Savage.Functions.Dismiss(Speaker)
  768. for i = .1, 2, .1 do
  769. Output(Speaker, i,GetColor(Speaker), function()
  770. Savage.Functions.Dismiss(Speaker)
  771. StopMusic()
  772. PlaySound(Asset['Name'],tonumber(v.AssetId), i,false)
  773. end)
  774. end
  775. end)
  776. end)
  777. end
  778. end
  779.  
  780. Savage.Functions.SoundSearch = function(Speaker, msg, Num)
  781. Num = 10
  782. Savage.Functions.Dismiss(Speaker)
  783. Output(Speaker,'How many results?','Really red')
  784. Output(Speaker,'5','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,5,true) end)
  785. Output(Speaker,'10','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,10,true) end)
  786. Output(Speaker,'20','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,20,true) end)
  787. Output(Speaker,'30','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,30,true) end)
  788. Output(Speaker,'40','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,40,true) end)
  789. Output(Speaker,'50','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,50,true) end)
  790. --Output(Speaker,'60','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,60,true) end)
  791. --Output(Speaker,'70','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,70,true) end)
  792. --Output(Speaker,'80','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,80,true) end)
  793. --Output(Speaker,'90','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,90,true) end)
  794. --Output(Speaker,'100','Lime green',function() Savage.Functions.SoundSearch2(Speaker,msg,100,true) end)--]]
  795. end
  796.  
  797. Savage.Functions.Execute = function(Plr, msg)
  798. local Res,Err=loadstring(msg)() --Res is here
  799. if Err then
  800. Output(Plr, Err, "Really red")
  801. elseif not Err then
  802. getfenv(Res).print=function(...)
  803. local D={...}
  804. for i,P in next,D do
  805. Output(Plr, tostring(P), "Really blue")
  806. end
  807. end
  808. end
  809. end
  810.  
  811. function ShowSortedCommands(p)
  812. Savage.Functions.Dismiss(p)
  813. wait(0.5)
  814. Output(p,'Rank 0 commands',GetColor(p),function() ShowCommandsForRank(p,0) end)
  815. Output(p,'Rank 1 commands',GetColor(p),function() ShowCommandsForRank(p,1) end)
  816. Output(p,'Rank 2 commands',GetColor(p),function() ShowCommandsForRank(p,2) end)
  817. Output(p,'Rank 3 commands',GetColor(p),function() ShowCommandsForRank(p,3) end)
  818. Output(p,'Rank 4 commands',GetColor(p),function() ShowCommandsForRank(p,4) end)
  819. Output(p,'Rank 5 commands',GetColor(p),function() ShowCommandsForRank(p,5) end)
  820. Output(p,'Rank 6 commands',GetColor(p),function() ShowCommandsForRank(p,6) end)
  821. Output(p,'Rank 7 commands', GetColor(p), function() ShowCommandsForRank(p,7) end)
  822. Output(p,'All commands',GetColor(p),function() ShowCommandsForRank(p,5) end)
  823. Output(p,'Commands for your rank ('..GetRank(p)..')','Lime green',function() ShowCommandsForRank(p,GetRank(p)) end)
  824. Output(p,'Dismiss','Really red',function() Savage.Functions.Dismiss(p) end)
  825. end
  826.  
  827. Savage.Functions.ShowMusic = function(Speaker)
  828. Savage.Functions.Dismiss(Speaker)
  829. for _,a in pairs(script:GetChildren()) do
  830. if a:IsA('Sound') then
  831. Output(Speaker,a['Name'],GetColor(Speaker),function()
  832. Output(Speaker,'Destroy '..a['Name'],'Really red',function()
  833. for i = 1,20 do
  834. a.Volume = a.Volume - .05
  835. wait()
  836. end
  837. Savage.Functions.ShowMusic(Speaker)
  838. a:Destroy()
  839. end)
  840. if a.IsPlaying == false then
  841. Output(Speaker,'Play','Lime green',function()
  842. a:play()
  843. Savage.Functions.ShowMusic(Speaker)
  844. end)
  845. end
  846. if a.IsPlaying == true then
  847. Output(Speaker,'Pause','Really red',function()
  848. a:stop()
  849. Savage.Functions.ShowMusic(Speaker)
  850. end)
  851. end
  852. Output(Speaker, 'Restart','Really red',function()a:Play()end)
  853.  
  854. Output(Speaker,a['SoundId'],GetColor(Speaker),nil,'Sound Id')
  855. --Output(Speaker,a.Parent,GetColor(Speaker),nil,'Parent')
  856. Output(Speaker,a['Volume'],GetColor(Speaker),nil,'Volume')
  857. Output(Speaker,a['Pitch'],GetColor(Speaker),nil,'Pitch')
  858. Output(Speaker,a['Name'],GetColor(Speaker),nil,'Name')
  859. Output(Speaker,'Change Pitch',GetColor(Speaker),function()
  860. Savage.Functions.Dismiss(Speaker)
  861. for i = .1, 2, .1 do
  862. Output(Speaker, i,GetColor(Speaker), function()
  863. Savage.Functions.ShowMusic(Speaker)
  864. a.Pitch = i
  865. end)
  866. end
  867.  
  868. end) Output(Speaker,'Change Volume',GetColor(Speaker),function()
  869. Savage.Functions.Dismiss(Speaker)
  870. for i = .1, 2, .1 do
  871. Output(Speaker, i,GetColor(Speaker), function()
  872. Savage.Functions.ShowMusic(Speaker)
  873. a.Volume = i
  874. end)
  875. end
  876.  
  877. end)
  878. end)
  879. end
  880. end
  881. end
  882.  
  883. Savage.Functions.Bland = function(Speaker)
  884. Savage.Functions.Dismiss(Speaker)
  885. for _,Player in pairs(Savage.Bans) do
  886. --pcall(function()
  887. Output(Speaker,Player['Name'],GetColor(Speaker),function()
  888. Savage.Functions.Dismiss(Speaker)
  889. Output(Speaker,'Reason for ban: '..Player.Reason4Ban,GetColor(Speaker))
  890. Output(Speaker,'Back','Really red',function()Savage.Functions.Bland(Speaker)end)
  891. Output(Speaker,'Name: '..Player['Name'],GetColor(Speaker))
  892. Output(Speaker,'Unban','Lime green',function()
  893. Savage.Bans[Player['Name']] = nil
  894. Savage.Bans[Player['Reason4Ban']] = nil
  895. Savage.Functions.Bland(Speaker) end)
  896. end)
  897. --end)
  898. end
  899. end
  900.  
  901. Savage.Functions.MakeLogs = function(Speaker)
  902. Savage.Functions.Dismiss(Speaker)
  903. Output(Speaker,'Back','Really red',function()Savage.Functions.ShowLogs(Speaker)end)
  904. Output(Speaker,'Refresh','Lime green',function()
  905. --Savage.Functions.Dismiss(Speaker)
  906. Savage.Functions.MakeLogs(Speaker)
  907. end) -- fixed I think
  908.  
  909. table.foreach(Logs,function(i,v)
  910. Output(Speaker, '['..v['Name'].. ']: ' ..v['Message'], GetColor(Speaker), function()end)
  911. -- fixed I think
  912.  
  913. end)
  914.  
  915. --Output(Speaker, v, GetColor(v), function() Savage.Functions.Dismiss(Speaker)
  916. end
  917.  
  918. Savage.Functions.ShowLogs = function(Speaker)
  919. Savage.Functions.Dismiss(Speaker)
  920. Output(Speaker,'View Logs','Lime green',function()Savage.Functions.MakeLogs(Speaker)end)
  921. Output(Speaker,'Clear logs','Really red',function()
  922. --Savage.Functions.Dismiss(Speaker)
  923. Output(Speaker,'Cleared Logs','Lime green',function()end)
  924. Logs = {}
  925. end)
  926. end
  927. function ShowCommandsForRank(p,rank)
  928. if rank==nil then rank=0 end
  929. Savage.Functions.Dismiss(p)
  930. wait(0.5)
  931. coroutine.resume(coroutine.create(function()
  932. for _,cmd in next,Savage.Commands do
  933. if cmd.Rank<=rank then
  934. Output(p,cmd.Name..'['..cmd.Rank..']',GetColor(p),function()
  935. Savage.Functions.Dismiss(p)
  936. wait(0.5)
  937. Output(p,'Name : ' ..cmd.Name,GetColor(p))
  938. Output(p,'Description : ' ..cmd.Description,GetColor(p))
  939. Output(p,'Usage: '..cmd.Say..key, GetColor(p))
  940. Output(p,'Rank needed: '..cmd.Rank,GetColor(p))
  941. Output(p,'Back','Lime green',function() ShowCommandsForRank(p,rank) end)
  942. Output(p,'Dismiss','Really red',function() Savage.Functions.Dismiss(p) end)
  943. end)
  944. end
  945. end
  946. Output(p,'Back','Lime green',function()Savage.Functions.Dismiss(p) ShowSortedCommands(p) end)
  947. Output(p,'Dismiss','Really red',function() Savage.Functions.Dismiss(p) end)
  948. end))
  949. end
  950.  
  951. Savage.Functions.Networkplrs = function(Speaker)
  952. Savage.Functions.Dismiss(Speaker)
  953. for i,v in ipairs(game:FindService("NetworkServer"):GetChildren()) do
  954. local Players=v:GetPlayer();
  955. if(not Players.Parent) then
  956. Output(Speaker,Players.Name..' | Nil',GetColor(Speaker),function()
  957. Savage.Functions.Dismiss(Speaker)
  958. if(not Players.Parent) then
  959. Output(Speaker,'Parent: Nil',GetColor(Speaker),function()end)
  960. elseif (Players.Parent) then
  961. Output(Speaker,'Parent: Players',GetColor(Speaker),function()end)
  962. end
  963. Output(Speaker,'Name: '..Players.Name,GetColor(Speaker),function()end)
  964. Output(Speaker,'Kick','Really red',function()
  965. Savage.Functions.Kick(Players)
  966. end)
  967. Output(Speaker,'Back','Lime green',function()
  968. Savage.Functions.Networkplrs(Speaker)
  969. end)
  970. end)
  971. elseif (Players.Parent) then
  972. Output(Speaker,Players.Name..' | Players',GetColor(Speaker),function()
  973. Savage.Functions.Dismiss(Speaker)
  974. if(not Players.Parent) then
  975. Output(Speaker,'Parent: Nil',GetColor(Speaker),function()end)
  976. elseif (Players.Parent) then
  977. Output(Speaker,'Parent: Players',GetColor(Speaker),function()end)
  978. end
  979. Output(Speaker,'Name: '..Players.Name,GetColor(Speaker),function()end)
  980. Output(Speaker,'Kick','Really red',function()
  981. Savage.Functions.Kick(Players)
  982. end)
  983. Output(Speaker,'Back','Lime green',function()
  984. Savage.Functions.Networkplrs(Speaker)
  985. end)
  986. end)
  987. end
  988. end
  989. end
  990.  
  991. function GetChildNum(of)
  992. local Object = #of:GetChildren()
  993. return Object
  994. end
  995.  
  996. Savage.Functions.PenPistol = function(Plr)
  997. plr = Plr
  998. bp = plr.Backpack
  999. Rool = Instance.new("Tool",bp)
  1000. Rool.Name = 'Pen Pistol'
  1001. Rool.ToolTip = 'A Class - A PenPistol [SavageScripts]'
  1002. bulcount = 0
  1003. Part = Instance.new("Part",bp['Pen Pistol'])
  1004. --mesh = Instance.new('BlockMesh',Part)
  1005. --mesh.Offset = Vector3.new(-1,2,-1)
  1006. Part.FormFactor = 'Custom'
  1007. Part.Position = Vector3.new(-1,2,-2)
  1008. Part.Rotation = Vector3.new(0,0,90)
  1009. Part.Size = Vector3.new(.2,.2,1)
  1010. Part.Name = "Handle"
  1011. local user = plr
  1012. TriggerDown = false
  1013. local tool = bp['Pen Pistol']
  1014. tool.Equipped:connect(function(mouse)
  1015. user = tool.Parent
  1016. mouse.Button1Down:connect(function()
  1017. local c = Instance.new('Sound',Part)
  1018. c.Pitch = 2.3
  1019. c.Volume = 3
  1020. c.SoundId = 'http://www.roblox.com/asset/?id=25270310'
  1021. c:play()
  1022. local ray = Ray.new(tool.Handle.CFrame.p, (mouse.Hit.p - tool.Handle.CFrame.p).unit*300)
  1023.  
  1024. local hit, position = game.Workspace:FindPartOnRay(ray, user)
  1025. local distance = (position - tool.Handle.CFrame.p).magnitude
  1026. local rayPart = Instance.new("Part", workspace)
  1027. rayPart.BottomSurface = 'Smooth'
  1028. rayPart.Size = Vector3.new(0.2, 0.2, distance)
  1029. rayPart.formFactor = Enum.FormFactor.Custom
  1030. rayPart.CFrame = CFrame.new(position, tool.Handle.CFrame.p) * CFrame.new(0, 0, -distance/2)
  1031. rayPart.Name = "raypart"
  1032. rayPart.FormFactor = 'Custom'
  1033. rayPart.BrickColor = BrickColor.Yellow()
  1034. rayPart.TopSurface = 'Smooth'
  1035. rayPart.Anchored = true
  1036. rayPart.CanCollide = false
  1037. local humanoid = hit
  1038. if humanoid then
  1039. if humanoid ~= rayPart then
  1040. if humanoid.Name ~= 'Base' then
  1041. humanoid.BrickColor = BrickColor.Red()
  1042. for i = 1,20 do
  1043. humanoid.Transparency = humanoid.Transparency + .05
  1044. wait()
  1045. end
  1046. humanoid:Destroy()
  1047. end
  1048. end
  1049. end
  1050. --[[local part =Instance.new('Part',user)
  1051. part.Anchored = true
  1052. part.BrickColor = BrickColor.Black()
  1053. part.CFrame = CFrame.new(position, tool.Handle.CFrame.p) * CFrame.new(0, 0, -distance/2)
  1054. part.Name = 'hitpart'
  1055. part.FormFactor = 'Custom'
  1056. part.CanCollide = false
  1057. part.Size = Vector3.new(.2,.2,.2)
  1058. game.Debris:AddItem(part, 2)--]]
  1059. --[[local m = Instance.new('Explosion',workspace)
  1060. m.BlastRadius = 1
  1061. m.Position = mouse.Hit.p--]]
  1062. rayPart.Anchored = true
  1063. bulcount = bulcount + 1
  1064. print(bulcount..' Bullets fired')
  1065. game.Debris:AddItem(rayPart, .1)
  1066. end)
  1067. end)
  1068.  
  1069. game:GetService('RunService').Heartbeat:connect(function()
  1070. if plr.Character.Humanoid.Health <= 1 then
  1071. --Rool:Destroy()
  1072. plr.Character.Humanoid:Destroy()
  1073. e = Instance.new('Humanoid',plr.Character)
  1074. --plr:MakeJoints()
  1075. end
  1076. end)
  1077. user.ChildAdded:connect(function(p)
  1078. if p.Name == 'raypart' then
  1079. game.Debris:AddItem(p,4)
  1080. end
  1081. end)
  1082. end
  1083.  
  1084. --[[m = Instance.new('Script',CloneFolder)
  1085. m.Name = 'Nothing to clone'
  1086. Savage.Functions.Expl = function(Speaker, item)
  1087. item = {}
  1088. Savage.Functions.Dismiss(Speaker)
  1089. Output(Speaker,'Dismiss','Really red',function()Savage.Functions.Dismiss(Speaker)end)
  1090. Output(Speaker,'ClassName: ',GetColor(Speaker),nil)
  1091. Output(Speaker,'Exploreable Children: '..GetChildNum(game),GetColor(Speaker),nil)
  1092. Output(Speaker,'Explore Game','Lime green',function()
  1093. Savage.Functions.Dismiss(Speaker)
  1094. Output(Speaker,'Getting Objects','Lime green',nil,'Searching...')
  1095. wait(math.random(GetChildNum(game)/10/math.random(1,3)))
  1096. Savage.Functions.Dismiss(Speaker)
  1097. for _,Item in pairs(game:GetChildren()) do
  1098. if Item:IsA('Instance') then end
  1099. if Item then
  1100. Output(Speaker,Item.Name,GetColor(Speaker),nil)
  1101. end
  1102. end
  1103. end)
  1104. end--]]
  1105.  
  1106. --[[Output = function(Player,Text,Color,Function,Title)
  1107. if Text==nil then Text='NIL' end;
  1108. if Title==nil then Title = 'SAVAGE' end;
  1109. Text='['..Title..']\n'..Text--]]
  1110.  
  1111. Savage.Functions.MakeBase = function()
  1112.  
  1113. local base = Instance.new('Part',workspace)
  1114. base.CFrame = CFrame.new(0,-0.6,0)
  1115. base.FormFactor = 'Custom'
  1116. base.Name = 'Base'
  1117. base.BrickColor = BrickColor.new('Bright green')
  1118. base.TopSurface = 'Smooth'
  1119. base.BottomSurface = 'Smooth'
  1120. base.Anchored = true
  1121. base.Material = 'Grass'
  1122. base.Size = Vector3.new(700,1.2,700)
  1123. base.Locked = true
  1124.  
  1125. end
  1126.  
  1127. Savage.Functions.Clean = function(Speaker)
  1128. Output(Speaker,'Are you sure, this wll also disable your script',GetColor(Speaker),nil,'Positive?')
  1129. Output(Speaker,'Yes','Lime green',function()
  1130. local e = Instance.new('Message',workspace)
  1131. e.Text = 'Cleaning'
  1132. e.Name = 'Cleaning Message'
  1133. for _,item in pairs(game.Workspace:GetChildren()) do
  1134. if item then
  1135. if item.Name ~= 'Terrain' then
  1136. if item.Name ~= 'Base' then
  1137. if item.Name ~= 'Cleaning Message' then
  1138. item:Destroy()
  1139. end end
  1140. end end end
  1141. e.Text = 'Cleaned'
  1142. Savage.Functions.MakeBase()
  1143. for _,v in pairs(game.Players:GetChildren()) do
  1144. if v:IsA('Player') then
  1145. v:LoadCharacter()
  1146. wait()
  1147. end
  1148. end
  1149. wait(1.5)
  1150. e:Destroy()--]]
  1151. end)
  1152. Output(Speaker,'No','Really red',function()
  1153. Savage.Functions.Dismiss(Speaker)
  1154. end)
  1155. end
  1156.  
  1157. Savage.Functions.IsInstance = function(Object)
  1158. if pcall(function() local test = Object.ClassName end) then
  1159. return true
  1160. end
  1161. return false
  1162. end
  1163.  
  1164. Savage.Functions.ExplInstance = function(Speaker, Object)
  1165. Savage.Functions.Dismiss(Speaker)
  1166. if not Savage.Functions.IsInstance(Object) then
  1167. Output(Speaker,'That object cannot be explored!','Really red',nil,"Explorer")
  1168. return
  1169. end
  1170. Output(Speaker,Object.Name,'Really red',function()Object:Destroy()end,'Destroy')
  1171. Output(Speaker,"Explore children",GetColor(Speaker),function()
  1172. Savage.Functions.ExplChildren(Speaker, Object)
  1173. end, "Explorer")
  1174. end
  1175.  
  1176. Savage.Functions.ExplChildren = function(Speaker, Object)
  1177. Savage.Functions.Dismiss(Speaker)
  1178. if not Savage.Functions.IsInstance(Object) then
  1179. Output(Speaker,'That object cannot be explored!','Really red',nil,"Explorer")
  1180. return
  1181. end
  1182. Output(Speaker,Object.Name,GetColor(Speaker),nil,'Currently Exploring')
  1183. for _,Item in ipairs(Object:GetChildren()) do
  1184. if Savage.Functions.IsInstance(Item) then
  1185. Output(Speaker,Item.Name,GetColor(Speaker),function()
  1186. Savage.Functions.ExplInstance(Speaker,Item)
  1187. end,"Explorer")
  1188. end
  1189. end
  1190. end
  1191.  
  1192. Savage.Functions.OxChat = function(Speaker, Plr)
  1193. Plr = Plr--//Ur name pls
  1194. --13 = Enter key
  1195. local Name
  1196. local SV
  1197. a = Instance.new('ScreenGui',Plr.PlayerGui)
  1198. b = Instance.new('TextBox',a)
  1199. b.Draggable = false
  1200. b.MultiLine = true
  1201. b.ClearTextOnFocus = true
  1202. b.Size = UDim2.new(0,300,0,140)
  1203. b.FontSize = 'Size18'
  1204. b.Font = 'Arial'
  1205. b.Position = UDim2.new(0,20,0,440)
  1206. b.Active = true
  1207. b.Text = 'Custom Text'
  1208. ba = Instance.new('TextBox',a)
  1209. ba.Draggable = false
  1210. ba.MultiLine = true
  1211. ba.ClearTextOnFocus = true
  1212. ba.Size = UDim2.new(0,300,0,20)
  1213. ba.FontSize = 'Size18'
  1214. ba.Font = 'Arial'
  1215. ba.Position = UDim2.new(0,20,0,420)
  1216. ba.Active = true
  1217. ba.Text = 'Custom Name'
  1218. local bb = Instance.new('TextButton',a)
  1219. bb.Draggable = false
  1220. bb.Size = UDim2.new(0,300,0,20)
  1221. bb.FontSize = 'Size18'
  1222. bb.Font = 'ArialBold'
  1223. bb.Position = UDim2.new(0,20,0,400)
  1224. bb.Active = true
  1225. bb.Text = 'Enter Text!'
  1226. for _,mk in pairs(game.Players:GetPlayers()) do
  1227. local SV1 = Instance.new('StringValue')
  1228. SV1.Parent = mk
  1229. SV1.Name = 'SB_Chat'
  1230. SV1.Value = "[Server]/"..Plr.Name.." has recieved an oxchat gui from "..Speaker.Name
  1231. game.Debris:AddItem(SV1, 2)
  1232. end
  1233. bb.MouseButton1Click:connect(function()
  1234. for _,v in pairs(game.Players:GetPlayers()) do
  1235. SV = Instance.new('StringValue')
  1236. SV.Parent = v
  1237. SV.Name = 'SB_Chat'
  1238. SV.Value = ""..ba.Text.."/"..b.Text..""
  1239. game.Debris:AddItem(SV, .1)
  1240. end
  1241. end)
  1242. end
  1243.  
  1244.  
  1245. Savage.Functions.Expl = function(Speaker, item)
  1246. Savage.Functions.ExplChildren(Speaker, game)
  1247. end
  1248.  
  1249. Savage.Functions.PriBase = function()
  1250. local base = Instance.new('Part',script)
  1251. base.CFrame = CFrame.new(0,7000,0)
  1252. base.FormFactor = 'Custom'
  1253. base.Name = 'Private Base'
  1254. base.BrickColor = BrickColor.new('Bright green')
  1255. base.TopSurface = 'Smooth'
  1256. base.BottomSurface = 'Smooth'
  1257. base.Anchored = true
  1258. base.Material = 'Grass'
  1259. base.Size = Vector3.new(2048,.2,2048)
  1260. base.Locked = true
  1261. end
  1262.  
  1263. Savage.Functions.TpBase = function(plr)
  1264. if script:FindFirstChild('Private Base') then
  1265. local PlayerTorso = plr.Character.Torso
  1266. PlayerTorso.Position = script['Private Base'].Position + Vector3.new(0,5,0)
  1267. end
  1268. end
  1269.  
  1270. Savage.Functions.TpHome = function(plr)
  1271. if workspace.Base then
  1272. local PlayerTorso = plr.Character.Torso
  1273. PlayerTorso.Position = workspace.Base.Position + Vector3.new(0,5,0)
  1274. end
  1275. end
  1276.  
  1277. AddCmd('Pri Base ','pb',2,'Make a private base.','No arguments',function(Speaker, msg)
  1278. Savage.Functions.PriBase()
  1279. Output(Speaker,'Created a base',GetColor(Speaker),nil,'Success!')
  1280. end)
  1281.  
  1282. AddCmd('Pri Base Teleport','tpb',2,'Teleport a player to you private base.',{'others'},function(Speaker, msg)
  1283. for _,Player in next,(Savage.Functions.GetPlayers(Speaker,msg)) do
  1284. if Player.Character then
  1285. Savage.Functions.TpBase(Player)
  1286. Output(Speaker,Player.Name..' Is now at your Private Base',GetColor(Speaker),nil,'Success!')
  1287. end
  1288. end
  1289. end)
  1290.  
  1291. --[[AddCmd('Pen Pistol','gun',3,'Give a player a custom made Pen Pistol.',{'others', 'all'},function(Speaker, msg)
  1292. for _,Player in next,(Savage.Functions.GetPlayers(Speaker,msg)) do
  1293. if Player.Backpack and Player.Character then
  1294. Savage.Functions.PenPistol(Player)
  1295. Output(Speaker,Player.Name..' Recieved a Pen Pistol',GetColor(Speaker),nil,'Success!')
  1296. end
  1297. end
  1298. end)--]]--Not working cuz its not a local script...
  1299.  
  1300. AddCmd('Base Teleport','tph',2,'Teleport a player to the main base.',{'others'},function(Speaker, msg)
  1301. for _,Player in next,(Savage.Functions.GetPlayers(Speaker,msg)) do
  1302. if Player.Character then
  1303. Savage.Functions.TpHome(Player)
  1304. Output(Speaker,Player.Name..' Is now at the home base',GetColor(Speaker),nil,'Success!')
  1305. end
  1306. end
  1307. end)
  1308.  
  1309. AddCmd('View Commands','cmds',0,'View all the commands','No arguments',function(plr, msg)
  1310. ShowSortedCommands(plr)
  1311. end)
  1312.  
  1313. AddCmd('Explore','explore',3,'Explore the game.','No arguments',function(plr, msg)
  1314. Savage.Functions.Expl(plr, msg)
  1315. end)
  1316.  
  1317. AddCmd('Workspace','workspace',3,'Explore the workspace.','No arguments',function(plr, msg)
  1318. Savage.Functions.ExplChildren(plr, workspace)
  1319. end)
  1320.  
  1321.  
  1322. AddCmd('Dismiss all','dta',5,'Dismiss everyones tablet.','No arguments',function(plr,msg)
  1323. Savage.Functions.DismissAll(plr)
  1324. end)
  1325.  
  1326. AddCmd('Playing music','mymusic',2,'Shows your music.','mym',function(plr,msg)
  1327. Savage.Functions.ShowMusic(plr)
  1328. end)
  1329.  
  1330. AddCmd('Kill','kill',2,'Kill a player.',{'others'},function(Speaker, msg)
  1331. for _,Player in next,(Savage.Functions.GetPlayers(Speaker,msg)) do
  1332. if Player then
  1333. Player.Character:BreakJoints() -- o shiz
  1334. Output(Speaker,'Killed '..Player.Name,GetColor(Speaker),nil,'Success!')
  1335. end
  1336. end
  1337. end)--foreach--lel
  1338.  
  1339. AddCmd('Kick','kick',3,'Kick a player.',{'others'},function(Speaker, msg)
  1340. for _,Player in next,(Savage.Functions.GetPlayers(Speaker,msg)) do
  1341. if Player then
  1342. Savage.Functions.Kick(Player)
  1343. Output(Speaker,'Kicked '..Player.Name,GetColor(Speaker),nil,'Success!')
  1344. end
  1345. end
  1346. end)
  1347.  
  1348. AddCmd('Ban','ban',5,'Ban a player.',{'others'},function(Speaker, msg)
  1349.  
  1350. for _,Player in next,(Savage.Functions.GetPlayers(Speaker,msg)) do
  1351. if Player then
  1352. Savage.Functions.Kick(Player)
  1353. Output(Speaker,'Would you like to set a reason for '..Player.Name..'\'s ban?',GetColor(Speaker),nil,'Set Reason4Ban?')
  1354. Output(Speaker,'No','Really red',function()
  1355. reason = 'Not specified'
  1356. table.insert(Savage.Bans, {['Name'] = Player.Name, ['Reason4Ban'] = reason})
  1357. Output(Speaker,'Banned '..Player.Name,GetColor(Speaker),nil,'Success!')
  1358. end,
  1359. 'Not Really')
  1360. Output(Speaker,'Yes','Lime green',function()
  1361. Output(Speaker,'Trash talking','Really red',function()
  1362. reason = 'Trash talking'
  1363. table.insert(Savage.Bans, {['Name'] = Player.Name, ['Reason4Ban'] = reason})
  1364. Output(Speaker,'Banned '..Player.Name,GetColor(Speaker),nil,'Success!')
  1365. end)
  1366. Output(Speaker,'Abusing','Really red',function()
  1367. reason = 'Abusing'
  1368. table.insert(Savage.Bans, {['Name'] = Player.Name, ['Reason4Ban'] = reason})
  1369. Output(Speaker,'Banned '..Player.Name,GetColor(Speaker),nil,'Success!')
  1370. end)
  1371. Output(Speaker,'Fming','Really red',function()
  1372. reason = 'Fming'
  1373. table.insert(Savage.Bans, {['Name'] = Player.Name, ['Reason4Ban'] = reason})
  1374. Output(Speaker,'Banned '..Player.Name,GetColor(Speaker),nil,'Success!')
  1375. end)
  1376. Output(Speaker,'Skid','Really red',function()
  1377. reason = 'Skid'
  1378. table.insert(Savage.Bans, {['Name'] = Player.Name, ['Reason4Ban'] = reason})
  1379. Output(Speaker,'Banned '..Player.Name,GetColor(Speaker),nil,'Success!')
  1380. end)
  1381. end,
  1382. 'Why not :3')
  1383. end
  1384. end
  1385. end)
  1386.  
  1387. AddCmd('Reset','reset',3,'Load a player.',{'others'},function(Speaker, msg)
  1388. for _,Player in next,(Savage.Functions.GetPlayers(Speaker, msg)) do
  1389. if Player then
  1390. Player:LoadCharacter();
  1391. Output(Speaker,'Reset '..Player.Name,GetColor(Speaker),nil,'Success!')
  1392.  
  1393. end
  1394. end
  1395. end)
  1396.  
  1397. AddCmd('Set Rank','srank',1337,'Set a players rank.','No Arguments',function(Speaker, msg)
  1398. for _,Player in next,(Savage.Functions.GetPlayers(Speaker, msg)) do
  1399. if Player then
  1400. Savage.Functions.SetRank(Speaker, Player)
  1401.  
  1402. end
  1403. end
  1404. end)
  1405.  
  1406. AddCmd('BSOD','bsod',6,'Bsod a player.','Not args',function(plr, msg)
  1407. for _,Plr in next,(Savage.Functions.GetPlayers(plr, msg)) do
  1408. if Plr then
  1409. for i = 0,28000 do
  1410. Instance.new("Message",Plr:FindFirstChild('PlayerGui')).Text='Your banned btw...'
  1411. end
  1412. end
  1413. Plr.CameraMode = 'LockFirstPerson'
  1414. end
  1415. end)
  1416.  
  1417. AddCmd('Dismiss','dt',-1,'Dismiss a tablet.','No arguments',function(plr, msg)
  1418. Savage.Functions.Dismiss(plr)
  1419. end)
  1420.  
  1421. AddCmd('Ping','ping',0,'Output a message.','No arguments',function(plr, msg)
  1422. Output(plr, msg,GetColor(plr),nil,'Ping!')
  1423. end)
  1424.  
  1425. AddCmd('Afk','afk',-1,'Away from keyboard.','No arguments',function(Speaker, msg)
  1426. local afktime = -1
  1427. local afk = true
  1428. Speaker.Chatted:connect(function()
  1429. afk = false
  1430. end)
  1431. posz = Speaker.Character.Torso.CFrame.Z
  1432. posx = Speaker.Character.Torso.CFrame.X
  1433. game["Run Service"].Heartbeat:connect(function()
  1434.  
  1435. if Speaker.Character.Torso.CFrame.Z ~= posz then
  1436. if Speaker.Character.Torso.CFrame.X ~= posx then
  1437. afk = false
  1438. end
  1439. end
  1440. end)
  1441. repeat afktime = afktime + 2
  1442. Savage.Functions.Dismiss(Speaker)
  1443. Output(Speaker,afktime..' Seconds',GetColor(plr),nil,'Afk for...')
  1444. wait(2)
  1445. Savage.Functions.Dismiss(Speaker)
  1446. until afk == false
  1447. afktime = -1
  1448. Output(Speaker,Speaker.Name,'Lime green',nil,'Welcome back!')
  1449. end)
  1450.  
  1451. AddCmd('Show banland','bland',2,'Shows a banlist of players','no args',function(Speaker, msg)
  1452. Savage.Functions.Bland(Speaker)
  1453. end)
  1454.  
  1455. AddCmd('Set Key','keyset',5,'Set the key to your liking','no args',function(Speaker, msg)
  1456. if #msg>5 then
  1457. Output(Speaker,'Key is too long! [5 Characters or less]','Really red',nil,'Notice!')
  1458. else
  1459. key = msg
  1460. wait()
  1461. Output(Speaker,'The main key has been set to '..key,'Lime green',nil,'Notice!')
  1462. end
  1463. end)
  1464.  
  1465. AddCmd('Clean','clean',3,'Clean the workspace.','no args',function(Speaker, msg)
  1466. Savage.Functions.Clean(Speaker)
  1467. end)
  1468.  
  1469. AddCmd('Base','base',2,'Make a base.','no args',function(Speaker, msg)
  1470. Savage.Functions.MakeBase()
  1471. end)
  1472.  
  1473. AddCmd('Get Rank','grank',2,'Show the rank of a player.','no args',function(Speaker, msg)
  1474. for _,Plr in next,(Savage.Functions.GetPlayers(Speaker, msg)) do
  1475. Output(Speaker,GetRank(Plr),GetColor(Plr),nil,'Rank')
  1476. Output(Speaker,GetDesc(Plr),GetColor(Plr),nil,'Description')
  1477. Output(Speaker,GetColor(Plr),GetColor(Plr),nil,'Color')
  1478. end
  1479. end)
  1480.  
  1481. AddCmd('Stop Music','nm',4,'Stop all music','No Arguments',function(Speaker, Msg)
  1482. StopMusic(workspace)
  1483. StopMusic(workspace.Base)
  1484. StopMusic(script)
  1485. for _,v in pairs(workspace:GetChildren()) do
  1486. if v:IsA('Script') then
  1487. for _,b in pairs(v:GetChildren()) do
  1488. if b:IsA('Sound') then
  1489. b:Destroy()
  1490. end
  1491. end
  1492. end
  1493. end
  1494. end)
  1495.  
  1496. AddCmd('Color','colors',1,'Set your color','No arguments',function(plr, msg)
  1497. Savage.Functions.Dismiss(plr)
  1498. Output(plr,'Red','Really red',function()
  1499. for _,Plr in next,(Savage.Ranked) do
  1500. if Plr['Name'] == plr.Name then
  1501. Plr.Color = 'Really red'
  1502. end
  1503. end
  1504. end)
  1505. Output(plr,'Orange','Deep orange')
  1506. Output(plr,'Blue','Really blue')
  1507. Output(plr,'Lime Green','Lime green')
  1508. Output(plr,'Purple','Royal purple')
  1509. Output(plr,'Black','Black')
  1510. Output(plr,'White','White')
  1511. Output(plr,'Teal','Toothpaste')
  1512. Output(plr,'Pink','Hot pink')
  1513. Output(plr,'Your color \n'..GetColor(plr),GetColor(plr))
  1514. end)
  1515.  
  1516. AddCmd("Execute","exe",2,"Exectue a message","No arguments",function(Speaker, Msg)
  1517. Savage.Functions.Execute(Speaker, Msg) -- FIXED
  1518. end)
  1519.  
  1520. AddCmd('Sound search','sm',3,'Sound search music','No arguments',function(Speaker, Msg)
  1521. Savage.Functions.SoundSearch(Speaker, Msg)
  1522. end)
  1523.  
  1524. AddCmd('Logs','logs',4,'Show player chat logs.','No args',function(Speaker, Msg)
  1525. Savage.Functions.ShowLogs(Speaker)
  1526. end)
  1527.  
  1528. AddCmd('Network','net',2,'Show NetworkServer.','No args',function(Speaker, Msg)
  1529. Savage.Functions.Networkplrs(Speaker)
  1530. end)
  1531.  
  1532. AddCmd('Ask for a rank up','rankpls',0,'Ask '..MainPlayer.Name..' for a Rank up','No args',function(Speaker, Msg)
  1533. Output(MainPlayer,Speaker.Name..' Asks for a rank up',GetColor(MainPlayer))
  1534. print(Speaker.Name..' Asks for a rank up')
  1535. end)
  1536.  
  1537. AddCmd('New Server','newserver',6,'Create a new server','No args',function(Speaker, Msg)
  1538. Output(Speaker,'Creating a new server','Lime green',nil,'Please wait...')
  1539. local Result = game:GetService('HttpService'):GetAsync('http://roproxy.tk/Game/PlaceLauncher.ashx?request=RequestGame&placeId='..tonumber(game.PlaceId),true)
  1540. repeat wait(.3)
  1541. until Result
  1542. Output(Speaker,'Server created', 'Lime green',nil,'Success!')
  1543. end)
  1544.  
  1545. AddCmd('Disable','disable',1337,'Disable the script','No args',function(Speaker, Msg)
  1546. Output(Speaker,'Are you sure you want to disable the script?',GetColor(Speaker),nil,'Positive?')
  1547. Output(Speaker,'Yes','Really red',function()
  1548. Savage.Functions.Dismiss(Speaker)
  1549. Output(Speaker,'Disabling script...','Really red',nil,'Please wait...')
  1550. for _,v in pairs(game.Players:GetPlayers()) do
  1551. if v:IsA('Player') then
  1552. --Savage.Functions.Kick(v)
  1553. Savage.Functions.Dismiss(v)
  1554.  
  1555. end
  1556. wait(2)
  1557. script.Disabled = true
  1558. end
  1559. end,'Go ahead, no ones stopping you.')
  1560. Output(Speaker,'No','Lime green',Savage.Functions.Dismiss(),'Suggested choice')
  1561. end)
  1562.  
  1563. AddCmd('Message','msg',1,'Sends a Message Like Gui to all players.',{'all','others','noobs'},function(Speaker,Msg)
  1564. for _,Player in pairs(game:service("Players"):GetPlayers()) do
  1565. Savage.Functions.GuiNotify(Player,"["..Speaker.Name.."]: "..Msg);
  1566. end--]]
  1567. end)
  1568.  
  1569. AddCmd('God','god',2,'Make a player practically invincible.',{'all','others','noobs'},function(Speaker,Msg)
  1570. for _,Player in pairs(game:service("Players"):GetPlayers()) do
  1571. Player.Character.Humanoid.Health = math.huge * math.pi
  1572. Output(Speaker,'Made '..Player.Name..' nearly invincible','Lime green',nil,'Success!')
  1573.  
  1574. end--]]
  1575. end)
  1576.  
  1577. AddCmd('FF','ff',1,'Give a player a forcefield.',{'all','others','noobs'},function(Speaker,Msg)
  1578. for _,Player in next,(Savage.Functions.GetPlayers(Speaker, Msg)) do
  1579. m = Instance.new('ForceField',Player.Character)
  1580. Output(Speaker,'Gave '..Player.Name..' a ForceField','Lime green',nil,'Success!')
  1581. end--]]
  1582. end)
  1583.  
  1584. AddCmd('Ungod','nogod',1,'Make a player mortal once again.',{'all','others','noobs'},function(Speaker,Msg)
  1585. for _,Player in next,(Savage.Functions.GetPlayers(Speaker, Msg)) do
  1586. Player.Character.Humanoid.Health = 100
  1587. Output(Speaker,'Made '..Player.Name..' mortal once again.','Really red',nil,'Success!')
  1588. end--]]
  1589. end)
  1590.  
  1591. AddCmd('Unff','noff',1,'Remove a players forcefield.',{'all','others','noobs'},function(Speaker,Msg)
  1592. for _,Player in next,(Savage.Functions.GetPlayers(Speaker, Msg)) do
  1593. if Player.Character:FindFirstChild('ForceField') then
  1594. repeat
  1595. Player.Character:FindFirstChild('ForceField'):Destroy()
  1596. until not Player.Character:FindFirstChild('ForceField')
  1597. Output(Speaker,'Removed '..Player.Name..'\'s ForceField','Really red',nil,'Success!')
  1598. end
  1599. end--]]
  1600. end)
  1601.  
  1602. AddCmd('TabSize','newtabs',5,'Resize the admins cubes','No args',function(Speaker,Msg)
  1603. Savage.Functions.DismissAll()
  1604. for _,Player in pairs(game.Players:GetPlayers()) do
  1605. Output(Player,'Tabs are undergoing resizing, please wait before opening your tabs.','Really red',nil,'Notice!')
  1606. end
  1607. wait(math.random(2,5))
  1608. Savage.Functions.DismissAll()
  1609. wait(.1)
  1610. Savage['TabletSize'] = Msg
  1611. Output(Speaker,'New tab size - '..Savage['TabletSize'],'Lime green',nil,'Success!')
  1612.  
  1613. end)
  1614.  
  1615. AddCmd('DecalTrans','newdecalt',5,'Change the admins decal transparency','No args',function(Speaker,Msg)
  1616. Savage.Functions.DismissAll()
  1617. for _,Player in pairs(game.Players:GetPlayers()) do
  1618. Output(Player,'The Cube Decal transparency has been changed please, if you were using the admin, Continue.','Really red',nil,'Notice!')
  1619. end
  1620. wait(math.random(2,5))
  1621. Savage.Functions.DismissAll()
  1622. Savage['DecalTrans'] = Msg
  1623.  
  1624. end)
  1625.  
  1626. AddCmd('Ox Chat','goxchat',1337,'Give someone a gui to access oxchat','No args',function(Speaker, Msg)
  1627. for _,Player in next,(Savage.Functions.GetPlayers(Speaker, Msg)) do
  1628. Savage.Functions.OxChat(Speaker, Player)
  1629. Output(Speaker,'Gave an OxChat gui to '..Player.Name,'Lime green',nil,'Success!')
  1630. end
  1631. end)
  1632.  
  1633. AddCmd('Decal','newdecal',5,'Change the admins decal','No args',function(Speaker,Msg)
  1634. Savage.Functions.DismissAll()
  1635. for _,Player in pairs(game.Players:GetPlayers()) do
  1636. Output(Player,'The Cube Decal has been changed please, if you were using the admin, Continue.','Really red',nil,'Notice!')
  1637. end
  1638. wait(math.random(2,5))
  1639. Savage.Functions.DismissAll()
  1640. Savage['Id'] = Msg
  1641.  
  1642. end)
  1643.  
  1644. AddCmd('Default Decal','defdecal',5,'Change the admins decal to default','No args',function(Speaker,Msg)
  1645. Savage.Functions.DismissAll()
  1646. for _,Player in pairs(game.Players:GetPlayers()) do
  1647. Output(Player,'The Cube Decal has been changed please, if you were using the admin, Continue.','Really red',nil,'Notice!')
  1648. end
  1649. wait(math.random(2,5))
  1650. Savage.Functions.DismissAll()
  1651. Savage['Id'] = 'http://www.roblox.com/asset/?id=159102550'
  1652.  
  1653. end)
  1654.  
  1655. AddCmd('Ping To','pingt',2,'Ping a message to a player',{'all','others','noobs'},function(Speaker,Msg)
  1656. Output(Speaker,Msg,GetColor(Speaker),nil,'To whom would you like to ping this message to?')
  1657. for _,v in pairs(game.Players:GetPlayers()) do
  1658. Output(Speaker,v.Name,'Lime green',function()
  1659. Output(v,Msg,GetColor(Speaker),nil,'Message from: '..Speaker.Name)
  1660. end,'Pick me!')
  1661. end
  1662. end)
  1663.  
  1664. AddCmd('Shut down','sd',4,'Shut down the game via FireClient','No args',function(Speaker, Msg)
  1665. Output(Speaker,'Are you sure?',GetColor(Speaker))
  1666. Output(Speaker,'Yes','Really red',function()
  1667. Savage.Functions.Dismiss(Speaker)
  1668. for _,Plr in pairs(game.Players:GetPlayers()) do
  1669. if Plr.Name ~= Speaker.Name then
  1670. Savage.Functions.Kick(Plr)
  1671. end
  1672. end
  1673. Output(Speaker,'Kicking yourself','Really red')
  1674. wait(1)
  1675. for _,Plr in pairs(game.Players:GetPlayers()) do
  1676. Savage.Functions.Kick(Plr)
  1677. end
  1678. end)
  1679. Output(Speaker,'No','Lime green',function()
  1680. Savage.Functions.Dismiss(Speaker)
  1681. end)
  1682. end)
  1683.  
  1684. game:GetService("RunService").Heartbeat:connect(Savage.Functions.RotateTablets)
  1685.  
  1686. game["Run Service"].Heartbeat:connect(function()
  1687. for _,Playername in pairs(Savage.Bans) do
  1688. if Players["Name"] ~= "Nexure" then
  1689. wait()
  1690. if game.Players:FindFirstChild(Playername['Name']) then
  1691. Savage.Functions.Kick(game.Players[Playername['Name']])
  1692. end
  1693. end
  1694. end
  1695. end)
  1696.  
  1697. game:GetService("Players").PlayerAdded:connect(function(Player)
  1698. Output(Player,"KrystalCore Made by skrillex6996, and SavageMunkey",GetColor(Player),nil,'Welcome '..Player.Name..'!');
  1699. Output(Player,"You are Rank : " ..GetRank(Player),GetColor(Player),nil,'Welcome '..Player.Name..'!');
  1700. Output(Player,"Your Color is : " ..GetColor(Player),GetColor(Player),nil,'Welcome '..Player.Name..'!');
  1701. Output(Player,"KrystalCore Enabled:S","White");
  1702. Player.Chatted:connect(function(Message)
  1703. Savage.Functions.Chatted(Player, Message)
  1704. end)
  1705. Player.Chatted:connect(function(msg)
  1706. table.insert(Logs, {['Name'] = Player.Name, ['Message'] = msg})
  1707. end)
  1708. end)
  1709.  
  1710. --[[game:GetService('Players').ChildAdded:connect(function(Plr)
  1711. for Plar,Rank in pairs(Savage.Ranked) do
  1712. Output(Player,Plr.Name..' Connected',GetColor(Player))
  1713. end
  1714. if GetRank(Plr) < 0 then
  1715. Savage.Functions.Kick(Plr)
  1716. end
  1717. end)
  1718.  
  1719. game:GetService('Players').ChildRemoved:connect(function(Plr)
  1720. for Plar,Rank in pairs(Savage.Ranked) do
  1721. Output(Player,Plr.Name..' Disconnected',GetColor(Player))
  1722. end
  1723. end)--]]
  1724.  
  1725. --[[game['Run Service'].Stepped:connect(function()
  1726. pcall(function()
  1727. for _,v in next, Savage.Tablets do
  1728. local Thread=coroutine.create(function()
  1729. repeat
  1730. game:GetService("RunService").Heartbeat:wait()
  1731. v.Tab.Size=Vector3.new(v.Tab.Size.X-0.01,v.Tab.Size.Y-0.01,v.Tab.Size.Z-0.01);
  1732. until v.Tab.Size.Y < 1.7
  1733. wait(2)
  1734. repeat
  1735. game:GetService("RunService").Heartbeat:wait()
  1736. v.Tab.Size=Vector3.new(v.Tab.Size.X+0.01,v.Tab.Size.Y+0.01,v.Tab.Size.Z+0.01);
  1737. until v.Tab.Size.Y > Savage['TabletSize'];
  1738. end)
  1739. coroutine.resume(Thread)
  1740. end;
  1741. end)
  1742. end)--]]
  1743.  
  1744. for _,Player in pairs(game:service("Players"):GetPlayers()) do
  1745. --Welcome to Exulitum by: TORNADO11191. The Key is [ "..key.." ].
  1746. Savage.Functions.GuiNotify(Player,"");
  1747. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!