swivler= script.Parent

function rotateMod(mod,center,rotation)
	local parts ={}
	local function scan(parent)
		for _,obj in pairs(parent:GetChildren()) do
			if (obj:IsA("BasePart")) then
				table.insert(parts,obj)
			end
			scan(obj)
		end
	end
	scan(mod)
	for _,part in pairs(parts) do
		part.CFrame = (center*rotation*(center:inverse()*part.CFrame))
	end
end

function Left()

script.Parent.Left.Use.MaxActivationDistance = 0
script.Parent.Left.Use.MaxActivationDistance = 0

if script.Parent.Swivelspot.Value == 1 then
if script.Parent.Parent.ScreenA.Swivelspot.Value == 2 then
else
script.Parent.Base.Move:Play()
script.Parent.Swivelspot.Value = 2
local mod = swivler
local step = 1
for i = 0,13.5,step do
	rotateMod(mod,mod:GetModelCFrame(),CFrame.Angles(0,-0.075,0))
wait()
end
end

else if script.Parent.Swivelspot.Value == 2 then
if script.Parent.Parent.ScreenA.Swivelspot.Value == 3 then
else
script.Parent.Base.Move:Play()
script.Parent.Swivelspot.Value = 3
local mod = swivler
local step = 1
for i = 0,13.5,step do
	rotateMod(mod,mod:GetModelCFrame(),CFrame.Angles(0,-0.075,0))
wait()
end
end

else if script.Parent.Swivelspot.Value == 3 then
if script.Parent.Parent.ScreenA.Swivelspot.Value == 4 then
else
script.Parent.Base.Move:Play()
script.Parent.Swivelspot.Value = 4
local mod = swivler
local step = 1
for i = 0,13.5,step do
	rotateMod(mod,mod:GetModelCFrame(),CFrame.Angles(0,-0.075,0))
wait()
end
end

else if script.Parent.Swivelspot.Value == 4 then
if script.Parent.Parent.ScreenA.Swivelspot.Value == 5 then
else
script.Parent.Base.Move:Play()
script.Parent.Swivelspot.Value = 5
local mod = swivler
local step = 1
for i = 0,13.5,step do
	rotateMod(mod,mod:GetModelCFrame(),CFrame.Angles(0,-0.075,0))
wait()
end
end

else if script.Parent.Swivelspot.Value == 5 then
if script.Parent.Parent.ScreenA.Swivelspot.Value == 6 then
else
script.Parent.Base.Move:Play()
script.Parent.Swivelspot.Value = 6
local mod = swivler
local step = 1
for i = 0,13.5,step do
	rotateMod(mod,mod:GetModelCFrame(),CFrame.Angles(0,-0.075,0))
wait()
end
end

else if script.Parent.Swivelspot.Value == 6 then
if script.Parent.Parent.ScreenA.Swivelspot.Value == 1 then
else
script.Parent.Base.Move:Play()
script.Parent.Swivelspot.Value = 1
local mod = swivler
local step = 1
for i = 0,13.5,step do
	rotateMod(mod,mod:GetModelCFrame(),CFrame.Angles(0,-0.075,0))
wait()
end
end

end
end
end
end
end
end
script.Parent.Left.Use.MaxActivationDistance = 10
script.Parent.Left.Use.MaxActivationDistance = 10
end

script.Parent.Left.Use.MouseClick:connect(Left)