View difference between Paste ID: 7Unbcjpk and yaXWrMAf
SHOW: | | - or go back to the newest paste.
1-
Player = owner.Name
1+
plr = game.Workspace:WaitForChild(owner.Name)
2
plrH = plr:WaitForChild('HumanoidRootPart')
3-
local ScreenGui = Instance.new("ScreenGui",game:GetService("Players")[Player].PlayerGui)
3+
local Part = Instance.new("Part",plr)
4-
ScreenGui.Name = "Explorer"
4+
Part.Name = "FF"
5
Part.Position = plrH.Position
6-
local Frame = Instance.new("Frame",ScreenGui)
6+
Part.Size = Vector3.new(10,10,10)
7-
Frame.Position = UDim2.new(1 - 0.3,0,0,0)
7+
Part.Material = "ForceField"
8-
Frame.Size = UDim2.new(0.3,0,1,0)
8+
Part.Anchored = false
9-
Frame.BackgroundColor3 = Color3.new(0.5,0.5,0.5)
9+
Part.CanCollide = false
10
Part.BrickColor = BrickColor.new("Bright red")
11-
local ScrollingFrame = Instance.new("Frame",Frame)
11+
12-
ScrollingFrame.Position = UDim2.new(0,0,0.1,0)
12+
local Body = Instance.new("BodyPosition")
13-
ScrollingFrame.Size = UDim2.new(0.9,0,0.9,0)
13+
Body.Parent = Part
14-
ScrollingFrame.BackgroundColor3 = Color3.new(1,1,1)
14+
Body.Position = plrH.Position
15
Body.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
16-
local ScrollBarFrame = Instance.new("Frame",Frame)
16+
Body.P = Body.P * 5
17-
ScrollBarFrame.Position = UDim2.new(0.9,0,0.1,0)
17+
18-
ScrollBarFrame.Size = UDim2.new(0.1,0,0.9,0)
18+
local Body2 = Instance.new("BodyAngularVelocity")
19-
ScrollBarFrame.BackgroundColor3 = Color3.new(0.9,0.9,0.9)
19+
Body2.Parent = Part
20
Body2.MaxTorque = Vector3.new(math.huge,math.huge,math.huge)
21-
local DownButton = Instance.new("TextButton",ScrollBarFrame)
21+
Body2.AngularVelocity = Vector3.new(1, 1, 1)
22-
DownButton.Text = "V"
22+
23-
DownButton.Position = UDim2.new(0,0,0.5,0)
23+
Part.Touched:Connect(function(TPart)
24-
DownButton.Size = UDim2.new(1,0,0.5,0)
24+
	if TPart.Name == "Handle" then
25-
DownButton.BackgroundColor3 = Color3.new(0.9,0.9,0.9)
25+
		if TPart.Parent.Parent == plr then
26-
DownButton.MouseButton1Click:Connect(function()
26+
			local a = 1
27-
	for i,tb in pairs(ScrollingFrame:GetChildren()) do
27+
		else
28-
		tb.Position = tb.Position - UDim2.new(0,0,0.05,0)
28+
			TPart:Remove()
29
			Body2.AngularVelocity = Vector3.new(3, 3, 3)
30
			wait(0.5)
31
			Body2.AngularVelocity = Vector3.new(2, 2, 2)
32-
local UpButton = Instance.new("TextButton",ScrollBarFrame)
32+
			wait(0.5)
33-
UpButton.Text = "V"
33+
			Body2.AngularVelocity = Vector3.new(1, 1, 1)
34-
UpButton.Position = UDim2.new(0,0,0,0)
34+
35-
UpButton.Size = UDim2.new(1,0,0.5,0)
35+
36-
UpButton.Rotation = 180
36+
		if TPart.Parent == plr then
37-
UpButton.BackgroundColor3 = Color3.new(0.9,0.9,0.9)
37+
			local a = 1
38-
UpButton.MouseButton1Click:Connect(function()
38+
		else
39-
	for i,tb in pairs(ScrollingFrame:GetChildren()) do
39+
			if TPart.Name == "Base" then
40-
		tb.Position = tb.Position + UDim2.new(0,0,0.05,0)
40+
				local a = 1
41
			else
42
				TPart:Remove()
43
				Body2.AngularVelocity = Vector3.new(3, 3, 3)
44-
added = 0
44+
				wait(1)
45-
function Add(Object,nr)
45+
				Body2.AngularVelocity = Vector3.new(1, 1, 1)
46-
	local OP = Object.Parent
46+
47-
	local ON = Object.Name
47+
48-
	
48+
49-
	local TextButton = Instance.new("TextButton",ScrollingFrame)
49+
50-
	TextButton.Text = ON
50+
51-
	TextButton.Position = UDim2.new(0,0,added,0)
51+
while true do
52-
	TextButton.Size = UDim2.new(1,0,0.05,0)
52+
	Body.Position = plrH.Position
53-
	
53+
	wait(0.1)
54-
	TextButton.BackgroundColor3 = Color3.new(0.9,0.9,0.9)
54+
end