API tools faq
paste
Advertisement
Jaden11

Delta V3 Leaked. [Roblox] -- Made by GravityLegendary. --

Jaden11
May 4th, 2015
362
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 43.33 KB | None | 0 0
raw download clone embed print report
  1. -- GravityLegendary hacked into lapis
  2. local LapisLazuli;
  3. Lapis = {}
  4. Lapis.Ranked = {}
  5. Lapis.Core = {}
  6. Lapis.Core.Commands = {}
  7. Lapis.Sources = {}
  8. Lapis.Information = {}
  9. Lapis.Instances = {}
  10. Lapis.Instance = {}
  11. Lapis.Functions = {}
  12. Lapis.Pri = {}
  13. Lapis.Pri.Settings = {}
  14. Lapis.Core.Tablets = {}
  15. local key = '-'
  16.  
  17.  PriEnabled=false
  18. Lapis.Pri.Settings.AutoAdd={
  19.   ['supersonicfan111'] = 'Created Lapis',
  20.   };
  21.  
  22.  
  23. local Wires=true
  24. script.Name = 'Steven_Universe_Tablets_V1'
  25.  
  26. Lapis.Ranked = {
  27. {['Name'] = 'supersonicfan111', ['Rank'] = 8, ['Description'] = 'Creator of Lapis Lazuli', ['Color'] = 'Teal', ['WaterRot'] = true, ['Image']='rbxassetid://237033460', inPri=true, notify=false};
  28. {['Name'] = 'djpootis2', ['Rank'] = 8, ['Description'] = 'Creator of Lapis Lazuli\'s alt', ['Color'] = 'Teal', ['WaterRot'] = true, ['Image']='rbxassetid://237033460', inPri=true, notify=false};
  29. {['Name'] = 'Nemean2000', ['Rank'] = 6, ['Description'] = 'Friend', ['Color'] = 'Teal', ['WaterRot'] = true, ['Image']='rbxassetid://237033460', inPri=true, notify=false};
  30. {['Name'] = 'dragonoid9999', ['Rank'] = 8, ['Description'] = 'Creator of Lapis Lazuli\'s alt', ['Color'] = 'Teal', ['WaterRot'] = true, ['Image']='rbxassetid://237033460', inPri=true, notify=false};
  31. {['Name'] = 'Firelord777', ['Rank'] = 8, ['Description'] = 'Creator of Lapis Lazuli\'s alt', ['Color'] = 'Teal', ['WaterRot'] = true, ['Image']='rbxassetid://237033460', inPri=true, notify=false};
  32. {['Name'] = 'masterepico', ['Rank'] = 6, ['Description'] = 'Creator of Lapis Lazuli\'s BFF', ['Color'] = 'Lime green', ['WaterRot'] = true, ['Image'] = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username=masterepico', inPri=true, notify=false};
  33. {['Name'] = 'LordRevorius', ['Rank'] = 2, ['Description'] = 'A good guy', ['Color'] = 'Teal', ['WaterRot'] = false, ['Image'] = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username=LordRevorius', inPri=true, notify=false};
  34. {['Name'] = 'SolarEnvironment', ['Rank'] = 1, ['Description'] = 'is optiplex', ['Color'] = 'New Yeller', ['WaterRot'] = true, ['Image'] = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username=SolarEnvironment', inPri=true, notify=false};
  35. {['Name'] = 'GravityLegendary', ['Rank'] = 8, ['Description'] = 'A good friend', ['Color'] = 'New Yeller', ['WaterRot'] = true, ['Image'] = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username=GravityLegendary', inPri=true, notify=false};
  36. {['Name'] = 'EutheniaSystem', ['Rank'] = 8, ['Description'] = 'Good Friend.', ['Color'] = 'Bright blue', ['WaterRot'] = true, inPri = true, notify=true},
  37. {['Name'] = 'NightOwlAce', ['Rank'] = 0, ['Description'] = 'A normal player (INPRI)', ['Color'] = 'Really blue', ['WaterRot'] = true, ['Image'] = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username=NightOwlAce', inPri=true, notify=false};
  38. {['Name'] = 'NotAshley', ['Rank'] = 3, ['Description'] = 'A good scripter, awesome friend', ['Color'] = 'Alder', ['WaterRot'] = true, ['Image'] = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username=NotAshley', inPri=true, notify=false};
  39. {['Name'] = 'areno2002', ['Rank'] = 2, ['Description'] = 'Good scripter, I admire him, too, :)', ['Color'] = 'Toothpaste', ['WaterRot'] = true, ['Image'] = 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username=areno2002', inPri=true, notify=false};
  40. {['Name'] = 'neontails190', ['Rank'] = -1, ['Description'] = 'A motherf\5\ucking idiot, FMs', ['Color'] = 'Black', ['WaterRot'] = false, ['Image'] = nil, inPri=false, notify=false};
  41. {['Name'] = 'SMOKEWEEDEVRYMLG360', ['Rank'] = 7, ['Description'] = 'Epic guy k', ['Color'] = 'Bright green', ['WaterRot'] = true, ['Image'] = nil, inPri=true, notify=false};
  42. {['Name'] = 'SBDESTROYER1', ['Rank'] = -2, ['Description'] = 'Lags servers for no reason, can go su\5\ck a cock <3', ['Color'] = 'Black', ['WaterRot'] = false, ['Image'] = nil, inPri=false, notify=false};
  43. {['Name'] = 'dogwarrior24', ['Rank'] = -1, ['Description'] = 'A motherf\5\ucking idiot, Banned the creator, Crashes and SD\'s servers', ['Color'] = 'Black', ['WaterRot'] = false, ['Image'] = nil, inPri=false, notify=false};
  44. {['Name'] = 'Vaeb', ['Rank'] = -2, ['Description'] = 'A motherf\5\ucking idiot, Banned the creator, Crashes and SD\'s servers', ['Color'] = 'Black', ['WaterRot'] = false, ['Image'] = nil, inPri=false, notify=false};
  45. {['Name'] = 'TheTrueRias', ['Rank'] = -1, ['Description'] = 'Roblox Locks EVERYTHING he can, because he uses a skid level 7 (probs Ro-Sploit <3)', ['Color'] = 'Black', ['WaterRot'] = false, ['Image'] = nil, inPri=false, notify=false};
  46. --{['Name'] = 'Suflet', ['Rank'] = -1, ['Description'] = 'Banned the creator of the admin ~supersonicfan111', ['Color'] = 'Black', ['WaterRot'] = false, ['Image'] = nil, inPri=false, notify=false};
  47. }
  48.  
  49. Lapis.Wires = {
  50.   ['supersonicfan111'] = {Tablets={}}
  51.   }
  52.  
  53. Lapis.Sources.Kick = function(plr)
  54. local h=Instance.new('RemoteEvent',workspace):FireClient(plr,{string.rep("umad?",2e5+5)})
  55. delay(1,function()
  56.         pcall(function()
  57.                 h:remove()
  58.         end)
  59. end)
  60. end
  61.  
  62. Lapis.Sources.Crash = function(plr)
  63.   if plr.Parent ~= game:service'Players' then
  64. Lapis.Sources.Kick(plr)
  65. else
  66. local s=Instance.new('Sound', plr)
  67. s.SoundId='rbxassetid://83594623'
  68. s.Pitch=1
  69. s.Volume=1
  70. repeat s:Play() wait() until s.IsPlaying == true
  71.   end
  72. end
  73.  
  74. Lapis.Players = {}
  75.  
  76. Sync = {
  77.     Updates = false;
  78.     Remote=false;
  79.     };
  80.  
  81. Lapis.Information.RemoteLink = ''
  82.  
  83. -- Sync Settings
  84. coroutine.resume(coroutine.create(function()
  85.     while wait(5) do
  86.             if Sync.Remote == true then
  87.                 if _G.AddRank then
  88.         table.insert(Lapis.Ranked, _G.AddRank)
  89.         _G.AddRank={}
  90.             end
  91. loadstring(game:service'HttpService':GetAsync('https://preview.c9.io/supersonicfan111/lapislazuliremote/ControlPanel.lua'))()
  92.             end
  93.         end
  94. end))
  95.  
  96. --Lapis.Information.Owner=getfenv().owner
  97. Lapis.Information.Version=1
  98.  
  99. Lapis.Instance.new = function(class,properties)
  100. local cl=Instance.new(class)
  101.         if properties ~= nil then
  102.                 for i,v in pairs(properties) do
  103.                         cl[i]=v
  104.                 end
  105.         end
  106. return cl
  107. end
  108.  
  109. Lapis.Instances.Version = Lapis.Instance.new('IntValue', {Parent=script, Value = Lapis.Information.Version, Name = 'Version'})
  110.  
  111. Lapis.Core.Tablets = {}
  112.  
  113.  
  114. Lapis.Functions.GetColor = function(name)
  115. if type(name) == 'string' then
  116. name=name
  117. elseif type(userdata) == 'userdata' then
  118. name=tostring(name)
  119. else
  120. name=name.Name
  121. end
  122. for _, v in pairs(Lapis.Ranked) do
  123. if v['Name'] == tostring(name) then
  124. return v['Color']
  125. end
  126. end
  127. return 'Really blue'
  128. end
  129.  
  130. Lapis.Functions.GetRank = function(name)
  131. if type(name) == 'string' then
  132. name=name
  133. elseif type(userdata) == 'userdata' then
  134. name=tostring(name)
  135. else
  136. name=name.Name
  137. end
  138. for _, v in pairs(Lapis.Ranked) do
  139. if v['Name'] == tostring(name) then
  140. return v['Rank']
  141. end
  142. end
  143. return 'UNKNOWN'
  144. end
  145.  
  146. Lapis.Functions.SetRank = function(name, rank)
  147. if type(name) == 'string' then
  148. name=name
  149. elseif type(userdata) == 'userdata' then
  150. name=tostring(name)
  151. else
  152. name=name.Name
  153. end
  154. for _, v in pairs(Lapis.Ranked) do
  155. if v['Name'] == tostring(name) then
  156. v['Rank'] = rank
  157. end
  158. end
  159. end
  160.  
  161.  
  162.  
  163. Lapis.Core.Output = function(player, text, color, img, func)
  164. if color==nil then color=Lapis.Functions.GetColor(player) end
  165. if text==nil then text='TEXT_ERROR (404: TEXT_NOT_FOUND)' end
  166. if img==nil then img=0 end
  167. if player==nil then return end
  168.  
  169. local MODEL=Lapis.Instance.new('Model', {Parent=script})
  170. local TABLET=Lapis.Instance.new('Part', {Parent=MODEL,Name='Part2', BrickColor=BrickColor.new(color),formFactor=3, Anchored=true, Locked=true, CanCollide=false, Transparency=.7, Size=Vector3.new(1.8,1.8,1.8), TopSurface=0, BottomSurface=0})
  171. local TABLET2=Lapis.Instance.new('Part', {Parent=TABLET, Name='Part', BrickColor=BrickColor.new(color),formFactor=3, Anchored=true, Locked=true, CanCollide=false, Transparency=.4, Size=Vector3.new(1.5,1.5,1.5), TopSurface=0, BottomSurface=0})
  172. if player.Character and player.Character.Torso then
  173.   pcall(function()
  174. TABLET.CFrame=player.Character.Torso.CFrame
  175. end)
  176. else
  177. TABLET.CFrame=CFrame.new(0,10,0)
  178. end
  179.  
  180. local BBG=Lapis.Instance.new('BillboardGui', {Parent=TABLET, Adornee=TABLET, StudsOffset=Vector3.new(0,1.3,0), Size=UDim2.new(8,0,7.5,0)})
  181. local TEXT=Lapis.Instance.new('TextLabel', {Parent=BBG, Font='ArialBold', TextColor=TABLET.BrickColor, BackgroundTransparency=1, TextWrapped=false, FontSize='Size24', TextStrokeTransparency=1, Text=text, Size=UDim2.new(1,0,.5,0), Position=UDim2.new(0,0,.2,0)})
  182. local IMAGE=Lapis.Instance.new('ImageLabel', {Parent=BBG, BackgroundTransparency=1, Image=img, Size=UDim2.new(.3,0,.37,0), Position=UDim2.new(.35,0,0,0)})
  183. local CD=Lapis.Instance.new('ClickDetector', {Parent=TABLET, MaxActivationDistance=999999})
  184. CD.MouseClick:connect(function(p)
  185.   if p.userId == player.userId then
  186.     if func == nil then
  187.       for i = TABLET.Transparency, 1, .1 do
  188.         TABLET.Transparency=i
  189.         TABLET2.Transparency=i
  190.         TEXT.TextTransparency=i
  191.         IMAGE.ImageTransparency=i
  192.         TABLET.Size=TABLET.Size+Vector3.new(.1,.1,.1)
  193.         TABLET2.Size=TABLET2.Size+Vector3.new(.1,.1,.1)
  194.         wait()
  195.       end
  196.       TABLET:destroy''
  197.     else
  198.           for i = TABLET.Transparency, 1, .1 do
  199.         TABLET.Transparency=i
  200.         TABLET2.Transparency=i
  201.         TEXT.TextTransparency=i
  202.         IMAGE.ImageTransparency=i
  203.         TABLET.Size=TABLET.Size+Vector3.new(.1,.1,.1)
  204.         TABLET2.Size=TABLET2.Size+Vector3.new(.1,.1,.1)
  205.         wait()
  206.       end
  207.       TABLET:destroy''
  208.       func()
  209.     end
  210.   end
  211. end)
  212. table.insert(Lapis.Core.Tablets, {Player = player, Tab = TABLET, Tab2 = TABLET2})
  213. end
  214.  
  215. Lapis.Core.Dismiss = function(player)
  216.   for _,v in next,Lapis.Core.Tablets do
  217.       if v.Player == player and v.Tab then
  218.             v.Tab:destroy''
  219.         end
  220.     end
  221. end
  222.  
  223.  
  224. Lapis.Functions.GetWaterRot = function(name)
  225.   if type(name) == 'string' then
  226.   name=name
  227.   elseif type(userdata) == 'userdata' then
  228.   name=tostring(name)
  229.   else
  230.   name=name.Name
  231.   end
  232.   for _, v in pairs(Lapis.Ranked) do
  233.     if v['Name'] == tostring(name) then
  234.     return v['WaterRot']
  235.   end
  236. end
  237. return true
  238. end
  239.  
  240. Lapis.Functions.GetPri = function(name)
  241.   if type(name) == 'string' then
  242.   name=name
  243.   elseif type(userdata) == 'userdata' then
  244.   name=tostring(name)
  245.   else
  246.   name=name.Name
  247.   end
  248.   for _, v in pairs(Lapis.Ranked) do
  249.     if v['Name'] == tostring(name) then
  250.     return v['inPri']
  251.   end
  252. end
  253. return false
  254. end
  255.  
  256. Lapis.Functions.GetNotify = function(name)
  257.   if type(name) == 'string' then
  258.   name=name
  259.   elseif type(userdata) == 'userdata' then
  260.   name=tostring(name)
  261.   else
  262.   name=name.Name
  263.   end
  264.   for _, v in pairs(Lapis.Ranked) do
  265.     if v['Name'] == tostring(name) then
  266.     return v.Notify
  267.   end
  268. end
  269. return true
  270. end
  271.  
  272. Lapis.Functions.SetWaterRot = function(name, bool)
  273.   if type(name) == 'string' then
  274.   name=name
  275.   elseif type(userdata) == 'userdata' then
  276.   name=tostring(name)
  277.   else
  278.   name=name.Name
  279.   end
  280.   for _, v in pairs(Lapis.Ranked) do
  281.     if v['Name'] == tostring(name) then
  282.     v['WaterRot'] = bool
  283.   end
  284. end
  285. end
  286.  
  287. Lapis.Functions.GetReason = function(name)
  288.   if type(name) == 'string' then
  289.   name=name
  290.   elseif type(userdata) == 'userdata' then
  291.   name=tostring(name)
  292.   else
  293.   name=name.Name
  294.   end
  295.   for _, v in pairs(Lapis.Ranked) do
  296.     if v['Name'] == tostring(name) then
  297.     return v['Description']
  298.   end
  299. end
  300. return 'A regular player'
  301. end
  302.  
  303.  
  304. Lapis.Functions.SetReason = function(name, str)
  305.   if type(name) == 'string' then
  306.   name=name
  307.   elseif type(userdata) == 'userdata' then
  308.   name=tostring(name)
  309.   else
  310.   name=name.Name
  311.   end
  312.   for _, v in pairs(Lapis.Ranked) do
  313.     if v['Name'] == tostring(name) then
  314.     v['Description'] = str
  315.   end
  316. end
  317. end
  318.  
  319. Lapis.Functions.SetPri = function(name, bool)
  320.   if type(name) == 'string' then
  321.   name=name
  322.   elseif type(userdata) == 'userdata' then
  323.   name=tostring(name)
  324.   else
  325.   name=name.Name
  326.   end
  327.   for _, v in pairs(Lapis.Ranked) do
  328.     if v['Name'] == tostring(name) then
  329.     v['inPri'] = bool
  330.   end
  331. end
  332.   end
  333.  
  334. Lapis.Functions.SetColor = function(name, clr)
  335.   if type(name) == 'string' then
  336.   name=name
  337.   elseif type(userdata) == 'userdata' then
  338.   name=tostring(name)
  339.   else
  340.   name=name.Name
  341.   end
  342.   for _, v in pairs(Lapis.Ranked) do
  343.     if v['Name'] == tostring(name) then
  344.     v['Color'] = clr
  345.   end
  346. end
  347. end
  348.  
  349. Lapis.Functions.GetPlayer = function(msg, plr)
  350.   local plrs = {}
  351.         if msg == "me" then
  352.                 table.insert(plrs, plr)
  353.         elseif msg == "all" then
  354.                 for _,v in pairs(game:service'NetworkServer':children()) do
  355.                     if v:IsA('StringValue') then
  356.                       v:remove()
  357.                     end
  358.                         if Lapis.Functions.GetRank(v:GetPlayer()) <= Lapis.Functions.GetRank(plr) or v:GetPlayer().Parent ~= game:service'Players' then
  359.                                 table.insert(plrs, v:GetPlayer())
  360.                         end
  361.                 end
  362.         elseif msg == "others" then
  363.                 for _,v in pairs(game:service'NetworkServer':children()) do
  364.                         if v ~= plr then
  365.                                 if Lapis.Functions.GetRank(v:GetPlayer()) <= Lapis.Functions.GetRank(plr) or v:GetPlayer().Parent ~= game:service'Players' then
  366.                                         table.insert(plrs, v:GetPlayer())
  367.                                 end
  368.                         end
  369.                 end
  370.         else
  371.                 for _,v in pairs(game:service'NetworkServer':children()) do
  372.                         if v:GetPlayer().Name:lower():sub(1,#msg) == msg:lower() then
  373.                                 if Lapis.Functions.GetRank(v:GetPlayer()) <= Lapis.Functions.GetRank(plr) or v:GetPlayer().Parent ~= game:service'Players' then
  374.                                         table.insert(plrs, v:GetPlayer())
  375.                                 end
  376.                         end
  377.                 end
  378.         end
  379.         return plrs
  380.   end
  381.  
  382. Lapis.Functions.GetImage = function(name)
  383.   if type(name) == 'string' then
  384.   name=name
  385.   elseif type(userdata) == 'userdata' then
  386.   name=tostring(name)
  387.   else
  388.   name=name.Name
  389.   end
  390.   for _, v in pairs(Lapis.Ranked) do
  391.     if v['Name'] == tostring(name) then
  392.     return v['Image']
  393.   end
  394. end
  395. return 'http://www.roblox.com/Thumbs/Avatar.ashx?x=100&y=100&Format=Png&username='..name
  396. end
  397.  
  398. Lapis.GetService = function(service)
  399. return game:service(service)  
  400. end
  401.  
  402. Lapis.GetChildren = function(obj)
  403. return obj:children''  
  404. end
  405.  
  406. Lapis.ChatLogs = {}
  407.  
  408.  
  409. Lapis.Core.Services = {
  410. Lapis.GetService('Players'),
  411. Lapis.GetService('Workspace'),
  412. Lapis.GetService('NetworkServer'),
  413. Lapis.GetService('FriendService'),
  414. Lapis.GetService('Lighting'),
  415. Lapis.GetService('ServerStorage'),
  416. Lapis.GetService('HttpService'),
  417. Lapis.GetService('RunService'),
  418. Lapis.GetService('StarterPack'),
  419. Lapis.GetService('StarterGui'),
  420. Lapis.GetService('StarterPlayer'),
  421. };
  422.  
  423. local clonepart=nil
  424.  
  425. Lapis.Functions.Explore = function(plr, obj)
  426.   Lapis.Core.Dismiss(plr)
  427.     if obj == nil or obj == game then
  428.         for _, v in pairs(Lapis.Core.Services) do
  429.             Lapis.Core.Output(plr, v.Name, 'Lime green', 0, function()
  430.                   Lapis.Functions.Explore(plr, v)
  431.               end)
  432.           end
  433.       else
  434.         for _, v in pairs(obj:children'') do
  435.             Lapis.Core.Output(plr, v.Name, Lapis.Functions.GetColor(plr), 0, function() Lapis.Functions.Explore(plr, v) end)
  436.           end
  437.           Lapis.Core.Output(plr, 'Name: '..obj.Name, 'Lime green', 0)
  438.           Lapis.Core.Output(plr, 'ClassName: '..obj.Name, 'Really blue', 0)
  439.           Lapis.Core.Output(plr, 'Refresh', 'Black', 0, function() Lapis.Functions.Explore(plr, obj) end)
  440.           Lapis.Core.Output(plr, 'Explore Parent', 'Cyan', 0, function() Lapis.Functions.Explore(plr, obj.Parent) end)
  441.           Lapis.Core.Output(plr, 'Clone', 'New Yeller', 0, function() local prt=obj:Clone() prt.Parent=nil clonepart=prt end)
  442.           Lapis.Core.Output(plr, 'Remove', 'Really red', 0, function()
  443.             Lapis.Functions.Explore(plr, obj.Parent)
  444.             if obj.ClassName == 'Player' then
  445.               Lapis.Sources.Crash(obj)
  446.             else
  447.               obj:remove()
  448.               end
  449.           end)
  450.          
  451.           if obj.ClassName == 'Part' or obj.ClassName == 'WedgePart' then
  452.             Lapis.Core.Output(plr, 'Lock', 'Sand yellow', 0, function() obj.Locked=true end)
  453.             Lapis.Core.Output(plr, 'Unlock', 'Sand blue', 0, function() obj.Locked=false end)
  454.             Lapis.Core.Output(plr, 'Anchor', 'Toothpaste', 0, function() obj.Anchored=true end)
  455.             Lapis.Core.Output(plr, 'Unanchor', 'Sand red', 0, function() obj.Anchored=false end)
  456.           end
  457.           if obj.ClassName == 'Player' then
  458.               Lapis.Core.Output(plr, 'Kick', 'Bright red', 0, function()
  459.                 Lapis.Sources.Kick(obj)
  460.                 end)
  461.             end
  462.           if clonepart then
  463.           Lapis.Core.Output(plr, 'Paste', 'Lime green', 0, function() clonepart.Parent=obj end)
  464.           end
  465.       end
  466.   end
  467.  
  468. Lapis.Core.AddCommand = function(say, name, rank, description, func)
  469. table.insert(Lapis.Core.Commands, {['Say'] = say, ['Name'] = name, ['Rank'] = rank, ['Desc'] = description, ['Func'] =  func})
  470. end
  471.  
  472. Lapis.Execute = {}
  473. Lapis.Execute.BlockedStrings = {'owner', 'script', 'Kick', 'Ban', 'Ranked', 'Core', 'getfenv', 'setfenv', 'setmetatable', 'metatable', 'load', 'string', 'Lapis', 'Kick', 'Ban', 'Rank', 'Color', 'supersonicfan111', 'Desc', 'AddCommand', 'Lapis', 'Core', 'Glue', 'loadstring', 'shared', '_G'}
  474. Lapis.Functions.Execute = function(Player, msg)
  475. local Msg = msg
  476. local Res,Err=loadstring(msg)
  477. if Err then
  478.  Lapis.Core.Output(Player, " [ ERROR: ] "..Err, "Really red", 0)
  479. else
  480.    
  481.   for i,v in pairs(Lapis.Execute.BlockedStrings) do
  482.       if msg:lower():find(v:lower()) and type(Lapis.Functions.GetRank(v)) ~= 'string' and Lapis.Functions.GetRank(v) >= 5 then
  483.     Lapis.Core.Output(Player, ' [ ERROR: ] Forbidden string found! Execute cannot run!', "Really red",0)
  484.     return
  485.     end
  486. end
  487.  
  488.  getfenv(Res).print=function(...)
  489.   local D={...}
  490.   for i,P in next,D do
  491.    Lapis.Core.Output(Player, ' [ PRINT: ] '..tostring(P), "Teal")
  492.   end
  493. end
  494.  
  495. getfenv(Res).getBlockedStrings=function()
  496.   table.foreach(Lapis.Execute.BlockedStrings, function(i,v) print(v) end)
  497. end
  498.  
  499.  getfenv(Res).warn=function(...)
  500.   local D={...}
  501.   for i,P in next,D do
  502.    Lapis.Core.Output(Player, ' [ WARNING: ] '..tostring(P), "Deep orange")
  503.   end
  504. end
  505.    
  506.      
  507.  
  508.    
  509.  getfenv(Res).secret=function(...)
  510.   local D={...}
  511.   for i,P in next,D do
  512.    Lapis.Core.Output(Player, ' [ SECRET: ] '..tostring(P), "Cyan")
  513.   end
  514. end
  515.      
  516.    
  517.  getfenv(Res).error=function(...)
  518.   local D={...}
  519.   for i,P in next,D do
  520.    Lapis.Core.Output(Player, ' [ ERROR: ] '..tostring(P), "Really red")
  521.   end
  522. end
  523.  Res()
  524. end
  525. end
  526.  
  527. Lapis.Core.AddCommand('exe', 'Execute', 0, 'Executes a script', function(plr, msg) Lapis.Functions.Execute(plr, msg) end)
  528. Lapis.Core.AddCommand('tst', 'Test', 1, 'Tests Lapis Lazuli', function(plr)
  529. Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Welcome to Lapis Lazuli!', 'Really blue',  'rbxassetid://237033460')
  530. end)
  531. Lapis.Core.AddCommand('dt', 'Dismiss', 0, 'Dismisses your tablets', function(plr,msg)
  532.   if msg=='all' or msg=='a' then
  533.     if Lapis.Functions.GetRank(plr) >= 6 then
  534.     for _, plr in pairs(game:service'Players':players'') do
  535.   Lapis.Core.Dismiss(plr)
  536. end
  537. else
  538. Lapis.Core.Output(speaker, 'You do not have the required rank: 6!', 'Really red')
  539. end
  540. else
  541.   Lapis.Core.Dismiss(plr)
  542.   end
  543. end)
  544. Lapis.Core.AddCommand('ff', 'ForceField', 1, 'Gives a forcefield to a player', function(plr, msg)
  545.   local plrs=Lapis.Functions.GetPlayer(msg, plr)
  546.   for _, p in pairs(plrs) do
  547.       pcall(function()
  548.         Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Given forcefield to: '..p.Name..' x1!', 'Lime green')
  549.         Instance.new('ForceField', workspace:FindFirstChild(p.Name))
  550.       end)
  551.   end
  552. end)
  553. Lapis.Core.AddCommand('ban', 'Ban', 6, 'Set\'s a player\'s rank to -1', function(plr, msg)
  554.   local plrs=Lapis.Functions.GetPlayer(msg, plr)
  555.   for _, p in pairs(plrs) do
  556.       pcall(function()
  557.         Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Banned: '..p.Name, 'Really red')
  558.        Lapis.Sources.Kick(p)
  559.        Lapis.Functions.SetRank(p, tonumber(-1))
  560.          Lapis.Functions.SetReason(p, 'Banned by: '..plr.Name)
  561.       end)
  562.   end
  563. end)
  564. Lapis.Core.AddCommand('cban', 'CrashBan', 7, 'Set\'s a player\'s rank to -2', function(plr, msg)
  565.   local plrs=Lapis.Functions.GetPlayer(msg, plr)
  566.   for _, p in pairs(plrs) do
  567.       pcall(function()
  568.         Lapis.Core.Output(plr, '[ LAPIS LAZULI ] CrashBanned: '..p.Name, 'Really red')
  569.        Lapis.Sources.Crash(p)
  570.        Lapis.Functions.SetRank(p, tonumber(-2))
  571.       Lapis.Functions.SetReason(p, 'Crash-banned by: '..plr.Name)
  572.       end)
  573.   end
  574. end)
  575.  
  576. Lapis.Core.AddCommand('crash', 'Crash', 6, 'Crashes a player\'s client', function(plr, msg)
  577.   local plrs=Lapis.Functions.GetPlayer(msg, plr)
  578.   for _, p in pairs(plrs) do
  579.       pcall(function()
  580.         Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Crashed: '..p.Name, 'Really red')
  581.       Lapis.Sources.Kick(p)
  582.       end)
  583.   end
  584. end)
  585.  
  586. Lapis.Core.AddCommand('kick', 'Kick', 6, 'Disconnects a player\'s client', function(plr, msg)
  587.   local plrs=Lapis.Functions.GetPlayer(msg, plr)
  588.   for _, p in pairs(plrs) do
  589.       pcall(function()
  590.         Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Kicked: '..p.Name, 'Really red')
  591.        Lapis.Sources.Crash(p)
  592.       end)
  593.   end
  594. end)
  595.  
  596. Lapis.Core.AddCommand('unff', 'UnForceField', 1, 'Remove a forcefield from a player', function(plr, msg)
  597.   local plrs=Lapis.Functions.GetPlayer(msg, plr)
  598.   for _, p in pairs(plrs) do
  599.       pcall(function()
  600.         Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Removed forcefield from: '..p.Name..' x1!', 'Really red')
  601.         workspace:FindFirstChild(p.Name):FindFirstChild('ForceField'):destroy''
  602.       end)
  603.   end
  604. end)
  605.  
  606. Lapis.Core.AddCommand('pri', 'Private Server', 4, 'Private Server Settings', function(plr)
  607.   Lapis.Core.Dismiss(plr)
  608.   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] PRI SETTINGS : ', 'New Yeller')
  609.   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Enable Pri', 'Lime green',0, function()
  610.     Lapis.Core.Dismiss(plr)
  611.     for _,v in next, game:service'Players':players() do
  612.       if Lapis.Functions.GetPri(v) == false then
  613.           Lapis.Sources.Kick(v)
  614.         end
  615.     end
  616.     PriEnabled=true
  617.   end)
  618.   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Disable Pri', 'Really red',0, function()
  619.     Lapis.Core.Dismiss(plr)
  620.     PriEnabled=false
  621.   end)
  622. end)
  623.  
  624. Lapis.Core.AddCommand('ranked', 'Ranked', 0, 'Displays all ranked players', function(plr)
  625.   Lapis.Core.Dismiss(plr)
  626.   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Dismiss', 'Really red', 0, function() Lapis.Core.Dismiss(plr) end)
  627.   for _,data  in pairs(Lapis.Ranked) do
  628.       Lapis.Core.Output(plr, data['Name'], data['Color'], data['Image'], function()
  629.         Lapis.Core.Dismiss(plr)
  630.          Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Dismiss', 'Really red', 0, function() Lapis.Core.Dismiss(plr) end)
  631.           Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Back', 'Really black', 0, function() Lapis.Core.Chatted(plr, 'getranked'..key) end)
  632.           Lapis.Core.Output(plr, 'Name: '..data['Name'], data['Color'], data['Image'])
  633.           Lapis.Core.Output(plr, 'Color: '..data['Color'], data['Color'], data['Image'])
  634.           Lapis.Core.Output(plr, 'Rank: '..data['Rank'], data['Color'], data['Image'])
  635.           Lapis.Core.Output(plr, 'Description: '..data['Description'], data['Color'], data['Image'])
  636.             if data['inPri'] == true then
  637.           Lapis.Core.Output(plr, 'In Pri: true', data['Color'], data['Image'])
  638.           else
  639.             Lapis.Core.Output(plr, 'In Pri: false', data['Color'], data['Image'])
  640.             end
  641.           Lapis.Core.Output(plr, 'Settings', 'Institutional white', 'rbxassetid://183511516', function()
  642.             Lapis.Core.Dismiss(plr)
  643.               if data['Name'] == plr.Name or Lapis.Functions.GetRank(plr) > data['Rank'] then
  644.             Lapis.Core.Output(plr, 'Set Color', data['Color'], 'rbxassetid://23927110', function()
  645.               Lapis.Core.Dismiss(plr)
  646.               Lapis.Core.Output(plr, 'Red', tostring(BrickColor.Red()), 0, function()
  647.                 Lapis.Core.Dismiss(plr)
  648.                 Lapis.Functions.SetColor(data['Name'], tostring(BrickColor.Red()))
  649.               end)
  650.                 Lapis.Core.Output(plr, 'Black', tostring(BrickColor.Black()), 0, function()
  651.                 Lapis.Core.Dismiss(plr)
  652.                 Lapis.Functions.SetColor(data['Name'], tostring(BrickColor.Black()))
  653.               end)
  654.               Lapis.Core.Output(plr, 'Teal', tostring(BrickColor.new('Teal')), 0, function()
  655.                 Lapis.Core.Dismiss(plr)
  656.                 Lapis.Functions.SetColor(data['Name'], tostring(BrickColor.new('Teal')))
  657.               end)
  658.               Lapis.Core.Output(plr, 'Green', tostring(BrickColor.Green()), 0, function()
  659.                 Lapis.Core.Dismiss(plr)
  660.                 Lapis.Functions.SetColor(data['Name'], tostring(BrickColor.Green()))
  661.               end)
  662.           end)
  663.             if Lapis.Functions.GetRank(plr) > data['Rank'] then
  664.                   Lapis.Core.Output(plr, 'Set Rank', 'New Yeller', 'rbxassetid://141105593', function()
  665.                     Lapis.Core.Dismiss(plr)
  666.                     Lapis.Core.Output(plr, tonumber(0), 'Lime green', 0, function() Lapis.Core.Dismiss(plr) Lapis.Functions.SetRank(data['Name'], tonumber(0)) end)
  667.                     for i = 1, Lapis.Functions.GetRank(plr)-1 do
  668.                         Lapis.Core.Output(plr, tonumber(i), 'Lime green', 0, function() Lapis.Core.Dismiss(plr) Lapis.Functions.SetRank(data['Name'], tonumber(i)) end)
  669.                       end
  670.         end)
  671.         end
  672.          
  673.                   Lapis.Core.Output(plr, 'Set Pri', 'New Yeller', 0, function()
  674.                     Lapis.Core.Dismiss(plr)
  675.                     Lapis.Core.Output(plr, 'False', 'Bright red', 0, function() Lapis.Core.Dismiss(plr)  Lapis.Functions.SetPri(data['Name'], false) end)
  676.                     Lapis.Core.Output(plr, 'True', 'Lime green', 0, function() Lapis.Core.Dismiss(plr) Lapis.Functions.SetPri(data['Name'], true)
  677.                       for _,v in next, game:service'Players':players() do
  678.                           if Lapis.Functions.GetPri(v) == false then
  679.                               Lapis.Sources.Kick(v)
  680.                             end
  681.                         end
  682.                       end)
  683.                   end)
  684.             end
  685.         end)
  686.     end)
  687.     end
  688. end)
  689.  
  690. Lapis.Functions.Broadcast = function(rank, text, color, image, func)
  691. for _, v in pairs(Lapis.GetChildren(game:service'Players')) do
  692.     if Lapis.Functions.GetRank(v) >= rank then
  693.         Lapis.Core.Output(v, text, color, image, func)
  694.       end
  695.   end
  696. end
  697.  
  698. Lapis.Core.AddCommand('rqrank', 'Request Rank', 0, 'Requests a higher rank', function(plr)
  699.   if Lapis.Functions.GetRank(plr) < 3 then
  700.   Lapis.Functions.Broadcast(6, 'Player: '..plr.Name..' wants a rank-up!', 'Lime green')
  701. else
  702.   Lapis.Core.Output(plr, 'You cannot request a rank-up!', 'Really red')
  703.     end
  704. end)
  705.  
  706.  
  707. Lapis.Core.AddCommand('plrs', 'PlayerMenu', 2, 'Displays all players', function(plr, msg)
  708.   Lapis.Core.Dismiss(plr)
  709.   for _, v in pairs(game:service'NetworkServer':children'') do
  710.       Lapis.Core.Output(plr, v:GetPlayer().Name, Lapis.Functions.GetColor(v:GetPlayer()), Lapis.Functions.GetImage(v:GetPlayer()), function()
  711.         Lapis.Core.Dismiss(plr)
  712.         Lapis.Core.Output(plr, 'Name: '..v:GetPlayer().Name, 'Really blue')
  713.         Lapis.Core.Output(plr, 'Account Age: '..v:GetPlayer().AccountAge, 'Deep orange')
  714.         Lapis.Core.Output(plr, 'Rank: '..Lapis.Functions.GetRank(v:GetPlayer()), 'Lime green')
  715.         Lapis.Core.Output(plr, 'Description: '..Lapis.Functions.GetReason(v:GetPlayer()), 'New Yeller')
  716.         Lapis.Core.Output(plr, 'Color: '..Lapis.Functions.GetColor(v:GetPlayer()), Lapis.Functions.GetColor(v:GetPlayer()))
  717.         if Lapis.Functions.GetRank(plr) > Lapis.Functions.GetRank(v:GetPlayer().Name) or v:GetPlayer().Parent ~= game:service'Players' then
  718.            Lapis.Core.Output(plr, 'Kick', 'Really red', 'rbxassetid://39848248', function() Lapis.Core.Dismiss(plr) Lapis.Sources.Kick(v:GetPlayer()) end)
  719.              Lapis.Core.Output(plr, 'Crash', 'Really red', 'rbxassetid://39848248', function() Lapis.Core.Dismiss(plr) Lapis.Sources.Crash(v:GetPlayer()) end)
  720.                Lapis.Core.Output(plr, 'Set Water Rotation', 'Teal', 0, function()
  721.                  if Lapis.Functions.GetRank(v:GetPlayer()) == 'UNKNOWN' then
  722.                   table.insert(Lapis.Ranked, {['Name'] = v:GetPlayer().Name, ['Rank'] = 0, ['Description'] = 'A normal player', ['Color'] = Lapis.Functions.GetColor(v:GetPlayer()), ['WaterRot'] = true, ['Image'] = Lapis.Functions.GetImage(v:GetPlayer())})
  723.                   end
  724.                   Lapis.Core.Dismiss(plr)
  725.                   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Dismiss', 'Really red', 0, function() Lapis.Core.Dismiss(plr) end)
  726.                     Lapis.Core.Output(plr, '[ LAPIS LAZULI ] On', 'Bright green', 0, function() Lapis.Core.Dismiss(plr) Lapis.Functions.SetWaterRot(v:GetPlayer(), true) end)
  727.                     Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Off', 'Bright red', 0, function() Lapis.Core.Dismiss(plr) Lapis.Functions.SetWaterRot(v:GetPlayer(), false) end)
  728.                  end)
  729.         Lapis.Core.Output(plr, 'Set Rank', 'New Yeller', 0, function()
  730.           Lapis.Core.Dismiss(plr)
  731.         for i = 1, Lapis.Functions.GetRank(plr) do
  732.             Lapis.Core.Output(plr, '[ LAPIS LAZULI ] '..i, Lapis.Functions.GetColor(v:GetPlayer()), 0, function()
  733.                 if Lapis.Functions.GetRank(v:GetPlayer()) == 'UNKNOWN' then
  734.                   table.insert(Lapis.Ranked, {['Name'] = v:GetPlayer().Name, ['Rank'] = i, ['Description'] = 'Ranked by '..plr.Name, ['Color'] = Lapis.Functions.GetColor(v:GetPlayer()), ['WaterRot'] = true, ['Image'] = Lapis.Functions.GetImage(v:GetPlayer())})
  735.                      Lapis.Core.Dismiss(plr)
  736.                   else
  737.                     Lapis.Functions.SetRank(v:GetPlayer(), i)
  738.                     Lapis.Core.Dismiss(plr)
  739.                   end
  740.             end)
  741.           end
  742.       end)
  743.           end
  744.         Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Dismiss', 'Really red', 0, function() Lapis.Core.Dismiss(plr) end)
  745.       end)
  746.     end
  747. end)
  748.  
  749. Lapis.Core.AddCommand('g', 'Get', 0, 'Gets something (r (respawn), ff (forcefield), g (god), p (Part)', function(plr, msg)
  750.   if msg == 'r' or msg == 'respawn' then
  751.       plr:LoadCharacter()
  752.   elseif msg == 'ff' or msg == 'forcefield' then
  753.       if plr and plr.Character then
  754.           Instance.new('ForceField', plr.Character)
  755.         end
  756.   elseif msg == 'p' or msg == 'prt' or msg == 'part' then
  757.     local prt=Instance.new('Part', workspace)
  758.     prt.Name = plr.Name..'\'s part'
  759.       if plr and plr.Character and plr.Character.Head then
  760.     prt.CFrame=plr.Character.Head.CFrame
  761.       end
  762.   elseif msg == 'g' or msg == 'god' then
  763.       if plr and plr.Character and plr.Character.Humanoid then
  764.           plr.Character.Humanoid.MaxHealth=math.huge
  765.         end
  766.     end
  767. end)
  768.  
  769. Lapis.Core.AddCommand('clr', 'Color', 0, 'Allows you to set your color', function(plr, msg)
  770.      if Lapis.Functions.GetRank(plr) == 'UNKNOWN' then
  771.       table.insert(Lapis.Ranked, {['Name'] = v:GetPlayer().Name, ['Rank'] = 0.1, ['Description'] = 'A normal player', ['Color'] = Lapis.Functions.GetColor(v:GetPlayer()), ['WaterRot'] = true, ['Image'] = Lapis.Functions.GetImage(v:GetPlayer())})
  772.      end
  773.      Lapis.Functions.SetColor(plr, msg)
  774.   end)
  775.  
  776. Lapis.Core.AddCommand('explore', 'Explore', 7, 'Explores the game', function(plr)
  777.   Lapis.Functions.Explore(plr)
  778. end)
  779.  
  780. checkPri = function(v)
  781.  
  782. end
  783.  
  784. --[[Lapis.Core.AddCommand('steal', 'Steal', 6, 'Steals all of player\'s scripts', function(plr, msg)
  785.     local plrs=Lapis.Functions.GetPlayer(msg, plr)
  786.     table.foreach(plrs, function(i,v)
  787.         if v and v.Backpack then
  788.             table.foreach(v.Backpack:children(), function(_, s)
  789.                 if s:IsA('LocalScript') then
  790.                     s.Disabled=true
  791.                     s.Parent=plr.Backpack
  792.                     s.Disabled=false
  793.                   end
  794.               end)
  795.           end
  796.         if v and v.Character then
  797.             table.foreach(v.Character:children(), function(_, s)
  798.                 if s:IsA('LocalScript') then
  799.                     s.Disabled=true
  800.                     s.Parent=plr.Backpack
  801.                     s.Disabled=false
  802.                   end
  803.               end)
  804.           end
  805.         if v and v.PlayerGui then
  806.             table.foreach(v.PlayerGui:children(), function(_, s)
  807.                 if s:IsA('LocalScript') then
  808.                     s.Disabled=true
  809.                     s.Parent=plr.Backpack
  810.                     s.Disabled=false
  811.                   end
  812.               end)
  813.           end
  814.     end)
  815. end)]]--
  816.  
  817. Lapis.Core.AddCommand('cmds', 'Commands', 0, 'Displays commands', function(plr)
  818.   local msg=Lapis.Functions.GetRank(plr)
  819.   Lapis.Core.Dismiss(plr)
  820.   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Dismiss', 'Really red',  0, function() Lapis.Core.Dismiss(plr) end)
  821.   for _, v in pairs(Lapis.Core.Commands) do
  822.       if v.Rank <= msg then
  823.             Lapis.Core.Output(plr, v.Name, Lapis.Functions.GetColor(plr), Lapis.Functions.GetImage(plr), function()
  824.               Lapis.Core.Dismiss(plr)
  825.                   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Name: '..v.Name, 'Teal')
  826.                   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Desc: '..v.Desc, 'Deep orange')
  827.                   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Rank: '..v.Rank, 'New Yeller')
  828.                   if Lapis.Functions.GetRank(plr) < v.Rank then
  829.                      Lapis.Core.Output(plr, '[ WARN ] You cannot run this command', 'Deep orange')
  830.                     end
  831.                   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Usage: '..v.Say, 'Lime green')
  832.                   Lapis.Core.Output(plr, '[ LAPIS LAZULI ] Dismiss', 'Really red',  0, function() Lapis.Core.Dismiss(plr) end)
  833.               end)
  834.         end
  835.     end
  836. end)
  837.  
  838. Lapis.Core.Chatted = function(speaker, message, logchat)
  839. if message:sub(1, 2) == '/e' then
  840. if #message > 3 then
  841. message = message:sub(4)
  842. end
  843. elseif message:sub(1, 1) == '/' then
  844. if #message > 2 then
  845. message = message:sub(2)
  846. end
  847. end
  848.  
  849. if logchat == nil or logchat == true then
  850. table.insert(Lapis.ChatLogs, {['Name'] = speaker.Name, ['ID'] = speaker.userId, ['Message'] = message})
  851. end
  852.  
  853. local command=message
  854. for _, CMDS in pairs(Lapis.Core.Commands) do
  855. if command:sub(1, #CMDS['Say']+#key) == CMDS['Say']..key then
  856. if Lapis.Functions.GetRank(speaker) >= CMDS['Rank'] then
  857. local msg = command:sub(#CMDS["Say"]+#key+1)
  858. a,b = ypcall(function()
  859.                                         CMDS["Func"](speaker, msg)
  860.         end)
  861.         if not a then warn(b) end
  862.         else
  863.         Lapis.Core.Output(speaker, 'You do not have the required rank: '..CMDS['Rank']..'!', 'Really red')
  864. end
  865. end
  866. end
  867. end
  868.  
  869. Lapis.silentChatted = function(speaker, message)
  870.   Lapis.Core.Chatted(speaker, message, false)  
  871. end
  872.  
  873. Lapis.Core.AddCommand('logs', 'ChatLogs', 5, 'Displays the chat logs', function(plr)
  874.   Lapis.Core.Dismiss(plr)
  875.     Lapis.Core.Output(plr, 'Clear all chatlogs', 'Deep orange', nil, function() Lapis.ChatLogs = {} Lapis.silentChatted(plr, 'logs'..key) end)
  876.     Lapis.Core.Output(plr, 'Display all chatlogs', 'Teal', nil, function()
  877.       Lapis.Core.Dismiss(plr)
  878.       for _, v in pairs(Lapis.ChatLogs) do
  879.         Lapis.Core.Output(plr, v['Name']..' : '..v['Message'], 'New Yeller', 0)
  880.           end
  881.       end)
  882.   for _, pl in pairs(Lapis.Players) do
  883.     Lapis.Core.Output(plr, pl['Name'], Lapis.Functions.GetColor(pl['Name']), Lapis.Functions.GetImage(pl['Name']), function()
  884.       Lapis.Core.Dismiss(plr)
  885.       Lapis.Core.Output(plr, 'Showing chat logs for: '..pl['Name'], 'New Yeller', 0)
  886.     for _, v in pairs(Lapis.ChatLogs) do
  887.         if v['Name']  == pl['Name'] then
  888.         Lapis.Core.Output(plr, v['Message'], 'New Yeller', 0)
  889.                 end
  890.               end
  891.           end)
  892.     end
  893. end)
  894.  
  895.  
  896. inPlrsTable = function(plr)
  897.   local f=false
  898.   table.foreach(Lapis.Players, function(i,v)
  899.         if v['Name'] == plr.Name then
  900.           f=true
  901.           end
  902.     end)
  903.     return f
  904. end
  905.  
  906. game:service'Players'.PlayerAdded:connect(function(v)
  907.   if inPlrsTable(v) == false then
  908.   table.insert(Lapis.Players, {['Name'] = v.Name, ['ID'] = v.userId})
  909.   end
  910.   if Lapis.Functions.GetRank(v) == 'UNKNOWN' then
  911.     table.insert(Lapis.Ranked, {['Name'] = v.Name, ['Rank'] = 0, ['Description'] = 'A normal player', ['Color'] = Lapis.Functions.GetColor(v), ['WaterRot'] = true, ['Image'] = Lapis.Functions.GetImage(v)})
  912.   for _,p in pairs(game:service'Players':players'') do
  913.       if p.Name ~= v.Name then
  914.     Lapis.Core.Output(p, '[ LAPIS LAZULI ] Player: '..v.Name..' has joined!', 'Lime green')
  915.     end
  916.   end
  917.         elseif Lapis.Functions.GetRank(v) == -1 then
  918.       Lapis.Sources.Kick(v)
  919.       for _,p in pairs(game:service'Players':players'') do
  920.           Lapis.Core.Output(p, 'Player: '..v.Name..' was kicked for: '..Lapis.Functions.GetReason(v), 'Really red')
  921.         end
  922.           elseif Lapis.Functions.GetRank(v) == -2 then
  923.       Lapis.Sources.Crash(v)
  924.       for _,p in pairs(game:service'Players':players'') do
  925.           Lapis.Core.Output(p, 'Player: '..v.Name..' was crashed for: '..Lapis.Functions.GetReason(v), 'Really red')
  926.         end
  927.     end
  928.       if PriEnabled==true and Lapis.Functions.GetPri(v) == false then
  929.       Lapis.Sources.Kick(v)
  930.     end
  931. v.Chatted:connect(function(m) Lapis.Core.Chatted(v, m) end)
  932.   if Lapis.Functions.GetRank(v) >= 2 then
  933.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Welcome to Lapis Lazuli!', 'Really blue',  'rbxassetid://237033460')
  934.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Version: '..Lapis.Information.Version, 'Lime green',  0)
  935.     --Lapis.Core.Output(v, '[ LAPIS LAZULI ] Runner: '..Lapis.Information.Owner.Name, 'Deep orange',  'rbxassetid://50540825')
  936.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] You\'re rank: '..Lapis.Functions.GetRank(v), nil,  'rbxassetid://237033460')
  937.     if Lapis.Functions.GetWaterRot(v) == true then
  938.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Water Rotation: Yes absolutely!', 'Teal',  Lapis.Functions.GetImage(v))
  939.     else
  940.       Lapis.Core.Output(v, '[ LAPIS LAZULI ] Water Rotation: Nope', 'Teal',  Lapis.Functions.GetImage(v))
  941.     end
  942.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Dismiss', 'Really red',  0, function() Lapis.Core.Dismiss(v) end)
  943.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Click here or say cmds'..key..' to open commands', 'New Yeller',  0, function() Lapis.Core.Chatted(v, 'cmds'..key) end)
  944.     end
  945. end)
  946.  
  947. for _,v in pairs(game:service'Players':players'') do
  948.   table.insert(Lapis.Players, {['Name'] = v.Name, ['ID'] = v.userId})
  949.   if Lapis.Functions.GetRank(v) == 'UNKNOWN' then
  950.     table.insert(Lapis.Ranked, {['Name'] = v.Name, ['Rank'] = 0, ['Description'] = 'A normal player', ['Color'] = Lapis.Functions.GetColor(v), ['WaterRot'] = true, ['Image'] = Lapis.Functions.GetImage(v)})
  951.     elseif Lapis.Functions.GetRank(v) == -1 then  
  952.       Lapis.Sources.Kick(v)
  953.       for _,p in pairs(game:service'Players':players'') do
  954.           Lapis.Core.Output(p, 'Player: '..v.Name..' was kicked for: '..Lapis.Functions.GetReason(v), 'Really red')
  955.         end
  956.           elseif Lapis.Functions.GetRank(v) == -2 then
  957.       Lapis.Sources.Crash(v)
  958.       for _,p in pairs(game:service'Players':players'') do
  959.           Lapis.Core.Output(p, 'Player: '..v.Name..' was crashed for: '..Lapis.Functions.GetReason(v), 'Really red')
  960.         end
  961.     end
  962.     if PriEnabled==true and Lapis.Functions.GetPri(v) == false then
  963.       Lapis.Sources.Kick(v)
  964.     end
  965.   v.Chatted:connect(function(m) Lapis.Core.Chatted(v, m) end)
  966.     if Lapis.Functions.GetRank(v) >= 2 then
  967.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Welcome to Lapis Lazuli!', 'Really blue',  'rbxassetid://237033460')
  968.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Version: '..Lapis.Information.Version, 'Lime green',  0)
  969.     --Lapis.Core.Output(v, '[ LAPIS LAZULI ] Runner: '..Lapis.Information.Owner.Name, 'Deep orange',  'rbxassetid://50540825')
  970.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] You\'re rank: '..Lapis.Functions.GetRank(v), 'Teal',  Lapis.Functions.GetImage(v))
  971.     if Lapis.Functions.GetWaterRot(v) == true then
  972.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Water Rotation: Yes absolutely!', 'Teal',  Lapis.Functions.GetImage(v))
  973.     else
  974.       Lapis.Core.Output(v, '[ LAPIS LAZULI ] Water Rotation: Nope', 'Teal',  Lapis.Functions.GetImage(v))
  975.     end
  976.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Dismiss', 'Really red',  0, function() Lapis.Core.Dismiss(v) end)
  977.     Lapis.Core.Output(v, '[ LAPIS LAZULI ] Click here or say cmds'..key..' to open commands', 'New Yeller',  0, function() Lapis.Core.Chatted(v, 'cmds'..key) end)
  978.     end
  979. end
  980.  
  981. game:service'Players'.PlayerRemoving:connect(function(v)
  982. Lapis.Core.Dismiss(v)
  983.   for _,p in pairs(game:service'Players':players'') do
  984.       if p.Name ~= v.Name and Lapis.Functions.GetNotify(p.Name) and PriEnabled==false then
  985.     Lapis.Core.Output(p, '[ LAPIS LAZULI ] Player: '..v.Name..' has left!', 'Bright red')
  986.     end
  987.   end
  988. end)
  989.  
  990. local tickstart=tick();
  991. local wave=0
  992. local waveinc=1
  993. game:service'RunService'.Heartbeat:connect(function()
  994.   wave=wave+waveinc
  995.   a,b = ypcall(function()
  996.           for _, Player in pairs(game:service'Players':players'') do
  997.                 local Tablets = {}
  998.                 for i,v in pairs(Lapis.Core.Tablets) do
  999.                   if v.Tab.Parent and v.Tab2.Parent and v.Player == Player then
  1000.                       table.insert(Tablets, v)
  1001.                     end
  1002.                 end
  1003.                 for i = 1, #Tablets do
  1004.                       local tab=Tablets[i].Tab
  1005.                       local tab2=Tablets[i].Tab2
  1006.                       local pos=nil
  1007.                       ypcall(function()
  1008.                           pos = Player.Character.Torso.CFrame
  1009.                         end)
  1010.                       local PlayerTablets=Tablets
  1011.                       local x = math.sin(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+1.3)
  1012.                       local z = math.cos(time()/#PlayerTablets + (math.pi*2)/#PlayerTablets*i) * (#PlayerTablets+1.3)
  1013.                       local cPos = tab.Position
  1014.                       local ePos = Vector3.new(x, 0, z) + (pos.p or Vector3.new(0, -3, 0))
  1015.                       local nPos = (ePos-cPos)*.25
  1016.                       cPos = cPos + nPos
  1017.                       local t = (tick() - tickstart) % 90
  1018.                       local change = 0.0025
  1019.                       if Lapis.Functions.GetWaterRot(Player.Name) == true then
  1020.                         tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -3, 0))) * CFrame.Angles(math.rad(10), 0, 0) * CFrame.new(0, math.sin(t)*.3, 0) * CFrame.Angles(0,0,math.sin(t)*.7)
  1021.                         --tab2.CFrame=tab.CFrame*CFrame.Angles(-math.rad(wave), -math.rad(wave), -math.rad(wave))
  1022.                         tab2.CFrame=tab.CFrame
  1023.                       else
  1024.                        tab.CFrame = CFrame.new(cPos, (pos.p or Vector3.new(0, -3, 0))) * CFrame.Angles(math.rad(10), 0, 0)
  1025.                          tab2.CFrame=tab.CFrame
  1026.                         end
  1027.                   end
  1028.             end
  1029.       end) if not a then print(b) end
  1030.   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!