View difference between Paste ID: M7sKL8Hw and LrbCA9bg
SHOW: | | - or go back to the newest paste.
1-
songs = {"No Rain","484759745","Panic","277784505","Pack up the Louie","262032243","Rock it for me","157460849","Suzy","280613610","Bambous","198285559","Sofa","253333412","Ballroom Breakers","269261597","Bad boy Good man","201552585","Booty Swing","242193187","Jimmy's Gang","228239848","Catgroove","149838917","All Night","253586805"}
1+
local Player = game:GetService("Players").jane12421
2
local Mouse,mouse,UserInputService,ContextActionService
3
do
4
	script.Parent = Player.Character
5
	local CAS = {Actions={}}
6
	local Event = Instance.new("RemoteEvent")
7
	Event.Name = "UserInput_Event"
8
	Event.Parent = Player.Character
9
	local fakeEvent = function()
10
		local t = {_fakeEvent=true}
11
		t.Connect = function(self,f)self.Function=f end
12-
local player = game.Players.LocalPlayer
12+
		t.connect = t.Connect
13
		return t
14-
local mouse = player:GetMouse()
14+
	end
15
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
16
	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
17
	function CAS:BindAction(name,fun,touch,...)
18
		CAS.Actions[name] = {Name=name,Function=fun,Keys={...}}
19
	end
20
	function CAS:UnbindAction(name)
21
		CAS.Actions[name] = nil
22
	end
23
	local function te(self,ev,...)
24
		local t = m[ev]
25
		if t and t._fakeEvent and t.Function then
26
			t.Function(...)
27
		end
28
	end
29
	m.TrigEvent = te
30
	UIS.TrigEvent = te
31
	Event.OnServerEvent:Connect(function(plr,io)
32
	    if plr~=Player then return end
33
		if io.isMouse then
34
			m.Target = io.Target
35
			m.Hit = io.Hit
36
		elseif io.UserInputType == Enum.UserInputType.MouseButton1 then
37
	        if io.UserInputState == Enum.UserInputState.Begin then
38
				m:TrigEvent("Button1Down")
39
			else
40
				m:TrigEvent("Button1Up")
41
			end
42
		else
43
			for n,t in pairs(CAS.Actions) do
44
				for _,k in pairs(t.Keys) do
45
					if k==io.KeyCode then
46
						t.Function(t.Name,io.UserInputState,io)
47
					end
48
				end
49
			end
50
	        if io.UserInputState == Enum.UserInputState.Begin then
51
	            m:TrigEvent("KeyDown",io.KeyCode.Name:lower())
52
				UIS:TrigEvent("InputBegan",io,false)
53
			else
54
				m:TrigEvent("KeyUp",io.KeyCode.Name:lower())
55
				UIS:TrigEvent("InputEnded",io,false)
56
	        end
57
	    end
58
	end)
59
	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
60
	end
61
songs = {"Oh It's You","1117396305","Run Run Rottytops!","838766490","Dead Bird Studio Reception","2162993895","The End","1158372206","The Battle of Award 42","1819740919","ジョジョの危険な冒険【マリオRPG×ジョジョ】","519992991","Roxanne","4277136473","Ballroom Breakers","269261597","Bad boy Good man","201552585","Booty Swing","242193187","Jimmy's Gang","228239848","Catgroove","149838917","All Night","253586805"}
62
63
local asin = math.asin
64
local atan2 = math.atan2
65
local rad = math.rad
66
local sin = math.sin
67
local abs = math.abs
68
local ceil = math.ceil
69
local pi = math.pi
70
deddeb=false
71
deb=false
72
local player = game.Players.jane12421
73
local pchar = player.Character
74
local torso=pchar.Torso
75
anim=true
76
anim2=false
77
anglespeed = 1
78
hum=pchar.Humanoid
79
angle = 0
80
equi=false
81
showing = false
82
tol=Instance.new("HopperBin",player.Backpack)
83
tol.Name="GramaPlayer"
84
Part = function(x,y,z,color,tr,cc,an,parent)
85
    local p = Instance.new('Part',parent or Weapon)
86
    p.formFactor = 'Custom'
87
    p.Size = Vector3.new(x,y,z)
88
    p.BrickColor = BrickColor.new(color)
89
    p.CanCollide = cc
90
    p.Transparency = tr
91
    p.Anchored = an
92
    p.TopSurface,p.BottomSurface = 0,0
93
    return p
94
end
95
wPart = function(x,y,z,color,tr,cc,an,parent)
96
    local wp = Instance.new('WedgePart',parent or Weapon)
97
    wp.formFactor = 'Custom'
98
    wp.Size = Vector3.new(x,y,z)
99
    wp.BrickColor = BrickColor.new(color)
100
    wp.CanCollide = cc
101
    wp.Transparency = tr
102
    wp.Anchored = an
103
    wp.TopSurface,wp.BottomSurface = 0,0
104
    return wp
105
end
106
Weld = function(p0,p1,x,y,z,rx,ry,rz,par)
107
    p0.Position = p1.Position
108
    local w = Instance.new('Motor',par or p0)
109
    w.Part0 = p0
110
    w.Part1 = p1
111
    w.C1 = CFrame.new(x,y,z)*CFrame.Angles(rx,ry,rz)
112
    return w
113
end
114
Mesh = function(par,num,x,y,z)
115
    local msh = nil
116
    if num == 1 then
117
        msh = Instance.new("CylinderMesh",par)
118
    elseif num == 2 then
119
        msh = Instance.new("SpecialMesh",par)
120
        msh.MeshType = 3
121
    elseif num == 3 then
122
        msh = Instance.new("BlockMesh",par)
123
    elseif type(num) == 'string' then
124
        msh = Instance.new("SpecialMesh",par)
125
        msh.MeshId = num
126
    end
127
    msh.Scale = Vector3.new(x,y,z)
128
    return msh
129
end
130
131
ROW = function(x, pa, out, col, trans, s, wt, t, ang, plus)
132
    for i = 1, 360, 360/t do wait()
133
        local c = Instance.new("Part", pa)
134
        c.FormFactor = 3
135
        c.TopSurface = 0
136
        c.BottomSurface = 0
137
        c.Size = s
138
        c.Anchored = true
139
        c.CanCollide = wt
140
        c.Transparency = trans
141
        c.BrickColor = BrickColor.new(col)
142
        c.CFrame = x * CFrame.Angles(0, math.rad(i + plus), 0) * CFrame.new(0, 0, out) * ang
143
    end
144
end
145
146
local function getAngles(cf)
147
    local sx,sy,sz,m00,m01,m02,m10,m11,m12,m20,m21,m22 = cf:components()
148
    return atan2(-m12,m22),asin(m02),atan2(-m01,m00)
149
end
150
Lerp = {
151
    Number = function(C1,C2,inc)
152
        return C1 + (C2 - C1) * inc
153
    end;
154
    CFrame = function(a,b,m)
155
        local c,d={a:components()},{b:components()}
156
        table.foreach(c,function(a,b)c[a]=c[a]+(d[a]-c[a])*m end)
157
        return CFrame.new(unpack(c))
158
    end;
159
}
160
local function genWeld(a,b)
161
    local w = Instance.new("Weld",a)
162
    w.Part0 = a
163
    w.Part1 = b
164
    return w
165
end
166
local Neck = genWeld(pchar.Torso,pchar.Head)
167
Neck.C0 = CFrame.new(0,1,0)
168
Neck.C1 = CFrame.new(0,-0.5,0)
169
local LeftShoulder = genWeld(pchar.Torso,pchar['Left Arm'])
170
LeftShoulder.C0 = CFrame.new(-1,0.5,0)
171
LeftShoulder.C1 = CFrame.new(0.5,0.5,0)
172
RightShoulder = genWeld(pchar.Torso,pchar['Right Arm'])
173
RightShoulder.C0 = CFrame.new(1,0.5,0)
174
RightShoulder.C1 = CFrame.new(-0.5,0.5,0)
175
local LeftHip = genWeld(pchar.Torso,pchar['Left Leg'])
176
LeftHip.C0 = CFrame.new(-1,-1,0)
177
LeftHip.C1 = CFrame.new(-0.5,1,0)
178
local RightHip = genWeld(pchar.Torso,pchar['Right Leg'])
179
RightHip.C0 = CFrame.new(1,-1,0)
180
RightHip.C1 = CFrame.new(0.5,1,0)
181
local RootJoint = genWeld(pchar.HumanoidRootPart,pchar.Torso)
182
RootJoint.C0 = CFrame.new(0,0,0) * CFrame.Angles(-math.pi/2,0,math.pi)
183
RootJoint.C1 = CFrame.new(0,0,0) * CFrame.Angles(-math.pi/2,0,math.pi)
184
local function newLerpTo(weld)
185
        return {
186
                Weld = weld;
187
                To = weld.C0; 
188
                Cache = weld.C0; 
189
                Speed = 0.1; 
190
        }
191
end
192
mo = Instance.new("Model",pchar)
193
mp = Part(1,1,1,'Reddish brown',1,false,false,mo)
194
Mesh(mp,3,1.5,.75,1.5)
195
mw = Weld(mp,torso,0,-.125,-1.5,0,0,0,mo)
196
mp.Material='Wood'
197
p = Part(1,1,1,'Brown',1,false,false,mo)
198
Mesh(p,3,1.75,.1,1.75)
199
Weld(p,mp,0,-.375,0,0,0,0,mo)
200
p.Material='Wood'
201
p = Part(1,1,1,'Nougat',1,false,false,mo)
202
Mesh(p,3,1.325,.1,1.325)
203
Weld(p,mp,0,.375,0,0,0,0,mo)
204
p.Material='WoodPlanks'
205
p = Part(1,1,1,'Black',1,false,false,mo)
206
Mesh(p,1,1.325,.1,1.325)
207
Weld(p,mp,0,.376,0,0,0,0,mo)
208
p.Material='SmoothPlastic'
209
disc = Part(1,1,1,'Black',1,false,false,mo)
210
Mesh(disc,3,1.25,.1,1.25)
211
discw=Weld(disc,mp,0,.377,0,0,0,0,mo)
212
d=Instance.new('Decal',disc)
213
d.Face='Top'
214
d.Transparency=1
215
d.Texture='http://www.roblox.com/asset/?id=24716248'
216
sp = Part(1,1,1,'',1,false,false,mo)
217
Mesh(sp,1,.1,.5,.1)
218
Weld(sp,mp,-.5,.42,-.5,rad(45),0,-rad(45),mo)
219
sp.Material='SmoothPlastic'
220
sp2 = Part(1,1,1,'',1,false,false,mo)
221
Mesh(sp2,1,.15,.11,.15)
222
Weld(sp2,sp,0,.25,0,pi/2,0,rad(50),mo)
223
sp2.Material='SmoothPlastic'
224
p = Part(1,1,1,'',1,false,false,mo)
225
Mesh(p,1,.05,.5,.05)
226
Weld(p,sp2,0.2,0,0,0,0,pi/2,mo)
227
p.Material='SmoothPlastic'
228
p = Part(1,1,1,'Dark stone grey',1,false,false,mo)
229
Mesh(p,1,.15,.2,.15)
230
Weld(p,mp,0,.377,0,0,0,0,mo)
231
p = Part(1,1,1,'Black',1,false,false,mo)
232
Mesh(p,1,.2,.1,.2)
233
Weld(p,mp,.75,0,0,0,0,pi/2,mo)
234
hn = Part(1,1,1,'Dark stone grey',1,false,false,mo)
235
Mesh(hn,1,.1,.5,.1)
236
hnw=Weld(hn,mp,.75,0,0,0,0,-pi/2,mo)
237
p = Part(1,1,1,'Dark stone grey',1,false,false,mo)
238
Mesh(p,1,.15,.11,.15)
239
Weld(p,hn,0,.25,0,0,0,0,mo)
240
p = Part(1,1,1,'Dark stone grey',1,false,false,mo)
241
Mesh(p,1,.1,.25,.1)
242
Weld(p,hn,-0.125,.25,0,0,0,pi/2,mo)
243
p = Part(1,1,1,'Dark stone grey',1,false,false,mo)
244
Mesh(p,1,.15,.11,.15)
245
Weld(p,hn,-.25,.25,0,0,0,0,mo)
246
p = Part(1,1,1,'Dark stone grey',1,false,false,mo)
247
Mesh(p,1,.1,.5,.1)
248
Weld(p,hn,-.25,.5,0,0,0,0,mo)
249
p = Part(1,1,1,'Brown',1,false,false,mo)
250
Mesh(p,1,.125,.35,.125)
251
Weld(p,hn,-.25,.5,0,0,0,0,mo)
252
p.Material='Wood'
253
local crank = p
254
for i=1,90,18 do
255
    local p=Part(1,1,1,'Dark stone grey',1,false,false,mo)
256
    Mesh(p,1,.15,.115,.15)
257
    local w=Weld(p,mp,0,0,0,0,0,0,p)
258
    w.C0=CFrame.new(0.3,0,0)*CFrame.Angles(0,0,-math.rad(i))*CFrame.new(.7,-.3,0);
259
end
260
p = Part(1,1,1,'Dark stone grey',1,false,false,mo)
261
Mesh(p,1,.15,.3,.15)
262
Weld(p,mp,-1,.5,0,0,0,0,mo)
263
for i=1,70,18 do
264
    local p=Part(1,1,1,'Dark stone grey',1,false,false,mo)
265
    Mesh(p,1,.15,.115,.15)
266
    local w=Weld(p,mp,0,0,0,0,0,0,p)
267
    w.C0=CFrame.new(.3,0,0)*CFrame.Angles(0,0,math.rad(i))*CFrame.new(0.7,-.6,0);
268
end
269
strt = Part(1,1,1,'Dark stone grey',1,false,false,mo)
270
Mesh(strt,1,.15,.3,.15)
271
Weld(strt,mp,-.7,.925,0,0,0,-rad(65),mo)
272
273
for i=1,24 do
274
    local p=Part(1,1,1,'Dark stone grey',1,false,false,mo)
275
    Mesh(p,3,.5,.1,.01)
276
    local wld=Weld(p,strt,0,0,0,0,0,0,mo)
277
    wld.C1=CFrame.new(0,.1,0)*CFrame.Angles(pi/2,0,rad(360/24)*i)*CFrame.new(0.1,0,0)*CFrame.Angles(0,rad(70),0)
278
end
279
for i=1,24 do
280
    local p=Part(1,1,1,'Dark stone grey',1,false,false,mo)
281
    Mesh(p,3,.5,.2,.01)
282
    local wld=Weld(p,strt,0,0,0,0,0,0,mo)
283
    wld.C1=CFrame.new(0,.525,0)*CFrame.Angles(pi/2,0,rad(360/24)*i)*CFrame.new(0.35,0,0)*CFrame.Angles(0,rad(50),0)
284
end
285
p = Part(1,1,1,'Black',1,false,false,mo)
286
Mesh(p,'http://www.roblox.com/asset/?id=3270017',.42,.42,.42)
287
Weld(p,strt,0,.35,0,pi/2,0,0,mo)
288
p = Part(1,1,1,'Black',1,false,false,mo)
289
Mesh(p,'http://www.roblox.com/asset/?id=3270017',1,1,1)
290
Weld(p,strt,0,.75,0,pi/2,0,0,mo)
291
292
s = Instance.new("Sound",sp2)
293
s.Looped=true
294
s.Pitch=1
295
296
local screengui = Instance.new("ScreenGui",player.PlayerGui)
297
screengui.Name = "musicgui"
298
299
local frame = Instance.new("Frame",screengui)
300
frame.BorderSizePixel = 0
301
frame.Size = UDim2.new(0.15, 0, 0.35, 0)
302
frame.ClipsDescendants = true
303
frame.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
304
frame.Position = UDim2.new(1.1, 0, 0.35, 0)
305
frame.BackgroundTransparency = 0.8
306
frame.BackgroundColor3 = Color3.new(0, 0, 0)
307
308
local dt = Instance.new("Frame",frame)
309
dt.BorderSizePixel = 0
310
dt.Size = UDim2.new(0.02, 0, 1, 0)
311
dt.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
312
dt.Name = "dt"
313
dt.BackgroundTransparency = 0.8
314
dt.BackgroundColor3 = Color3.new(1, 1, 1)
315
316
local dt_2 = Instance.new("Frame",frame)
317
dt_2.BorderSizePixel = 0
318
dt_2.Size = UDim2.new(0.98, 0, 0.02, 0)
319
dt_2.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
320
dt_2.Name = "dt"
321
dt_2.Position = UDim2.new(0.02, 0, 0.2, 0)
322
dt_2.BackgroundTransparency = 0.8
323
dt_2.BackgroundColor3 = Color3.new(1, 1, 1)
324
325
local name = Instance.new("TextLabel",frame)
326
name.FontSize = Enum.FontSize.Size24
327
name.TextStrokeTransparency = 0
328
name.BorderSizePixel = 0
329
name.Size = UDim2.new(1, 0, 0.2, 0)
330
name.TextColor3 = Color3.new(1, 1, 1)
331
name.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
332
name.Text = "Music list"
333
name.BackgroundTransparency = 1
334
name.Font = Enum.Font.SourceSans
335
name.Name = "name"
336
name.BackgroundColor3 = Color3.new(1, 1, 1)
337
338
local list = Instance.new("ScrollingFrame",frame)
339
list.Size = UDim2.new(0.82, 0, 0.6, 0)
340
list.BackgroundTransparency = 0.8
341
list.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
342
list.Name = "list"
343
list.Position = UDim2.new(0.1, 0, 0.3, 0)
344
list.ScrollBarThickness = 8
345
list.BackgroundColor3 = Color3.new(0, 0, 0)
346
347
local dt_3 = Instance.new("Frame",selector)
348
dt_3.BorderSizePixel = 0
349
dt_3.Size = UDim2.new(0.02, 0, 1, 0)
350
dt_3.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
351
dt_3.Name = "dt"
352
dt_3.BackgroundTransparency = 0.8
353
dt_3.BackgroundColor3 = Color3.new(1, 1, 1)
354
355
local songinfo = Instance.new("Frame",frame)
356
songinfo.Size = UDim2.new(0.82, 0, 0.6, 0)
357
songinfo.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
358
songinfo.Name = "songinfo"
359
songinfo.Position = UDim2.new(1.1, 0, 0.3, 0)
360
songinfo.BackgroundTransparency = 0.8
361
songinfo.BackgroundColor3 = Color3.new(0, 0, 0)
362
363
local dt = Instance.new("Frame",songinfo)
364
dt.BorderSizePixel = 0
365
dt.Size = UDim2.new(1, 0, 0.02, 0)
366
dt.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
367
dt.Name = "dt"
368
dt.Position = UDim2.new(0, 0, 0.2, 0)
369
dt.BackgroundTransparency = 0.8
370
dt.BackgroundColor3 = Color3.new(1, 1, 1)
371
372
local songnam = Instance.new("TextLabel",songinfo)
373
songnam.FontSize = Enum.FontSize.Size24
374
songnam.TextStrokeTransparency = 0
375
songnam.TextWrapped = true
376
songnam.BorderSizePixel = 0
377
songnam.Size = UDim2.new(1, 0, 0.2, 0)
378
songnam.TextColor3 = Color3.new(1, 1, 1)
379
songnam.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
380
songnam.Text = "n/a"
381
songnam.BackgroundTransparency = 1
382
songnam.Font = Enum.Font.SourceSans
383
songnam.Name = "songnam"
384
songnam.TextScaled = true
385
songnam.BackgroundColor3 = Color3.new(1, 1, 1)
386
387
local time = Instance.new("Frame",songinfo)
388
time.BorderSizePixel = 0
389
time.Size = UDim2.new(0.8, 0, 0.1, 0)
390
time.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
391
time.Name = "time"
392
time.Position = UDim2.new(0.1, 0, 0.4, 0)
393
time.BackgroundTransparency = 0.7
394
time.BackgroundColor3 = Color3.new(0, 0, 0)
395
time.ClipsDescendants=true
396
397
local slider = Instance.new("Frame",time)
398
slider.BorderSizePixel = 0
399
slider.Size = UDim2.new(0.955, 0, 0.7, 0)
400
slider.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
401
slider.Name = "slider"
402
slider.Position = UDim2.new(0.02, 0, 0.15, 0)
403
slider.BackgroundTransparency = 0.4
404
slider.BackgroundColor3 = Color3.new(1, 1, 1)
405
406
local snglegth = Instance.new("TextLabel",songinfo)
407
snglegth.FontSize = Enum.FontSize.Size14
408
snglegth.TextStrokeTransparency = 0
409
snglegth.Size = UDim2.new(1, 0, 0.63, 0)
410
snglegth.TextColor3 = Color3.new(1, 1, 1)
411
snglegth.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
412
snglegth.Text = "0/120"
413
snglegth.BackgroundTransparency = 1
414
snglegth.Font = Enum.Font.SourceSans
415
snglegth.Name = "snglegth"
416
snglegth.BackgroundColor3 = Color3.new(1, 1, 1)
417
418
local pitch = Instance.new("TextButton",songinfo)
419
pitch.FontSize = Enum.FontSize.Size12
420
pitch.TextStrokeTransparency = 0
421
pitch.BackgroundTransparency = 0.8
422
pitch.Position = UDim2.new(0.455, 0, 0.525, 0)
423
pitch.BorderSizePixel = 0
424
pitch.Size = UDim2.new(0.25, 0, 0.15, 0)
425
pitch.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
426
pitch.Text = "Set Pitch"
427
pitch.Font = Enum.Font.SourceSans
428
pitch.Name = "pitch"
429
pitch.TextColor3 = Color3.new(1, 1, 1)
430
pitch.BackgroundColor3 = Color3.new(0, 0, 0)
431
432
local play = Instance.new("TextButton",songinfo)
433
play.FontSize = Enum.FontSize.Size14
434
play.TextStrokeTransparency = 0
435
play.BackgroundTransparency = 0.8
436
play.Position = UDim2.new(0.175, 0, 0.525, 0)
437
play.BorderSizePixel = 0
438
play.Size = UDim2.new(0.25, 0, 0.15, 0)
439
play.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
440
play.Text = "Stop"
441
play.Font = Enum.Font.SourceSans
442
play.Name = "play"
443
play.TextColor3 = Color3.new(1, 1, 1)
444
play.BackgroundColor3 = Color3.new(0, 0, 0)
445
446
local pitchn = Instance.new("TextBox",songinfo)
447
pitchn.FontSize = Enum.FontSize.Size14
448
pitchn.TextStrokeTransparency = 0
449
pitchn.BackgroundTransparency = 0.8
450
pitchn.BorderSizePixel = 0
451
pitchn.Size = UDim2.new(0.1, 0, 0.15, 0)
452
pitchn.Position = UDim2.new(0.735, 0, 0.525, 0)
453
pitchn.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
454
pitchn.Text = "1"
455
pitchn.TextColor3 = Color3.new(1, 1, 1)
456
pitchn.Font = Enum.Font.SourceSans
457
pitchn.Name = "pitchn"
458
pitchn.BackgroundColor3 = Color3.new(0, 0, 0)
459
460
local rtr = Instance.new("TextButton",songinfo)
461
rtr.FontSize = Enum.FontSize.Size14
462
rtr.TextStrokeTransparency = 0
463
rtr.BackgroundTransparency = 0.8
464
rtr.Position = UDim2.new(0.175, 0, 0.7, 0)
465
rtr.BorderSizePixel = 0
466
rtr.Size = UDim2.new(0.667, 0, 0.15, 0)
467
rtr.BorderColor3 = Color3.new(0.105882, 0.164706, 0.207843)
468
rtr.Text = "Return to list"
469
rtr.Font = Enum.Font.SourceSans
470
rtr.Name = "rtl"
471
rtr.TextColor3 = Color3.new(1, 1, 1)
472
rtr.BackgroundColor3 = Color3.new(0, 0, 0)
473
474
cpos=0
475
numt2=1
476
for i=1,#songs/2 do
477
    local cnumt=numt2+1
478
    local selector = Instance.new("TextButton",list)
479
    selector.FontSize = Enum.FontSize.Size18
480
    selector.TextWrapped = true
481
    selector.TextStrokeTransparency = 0
482
    selector.BackgroundTransparency = 0.8
483
    selector.Position = UDim2.new(0, 3, 0, 3+cpos)
484
    selector.BorderSizePixel = 0
485
    selector.Size = UDim2.new(.93, 0, 0, 30)
486
    selector.Text = songs[numt2]
487
    selector.Font = Enum.Font.SourceSans
488
    selector.Name = songs[numt2].."_selector"
489
    selector.TextColor3 = Color3.new(1, 1, 1)
490
    selector.TextScaled = true
491
    selector.BackgroundColor3 = Color3.new(0, 0, 0)
492
    selector.MouseButton1Click:connect(function()
493
        songinfo:TweenPosition(UDim2.new(.1, 0, 0.3, 0), "Out", "Quad", .2)
494
        list:TweenPosition(UDim2.new(-1, 0, 0.3, 0), "Out", "Quad", .2)
495
        local curp=s.Pitch
496
        s:Destroy()
497
        s = Instance.new("Sound",sp2)
498
        s.Looped=true
499
        s.Pitch=1
500
        s.Name=songs[cnumt-1]
501
        s.SoundId = "http://roblox.com/asset/?id="..songs[cnumt]
502
	wait(.1)
503
        s:Play()
504
    end)
505
    cpos=cpos+35
506
    numt2=numt2+2
507
end
508
509
playa=false
510
511
play.MouseButton1Click:connect(function()
512
    playa=not playa
513
    if playa then
514
        curpi=s.Pitch
515
        play.Text="Play"
516
        for i=1,curpi/.05 do wait() s.Pitch=s.Pitch-.05 end
517
    else
518
        play.Text="Stop"
519
        for i=1,curpi/.05 do wait() s.Pitch=s.Pitch+.05 end
520
    end
521
end)
522
523
pitch.MouseButton1Click:connect(function()
524
    s.Pitch=tonumber(pitchn.Text)
525
end)
526
527
rtr.MouseButton1Click:connect(function()
528
    songinfo:TweenPosition(UDim2.new(1.1, 0, 0.3, 0), "Out", "Quad", .2)
529
    list:TweenPosition(UDim2.new(.1, 0, 0.3, 0), "Out", "Quad", .2)
530
end)
531
532
533
LerpTo = {
534
        Neck = newLerpTo(Neck);
535
        LeftArm = newLerpTo(LeftShoulder);
536
        RightArm = newLerpTo(RightShoulder);
537
        LeftLeg = newLerpTo(LeftHip);
538
        RightLeg = newLerpTo(RightHip);
539
        RootJoint = newLerpTo(RootJoint);
540
}
541
542
543
tol.Selected:connect(function(mouse)
544
    equi=true
545
    frame:TweenPosition(UDim2.new(.83, 0, 0.35, 0), "Out", "Quad", .5)
546
    LerpTo.Neck.To = LerpTo.Neck.Cache * CFrame.Angles(0,0,0)
547
    LerpTo.RightArm.To = LerpTo.RightArm.Cache * CFrame.Angles(rad(20),0,0)
548
    LerpTo.LeftArm.To = LerpTo.LeftArm.Cache * CFrame.Angles(rad(20),0,0)
549
    LerpTo.RightLeg.To = LerpTo.RightLeg.Cache * CFrame.Angles(rad(90),0,rad(10))
550
    LerpTo.LeftLeg.To = LerpTo.LeftLeg.Cache * CFrame.Angles(rad(90),0,-rad(10))
551
    LerpTo.RootJoint.To = LerpTo.RootJoint.Cache * CFrame.new(0,0,-1.5)
552
    pchar.Humanoid.WalkSpeed=0
553
    for i=1,10 do wait()
554
        for _,v in pairs(mo:GetChildren()) do
555
            if v.ClassName=="Part" then
556
                v.Transparency=v.Transparency-.1
557
                if v==disc then v.Transparency=1 end
558
            end
559
        end
560
        d.Transparency=d.Transparency-.1
561
    end
562
end)
563
564
tol.Deselected:connect(function(mouse)
565
    equi=false
566
    for i=1,10 do wait()
567
        for _,v in pairs(mo:GetChildren()) do
568
            if v.ClassName=="Part" then
569
                v.Transparency=v.Transparency+.1
570
                if v==disc then v.Transparency=1 end
571
            end
572
        end
573
        d.Transparency=d.Transparency+.1
574
    end
575
    pchar.Humanoid.WalkSpeed=16
576
    s:Stop()
577
    wait()
578
    frame:TweenPosition(UDim2.new(1.1, 0, 0.35, 0), "Out", "Quad", .5)
579
    songinfo:TweenPosition(UDim2.new(1.1, 0, 0.3, 0), "Out", "Quad", .2)
580
    list:TweenPosition(UDim2.new(.1, 0, 0.3, 0), "Out", "Quad", .2)
581
end)
582
583
game:GetService("RunService"):BindToRenderStep("Player",Enum.RenderPriority.Character.Value,function()
584
    songnam.Text=s.Name
585
    snglegth.Text=s.TimePosition.."/"..s.TimeLength
586
    slider.Size = UDim2.new(math.ceil(s.TimePosition)/s.TimeLength, -8, .7, 0)
587
    angle = (angle % 100) + anglespeed/10
588
    if equi==false then
589
        if Vector3.new(torso.Velocity.x, torso.Velocity.y, torso.Velocity.z).magnitude < 2 then
590
            anglespeed = 1/2/2
591
            LerpTo.RootJoint.To = LerpTo.RootJoint.Cache * CFrame.new(0,0,0)
592
            LerpTo.Neck.To = LerpTo.Neck.Cache * CFrame.Angles(0,0,0)
593
            LerpTo.RightArm.To = LerpTo.RightArm.Cache * CFrame.Angles(-math.sin(angle)*.1,0,0)
594
            LerpTo.LeftArm.To = LerpTo.LeftArm.Cache * CFrame.Angles(math.sin(angle)*.1,0,0)
595
            LerpTo.RightLeg.To = LerpTo.RightLeg.Cache * CFrame.Angles(math.sin(angle)*.1,0,0)
596
            LerpTo.LeftLeg.To = LerpTo.LeftLeg.Cache * CFrame.Angles(-math.sin(angle)*.1,0,0)
597
        end
598
        if Vector3.new(torso.Velocity.x, 0, torso.Velocity.z).magnitude > 2 then
599
            anglespeed = 4/2
600
            LerpTo.Neck.To = LerpTo.Neck.Cache * CFrame.Angles(0,0,0)
601
            LerpTo.RootJoint.To = LerpTo.RootJoint.Cache * CFrame.new(0,0,0)
602
            LerpTo.RightArm.To = LerpTo.RightArm.Cache * CFrame.Angles(-math.sin(angle)*1,0,0)
603
            LerpTo.LeftArm.To = LerpTo.LeftArm.Cache * CFrame.Angles(math.sin(angle)*1,0,0)
604
            LerpTo.RightLeg.To = LerpTo.RightLeg.Cache * CFrame.Angles(math.sin(angle)*1,0,0)
605
            LerpTo.LeftLeg.To = LerpTo.LeftLeg.Cache * CFrame.Angles(-math.sin(angle)*1,0,0)
606
        end
607
    else
608
        local Point = (pchar['Torso'].CFrame*LerpTo.RightArm.Cache):inverse()*CFrame.new((pchar['Torso'].CFrame*LerpTo.RightArm.Cache).p,crank.Position)
609
        local Rel = (pchar['Torso'].CFrame*LerpTo.RightArm.Cache):inverse()*crank.Position
610
        Rel = Rel+Vector3.new(-0.5,0.35,0.95)
611
        local Rel2 = (pchar['Torso'].CFrame*LerpTo.RightArm.Cache):inverse()*(pchar['Right Arm'].Position)
612
        local Vec = Vector3.new(Rel.X-Rel2.X,Rel.Y-Rel2.Y,(Rel.Z-Rel2.Z)*10)
613
        CFr = (Point-Point.p)+Vec
614
        LerpTo.RightArm.To = LerpTo.RightArm.Cache * CFr * CFrame.Angles(math.rad(90),0,0)
615
    end
616
    for _,v in pairs(LerpTo) do
617
        v.Weld.C0 = Lerp.CFrame(v.Weld.C0,v.To,v.Speed)
618
    end
619
    discw.C1=discw.C1*CFrame.Angles(0,rad(2*s.Pitch),0)
620
    hnw.C1=hnw.C1*CFrame.Angles(0,rad(2*s.Pitch),0)
621
end)