daily pastebin goal
32%
SHARE
TWEET

Untitled

gecksad Dec 9th, 2018 (edited) 70 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --]]
  2. --https://github.com/Mokiros/roblox-FE-compatibility
  3. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  4. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  5. local RealPlayer = Player
  6. do print("FE Compatibility code by Mokiros")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end
  7.  
  8. version = 5.2
  9. wait(.1)
  10. script.Parent=nil
  11. local lp = game.Players.LocalPlayer
  12. local pt = {}
  13. local pt2 = {}
  14. local pt3 = {}
  15. local rad = math.rad
  16. local pi = math.pi
  17. local cf = CFrame.new
  18. local ca = CFrame.Angles
  19. local mr = math.random
  20. local count = 0
  21. local bcount = 0
  22. local mode = "origin"
  23. local bc = BrickColor.new
  24. local slct = 0
  25. local speed = 1
  26. local guit = {}
  27. local send = cf()
  28. local as = 4
  29. local events = {}
  30. local fragdeb = false
  31. local ignore = {}
  32. local armloop = false
  33. local grab = nil
  34. local gdist = -5
  35. local tim = 0
  36. local c2timer = 0
  37. local banned = {}
  38. local cmds = {}
  39. local clogs = {}
  40. local bet = "!"
  41.  
  42. --[["The best ever!"]]--
  43.  
  44. local lerp = function(a,b,c)
  45.     return a+(b-a)*c
  46. end
  47.  
  48. local clerp = function(c1,c2,t)
  49.         return c1:lerp(c2,t)
  50. end
  51.  
  52. local ClrLerp = function(Mesh,Clr2,Step)
  53.     Clr1 = Mesh.VertexColor
  54.     Mesh.VertexColor = Vector3.new(lerp(Clr1.X,Clr2.X,Step),lerp(Clr1.Y,Clr2.Y,Step),lerp(Clr1.Z,Clr2.Z,Step))
  55. end
  56.  
  57. local GetDiscoColor = function(hue)
  58.   local section = hue % 1 * 3
  59.     local secondary = 0.5 * math.pi * (section % 1)
  60.   if section < 1 then
  61.     return Vector3.new(1, 1 - math.cos(secondary), 1 - math.sin(secondary))
  62.   elseif section < 2 then
  63.     return Vector3.new(1 - math.sin(secondary), 1, 1 - math.cos(secondary))
  64.   else
  65.     return Vector3.new(1 - math.cos(secondary), 1 - math.sin(secondary), 1)
  66.   end
  67. end
  68.  
  69. local new = function(Object, Parent, Data)
  70.     local Object = Instance.new(Object)
  71.     for Index, Value in pairs(Data or {}) do
  72.         Object[Index] = Value
  73.     end
  74.     Object.Parent = Parent
  75.     return Object
  76. end
  77.  
  78. local intable = function(tab, obj)
  79.     for _, v in ipairs(tab) do
  80.         if v == obj then
  81.             return _
  82.         end
  83.     end
  84.     return 0
  85. end
  86.  
  87. local so = function(id,par,lo,pi,tm)
  88.   Spawn(function()
  89.     local s = new("Sound",par,{Looped=lo;Pitch=pi;SoundId = "http://roblox.com/asset/?id="..id})
  90.     wait() -- tnx anti
  91.     s:play()
  92.     s.Volume=.8
  93.     game.Debris:AddItem(s,tm)
  94.     end)
  95.   return s
  96. end
  97.  
  98. local Lightning = function(Start,End,Times,Offset,Color,Thickness)
  99.   local magz = (Start - End).magnitude
  100.   local curpos = Start
  101.   local trz = {-Offset,Offset}
  102.   for i=1,Times do
  103.     local li = new("Part",workspace,{Size=Vector3.new(Thickness,Thickness,magz/Times);BrickColor=bc('White');CanCollide=false;Anchored=true})
  104.     local m = new("SpecialMesh",li,{MeshId='rbxassetid://9856898';Scale=Vector3.new(Thickness*2,Thickness*2,magz/Times*2);TextureId='http://www.roblox.com/asset/?id=55687933';VertexColor = Color})
  105.     local ofz = Vector3.new(trz[math.random(1,2)],trz[math.random(1,2)],trz[math.random(1,2)])
  106.     local trolpos = cf(curpos,End)*cf(0,0,magz/Times).p+ofz
  107.     if Times == i then
  108.       local magz2 = (curpos - End).magnitude li.Size = Vector3.new(Thickness,Thickness,magz2)
  109.       li.CFrame = cf(curpos,End)*cf(0,0,-magz2/2)
  110.     else
  111.       li.CFrame = cf(curpos,trolpos)*cf(0,0,magz/Times/2)
  112.     end
  113.     curpos = li.CFrame*cf(0,0,magz/Times/2).p
  114.     game.Debris:AddItem(li,.3)
  115.     Spawn(function()
  116.       for i=1,10 do
  117.         game:service"RunService".RenderStepped:wait()
  118.         li.Transparency = li.Transparency+.1
  119.       end
  120.       li:Destroy()
  121.     end)
  122.   end
  123. end
  124.  
  125. local explosion = function(col1,col2,cfr,sz,rng)
  126.     local a = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true})
  127.     local a2 = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true})
  128.     local a3 =  new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true})
  129.     v1,v2,v3=sz.x,sz.y,sz.z
  130.     local m = new("SpecialMesh",a,{MeshId='rbxassetid://1185246';Scale=Vector3.new(v1,v2,v3);TextureId='http://www.roblox.com/asset/?id=55687933';VertexColor = col1})
  131.     local m2 = new("SpecialMesh",a2,{MeshId='rbxassetid://9856898';Scale=Vector3.new(v1/3*2,v2/3*2,v3/3*2);TextureId='http://www.roblox.com/asset/?id=55687933';VertexColor = col2})
  132.     local m3 = new("SpecialMesh",a3,{MeshId='rbxassetid://9856898';Scale=Vector3.new(v1/3*2,v2/3*2,v3/3*2);TextureId='http://www.roblox.com/asset/?id=55687933';VertexColor = col2})
  133.     a.CFrame=cfr
  134.     a2.CFrame=cfr*CFrame.Angles(math.random(),math.random(),math.random())
  135.     a3.CFrame=cfr*CFrame.Angles(math.random(),math.random(),math.random())
  136.     for i,v in pairs(workspace:children()) do
  137.     if v:IsA("Model") and v:findFirstChild("Humanoid") then
  138.         if v:findFirstChild("Head") and v:findFirstChild("Torso") then
  139.       if (v:findFirstChild("Torso").Position - a.Position).magnitude < rng and v.Name ~= lp.Character.Name then
  140.             v:BreakJoints()
  141.         end
  142.         end
  143.     end
  144.     end
  145.     game.Debris:AddItem(a,.6)
  146.     game.Debris:AddItem(a2,.6)
  147.     game.Debris:AddItem(a3,.6)
  148.     Spawn(function()
  149.     while true do
  150.         game:service"RunService".RenderStepped:wait()
  151.         if a.Transparency >= 1 then a:Destroy() a2:Destroy() a3:Destroy() break end
  152.       m.Scale=m.Scale+Vector3.new(.1,0.1,0.1)
  153.       m2.Scale=m2.Scale+Vector3.new(.1,0.1,0.1)
  154.       m3.Scale=m3.Scale+Vector3.new(.1,0.1,0.1)
  155.       a2.CFrame=a2.CFrame*CFrame.Angles(math.rad(2),math.rad(2),math.rad(2))
  156.       a3.CFrame=a3.CFrame*CFrame.Angles(-math.rad(2),-math.rad(2),-math.rad(2))
  157.       a.Transparency=a.Transparency+0.05
  158.       a2.Transparency=a2.Transparency+0.05
  159.       a3.Transparency=a3.Transparency+0.05
  160.     end
  161.   end)
  162. end
  163.  
  164. local frag = function(hit)
  165.     local t = {}
  166.     local A = {-1, 1}
  167.     if hit.Name ~= "Base" and hit.Name ~= "adpart" and hit.Parent ~= lp.Character and hit.Parent.Parent ~= lp.Character and fragdeb ~= true then
  168.         so("201858024",ch.Torso,false,math.random(7,11)/10,4)
  169.         fragdeb = true
  170.         hit:BreakJoints()
  171.         local X, Y, Z = 0, 0, 0
  172.         for x = 1, 2 do
  173.             if hit.Size.X > 1 then
  174.                 X = hit.Size.X/2
  175.             end
  176.             for y = 1, 2 do
  177.                 if hit.Size.Y > 1 then
  178.                     Y = hit.Size.Y/2
  179.                 end
  180.                 for z = 1, 2 do
  181.                     if hit.Size.Z > 1 then
  182.                         Z = hit.Size.Z/2
  183.                     end
  184.                     local obj = Vector3.new(X*A[x],Y*A[y],Z*A[z])
  185.                     if intable(t, obj) == 0 and (X ~= 0 or Y ~= 0) and (X ~= 0 or Z ~= 0)  and (Y ~= 0 or Z ~= 0) then
  186.                         table.insert(t, obj)
  187.                     end
  188.                 end
  189.             end
  190.         end
  191.         if #t > 0 then
  192.             local h = hit:clone()
  193.             local par = hit.Parent
  194.             hit:Destroy()
  195.             hit = h:clone()
  196.             for _, v in ipairs(t) do
  197.                 local n = hit:clone()
  198.                 --n.FormFactor = "Custom"
  199.                 n.Size = hit.Size/2
  200.                 local x,y,z = hit.CFrame:toEulerAnglesXYZ()
  201.                 n.CFrame = CFrame.new(v/2)*CFrame.Angles(x,y,z) +hit.Position
  202.                 n.Rotation = hit.Rotation
  203.                 n.Velocity = Vector3.new(0,0,0)
  204.                 n.RotVelocity = Vector3.new(0,0,0)
  205.                 n.Parent = par
  206.                 if n.Size.X <= 1 or n.Size.Z <= 1 then n.Anchored = false;n:BreakJoints();n.Velocity=Vector3.new(math.random(-10,10),math.random(-10,10),math.random(-10,10)) spawn(function() for i=1,10 do wait() n.Transparency=n.Transparency+.1 end n:Destroy() end) end
  207.                 n:BreakJoints()
  208.             end
  209.         end
  210.     end
  211.     wait()
  212.     fragdeb = false
  213. end
  214.  
  215. local notif = function(txt)
  216.     for i,v in pairs(guit) do
  217.         v.Position = v.Position - UDim2.new(0,0,0.03,0)
  218.     end
  219.     local notif = new("TextLabel",notificationbin,{TextWrapped = true;TextStrokeTransparency = 0;BorderSizePixel = 2;TextScaled = true;BackgroundColor3 = Color3.new(0, 0, 0);BackgroundTransparency = 0.5;Size = UDim2.new(0.2, 0, 0.02, 0);TextColor3 = Color3.new(1, 1, 1);BorderColor3 = Color3.new(1, 1, 1);Text = "{Notification}:"..txt;Position = UDim2.new(0.395, 0, 0.942, 0);TextXAlignment = Enum.TextXAlignment.Left})
  220.     so("205318910",lp.PlayerGui,false,1)
  221.     table.insert(guit,notif)
  222.     spawn(function() wait(5)
  223.         for i=1,20 do wait()
  224.             notif.BackgroundTransparency = notif.BackgroundTransparency +.05
  225.             notif.TextTransparency = notif.TextTransparency +.05
  226.             notif.TextStrokeTransparency = notif.TextStrokeTransparency +.05
  227.         end
  228.         notif:Destroy()
  229.         table.remove(guit,1)
  230.     end)
  231. end
  232.  
  233. local makeg = function()
  234.     local jlgui = new("ScreenGui",lp.PlayerGui,{Name="JL_gui"})
  235.     local frame = new("Frame",jlgui,{Size = UDim2.new(0.2, 0, 0.025, 0);BorderColor3 = Color3.new(1, 1, 1);Position = UDim2.new(0.395, 0, 0.97, 0);BorderSizePixel = 2;BackgroundTransparency = 0.5;BackgroundColor3 = Color3.new(0, 0, 0)})
  236.     local textlabel = new("TextLabel",frame,{TextStrokeTransparency = 0;BorderSizePixel = 0;BackgroundColor3 = Color3.new(0, 0, 0);BackgroundTransparency = 0.9;Size = UDim2.new(0.2, 0, 1, 0);TextColor3 = Color3.new(1, 1, 1);Text = "Execute >";TextXAlignment = Enum.TextXAlignment.Right})
  237.     textbox = new("TextBox",frame,{TextStrokeTransparency = 0;BackgroundColor3 = Color3.new(0, 0, 0);Position = UDim2.new(0.201, 0, 0, 0);Size = UDim2.new(0.785, 0, 1, 0);BackgroundTransparency = 0.9;Text = "Press [R-CTRL] to focus";TextColor3 = Color3.new(1, 1, 1);TextXAlignment = Enum.TextXAlignment.Left})
  238.     local frame_2 = new("Frame",frame,{Size = UDim2.new(0.2, 0, 1, 0);BorderColor3 = Color3.new(1, 1, 1);Position = UDim2.new(1.02, 0, 0, 0);BorderSizePixel = 2;BackgroundTransparency = 0.5;BackgroundColor3 = Color3.new(0, 0, 0)})
  239.     textlabel_2 = new("TextLabel",frame_2,{TextStrokeTransparency = 0;BorderSizePixel = 0;BackgroundColor3 = Color3.new(0, 0, 0);BackgroundTransparency = 0.9;Size = UDim2.new(1, 0, 1, 0);TextColor3 = Color3.new(1, 1, 1);BorderColor3 = Color3.new(0, 0, 0);Text = "FPS:n/a"})
  240.     local frame_3 = new("Frame",frame,{Size = UDim2.new(0.2, 0, 1, 0);BorderColor3 = Color3.new(1, 1, 1);Position = UDim2.new(-.222, 0, 0, 0);BorderSizePixel = 2;BackgroundTransparency = 0.5;BackgroundColor3 = Color3.new(0, 0, 0)})
  241.     local textlabel_3 = new("TextLabel",frame_3,{TextStrokeTransparency = 0;BorderSizePixel = 0;BackgroundColor3 = Color3.new(0, 0, 0);BackgroundTransparency = 0.9;Size = UDim2.new(1, 0, 1, 0);TextColor3 = Color3.new(1, 1, 1);BorderColor3 = Color3.new(0, 0, 0);Text = "JarLore V"..version})
  242.     notificationbin = Instance.new("Folder", jlgui,{Name="Notification_bin"})
  243.     listbin = Instance.new("Folder", jlgui,{Name="List_bin"})
  244.     textbox.FocusLost:connect(function()
  245.         local msg = textbox.Text
  246.         local usedACommand=false
  247.         for i,v in pairs(cmds) do
  248.             if msg:lower():match(bet..v.Usage:lower()..'% ?') and usedACommand==false then
  249.                 usedACommand=true
  250.                 local Run, Error = ypcall(function()
  251.                     spawn(function()
  252.                         v.Function(lp.Name,msg:lower():match(bet..v.Usage:lower()..'%>?(.+)')or'')
  253.                     end)
  254.                 end)
  255.                 if Error then
  256.                     notif(Error)
  257.                 end
  258.             end
  259.         end
  260.         textbox.Text = "Press [R-CTRL] to focus"
  261.     end)
  262. end
  263.  
  264. local makelist = function(na,list)
  265.     local pos = -7
  266.     local frame = new("Frame", listbin,{Size = UDim2.new(0.15, 0, 0.25, 0);BorderColor3 = Color3.new(1, 1, 1);Position = UDim2.new(0.65, 0, 0.745, 0);BorderSizePixel = 2;BackgroundTransparency = 0.5;BackgroundColor3 = Color3.new(0, 0, 0)})
  267.     local textlabel = new("TextBox", frame,{TextStrokeTransparency = 0;BorderSizePixel = 2;BackgroundColor3 = Color3.new(0, 0, 0);Position = UDim2.new(0.01, 0, 0.005, 0);Size = UDim2.new(0.8, 0, 0.1, 0);BackgroundTransparency = 0.9;BorderColor3 = Color3.new(1, 1, 1);TextColor3 = Color3.new(1, 1, 1);Text=na})
  268.     local scrollingframe = new("ScrollingFrame", frame,{Size = UDim2.new(1, 0, 0.87, 0);CanvasSize=UDim2.new(0,0,0,0);MidImage = "rbxassetid://65372937";BorderColor3 = Color3.new(1, 1, 1);ScrollBarThickness = 7;TopImage = "rbxassetid://65372937";Position = UDim2.new(0, 0, 0.125, 0);BottomImage = "rbxassetid://65372937";BackgroundTransparency = 0.9;BackgroundColor3 = Color3.new(0, 0, 0)})
  269.     local textbutton = new("TextButton", frame,{TextStrokeTransparency = 0;BorderSizePixel = 2;BackgroundColor3 = Color3.new(0, 0, 0);BackgroundTransparency = 0.9;Size = UDim2.new(0.16, 0, 0.1, 0);Position = UDim2.new(0.83, 0, 0.005, 0);BorderColor3 = Color3.new(1, 1, 1);Text = "X";TextColor3 = Color3.new(1, 1, 1)})
  270.     for i,v in pairs(list) do
  271.         local textlabel2 = new("TextLabel", scrollingframe,{TextStrokeTransparency = 0;BorderSizePixel = 0;BackgroundColor3 = Color3.new(0, 0, 0);BackgroundTransparency = 0.9;Size = UDim2.new(1, 0, 0, 20);TextColor3 = Color3.new(1, 1, 1);TextXAlignment = Enum.TextXAlignment.Left;Text=v})
  272.         textlabel2.Position = UDim2.new(0,0,0,pos+7)
  273.         pos = pos + 25
  274.         scrollingframe.CanvasSize = UDim2.new(0,0,0,pos+15)
  275.     end
  276.     textbutton.MouseButton1Click:connect(function()
  277.         frame:Destroy()
  278.     end)
  279. end
  280.  
  281. local efx = function(part)
  282.     if not part then return end
  283.     local Num = 0
  284.     local efxs = {}
  285.     for i = 1,6 do
  286.         local p = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true;CFrame=part.CFrame})
  287.         local msh = new("SpecialMesh",p,{Scale=Vector3.new(1.55,.5,.5);MeshId='rbxassetid://9756362';TextureId='rbxassetid://25701026';VertexColor=GetDiscoColor(i/10)})
  288.         table.insert(efxs,p)
  289.         local p=new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true;CFrame=part.CFrame})
  290.         msh=new("SpecialMesh",p,{Scale=Vector3.new(1.2,.5,.5);MeshId='rbxassetid://9756362';TextureId='rbxassetid://25701026';VertexColor=GetDiscoColor(i/10+1.2)})
  291.         table.insert(efxs,p)
  292.     end
  293.     for i=1,50 do wait()
  294.         Num=Num+.1
  295.         for i,v in pairs(efxs)do
  296.           if(i<7)then
  297.                 v.CFrame = clerp(v.CFrame,cf(part.CFrame.p)*cf(0,-math.sin(Num)*3,0)*ca(0,1.55+Num+math.rad(360/6)*i,0)*cf(3,0,0),.1)
  298.             else
  299.               v.CFrame = clerp(v.CFrame,cf(part.CFrame.p)*cf(0,math.sin(Num)*3,0)*ca(0,-Num+math.rad(360/6)*i,0)*cf(3,0,0),.1)
  300.             end
  301.         end
  302.     end
  303.     for i=1,10 do wait()
  304.         for i,v in pairs(efxs)do
  305.             ClrLerp(v.Mesh,Vector3.new(0,0,0),.3)
  306.             v.Mesh.Scale=v.Mesh.Scale+Vector3.new(-.15,0,0)
  307.         end
  308.     end
  309.     for i,v in pairs(efxs)do
  310.         v:Destroy()
  311.     end
  312.     efxs={}
  313. end
  314.  
  315.  
  316. local GetPlrs = function(Msg)
  317.     local R = {}
  318.     if Msg:lower() == "all" then
  319.         for i,v in pairs(game:GetService("Players"):GetPlayers()) do
  320.             table.insert(R, v)
  321.         end
  322.     else
  323.         for i,v in pairs(game:GetService("Players"):GetPlayers()) do
  324.             if v.Name:lower():sub(1 ,#Msg)==Msg:lower() then
  325.                 table.insert(R, v)
  326.             end
  327.         end
  328.     end
  329.     return R
  330. end
  331.  
  332. local AddCmd = function(Name, Usage, Description, Function)
  333.   cmds[Name] = {Name = Name, Usage = Usage, Description = Description, Function = Function}
  334. end
  335.  
  336. local fixcol = function()
  337.     for i=1,#pt do pt[i].BrickColor = bc("White") end
  338. end
  339.  
  340. local np = function(sz,col)
  341.   local new = new("Part",workspace,{Size=Vector3.new(0,sz,0);BrickColor=BrickColor.new(col);CanCollide=false;Anchored=true;Locked=true;Name="adpart"})
  342.   return new
  343. end
  344.  
  345. local pointa = function(var)
  346.     if var == true then
  347.         if armloop == false then
  348.             armloop=true
  349.         end
  350.     else
  351.         armloop=false
  352.         ch['Right Arm'].Anchored = false
  353.         armw.Parent = ch.Torso
  354.     end
  355. end
  356.  
  357. local fixspeed = function(spd)
  358.     repeat wait() speed = speed + .025 until speed >= spd
  359. end
  360.  
  361. local make = function()
  362.     for i=1,6 do
  363.         local a = np(1.2,"White")
  364.         table.insert(pt,a)
  365.         local a1 = np(1.4,"Black")
  366.         table.insert(pt2,a1)
  367.         local a2 = np(1.4,"Black")
  368.         table.insert(pt2,a2)
  369.         table.insert(pt3,a)
  370.         table.insert(pt3,a1)
  371.         table.insert(pt3,a2)
  372.     end
  373. end
  374.  
  375. --cmds--
  376. AddCmd('Kill','kill','Kills <player>',function(Spkr,Msg)
  377.   for _,player in next,GetPlrs(Msg)do
  378. spawn(function()
  379.     notif(player.Name.." was killed.")
  380.         efx(player.Character.Torso)
  381.     player.Character:BreakJoints()
  382. end)
  383.   end
  384. end)
  385.  
  386. AddCmd('Kick','kick','Kicks <player>',function(Spkr,Msg)
  387.   for _,player in next,GetPlrs(Msg)do
  388. spawn(function()
  389.     notif(player.Name.." was kicked.")
  390.         efx(player.Character.Torso)
  391.     player:Destroy()
  392. end)
  393.   end
  394. end)
  395.  
  396. AddCmd('God','god','Gods <player>',function(Spkr,Msg)
  397.   for _,player in next,GetPlrs(Msg)do
  398. spawn(function()
  399.     notif(player.Name.." was godded.")
  400.         efx(player.Character.Torso)
  401.     player.Character.Humanoid.MaxHealth=1e1000
  402. end)
  403.   end
  404. end)
  405.  
  406. AddCmd('UnGod','ungod','UnGods <player>',function(Spkr,Msg)
  407.   for _,player in next,GetPlrs(Msg)do
  408. spawn(function()
  409.     notif(player.Name.." was ungodded.")
  410.         efx(player.Character.Torso)
  411.     player.Character.Humanoid.MaxHealth=100
  412. end)
  413.   end
  414. end)
  415.  
  416. AddCmd('ForceField','ff','ForceFields <player>',function(Spkr,Msg)
  417.   for _,player in next,GetPlrs(Msg)do
  418. spawn(function()
  419.     notif(player.Name.." was given a forcefield.")
  420.         efx(player.Character.Torso)
  421.     Instance.new("ForceField",player.Character).Name="j_ff"
  422. end)
  423.   end
  424. end)
  425.  
  426. AddCmd('ForceField','unff','UnForceFields <player>',function(Spkr,Msg)
  427.   for _,player in next,GetPlrs(Msg)do
  428.     spawn(function()
  429.     notif(player.Name.."'s forcefield was removed.")
  430.         efx(player.Character.Torso)
  431.     player.Character:findFirstChild("j_ff"):Destroy()
  432. end)
  433.   end
  434. end)
  435.  
  436. AddCmd('Song','sng','Plays <song>',function(Spkr,Msg)
  437.   notif(Msg.." was played.")
  438.     spawn(function()
  439.         if not game:service"Workspace":FindFirstChild("jbcv_sound") then
  440.             local jbcv_sond=Instance.new("Sound",game:service"Workspace")
  441.             jbcv_sond.Name="jbcv_sound"
  442.             jbcv_sond.Looped=true
  443.             jbcv_sond.Volume=1
  444.         end
  445.         local sond=game:service"Workspace":FindFirstChild("jbcv_sound")
  446.         sond.Volume=0
  447.         sond.Pitch=0
  448.         sond:Stop()
  449.         wait()
  450.         sond.SoundId="rbxassetid://"..Msg
  451.         sond.Volume=1
  452.         sond.Pitch=1
  453.         sond:Play()
  454.     end)
  455. end)
  456.  
  457. AddCmd('Stop','stop','Stops <song>',function(Spkr,Msg)
  458.   notif("Song was stopped.")
  459.     local sond=game:service"Workspace":FindFirstChild("jbcv_sound")
  460.     sond.Volume=0
  461.     sond.Pitch=0
  462.     sond:Stop()
  463. end)
  464.  
  465. AddCmd('ShowLogs','clogs','Shows the chat logs for the server',function(Spkr,Msg)
  466.   notif("Showing chatlogs.")
  467.     makelist("ChatLogs",clogs)
  468. end)
  469.  
  470. AddCmd('Commands','cmds','Shows a list of admin commands.',function(Spkr,Msg)
  471.   notif("Showing commands.")
  472.     local cmdtab = {}
  473.     for i,v in pairs(cmds) do
  474.         table.insert(cmdtab," "..v.Name.." Usage:"..v.Usage)
  475.     end
  476.   makelist("Commands",cmdtab)
  477. end)
  478.  
  479.  
  480. lp:GetMouse().Button1Down:connect(function()
  481.     fixcol()
  482.     if mode == "select" then
  483.         so('233091183',ch.Torso,false,.8)
  484.         if slct == 1 then
  485.             pointa(false)
  486.             mode = "origin"
  487.             speed = .1
  488.             fixspeed(1)
  489.             return
  490.         elseif slct == 2 then
  491.             pointa(false)
  492.             mode = "ghost"
  493.             speed = .1
  494.             fixspeed(1)
  495.             return
  496.         elseif slct == 3 then
  497.             pointa(false)
  498.             mode = "float"
  499.             speed = .1
  500.             fixspeed(1)
  501.             return
  502.         elseif slct == 4 then
  503.             mode = "kenisis"
  504.             speed = .1
  505.             fixspeed(1)
  506.             return
  507.         elseif slct == 5 then
  508.             pointa(false)
  509.             mode = "saw"
  510.             speed = .1
  511.             fixspeed(1)
  512.             return
  513.         elseif slct == 6 then
  514.             pointa(false)
  515.             mode = "lightning"
  516.             speed = .1
  517.             fixspeed(1)
  518.             return
  519.         end
  520.     elseif mode == "ghost" then
  521.     so('200633455',ch.Torso,false,1)
  522.         mode = "light"
  523.         speed = .1
  524.         fixspeed(1)
  525.     elseif mode == "lightning" then
  526.         so('228343249',ch.Torso,false,.9)
  527.         color=GetDiscoColor(tick()*.5)
  528.         Lightning(guide.CFrame.p,lp:GetMouse().hit.p,math.random(5,10),math.random(-2.5,2.5),color,1.5)
  529.         explosion(color,GetDiscoColor(tick()*.3),CFrame.new(lp:GetMouse().hit.p),Vector3.new(30,30,30),20)
  530.     elseif mode == "kenisis" then
  531.     if lp:GetMouse().Target~=nil and grab == nil then
  532.       if lp:GetMouse().Target.ClassName=="Part" and lp:GetMouse().Target.Name~="Base" then
  533.         gdist = -(ch:findFirstChild("Right Arm").Position - lp:GetMouse().Target.CFrame.p).magnitude
  534.         grab=lp:GetMouse().Target
  535.         local dis = (ch:findFirstChild("Head").Position - workspace.CurrentCamera.CoordinateFrame.p).magnitude
  536.         lp.CameraMaxZoomDistance = dis
  537.         lp.CameraMinZoomDistance = dis
  538.       end
  539.     end
  540.     elseif mode == "float" then
  541.     so('233856106',ch.Torso,false,.9)
  542.         mode = "fly"
  543.         bg=Instance.new("BodyGyro",ch.Torso)
  544.     bv=Instance.new("BodyVelocity",ch.Torso)
  545.     bg.maxTorque = Vector3.new(math.huge,math.huge,math.huge)
  546.       bv.maxForce = Vector3.new(99e3,99e3,99e3)
  547.       if(ch.Humanoid.Sit ~= true)then ch.Humanoid.PlatformStand = true end
  548.         speed = .1
  549.         fixspeed(1)
  550.     elseif mode == "origin" then
  551.         tim = game:service'RunService'.Stepped:wait()
  552.         if (tim - c2timer < .2) then
  553.             c2timer = tim
  554.             speed = .15
  555.             send = lp:GetMouse().Hit.p
  556.             mode = "tele"
  557.             wait(.2)
  558.             so('161006033',ch.Torso,false,.9)
  559.             ch.Torso.CFrame = cf(send)*cf(0,3,0)*ca(0,ch.Torso.Rotation.Y,0)
  560.             speed = .05
  561.             mode="origin"
  562.             fixspeed(1)
  563.         else
  564.             wait(.15)
  565.         end
  566.         c2timer = tim
  567.     end
  568. end)
  569.  
  570. lp:GetMouse().Button2Down:connect(function()
  571.   if mode == "kenisis" and grab then
  572.     tim = game:service'RunService'.Stepped:wait()
  573.     if (tim - c2timer < .2) then
  574.       so('235097661',ch.Torso,false,1)
  575.       local shot = grab
  576.       grab=nil
  577.       shot.Velocity=(lp:GetMouse().Hit.p-ch["Right Arm"].Position).unit*375
  578.     else
  579.       wait(.15)
  580.     end
  581.     c2timer = tim
  582.   end
  583. end)
  584.  
  585. lp:GetMouse().Button1Up:connect(function()
  586.     if mode == "fly" then
  587.         mode = "float"
  588.     so('233856106',ch.Torso,false,.8)
  589.         bg:Destroy()
  590.     bv:Destroy()
  591.     ch.Humanoid.PlatformStand = false
  592.         ch.Torso.CFrame = cf(ch.Torso.CFrame.X,ch.Torso.CFrame.Y,ch.Torso.CFrame.Z)*ca(0,ch.Torso.Rotation.Y,0)
  593.         speed = .1
  594.         fixspeed(1)
  595.     elseif mode == "light" then
  596.     so('200633455',ch.Torso,false,.9)
  597.         mode = "ghost"
  598.         speed = .1
  599.         fixspeed(1)
  600.     elseif mode == "kenisis" then
  601.     grab = nil
  602.         lp.CameraMaxZoomDistance = 400
  603.         lp.CameraMinZoomDistance = 0.5
  604.     end
  605. end)
  606.  
  607. lp:GetMouse().KeyDown:connect(function(k)
  608.     k = k:lower()
  609.     if k == "e" and mode ~= "select" and mode ~= "fly" and mode ~= "light" then
  610.         so('233091183',ch.Torso,false,.9)
  611.         pointa(true)
  612.         mode = "select"
  613.         slct = 1
  614.         speed = .1
  615.         fixspeed(1)
  616.     elseif string.byte(k) == 49 then
  617.         textbox:CaptureFocus()
  618.     end
  619. end)
  620.  
  621. lp:GetMouse().WheelForward:connect(function()
  622.     if mode =="kenisis" then
  623.         gdist = gdist - 10
  624.     end
  625. end)
  626.  
  627. lp:GetMouse().WheelBackward:connect(function()
  628.     if mode =="kenisis" then
  629.     if gdist < -5 then
  630.             gdist = gdist + 10
  631.     end
  632.     end
  633. end)
  634.  
  635. guide = new("Part",workspace,{Size=Vector3.new(2,0,2);BrickColor=BrickColor.new("");CanCollide=false;Anchored=true;Locked=true;Transparency=1})
  636. pl = new("PointLight",guide,{Color=BrickColor.new("Bright orange").Color;Range=0})
  637. light = new("Fire",guide,{Size=3;Heat=0;Enabled=false})
  638. BP=new("BodyPosition",nil,{maxForce=Vector3.new(9990000, 9990000, 9990000);position=Vector3.new(0,0,0)})
  639. make()
  640.  
  641. local curplrs = game.Players:GetPlayers()
  642.  
  643. for i,v in pairs(curplrs) do
  644.     v.Chatted:connect(function(m)
  645.         table.insert(clogs,"["..v.Name.."]: "..m)
  646.     end)
  647. end
  648.  
  649. game:service"Players".ChildAdded:connect(function(p)
  650.     if p.ClassName == "Player" then
  651.         notif(p.Name.." has joined the server.")
  652.         p.Chatted:connect(function(m)
  653.             table.insert(clogs,"["..p.Name.."]: "..m)
  654.         end)
  655.     end
  656. end)
  657.  
  658. game:service"Players".ChildRemoved:connect(function(p)
  659.     if p.ClassName == "Player" then
  660.         notif(p.Name.." has left the server.")
  661.     end
  662. end)
  663.  
  664. game:service("RunService").Stepped:connect(function()
  665.     ch = lp.Character
  666.     bcount = 0
  667.   for i=1,#pt do
  668.         bcount = bcount + 2
  669.         if mode == "origin" then
  670.             count = count + .0025
  671.             if i <= 3 then
  672.                 pt[i].CFrame = clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*ca(0,count+rad(360/3)*i,0)*cf(2,-3,0)*ca(-pi/2,0,0),speed)
  673.             else
  674.                 pt[i].CFrame = clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*ca(0,-count-rad(360/3)*i,0)*cf(2.3,-3,0)*ca(pi/2,pi,0),speed)
  675.             end
  676.         elseif mode == "tele" then
  677.             pt[i].CFrame = clerp(pt[i].CFrame,cf(send)*ca(0,0,pi/2)*ca(-count-rad(360/6)*i,0,0)*cf(0,3,0)*ca(pi/2,-pi/2,0),speed)
  678.         elseif mode == "select" then
  679.             guide.CanCollide=false
  680.             ch.Humanoid.MaxHealth = 100
  681.             ch.Humanoid.WalkSpeed=16
  682.             pt[i].CFrame = clerp(pt[i].CFrame,ch.Torso.CFrame*ca(0,rad(-15)+rad(360/12)*i,0)*cf(5,0,0)*ca(pi/2,pi,0),speed)
  683.             if lp:GetMouse().Target == pt[i] then
  684.                 if i == 1 then
  685.                     pt[i].BrickColor = bc("")
  686.                     slct = i
  687.                 elseif i == 2 then
  688.                     pt[i].BrickColor = bc("Royal purple")
  689.                     slct = i
  690.                 elseif i == 3 then
  691.                     pt[i].BrickColor = bc("Lapis")
  692.                     slct = i
  693.                 elseif i == 4 then
  694.                     pt[i].BrickColor = bc("Lime green")
  695.                     slct = i
  696.                 elseif i == 5 then
  697.                     pt[i].BrickColor = bc("Really red")
  698.                     slct = i
  699.                 elseif i == 6 then
  700.                     pt[i].BrickColor = bc("New Yeller")
  701.                     slct = i
  702.                 end
  703.             else
  704.                 pt[i].BrickColor = bc("White")
  705.             end
  706.         elseif mode == "float" then
  707.             guide.CanCollide=true
  708.             count = count + .02
  709.             local goto = ch.Torso.CFrame*CFrame.new(0,-3,0)
  710.             if Vector3.new(0, ch.Torso.Velocity.y, 0).magnitude > 5 then
  711.                 guide.CFrame=CFrame.new(goto.X,goto.Y,goto.Z)
  712.             else
  713.                 guide.CFrame=CFrame.new(goto.X,guide.CFrame.Y,goto.Z)
  714.             end
  715.             if i <= 3 then
  716.                 pt[i].CFrame = clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*ca(0,count+rad(360/3)*i,0)*cf(4,-3,0)*ca(pi/2,pi-rad(30),0),speed)
  717.             else
  718.                 pt[i].CFrame = clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*ca(0,-count-rad(360/3)*i,0)*cf(4.3,-3,0)*ca(pi/2,pi+rad(30),0),speed)
  719.             end
  720.         elseif mode == "kenisis" then
  721.             count = count + .02
  722.       if grab ~= nil then
  723.         light.Enabled=true
  724.         BP.Parent=grab
  725.         a= ch["Right Arm"].CFrame*CFrame.new(0,gdist,0)*CFrame.Angles(math.rad(90),0,-math.rad(180))
  726.         BP.position=a.p
  727.       else
  728.         BP.Parent=nil
  729.         light.Enabled=false
  730.       end
  731.             light.Color = bc("Lime green").Color
  732.             guide.CFrame=ch['Right Arm'].CFrame*cf(0,-1.5,0)
  733.             local goto = ch.Torso.CFrame*CFrame.new(0,-3,0)
  734.             if i <= 3 then
  735.                 pt[i].CFrame = clerp(pt[i].CFrame,ch['Right Arm'].CFrame*ca(0,count+rad(360/3)*i,0)*cf(.5,-1,0)*ca(pi/2,pi-rad(130),0),speed)
  736.             else
  737.                 pt[i].CFrame = clerp(pt[i].CFrame,ch['Right Arm'].CFrame*ca(0,-count-rad(360/3)*i,0)*cf(.7,-1,0)*ca(pi/2,pi-rad(130),0),speed)
  738.             end
  739.         elseif mode == "ghost" then
  740.             local ff = new("ForceField",ch)
  741.             ch.Humanoid.MaxHealth = 100000
  742.             ch.Humanoid.Health = 100000
  743.             game.Debris:AddItem(ff,.001)
  744.             light.Enabled=false
  745.             ch.Humanoid.WalkSpeed=35
  746.             pl.Range=0
  747.             count = count + .005
  748.             if i <= 3 then
  749.                 pt[i].CFrame =  clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*cf(0,-math.sin(count)*3,0)*ca(0,1.55+count+math.rad(360/3)*i,0)*cf(3,0,0)*ca(0,pi,0),speed)
  750.             else
  751.                 pt[i].CFrame =  clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*cf(0,math.sin(count)*3,0)*ca(0,-count+math.rad(360/3)*i,0)*cf(3,0,0)*ca(0,pi,0),speed)
  752.             end
  753.             ypcall(function()
  754.                 ch.Torso.CanCollide = false
  755.                 ch.Head.CanCollide = false
  756.             end)
  757.         elseif mode == "light" then
  758.             ch.Humanoid.MaxHealth = 100
  759.             ch.Humanoid.WalkSpeed=16
  760.             guide.CFrame = CFrame.new(ch.Torso.CFrame.p)*CFrame.new(0,7,0)
  761.             light.Enabled=true
  762.             light.Color = bc("Bright orange").Color
  763.             pl.Range=60
  764.             count = count + .005
  765.             if i <= 3 then
  766.                 pt[i].CFrame =  clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*cf(0,7,0)*ca(count,count,count+math.rad(360/3)*i)*cf(1.5,0,0),speed)
  767.             else
  768.                 pt[i].CFrame =  clerp(pt[i].CFrame,cf(ch.Torso.CFrame.p)*cf(0,7,0)*ca(count+1.1,count,count+math.rad(360/3)*i)*cf(2.25,0,0)*ca(0,0,0),speed)
  769.             end
  770.             ypcall(function()
  771.                 ch.Torso.CanCollide = false
  772.                 ch.Head.CanCollide = false
  773.             end)
  774.         elseif mode == "fly" then
  775.             guide.CanCollide=false
  776.             Direction = CFrame.new(ch.Torso.Position,lp:GetMouse().Hit.p)
  777.             bg.cframe = Direction*CFrame.Angles(-1.55,0,0)
  778.             bv.velocity = lp:GetMouse().Hit.lookVector*50
  779.             count = count + .01
  780.             if i <= 3 then
  781.                 pt[i].CFrame = clerp(pt[i].CFrame,ch.Torso.CFrame*ca(0,count+rad(360/3)*i,0)*cf(2,-3,0)*ca(pi/2,rad(30),0),speed)
  782.             else
  783.                 pt[i].CFrame = clerp(pt[i].CFrame,ch.Torso.CFrame*ca(0,-count-rad(360/3)*i,0)*cf(2,3,0)*ca(pi/2,-rad(30),0),speed)
  784.             end
  785.         elseif mode == "saw" then
  786.             count = count + .015
  787.             local part = pt[i]
  788.             part.CFrame = clerp(pt[i].CFrame,ch.Torso.CFrame*ca(-count-rad(360/6)*i,0,0)*cf(0,3,0)*ca(pi/2,-pi/2,0),speed)
  789.             local shootpos = pt[i].CFrame*cf(-2,0,0)
  790.             local startpos = pt[i].CFrame*cf(-1.2,0,0)
  791.             local ray = Ray.new(startpos.p,(shootpos.p - startpos.p).unit*2)
  792.             local hit,position = game.Workspace:FindPartOnRayWithIgnoreList(ray,ignore)
  793.             if hit then
  794.                 frag(hit)
  795.             end
  796.         elseif mode == "lightning" then
  797.             count = count + .015
  798.             guide.CFrame = cf(ch.Torso.CFrame.p)*CFrame.new(0,7,0)
  799.             guide.CFrame = CFrame.new(guide.CFrame.p,lp:GetMouse().Hit.p)
  800.             if i <= 3 then
  801.                 pt[i].CFrame = clerp(pt[i].CFrame,guide.CFrame*ca(-pi/2,count+rad(360/3)*i,0)*cf(1.7,0,0)*ca(pi/2,0,0),speed)
  802.             else
  803.                 pt[i].CFrame = clerp(pt[i].CFrame,guide.CFrame*ca(-pi/2,-count-rad(360/3)*i,0)*cf(2,0,0)*ca(pi/2,-rad(30),0),speed)
  804.             end
  805.         end
  806.         ignore = {}
  807.         if bcount < 13 then
  808.             pt2[bcount-1].CFrame = pt[i].CFrame *cf(-0.8,-0.5,0)*ca(0,0,rad(60))
  809.             pt2[bcount].CFrame = pt[i].CFrame *cf(-0.8,0.5,0)*ca(0,0,-rad(60))
  810.         end
  811.         table.insert(ignore,pt2[bcount-1])
  812.         table.insert(ignore,pt2[bcount])
  813.     end
  814.     if armloop then
  815.         if ch.Torso:findFirstChild("Right Shoulder") then
  816.         armw = ch.Torso:findFirstChild("Right Shoulder")
  817.         armw.Parent = nil
  818. end
  819.         ch['Right Arm'].Anchored = true
  820.         local p0 = ch.Torso.CFrame
  821.         p0 = p0 + ((p0 * ca(pi/-2,0,0)).lookVector * -0.5) + (p0 * ca(0,pi/-2,0)).lookVector
  822.         local p1 = p0 + ((p0.p-lp:GetMouse().Hit.p).unit * -2)
  823.         ch['Right Arm'].CFrame = cf((p0.p + p1.p)/2,p0.p) * ca(-math.pi/2,0,0)
  824.     end
  825.     for i,v in pairs(pt3) do
  826.             if v.Parent ~= workspace then
  827.             for i=1,#pt3 do game.Debris:AddItem(pt3[i],.1) end
  828.             pt3 = {}
  829.             pt2 = {}
  830.             pt = {}
  831.             make()
  832.         end
  833.     end
  834.     if not lp.PlayerGui:findFirstChild("JL_gui") then
  835.         makeg()
  836.     end
  837.     if guide.Parent ~= workspace then
  838.             guide = new("Part",workspace,{Size=Vector3.new(2,0,2);BrickColor=BrickColor.new("");CanCollide=false;Anchored=true;Locked=true;Transparency=1})
  839.             pl = new("PointLight",guide,{Color=BrickColor.new("Bright orange").Color;Range=0})
  840.             light = new("Fire",guide,{Size=3;Heat=0;Enabled=false})
  841.     end
  842.     if textlabel_2 then
  843.         textlabel_2.Text = "FPS: "..math.floor(1/wait()*2)
  844.     end
  845. end)
  846.  
  847. efx(lp.Character.Torso)
  848. wait(.1)
  849. notif("JarLore Version"..version.." has successfully loaded.")
  850. wait(2)
  851. notif("You may start by pressing [L-CTRL] to focus.")
  852.  
  853. --[["That'sa all folks!"]]--
RAW Paste Data
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
 
Top