View difference between Paste ID: NHbJNa9t and w98izB4F
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 makeg = function()
244
	local jlgui = new("ScreenGui",lp.PlayerGui,{Name="JL_gui"})
245
	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)})
246
	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})
247
	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 [E] to focus";TextColor3 = Color3.new(1, 1, 1);TextXAlignment = Enum.TextXAlignment.Left})
248-
	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})
248+
249
	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"})
250
	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)})
251
	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})
252
	notificationbin = Instance.new("Folder", jlgui,{Name="Notification_bin"})
253
	listbin = Instance.new("Folder", jlgui,{Name="List_bin"})
254
	textbox.FocusLost:connect(function()
255
		local msg = textbox.Text
256
		local usedACommand=false
257
		for i,v in pairs(cmds) do
258
			if msg:lower():match(bet..v.Usage:lower()..'% ?') and usedACommand==false then
259
				usedACommand=true
260
				local Run, Error = ypcall(function()
261
					spawn(function()
262
						v.Function(lp.Name,msg:lower():match(bet..v.Usage:lower()..'%>?(.+)')or'')
263
					end)
264
				end)
265
				if Error then
266
					notif(Error)
267
				end
268
			end
269
		end
270
		textbox.Text = "Press [E] to focus"
271-
		textbox.Text = "Press [R-CTRL] to focus"
271+
272
end
273
274
local makelist = function(na,list)
275
	local pos = -7
276
	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)})
277
	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})
278
	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)})
279
	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)})
280
	for i,v in pairs(list) do
281
		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})
282
		textlabel2.Position = UDim2.new(0,0,0,pos+7)
283
		pos = pos + 25
284
		scrollingframe.CanvasSize = UDim2.new(0,0,0,pos+15)
285
	end
286
	textbutton.MouseButton1Click:connect(function()
287
		frame:Destroy()
288
	end)
289
end
290
291
local efx = function(part)
292
	if not part then return end
293
	local Num = 0
294
	local efxs = {}
295
	for i = 1,6 do
296
		local p = new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true;CFrame=part.CFrame})
297
		local msh = new("SpecialMesh",p,{Scale=Vector3.new(1.55,.5,.5);MeshId='rbxassetid://9756362';TextureId='rbxassetid://25701026';VertexColor=GetDiscoColor(i/10)})
298
		table.insert(efxs,p)
299
		local p=new("Part",workspace,{Size=Vector3.new(1,1,1);CanCollide=false;Anchored=true;CFrame=part.CFrame})
300
		msh=new("SpecialMesh",p,{Scale=Vector3.new(1.2,.5,.5);MeshId='rbxassetid://9756362';TextureId='rbxassetid://25701026';VertexColor=GetDiscoColor(i/10+1.2)})
301
		table.insert(efxs,p)
302
	end
303
	for i=1,50 do wait()
304
		Num=Num+.1
305
		for i,v in pairs(efxs)do
306
		  if(i<7)then
307
				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)
308
			else
309
			  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)
310
			end
311
		end
312
	end
313
	for i=1,10 do wait()
314
		for i,v in pairs(efxs)do
315
			ClrLerp(v.Mesh,Vector3.new(0,0,0),.3)
316
			v.Mesh.Scale=v.Mesh.Scale+Vector3.new(-.15,0,0)
317
		end
318
	end
319
	for i,v in pairs(efxs)do
320
		v:Destroy()
321
	end
322
	efxs={}
323
end
324
325
326
local GetPlrs = function(Msg)
327
	local R = {}
328
	if Msg:lower() == "all" then
329
		for i,v in pairs(game:GetService("Players"):GetPlayers()) do
330
			table.insert(R, v)
331
		end
332
	else
333
		for i,v in pairs(game:GetService("Players"):GetPlayers()) do
334
			if v.Name:lower():sub(1 ,#Msg)==Msg:lower() then
335
				table.insert(R, v)
336
			end
337
		end
338
	end
339
	return R
340
end
341
342
local AddCmd = function(Name, Usage, Description, Function)
343
  cmds[Name] = {Name = Name, Usage = Usage, Description = Description, Function = Function}
344
end
345
346
local fixcol = function()
347
	for i=1,#pt do pt[i].BrickColor = bc("White") end
348
end
349
350
local np = function(sz,col)
351
  local new = new("Part",workspace,{Size=Vector3.new(0,sz,0);BrickColor=BrickColor.new(col);CanCollide=false;Anchored=true;Locked=true;Name="adpart"})
352
  return new
353
end
354
355
local pointa = function(var)
356
	if var == true then
357
		if armloop == false then
358
			armloop=true
359
		end
360
	else
361
		armloop=false
362
		ch['Right Arm'].Anchored = false
363
		armw.Parent = ch.Torso
364
	end
365
end
366
367
local fixspeed = function(spd)
368
	repeat wait() speed = speed + .025 until speed >= spd
369
end
370
371
local make = function()
372
	for i=1,6 do
373
		local a = np(1.2,"White")
374
		table.insert(pt,a)
375
		local a1 = np(1.4,"Black")
376
		table.insert(pt2,a1)
377
		local a2 = np(1.4,"Black")
378
		table.insert(pt2,a2)
379
		table.insert(pt3,a)
380
		table.insert(pt3,a1)
381
		table.insert(pt3,a2)
382
	end
383
end
384
385
--cmds--
386
AddCmd('Kill','kill','Kills <player>',function(Spkr,Msg)
387
  for _,player in next,GetPlrs(Msg)do
388
spawn(function()
389
    notif(player.Name.." was killed.")
390
		efx(player.Character.Torso)
391
    player.Character:BreakJoints()
392
end)
393
  end
394
end)
395
396
AddCmd('Kick','kick','Kicks <player>',function(Spkr,Msg)
397
  for _,player in next,GetPlrs(Msg)do
398
spawn(function()
399
    notif(player.Name.." was kicked.")
400
		efx(player.Character.Torso)
401
    player:Destroy()
402
end)
403
  end
404
end)
405
406
AddCmd('God','god','Gods <player>',function(Spkr,Msg)
407
  for _,player in next,GetPlrs(Msg)do
408
spawn(function()
409
    notif(player.Name.." was godded.")
410
		efx(player.Character.Torso)
411
    player.Character.Humanoid.MaxHealth=1e1000
412
end)
413
  end
414
end)
415
416
AddCmd('UnGod','ungod','UnGods <player>',function(Spkr,Msg)
417
  for _,player in next,GetPlrs(Msg)do
418
spawn(function()
419
    notif(player.Name.." was ungodded.")
420
		efx(player.Character.Torso)
421
    player.Character.Humanoid.MaxHealth=100
422
end)
423
  end
424
end)
425
426
AddCmd('ForceField','ff','ForceFields <player>',function(Spkr,Msg)
427
  for _,player in next,GetPlrs(Msg)do
428
spawn(function()
429
    notif(player.Name.." was given a forcefield.")
430
		efx(player.Character.Torso)
431
    Instance.new("ForceField",player.Character).Name="j_ff"
432
end)
433
  end
434
end)
435
436
AddCmd('ForceField','unff','UnForceFields <player>',function(Spkr,Msg)
437
  for _,player in next,GetPlrs(Msg)do
438
	spawn(function()
439
    notif(player.Name.."'s forcefield was removed.")
440
		efx(player.Character.Torso)
441
    player.Character:findFirstChild("j_ff"):Destroy()
442
end)
443
  end
444
end)
445
446
AddCmd('Song','sng','Plays <song>',function(Spkr,Msg)
447
  notif(Msg.." was played.")
448
	spawn(function()
449
		if not game:service"Workspace":FindFirstChild("jbcv_sound") then
450
			local jbcv_sond=Instance.new("Sound",game:service"Workspace")
451
			jbcv_sond.Name="jbcv_sound"
452
			jbcv_sond.Looped=true
453
			jbcv_sond.Volume=1
454
		end
455
		local sond=game:service"Workspace":FindFirstChild("jbcv_sound")
456
		sond.Volume=0
457
		sond.Pitch=0
458
		sond:Stop()
459
		wait()
460
		sond.SoundId="rbxassetid://"..Msg
461
		sond.Volume=1
462
		sond.Pitch=1
463
		sond:Play()
464
	end)
465
end)
466
467
AddCmd('Stop','stop','Stops <song>',function(Spkr,Msg)
468
  notif("Song was stopped.")
469
	local sond=game:service"Workspace":FindFirstChild("jbcv_sound")
470
	sond.Volume=0
471
	sond.Pitch=0
472
	sond:Stop()
473
end)
474
475
AddCmd('ShowLogs','clogs','Shows the chat logs for the server',function(Spkr,Msg)
476
  notif("Showing chatlogs.")
477
	makelist("ChatLogs",clogs)
478
end)
479
480
AddCmd('Commands','cmds','Shows a list of admin commands.',function(Spkr,Msg)
481
  notif("Showing commands.")
482
	local cmdtab = {}
483
	for i,v in pairs(cmds) do
484
		table.insert(cmdtab," "..v.Name.." Usage:"..v.Usage)
485
	end
486
  makelist("Commands",cmdtab)
487
end)
488
489
490
lp:GetMouse().Button1Down:connect(function()
491
	fixcol()
492
	if mode == "select" then
493
		so('233091183',ch.Torso,false,.8)
494
		if slct == 1 then
495
			pointa(false)
496
			mode = "origin"
497
			speed = .1
498
			fixspeed(1)
499
			return
500
		elseif slct == 2 then
501
			pointa(false)
502
			mode = "ghost"
503
			speed = .1
504
			fixspeed(1)
505
			return
506
		elseif slct == 3 then
507
			pointa(false)
508
			mode = "float"
509
			speed = .1
510
			fixspeed(1)
511
			return
512
		elseif slct == 4 then
513
			mode = "kenisis"
514
			speed = .1
515
			fixspeed(1)
516
			return
517
		elseif slct == 5 then
518
			pointa(false)
519
			mode = "saw"
520
			speed = .1
521
			fixspeed(1)
522
			return
523
		elseif slct == 6 then
524
			pointa(false)
525
			mode = "lightning"
526
			speed = .1
527
			fixspeed(1)
528
			return
529
		end
530
	elseif mode == "ghost" then
531
    so('200633455',ch.Torso,false,1)
532
		mode = "light"
533
		speed = .1
534
		fixspeed(1)
535
	elseif mode == "lightning" then
536
		so('228343249',ch.Torso,false,.9)
537
		color=GetDiscoColor(tick()*.5)
538
		Lightning(guide.CFrame.p,lp:GetMouse().hit.p,math.random(5,10),math.random(-2.5,2.5),color,1.5)
539
		explosion(color,GetDiscoColor(tick()*.3),CFrame.new(lp:GetMouse().hit.p),Vector3.new(30,30,30),20)
540
	elseif mode == "kenisis" then
541
    if lp:GetMouse().Target~=nil and grab == nil then
542
      if lp:GetMouse().Target.ClassName=="Part" and lp:GetMouse().Target.Name~="Base" then
543
        gdist = -(ch:findFirstChild("Right Arm").Position - lp:GetMouse().Target.CFrame.p).magnitude
544
        grab=lp:GetMouse().Target
545
        local dis = (ch:findFirstChild("Head").Position - workspace.CurrentCamera.CoordinateFrame.p).magnitude
546
        lp.CameraMaxZoomDistance = dis
547
        lp.CameraMinZoomDistance = dis
548
      end
549
    end
550
	elseif mode == "float" then
551
    so('233856106',ch.Torso,false,.9)
552
		mode = "fly"
553
		bg=Instance.new("BodyGyro",ch.Torso)
554
    bv=Instance.new("BodyVelocity",ch.Torso)
555
    bg.maxTorque = Vector3.new(math.huge,math.huge,math.huge)
556
	  bv.maxForce = Vector3.new(99e3,99e3,99e3)
557
	  if(ch.Humanoid.Sit ~= true)then ch.Humanoid.PlatformStand = true end
558
		speed = .1
559
		fixspeed(1)
560
	elseif mode == "origin" then
561
		tim = game:service'RunService'.Stepped:wait()
562
		if (tim - c2timer < .2) then
563
			c2timer = tim
564
			speed = .15
565
			send = lp:GetMouse().Hit.p
566
			mode = "tele"
567
			wait(.2)
568
			so('161006033',ch.Torso,false,.9)
569
			ch.Torso.CFrame = cf(send)*cf(0,3,0)*ca(0,ch.Torso.Rotation.Y,0)
570
			speed = .05
571
			mode="origin"
572
			fixspeed(1)
573
		else
574
			wait(.15)
575
		end
576
		c2timer = tim
577
	end
578
end)
579
580
lp:GetMouse().Button2Down:connect(function()
581
  if mode == "kenisis" and grab then
582
    tim = game:service'RunService'.Stepped:wait()
583
    if (tim - c2timer < .2) then
584
      so('235097661',ch.Torso,false,1)
585
      local shot = grab
586
      grab=nil
587
      shot.Velocity=(lp:GetMouse().Hit.p-ch["Right Arm"].Position).unit*375
588
    else
589
      wait(.15)
590
    end
591
    c2timer = tim
592
  end
593
end)
594
595
lp:GetMouse().Button1Up:connect(function()
596
	if mode == "fly" then
597
		mode = "float"
598
    so('233856106',ch.Torso,false,.8)
599
		bg:Destroy()
600
    bv:Destroy()
601
    ch.Humanoid.PlatformStand = false
602
		ch.Torso.CFrame = cf(ch.Torso.CFrame.X,ch.Torso.CFrame.Y,ch.Torso.CFrame.Z)*ca(0,ch.Torso.Rotation.Y,0)
603
		speed = .1
604
		fixspeed(1)
605
	elseif mode == "light" then
606
    so('200633455',ch.Torso,false,.9)
607
		mode = "ghost"
608
		speed = .1
609
		fixspeed(1)
610
	elseif mode == "kenisis" then
611
    grab = nil
612
		lp.CameraMaxZoomDistance = 400
613
		lp.CameraMinZoomDistance = 0.5
614
	end
615
end)
616
617
lp:GetMouse().KeyDown:connect(function(k)
618
	k = k:lower()
619
	if k == "e" and mode ~= "select" and mode ~= "fly" and mode ~= "light" then
620
		so('233091183',ch.Torso,false,.9)
621
		pointa(true)
622
		mode = "select"
623
		slct = 1
624
		speed = .1
625
		fixspeed(1)
626
	elseif string.byte(k) == 49 then
627
		textbox:CaptureFocus()
628
	end
629
end)
630
631
lp:GetMouse().WheelForward:connect(function()
632
	if mode =="kenisis" then
633
		gdist = gdist - 10
634
	end
635
end)
636
637
lp:GetMouse().WheelBackward:connect(function()
638
	if mode =="kenisis" then
639
    if gdist < -5 then
640
			gdist = gdist + 10
641
    end
642
	end
643
end)
644
645
guide = new("Part",workspace,{Size=Vector3.new(2,0,2);BrickColor=BrickColor.new("");CanCollide=false;Anchored=true;Locked=true;Transparency=1})
646
pl = new("PointLight",guide,{Color=BrickColor.new("Bright orange").Color;Range=0})
647
light = new("Fire",guide,{Size=3;Heat=0;Enabled=false})
648
BP=new("BodyPosition",nil,{maxForce=Vector3.new(9990000, 9990000, 9990000);position=Vector3.new(0,0,0)})
649
make()
650
651
local curplrs = game.Players:GetPlayers()
652
653
for i,v in pairs(curplrs) do
654
	v.Chatted:connect(function(m)
655
		table.insert(clogs,"["..v.Name.."]: "..m)
656
	end)
657
end
658
659
game:service"Players".ChildAdded:connect(function(p)
660
	if p.ClassName == "Player" then
661
		notif(p.Name.." has joined the server.")
662
		p.Chatted:connect(function(m)
663
			table.insert(clogs,"["..p.Name.."]: "..m)
664
		end)
665
	end
666
end)
667
668
game:service"Players".ChildRemoved:connect(function(p)
669
	if p.ClassName == "Player" then
670
		notif(p.Name.." has left the server.")
671
	end
672
end)
673
674
game:service("RunService").Stepped:connect(function()
675
	ch = lp.Character
676
	bcount = 0
677
  for i=1,#pt do
678
		bcount = bcount + 2
679
		if mode == "origin" then
680
			count = count + .0025
681
			if i <= 3 then
682
				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)
683
			else
684
				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)
685
			end
686
		elseif mode == "tele" then
687
			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)
688
		elseif mode == "select" then
689
			guide.CanCollide=false
690
			ch.Humanoid.MaxHealth = 100
691
			ch.Humanoid.WalkSpeed=16
692
			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)
693
			if lp:GetMouse().Target == pt[i] then
694
				if i == 1 then
695
					pt[i].BrickColor = bc("")
696
					slct = i
697
				elseif i == 2 then
698
					pt[i].BrickColor = bc("Royal purple")
699
					slct = i
700
				elseif i == 3 then
701
					pt[i].BrickColor = bc("Lapis")
702
					slct = i
703
				elseif i == 4 then
704
					pt[i].BrickColor = bc("Lime green")
705
					slct = i
706
				elseif i == 5 then
707
					pt[i].BrickColor = bc("Really red")
708
					slct = i
709
				elseif i == 6 then
710
					pt[i].BrickColor = bc("New Yeller")
711
					slct = i
712
				end
713
			else
714
				pt[i].BrickColor = bc("White")
715
			end
716
		elseif mode == "float" then
717
			guide.CanCollide=true
718
			count = count + .02
719
			local goto = ch.Torso.CFrame*CFrame.new(0,-3,0)
720
			if Vector3.new(0, ch.Torso.Velocity.y, 0).magnitude > 5 then
721
				guide.CFrame=CFrame.new(goto.X,goto.Y,goto.Z)
722
			else
723
				guide.CFrame=CFrame.new(goto.X,guide.CFrame.Y,goto.Z)
724
			end
725
			if i <= 3 then
726
				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)
727
			else
728
				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)
729
			end
730
		elseif mode == "kenisis" then
731
			count = count + .02
732
      if grab ~= nil then
733
        light.Enabled=true
734
        BP.Parent=grab
735
        a= ch["Right Arm"].CFrame*CFrame.new(0,gdist,0)*CFrame.Angles(math.rad(90),0,-math.rad(180))
736
        BP.position=a.p
737
      else
738
        BP.Parent=nil
739
        light.Enabled=false
740
      end
741
			light.Color = bc("Lime green").Color
742
			guide.CFrame=ch['Right Arm'].CFrame*cf(0,-1.5,0)
743
			local goto = ch.Torso.CFrame*CFrame.new(0,-3,0)
744
			if i <= 3 then
745
				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)
746
			else
747
				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)
748
			end
749
		elseif mode == "ghost" then
750
			local ff = new("ForceField",ch)
751
			ch.Humanoid.MaxHealth = 100000
752
			ch.Humanoid.Health = 100000
753
			game.Debris:AddItem(ff,.001)
754
			light.Enabled=false
755
			ch.Humanoid.WalkSpeed=35
756
			pl.Range=0
757
			count = count + .005
758
			if i <= 3 then
759
				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)
760
			else
761
				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)
762
			end
763
			ypcall(function()
764
				ch.Torso.CanCollide = false
765
				ch.Head.CanCollide = false
766
			end)
767
		elseif mode == "light" then
768
			ch.Humanoid.MaxHealth = 100
769
			ch.Humanoid.WalkSpeed=16
770
			guide.CFrame = CFrame.new(ch.Torso.CFrame.p)*CFrame.new(0,7,0)
771
			light.Enabled=true
772
			light.Color = bc("Bright orange").Color
773
			pl.Range=60
774
			count = count + .005
775
			if i <= 3 then
776
				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)
777
			else
778
				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)
779
			end
780
			ypcall(function()
781
				ch.Torso.CanCollide = false
782
				ch.Head.CanCollide = false
783
			end)
784
		elseif mode == "fly" then
785
			guide.CanCollide=false
786
			Direction = CFrame.new(ch.Torso.Position,lp:GetMouse().Hit.p)
787
			bg.cframe = Direction*CFrame.Angles(-1.55,0,0)
788
			bv.velocity = lp:GetMouse().Hit.lookVector*50
789
			count = count + .01
790
			if i <= 3 then
791
				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)
792
			else
793
				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)
794
			end
795
		elseif mode == "saw" then
796
			count = count + .015
797
			local part = pt[i]
798
			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)
799
			local shootpos = pt[i].CFrame*cf(-2,0,0)
800
			local startpos = pt[i].CFrame*cf(-1.2,0,0)
801
			local ray = Ray.new(startpos.p,(shootpos.p - startpos.p).unit*2)
802
			local hit,position = game.Workspace:FindPartOnRayWithIgnoreList(ray,ignore)
803
			if hit then
804
				frag(hit)
805
			end
806
		elseif mode == "lightning" then
807
			count = count + .015
808
			guide.CFrame = cf(ch.Torso.CFrame.p)*CFrame.new(0,7,0)
809
			guide.CFrame = CFrame.new(guide.CFrame.p,lp:GetMouse().Hit.p)
810
			if i <= 3 then
811
				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)
812
			else
813
				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)
814
			end
815
		end
816
		ignore = {}
817
		if bcount < 13 then
818
			pt2[bcount-1].CFrame = pt[i].CFrame *cf(-0.8,-0.5,0)*ca(0,0,rad(60))
819
			pt2[bcount].CFrame = pt[i].CFrame *cf(-0.8,0.5,0)*ca(0,0,-rad(60))
820
		end
821
		table.insert(ignore,pt2[bcount-1])
822
		table.insert(ignore,pt2[bcount])
823
	end
824
	if armloop then
825
		if ch.Torso:findFirstChild("Right Shoulder") then
826
		armw = ch.Torso:findFirstChild("Right Shoulder")
827
		armw.Parent = nil
828
end
829
		ch['Right Arm'].Anchored = true
830
		local p0 = ch.Torso.CFrame
831
		p0 = p0 + ((p0 * ca(pi/-2,0,0)).lookVector * -0.5) + (p0 * ca(0,pi/-2,0)).lookVector
832
		local p1 = p0 + ((p0.p-lp:GetMouse().Hit.p).unit * -2)
833
		ch['Right Arm'].CFrame = cf((p0.p + p1.p)/2,p0.p) * ca(-math.pi/2,0,0)
834
	end
835
	for i,v in pairs(pt3) do
836
			if v.Parent ~= workspace then
837
			for i=1,#pt3 do game.Debris:AddItem(pt3[i],.1) end
838
			pt3 = {}
839
			pt2 = {}
840
			pt = {}
841
			make()
842
		end
843
	end
844
	if not lp.PlayerGui:findFirstChild("JL_gui") then
845
		makeg()
846
	end
847
	if guide.Parent ~= workspace then
848
			guide = new("Part",workspace,{Size=Vector3.new(2,0,2);BrickColor=BrickColor.new("");CanCollide=false;Anchored=true;Locked=true;Transparency=1})
849
			pl = new("PointLight",guide,{Color=BrickColor.new("Bright orange").Color;Range=0})
850
			light = new("Fire",guide,{Size=3;Heat=0;Enabled=false})
851
	end
852
	if textlabel_2 then
853
		textlabel_2.Text = "FPS: "..math.floor(1/wait()*2)
854
	end
855
end)
856
857
efx(lp.Character.Torso)
858
wait(.1)
859
notif("JarLore Version"..version.." has successfully loaded.")
860
wait(2)
861
notif("You may start by pressing [E] to focus.")
862-
notif("You may start by pressing [L-CTRL] to focus.")
862+
863
--[["That'sa all folks!"]]--