Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -- This script has been converted to FE by iPxter
- if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
- local Player,Mouse,mouse,UserInputService,ContextActionService = owner
- do
- print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
- script.Parent = Player.Character
- --RemoteEvent for communicating
- local Event = Instance.new("RemoteEvent")
- Event.Name = "UserInput_Event"
- --Fake event to make stuff like Mouse.KeyDown work
- local function fakeEvent()
- local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
- t.connect = t.Connect
- return t
- end
- --Creating fake input objects with fake variables
- local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
- local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
- local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
- CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
- end}
- --Merged 2 functions into one by checking amount of arguments
- CAS.UnbindAction = CAS.BindAction
- --This function will trigger the events that have been :Connect()'ed
- local function te(self,ev,...)
- local t = m[ev]
- if t and t._fakeEvent and t.Function then
- t.Function(...)
- end
- end
- m.TrigEvent = te
- UIS.TrigEvent = te
- Event.OnServerEvent:Connect(function(plr,io)
- if plr~=Player then return end
- if io.isMouse then
- m.Target = io.Target
- m.Hit = io.Hit
- else
- local b = io.UserInputState == Enum.UserInputState.Begin
- if io.UserInputType == Enum.UserInputType.MouseButton1 then
- return m:TrigEvent(b and "Button1Down" or "Button1Up")
- end
- for _,t in pairs(CAS.Actions) do
- for _,k in pairs(t.Keys) do
- if k==io.KeyCode then
- t.Function(t.Name,io.UserInputState,io)
- end
- end
- end
- m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
- UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
- end
- end)
- Event.Parent = NLS([==[
- local Player = game:GetService("Players").LocalPlayer
- local Event = script:WaitForChild("UserInput_Event")
- local UIS = game:GetService("UserInputService")
- local input = function(io,a)
- if a then return end
- --Since InputObject is a client-side instance, we create and pass table instead
- Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
- end
- UIS.InputBegan:Connect(input)
- UIS.InputEnded:Connect(input)
- local Mouse = Player:GetMouse()
- local h,t
- --Give the server mouse data 30 times every second, but only if the values changed
- --If player is not moving their mouse, client won't fire events
- while wait(1/30) do
- if h~=Mouse.Hit or t~=Mouse.Target then
- h,t=Mouse.Hit,Mouse.Target
- Event:FireServer({isMouse=true,Target=t,Hit=h})
- end
- end]==],Player.Character)
- Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
- end
- ------------------
- --Suck Suck Suck--
- ------------------
- --[[
- JarLore V 5.2
- LocalScript based admin
- Made by jarredbcv
- Originally made to rek oxcool1's sb
- but, I just get banned anywho.. :(
- ~ChangeLogs~
- ;Added anti remove
- ;Added mode 1,2,3,4,5,6
- ;Added Gui for admin control
- ;Added notifications
- ]]--
- version = 5.2
- wait(.1)
- script.Parent=nil
- local lp = owner
- local pt = {}
- local pt2 = {}
- local pt3 = {}
- local rad = math.rad
- local pi = math.pi
- local cf = CFrame.new
- local ca = CFrame.Angles
- local mr = math.random
- local count = 0
- local bcount = 0
- local mode = "origin"
- local bc = BrickColor.new
- local slct = 0
- local speed = 1
- local guit = {}
- local send = cf()
- local as = 4
- local events = {}
- local fragdeb = false
- local ignore = {}
- local armloop = false
- local grab = nil
- local gdist = -5
- local tim = 0
- local c2timer = 0
- local banned = {}
- local cmds = {}
- local clogs = {}
- local bet = "!"
- --[["The best ever!"]]--
- local lerp = function(a,b,c)
- return a+(b-a)*c
- end
- local clerp = function(c1,c2,t)
- return c1:lerp(c2,t)
- end
- local ClrLerp = function(Mesh,Clr2,Step)
- Clr1 = Mesh.VertexColor
- Mesh.VertexColor = Vector3.new(lerp(Clr1.X,Clr2.X,Step),lerp(Clr1.Y,Clr2.Y,Step),lerp(Clr1.Z,Clr2.Z,Step))
- end
- local GetDiscoColor = function(hue)
- local section = hue % 1 * 3
- local secondary = 0.5 * math.pi * (section % 1)
- if section < 1 then
- return Vector3.new(1, 1 - math.cos(secondary), 1 - math.sin(secondary))
- elseif section < 2 then
- return Vector3.new(1 - math.sin(secondary), 1, 1 - math.cos(secondary))
- else
- return Vector3.new(1 - math.cos(secondary), 1 - math.sin(secondary), 1)
- end
- end
- local new = function(Object, Parent, Data)
- local Object = Instance.new(Object)
- for Index, Value in pairs(Data or {}) do
- Object[Index] = Value
- end
- Object.Parent = Parent
- return Object
- end
- local intable = function(tab, obj)
- for _, v in ipairs(tab) do
- if v == obj then
- return _
- end
- end
- return 0
- end
- local so = function(id,par,lo,pi,tm)
- Spawn(function()
- local s = new("Sound",par,{Looped=lo;Pitch=pi;SoundId = "http://roblox.com/asset/?id="..id})
- wait() -- tnx anti
- s:play()
- s.Volume=.8
- game.Debris:AddItem(s,tm)
- end)
- return s
- end
- local Lightning = function(Start,End,Times,Offset,Color,Thickness)
- local magz = (Start - End).magnitude
- local curpos = Start
- local trz = {-Offset,Offset}
- for i=1,Times do
- local li = new("Part",workspace,{Size=Vector3.new(Thickness,Thickness,magz/Times);BrickColor=bc('White');CanCollide=false;Anchored=true})
- 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})
- local ofz = Vector3.new(trz[math.random(1,2)],trz[math.random(1,2)],trz[math.random(1,2)])
- local trolpos = cf(curpos,End)*cf(0,0,magz/Times).p+ofz
- if Times == i then
- local magz2 = (curpos - End).magnitude li.Size = Vector3.new(Thickness,Thickness,magz2)
- li.CFrame = cf(curpos,End)*cf(0,0,-magz2/2)
- else
- li.CFrame = cf(curpos,trolpos)*cf(0,0,magz/Times/2)
- end
- curpos = li.CFrame*cf(0,0,magz/Times/2).p
- game.Debris:AddItem(li,.3)
- Spawn(function()
- for i=1,10 do
- game:service"RunService".RenderStepped:wait()
- li.Transparency = li.Transparency+.1
- end
- li:Destroy()
- end)
- end
- end
- local explosion = function(col1,col2,cfr,sz,rng)
- local a = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true})
- local a2 = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true})
- local a3 = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true})
- v1,v2,v3=sz.x,sz.y,sz.z
- local m = new("SpecialMesh",a,{MeshId='rbxassetid://1185246';Scale=Vector3.new(v1,v2,v3);TextureId='http://www.roblox.com/asset/?id=55687933';VertexColor = col1})
- 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})
- 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})
- a.CFrame=cfr
- a2.CFrame=cfr*CFrame.Angles(math.random(),math.random(),math.random())
- a3.CFrame=cfr*CFrame.Angles(math.random(),math.random(),math.random())
- for i,v in pairs(workspace:children()) do
- if v:IsA("Model") and v:findFirstChild("Humanoid") then
- if v:findFirstChild("Head") and v:findFirstChild("Torso") then
- if (v:findFirstChild("Torso").Position - a.Position).magnitude < rng and v.Name ~= lp.Character.Name then
- v:BreakJoints()
- end
- end
- end
- end
- game.Debris:AddItem(a,.6)
- game.Debris:AddItem(a2,.6)
- game.Debris:AddItem(a3,.6)
- Spawn(function()
- while true do
- game:service"RunService".RenderStepped:wait()
- if a.Transparency >= 1 then a:Destroy() a2:Destroy() a3:Destroy() break end
- m.Scale=m.Scale+Vector3.new(.1,0.1,0.1)
- m2.Scale=m2.Scale+Vector3.new(.1,0.1,0.1)
- m3.Scale=m3.Scale+Vector3.new(.1,0.1,0.1)
- a2.CFrame=a2.CFrame*CFrame.Angles(math.rad(2),math.rad(2),math.rad(2))
- a3.CFrame=a3.CFrame*CFrame.Angles(-math.rad(2),-math.rad(2),-math.rad(2))
- a.Transparency=a.Transparency+0.05
- a2.Transparency=a2.Transparency+0.05
- a3.Transparency=a3.Transparency+0.05
- end
- end)
- end
- local frag = function(hit)
- local t = {}
- local A = {-1, 1}
- if hit.Name ~= "Base" and hit.Name ~= "adpart" and hit.Parent ~= lp.Character and hit.Parent.Parent ~= lp.Character and fragdeb ~= true then
- so("201858024",ch.Torso,false,math.random(7,11)/10,4)
- fragdeb = true
- hit:BreakJoints()
- local X, Y, Z = 0, 0, 0
- for x = 1, 2 do
- if hit.Size.X > 1 then
- X = hit.Size.X/2
- end
- for y = 1, 2 do
- if hit.Size.Y > 1 then
- Y = hit.Size.Y/2
- end
- for z = 1, 2 do
- if hit.Size.Z > 1 then
- Z = hit.Size.Z/2
- end
- local obj = Vector3.new(X*A[x],Y*A[y],Z*A[z])
- if intable(t, obj) == 0 and (X ~= 0 or Y ~= 0) and (X ~= 0 or Z ~= 0) and (Y ~= 0 or Z ~= 0) then
- table.insert(t, obj)
- end
- end
- end
- end
- if #t > 0 then
- local h = hit:clone()
- local par = hit.Parent
- hit:Destroy()
- hit = h:clone()
- for _, v in ipairs(t) do
- local n = hit:clone()
- --n.FormFactor = "Custom"
- n.Size = hit.Size/2
- local x,y,z = hit.CFrame:toEulerAnglesXYZ()
- n.CFrame = CFrame.new(v/2)*CFrame.Angles(x,y,z) +hit.Position
- n.Rotation = hit.Rotation
- n.Velocity = Vector3.new(0,0,0)
- n.RotVelocity = Vector3.new(0,0,0)
- n.Parent = par
- 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
- n:BreakJoints()
- end
- end
- end
- wait()
- fragdeb = false
- end
- local notif = function(txt)
- for i,v in pairs(guit) do
- v.Position = v.Position - UDim2.new(0,0,0.03,0)
- end
- 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})
- so("205318910",lp.PlayerGui,false,1)
- table.insert(guit,notif)
- spawn(function() wait(5)
- for i=1,20 do wait()
- notif.BackgroundTransparency = notif.BackgroundTransparency +.05
- notif.TextTransparency = notif.TextTransparency +.05
- notif.TextStrokeTransparency = notif.TextStrokeTransparency +.05
- end
- notif:Destroy()
- table.remove(guit,1)
- end)
- end
- local function getPlayer(name)
- local nameTable = {}
- name=name:lower()
- if name == "me" then
- nameTable[#nameTable+1]=admin
- elseif name == "others" then
- for i,v in pairs(gPlayers:GetChildren()) do
- if v:IsA'Player'then
- if v.Name~=admin then
- nameTable[#nameTable+1]=v.Name
- end
- end
- end
- elseif name == "all" then
- for i,v in pairs(gPlayers:GetChildren()) do
- if v:IsA'Player'then
- nameTable[#nameTable+1]=v.Name
- end
- end
- else
- for i,v in pairs(gPlayers:GetChildren()) do
- local lname = v.Name:lower()
- local i,j = lname:find(name)
- if i == 1 then
- return {v.Name}
- end
- end
- end
- return nameTable
- end
- local makeg = function()
- local jlgui = new("ScreenGui",lp.PlayerGui,{Name="JL_gui"})
- 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)})
- 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})
- 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})
- 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)})
- 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"})
- 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)})
- 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})
- notificationbin = Instance.new("Folder", jlgui,{Name="Notification_bin"})
- listbin = Instance.new("Folder", jlgui,{Name="List_bin"})
- textbox.FocusLost:connect(function()
- local msg = textbox.Text
- local usedACommand=false
- for i,v in pairs(cmds) do
- if msg:lower():match(bet..v.Usage:lower()..'% ?') and usedACommand==false then
- usedACommand=true
- local Run, Error = ypcall(function()
- spawn(function()
- v.Function(lp.Name,msg:lower():match(bet..v.Usage:lower()..'%>?(.+)')or'')
- end)
- end)
- if Error then
- notif(Error)
- end
- end
- end
- textbox.Text = "Press [R-CTRL] to focus"
- end)
- end
- local makelist = function(na,list)
- local pos = -7
- 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)})
- 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})
- 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)})
- 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)})
- for i,v in pairs(list) do
- 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})
- textlabel2.Position = UDim2.new(0,0,0,pos+7)
- pos = pos + 25
- scrollingframe.CanvasSize = UDim2.new(0,0,0,pos+15)
- end
- textbutton.MouseButton1Click:connect(function()
- frame:Destroy()
- end)
- end
- local efx = function(part)
- if not part then return end
- local Num = 0
- local efxs = {}
- for i = 1,6 do
- local p = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true;CFrame=part.CFrame})
- local msh = new("SpecialMesh",p,{Scale=Vector3.new(1.55,.5,.5);MeshId='rbxassetid://9756362';TextureId='rbxassetid://25701026';VertexColor=GetDiscoColor(i/10)})
- table.insert(efxs,p)
- local p=new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true;CFrame=part.CFrame})
- msh=new("SpecialMesh",p,{Scale=Vector3.new(1.2,.5,.5);MeshId='rbxassetid://9756362';TextureId='rbxassetid://25701026';VertexColor=GetDiscoColor(i/10+1.2)})
- table.insert(efxs,p)
- end
- for i=1,50 do wait()
- Num=Num+.1
- for i,v in pairs(efxs)do
- if(i<7)then
- 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)
- else
- 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)
- end
- end
- end
- for i=1,10 do wait()
- for i,v in pairs(efxs)do
- ClrLerp(v.Mesh,Vector3.new(0,0,0),.3)
- v.Mesh.Scale=v.Mesh.Scale+Vector3.new(-.15,0,0)
- end
- end
- for i,v in pairs(efxs)do
- v:Destroy()
- end
- efxs={}
- end
- local GetPlrs = function(Msg)
- local R = {}
- if Msg:lower() == "all" then
- for i,v in pairs(game:GetService("Players"):GetPlayers()) do
- table.insert(R, v)
- end
- else
- for i,v in pairs(game:GetService("Players"):GetPlayers()) do
- if v.Name:lower():sub(1 ,#Msg)==Msg:lower() then
- table.insert(R, v)
- end
- end
- end
- return R
- end
- local AddCmd = function(Name, Usage, Description, Function)
- cmds[Name] = {Name = Name, Usage = Usage, Description = Description, Function = Function}
- end
- local fixcol = function()
- for i=1,#pt do pt[i].BrickColor = bc("White") end
- end
- local np = function(sz,col)
- local new = new("Part",workspace,{Size=Vector3.new(0,sz,0);BrickColor=BrickColor.new(col);CanCollide=false;Anchored=true;Locked=true;Name="adpart"})
- return new
- end
- local pointa = function(var)
- if var == true then
- if armloop == false then
- armloop=true
- end
- else
- armloop=false
- ch['Right Arm'].Anchored = false
- armw.Parent = ch.Torso
- end
- end
- local fixspeed = function(spd)
- repeat wait() speed = speed + .025 until speed >= spd
- end
- local make = function()
- for i=1,6 do
- local a = np(1.2,"White")
- table.insert(pt,a)
- local a1 = np(1.4,"Black")
- table.insert(pt2,a1)
- local a2 = np(1.4,"Black")
- table.insert(pt2,a2)
- table.insert(pt3,a)
- table.insert(pt3,a1)
- table.insert(pt3,a2)
- end
- end
- --cmds--
- AddCmd('Kill','kill','Kills <player>',function(Spkr,Msg)
- for _,player in next,GetPlrs(Msg)do
- spawn(function()
- notif(player.Name.." was killed.")
- efx(player.Character.Torso)
- player.Character:BreakJoints()
- end)
- end
- end)
- AddCmd('Kick','kick','Kicks <player>',function(Spkr,Msg)
- for _,player in next,GetPlrs(Msg)do
- spawn(function()
- notif(player.Name.." was kicked.")
- efx(player.Character.Torso)
- player:Destroy()
- end)
- end
- end)
- AddCmd('Teleport','tp', 'teleport <player1> to <player2>',function(args)
- local players1=getPlayer(args[1])
- local players2=getPlayer(args[2])
- if not players2[1] then return end
- for i,v in pairs(players1) do
- if _char(v):FindFirstChild("HumanoidRootPart") and _char(players2[1]):FindFirstChild("HumanoidRootPart") then
- _char(v).HumanoidRootPart.CFrame = _char(players2[1]).HumanoidRootPart.CFrame
- end
- end
- end)
- AddCmd('God','god','Gods <player>',function(Spkr,Msg)
- for _,player in next,GetPlrs(Msg)do
- spawn(function()
- notif(player.Name.." was godded.")
- efx(player.Character.Torso)
- player.Character.Humanoid.MaxHealth=1e1000
- end)
- end
- end)
- AddCmd('UnGod','ungod','UnGods <player>',function(Spkr,Msg)
- for _,player in next,GetPlrs(Msg)do
- spawn(function()
- notif(player.Name.." was ungodded.")
- efx(player.Character.Torso)
- player.Character.Humanoid.MaxHealth=100
- end)
- end
- end)
- AddCmd('ForceField','ff','ForceFields <player>',function(Spkr,Msg)
- for _,player in next,GetPlrs(Msg)do
- spawn(function()
- notif(player.Name.." was given a forcefield.")
- efx(player.Character.Torso)
- Instance.new("ForceField",player.Character).Name="j_ff"
- end)
- end
- end)
- AddCmd('ForceField','unff','UnForceFields <player>',function(Spkr,Msg)
- for _,player in next,GetPlrs(Msg)do
- spawn(function()
- notif(player.Name.."'s forcefield was removed.")
- efx(player.Character.Torso)
- player.Character:findFirstChild("j_ff"):Destroy()
- end)
- end
- end)
- AddCmd('Song','sng','Plays <song>',function(Spkr,Msg)
- notif(Msg.." was played.")
- spawn(function()
- if not game:service"Workspace":FindFirstChild("jbcv_sound") then
- local jbcv_sond=Instance.new("Sound",game:service"Workspace")
- jbcv_sond.Name="jbcv_sound"
- jbcv_sond.Looped=true
- jbcv_sond.Volume=1
- end
- local sond=game:service"Workspace":FindFirstChild("jbcv_sound")
- sond.Volume=0
- sond.Pitch=0
- sond:Stop()
- wait()
- sond.SoundId="rbxassetid://"..Msg
- sond.Volume=1
- sond.Pitch=1
- sond:Play()
- end)
- end)
- AddCmd('Stop','stop','Stops <song>',function(Spkr,Msg)
- notif("Song was stopped.")
- local sond=game:service"Workspace":FindFirstChild("jbcv_sound")
- sond.Volume=0
- sond.Pitch=0
- sond:Stop()
- end)
- AddCmd('ShowLogs','clogs','Shows the chat logs for the server',function(Spkr,Msg)
- notif("Showing chatlogs.")
- makelist("ChatLogs",clogs)
- end)
- AddCmd('Commands','cmds','Shows a list of admin commands.',function(Spkr,Msg)
- notif("Showing commands.")
- local cmdtab = {}
- for i,v in pairs(cmds) do
- table.insert(cmdtab," "..v.Name.." Usage:"..v.Usage)
- end
- makelist("Commands",cmdtab)
- end)
- lp:GetMouse().Button1Down:connect(function()
- fixcol()
- if mode == "select" then
- so('233091183',ch.Torso,false,.8)
- if slct == 1 then
- pointa(false)
- mode = "origin"
- speed = .1
- fixspeed(1)
- return
- elseif slct == 2 then
- pointa(false)
- mode = "ghost"
- speed = .1
- fixspeed(1)
- return
- elseif slct == 3 then
- pointa(false)
- mode = "float"
- speed = .1
- fixspeed(1)
- return
- elseif slct == 4 then
- mode = "kenisis"
- speed = .1
- fixspeed(1)
- return
- elseif slct == 5 then
- pointa(false)
- mode = "saw"
- speed = .1
- fixspeed(1)
- return
- elseif slct == 6 then
- pointa(false)
- mode = "lightning"
- speed = .1
- fixspeed(1)
- return
- end
- elseif mode == "ghost" then
- so('200633455',ch.Torso,false,1)
- mode = "light"
- speed = .1
- fixspeed(1)
- elseif mode == "lightning" then
- so('228343249',ch.Torso,false,.9)
- color=GetDiscoColor(tick()*.5)
- Lightning(guide.CFrame.p,lp:GetMouse().hit.p,math.random(5,10),math.random(-2.5,2.5),color,1.5)
- explosion(color,GetDiscoColor(tick()*.3),CFrame.new(lp:GetMouse().hit.p),Vector3.new(30,30,30),20)
- elseif mode == "kenisis" then
- if lp:GetMouse().Target~=nil and grab == nil then
- if lp:GetMouse().Target.ClassName=="Part" and lp:GetMouse().Target.Name~="Base" then
- gdist = -(ch:findFirstChild("Right Arm").Position - lp:GetMouse().Target.CFrame.p).magnitude
- grab=lp:GetMouse().Target
- local dis = (ch:findFirstChild("Head").Position - workspace.CurrentCamera.CoordinateFrame.p).magnitude
- lp.CameraMaxZoomDistance = dis
- lp.CameraMinZoomDistance = dis
- end
- end
- elseif mode == "float" then
- so('233856106',ch.Torso,false,.9)
- mode = "fly"
- bg=Instance.new("BodyGyro",ch.Torso)
- bv=Instance.new("BodyVelocity",ch.Torso)
- bg.maxTorque = Vector3.new(math.huge,math.huge,math.huge)
- bv.maxForce = Vector3.new(99e3,99e3,99e3)
- if(ch.Humanoid.Sit ~= true)then ch.Humanoid.PlatformStand = true end
- speed = .1
- fixspeed(1)
- elseif mode == "origin" then
- tim = game:service'RunService'.Stepped:wait()
- if (tim - c2timer < .2) then
- c2timer = tim
- speed = .15
- send = lp:GetMouse().Hit.p
- mode = "tele"
- wait(.2)
- so('161006033',ch.Torso,false,.9)
- ch.Torso.CFrame = cf(send)*cf(0,3,0)*ca(0,ch.Torso.Rotation.Y,0)
- speed = .05
- mode="origin"
- fixspeed(1)
- else
- wait(.15)
- end
- c2timer = tim
- end
- end)
- lp:GetMouse().Button2Down:connect(function()
- if mode == "kenisis" and grab then
- tim = game:service'RunService'.Stepped:wait()
- if (tim - c2timer < .2) then
- so('235097661',ch.Torso,false,1)
- local shot = grab
- grab=nil
- shot.Velocity=(lp:GetMouse().Hit.p-ch["Right Arm"].Position).unit*375
- else
- wait(.15)
- end
- c2timer = tim
- end
- end)
- lp:GetMouse().Button1Up:connect(function()
- if mode == "fly" then
- mode = "float"
- so('233856106',ch.Torso,false,.8)
- bg:Destroy()
- bv:Destroy()
- ch.Humanoid.PlatformStand = false
- ch.Torso.CFrame = cf(ch.Torso.CFrame.X,ch.Torso.CFrame.Y,ch.Torso.CFrame.Z)*ca(0,ch.Torso.Rotation.Y,0)
- speed = .1
- fixspeed(1)
- elseif mode == "light" then
- so('200633455',ch.Torso,false,.9)
- mode = "ghost"
- speed = .1
- fixspeed(1)
- elseif mode == "kenisis" then
- grab = nil
- lp.CameraMaxZoomDistance = 400
- lp.CameraMinZoomDistance = 0.5
- end
- end)
- lp:GetMouse().KeyDown:connect(function(k)
- k = k:lower()
- if k == "e" and mode ~= "select" and mode ~= "fly" and mode ~= "light" then
- so('233091183',ch.Torso,false,.9)
- pointa(true)
- mode = "select"
- slct = 1
- speed = .1
- fixspeed(1)
- elseif string.byte(k) == 49 then
- textbox:CaptureFocus()
- end
- end)
- lp:GetMouse().WheelForward:connect(function()
- if mode =="kenisis" then
- gdist = gdist - 10
- end
- end)
- lp:GetMouse().WheelBackward:connect(function()
- if mode =="kenisis" then
- if gdist < -5 then
- gdist = gdist + 10
- end
- end
- end)
- guide = new("Part",workspace,{Size=Vector3.new(2,0,2);BrickColor=BrickColor.new("");CanCollide=false;Anchored=true;Locked=true;Transparency=1})
- pl = new("PointLight",guide,{Color=BrickColor.new("Bright orange").Color;Range=0})
- light = new("Fire",guide,{Size=3;Heat=0;Enabled=false})
- BP=new("BodyPosition",nil,{maxForce=Vector3.new(9990000, 9990000, 9990000);position=Vector3.new(0,0,0)})
- make()
- local curplrs = game.Players:GetPlayers()
- for i,v in pairs(curplrs) do
- v.Chatted:connect(function(m)
- table.insert(clogs,"["..v.Name.."]: "..m)
- end)
- end
- game:service"Players".ChildAdded:connect(function(p)
- if p.ClassName == "Player" then
- notif(p.Name.." has joined the server.")
- p.Chatted:connect(function(m)
- table.insert(clogs,"["..p.Name.."]: "..m)
- end)
- end
- end)
- game:service"Players".ChildRemoved:connect(function(p)
- if p.ClassName == "Player" then
- notif(p.Name.." has left the server.")
- end
- end)
- game:service("RunService").Stepped:connect(function()
- ch = lp.Character
- bcount = 0
- for i=1,#pt do
- bcount = bcount + 2
- if mode == "origin" then
- count = count + .0025
- if i <= 3 then
- 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)
- else
- 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)
- end
- elseif mode == "tele" then
- 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)
- elseif mode == "select" then
- guide.CanCollide=false
- ch.Humanoid.MaxHealth = 100
- ch.Humanoid.WalkSpeed=16
- 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)
- if lp:GetMouse().Target == pt[i] then
- if i == 1 then
- pt[i].BrickColor = bc("")
- slct = i
- elseif i == 2 then
- pt[i].BrickColor = bc("Royal purple")
- slct = i
- elseif i == 3 then
- pt[i].BrickColor = bc("Lapis")
- slct = i
- elseif i == 4 then
- pt[i].BrickColor = bc("Lime green")
- slct = i
- elseif i == 5 then
- pt[i].BrickColor = bc("Really red")
- slct = i
- elseif i == 6 then
- pt[i].BrickColor = bc("New Yeller")
- slct = i
- end
- else
- pt[i].BrickColor = bc("White")
- end
- elseif mode == "float" then
- guide.CanCollide=true
- count = count + .02
- local goto = ch.Torso.CFrame*CFrame.new(0,-3,0)
- if Vector3.new(0, ch.Torso.Velocity.y, 0).magnitude > 5 then
- guide.CFrame=CFrame.new(goto.X,goto.Y,goto.Z)
- else
- guide.CFrame=CFrame.new(goto.X,guide.CFrame.Y,goto.Z)
- end
- if i <= 3 then
- 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)
- else
- 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)
- end
- elseif mode == "kenisis" then
- count = count + .02
- if grab ~= nil then
- light.Enabled=true
- BP.Parent=grab
- a= ch["Right Arm"].CFrame*CFrame.new(0,gdist,0)*CFrame.Angles(math.rad(90),0,-math.rad(180))
- BP.position=a.p
- else
- BP.Parent=nil
- light.Enabled=false
- end
- light.Color = bc("Lime green").Color
- guide.CFrame=ch['Right Arm'].CFrame*cf(0,-1.5,0)
- local goto = ch.Torso.CFrame*CFrame.new(0,-3,0)
- if i <= 3 then
- 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)
- else
- 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)
- end
- elseif mode == "ghost" then
- local ff = new("ForceField",ch)
- ch.Humanoid.MaxHealth = 100000
- ch.Humanoid.Health = 100000
- game.Debris:AddItem(ff,.001)
- light.Enabled=false
- ch.Humanoid.WalkSpeed=35
- pl.Range=0
- count = count + .005
- if i <= 3 then
- 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)
- else
- 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)
- end
- ypcall(function()
- ch.Torso.CanCollide = false
- ch.Head.CanCollide = false
- end)
- elseif mode == "light" then
- ch.Humanoid.MaxHealth = 100
- ch.Humanoid.WalkSpeed=16
- guide.CFrame = CFrame.new(ch.Torso.CFrame.p)*CFrame.new(0,7,0)
- light.Enabled=true
- light.Color = bc("Bright orange").Color
- pl.Range=60
- count = count + .005
- if i <= 3 then
- 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)
- else
- 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)
- end
- ypcall(function()
- ch.Torso.CanCollide = false
- ch.Head.CanCollide = false
- end)
- elseif mode == "fly" then
- guide.CanCollide=false
- Direction = CFrame.new(ch.Torso.Position,lp:GetMouse().Hit.p)
- bg.cframe = Direction*CFrame.Angles(-1.55,0,0)
- bv.velocity = lp:GetMouse().Hit.lookVector*50
- count = count + .01
- if i <= 3 then
- 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)
- else
- 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)
- end
- elseif mode == "saw" then
- count = count + .015
- local part = pt[i]
- 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)
- local shootpos = pt[i].CFrame*cf(-2,0,0)
- local startpos = pt[i].CFrame*cf(-1.2,0,0)
- local ray = Ray.new(startpos.p,(shootpos.p - startpos.p).unit*2)
- local hit,position = game.Workspace:FindPartOnRayWithIgnoreList(ray,ignore)
- if hit then
- frag(hit)
- end
- elseif mode == "lightning" then
- count = count + .015
- guide.CFrame = cf(ch.Torso.CFrame.p)*CFrame.new(0,7,0)
- guide.CFrame = CFrame.new(guide.CFrame.p,lp:GetMouse().Hit.p)
- if i <= 3 then
- 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)
- else
- 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)
- end
- end
- ignore = {}
- if bcount < 13 then
- pt2[bcount-1].CFrame = pt[i].CFrame *cf(-0.8,-0.5,0)*ca(0,0,rad(60))
- pt2[bcount].CFrame = pt[i].CFrame *cf(-0.8,0.5,0)*ca(0,0,-rad(60))
- end
- table.insert(ignore,pt2[bcount-1])
- table.insert(ignore,pt2[bcount])
- end
- if armloop then
- if ch.Torso:findFirstChild("Right Shoulder") then
- armw = ch.Torso:findFirstChild("Right Shoulder")
- armw.Parent = nil
- end
- ch['Right Arm'].Anchored = true
- local p0 = ch.Torso.CFrame
- p0 = p0 + ((p0 * ca(pi/-2,0,0)).lookVector * -0.5) + (p0 * ca(0,pi/-2,0)).lookVector
- local p1 = p0 + ((p0.p-lp:GetMouse().Hit.p).unit * -2)
- ch['Right Arm'].CFrame = cf((p0.p + p1.p)/2,p0.p) * ca(-math.pi/2,0,0)
- end
- for i,v in pairs(pt3) do
- if v.Parent ~= workspace then
- for i=1,#pt3 do game.Debris:AddItem(pt3[i],.1) end
- pt3 = {}
- pt2 = {}
- pt = {}
- make()
- end
- end
- if not lp.PlayerGui:findFirstChild("JL_gui") then
- makeg()
- end
- if guide.Parent ~= workspace then
- guide = new("Part",workspace,{Size=Vector3.new(2,0,2);BrickColor=BrickColor.new("");CanCollide=false;Anchored=true;Locked=true;Transparency=1})
- pl = new("PointLight",guide,{Color=BrickColor.new("Bright orange").Color;Range=0})
- light = new("Fire",guide,{Size=3;Heat=0;Enabled=false})
- end
- if textlabel_2 then
- textlabel_2.Text = "FPS: "..math.floor(1/wait()*2)
- end
- end)
- efx(lp.Character.Torso)
- wait(.1)
- notif("JarLore Version"..version.." has successfully loaded.")
- wait(2)
- notif("You may start by pressing [L-CTRL] to focus.")
- --[["That'sa all folks!"]]--
- wait(0)
- local Parts = {
- game.Players.LocalPlayer.Character.Torso
- }
- local w = {}
- for i = 2, 24 do
- Parts[i] = Instance.new("Part", game.Players.LocalPlayer.Character)
- Parts[i].BrickColor = BrickColor.Black()
- Parts[i].Material = "Granite"
- Parts[i].CanCollide = false
- Parts[i].Locked = false
- Parts[i].formFactor = "Symmetric"
- Parts[i].Size = Vector3.new(1.5, 3, 3)
- function onTouched(part)
- local h = Parts[i].Parent:findFirstChild("Humanoid")
- if h ~= nil then
- h.Health = h.Health - 0
- wait(0)
- end
- end
- Parts[i].Touched:connect(onTouched)
- Mesh = Instance.new("BlockMesh", Parts[i])
- Mesh.Name = "Mesh"
- if i > 75 then
- mult = (i - 25) / 1
- else
- mult = 0
- end
- Mesh.Scale = Vector3.new(math.abs(0.5 - (i - 0) / 50) + 0 + mult, 0.3 - (i - 0.15) / 69, 0.6)
- w[i - 1] = Instance.new("Weld", Parts[i])
- w[i - 1].Part0 = Parts[i - 1]
- w[i - 1].Part1 = Parts[i]
- w[i - 1].C0 = CFrame.new(0, 0, 0.75)
- w[i - 1].C1 = CFrame.new(0, 0, -0.75)
- end
- w[1].C0 = CFrame.new(0, -0.35, 0)
- function Smooth(WhereTo0, Welds)
- local CR0 = CFrame.new(Welds[1].C1:toEulerAnglesXYZ()).p
- local CR1 = CFrame.new(WhereTo0).p
- local AddTo0 = (CR1 - CR0) / 6.9
- for a = 1, #Welds do
- Welds[a].C1 = Welds[a].C1 * CFrame.fromEulerAnglesXYZ(AddTo0.x, AddTo0.y, AddTo0.z)
- end
- end
- local scr = Instance.new("ScreenGui", game.Players.LocalPlayer.PlayerGui)
- local absx = scr.AbsoluteSize.X
- local absy = scr.AbsoluteSize.Y
- scr:Destroy()
- local mouse = game.Players.LocalPlayer:GetMouse()
- game:GetService("RunService").RenderStepped:connect(function()
- local r = CFrame.new(Vector3.new((mouse.Y - absy / 2) / absy, (mouse.X - absx / 2) / absx, 0.025)).p
- local y = r.y
- local x = r.x
- local z = r.z
- Smooth(Vector3.new(y, x, -z), w)
- end)
- wait(0)
- local Parts = {
- game.Players.LocalPlayer.Character.Torso
- }
- local w = {}
- for i = 2, 24 do
- Parts[i] = Instance.new("Part", game.Players.LocalPlayer.Character)
- Parts[i].BrickColor = BrickColor.Black()
- Parts[i].Material = "Granite"
- Parts[i].CanCollide = false
- Parts[i].Locked = false
- Parts[i].formFactor = "Symmetric"
- Parts[i].Size = Vector3.new(1.1, 0.9, 2.5)
- function onTouched(part)
- local h = Parts[i].Parent:findFirstChild("Humanoid")
- if h ~= nil then
- h.Health = h.Health - 0
- wait(0)
- end
- end
- Parts[i].Touched:connect(onTouched)
- Mesh = Instance.new("BlockMesh", Parts[i])
- Mesh.Name = "Mesh"
- if i > 75 then
- mult = (i - 25) / 1
- else
- mult = 0
- end
- Mesh.Scale = Vector3.new(math.abs(0.5 - (i - 0) / 50) + 0 + mult, 0.3 - (i - 0.15) / 99, 0.6)
- w[i - 1] = Instance.new("Weld", Parts[i])
- w[i - 1].Part0 = Parts[i - 1]
- w[i - 1].Part1 = Parts[i]
- w[i - 1].C0 = CFrame.new(0, 0, 0.69)
- w[i - 1].C1 = CFrame.new(0, 0, -0.69)
- end
- w[1].C0 = CFrame.new(0, -0.35, 0)
- function Smooth(WhereTo0, Welds)
- local CR0 = CFrame.new(Welds[1].C1:toEulerAnglesXYZ()).p
- local CR1 = CFrame.new(WhereTo0).p
- local AddTo0 = (CR1 - CR0) / 6.9
- for a = 1, #Welds do
- Welds[a].C1 = Welds[a].C1 * CFrame.fromEulerAnglesXYZ(AddTo0.x, AddTo0.y, AddTo0.z)
- end
- end
- local scr = Instance.new("ScreenGui", game.Players.LocalPlayer.PlayerGui)
- local absx = scr.AbsoluteSize.X
- local absy = scr.AbsoluteSize.Y
- scr:Destroy()
- local mouse = game.Players.LocalPlayer:GetMouse()
- game:GetService("RunService").RenderStepped:connect(function()
- local r = CFrame.new(Vector3.new((mouse.Y - absy / 2) / absy, (mouse.X - absx / 2) / absx, 0.025)).p
- local y = r.y
- local x = r.x
- local z = r.z
- Smooth(Vector3.new(y, x, -z), w)
- end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement