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