Post by blue on Jul 20, 2017 12:35:53 GMT
1st Script: Workspace >> Zoom >>Script:
for _, v in pairs(game.Workspace:GetChildren()) do
if v.Name == "ZoomBrick" then
if v:FindFirstChild("distance") then
v.Transparency = 1
v.Anchored = true
v.CanCollide = false
v.Touched:connect(function(hit)
if game.Players:GetPlayerFromCharacter(hit.Parent) then
local dist = game.Players:GetPlayerFromCharacter(hit.Parent).PlayerScripts.CameraScript.settings.distance
dist.Value = v.distance.Value
end
end)
end
end
end
------------------------------------------------------------------
2nd Script: +LocalScript >> ServerScript >> Camera Script [LEFT, RIGHT LOOK ONLY] >> Script:
local plr = game.Players.LocalPlayer
local chr = plr.CharacterAdded:wait()
local mouse = plr:GetMouse()
local cam = game.Workspace.CurrentCamera
local uis = game:GetService("UserInputService")
local rs = game:GetService("RunService")
local angle = 0
function visible(parent, toggle)
for _, v in pairs(parent:GetChildren()) do
if v:IsA("BasePart") then
if toggle == true then
v.Transparency = 0
else
v.Transparency = 1
end
end
visible(v, toggle)
end
end
wait()
visible(chr, false)
uis.MouseBehavior = Enum.MouseBehavior.LockCenter
uis.InputChanged:connect(function(input, event)
if not event then
if input.UserInputType == Enum.UserInputType.MouseMovement then
if input.Delta.X < 0 then
angle = angle + (math.abs(input.Delta.X))
elseif input.Delta.X > 0 then
angle = angle - (math.abs(input.Delta.X))
end
end
end
end)
rs:BindToRenderStep("camera", Enum.RenderPriority.Camera.Value, function()
cam.CFrame = CFrame.new(chr.Head.Position) * CFrame.Angles(0, math.rad(angle), 0)
end)
--------------------------------------------------------------------------------------------------
3rd Script:Starter Player >> StarterPlayerScripts >> LocalScript with parts: settings folder, inside is: Distance Value = 20 >> Script:
local plr = game.Players.LocalPlayer
local chr = plr.CharacterAdded:wait()
local cam = game.Workspace.CurrentCamera
local rs = game:GetService("RunService")
local dist = script.settings.distance.Value
function zoom(new)
local dir = new > dist and "out" or "in"
print(dir)
if dir == "out" then
repeat
dist = dist + 0.4
wait()
until
dist >= new
else
repeat
dist = dist - 0.4
wait()
until
dist <= new
end
dist = new
end
script.settings.distance.Changed:connect(function()
zoom(script.settings.distance.Value)
end)
rs:BindToRenderStep("camera", Enum.RenderPriority.Camera.Value, function()
cam.CFrame = CFrame.new(chr.Torso.Position) * CFrame.new(0, 0, dist)
end)
------------------------------------------------------------------------------------------
Note: NO PAYMENTS, PLEASE HELP
for _, v in pairs(game.Workspace:GetChildren()) do
if v.Name == "ZoomBrick" then
if v:FindFirstChild("distance") then
v.Transparency = 1
v.Anchored = true
v.CanCollide = false
v.Touched:connect(function(hit)
if game.Players:GetPlayerFromCharacter(hit.Parent) then
local dist = game.Players:GetPlayerFromCharacter(hit.Parent).PlayerScripts.CameraScript.settings.distance
dist.Value = v.distance.Value
end
end)
end
end
end
------------------------------------------------------------------
2nd Script: +LocalScript >> ServerScript >> Camera Script [LEFT, RIGHT LOOK ONLY] >> Script:
local plr = game.Players.LocalPlayer
local chr = plr.CharacterAdded:wait()
local mouse = plr:GetMouse()
local cam = game.Workspace.CurrentCamera
local uis = game:GetService("UserInputService")
local rs = game:GetService("RunService")
local angle = 0
function visible(parent, toggle)
for _, v in pairs(parent:GetChildren()) do
if v:IsA("BasePart") then
if toggle == true then
v.Transparency = 0
else
v.Transparency = 1
end
end
visible(v, toggle)
end
end
wait()
visible(chr, false)
uis.MouseBehavior = Enum.MouseBehavior.LockCenter
uis.InputChanged:connect(function(input, event)
if not event then
if input.UserInputType == Enum.UserInputType.MouseMovement then
if input.Delta.X < 0 then
angle = angle + (math.abs(input.Delta.X))
elseif input.Delta.X > 0 then
angle = angle - (math.abs(input.Delta.X))
end
end
end
end)
rs:BindToRenderStep("camera", Enum.RenderPriority.Camera.Value, function()
cam.CFrame = CFrame.new(chr.Head.Position) * CFrame.Angles(0, math.rad(angle), 0)
end)
--------------------------------------------------------------------------------------------------
3rd Script:Starter Player >> StarterPlayerScripts >> LocalScript with parts: settings folder, inside is: Distance Value = 20 >> Script:
local plr = game.Players.LocalPlayer
local chr = plr.CharacterAdded:wait()
local cam = game.Workspace.CurrentCamera
local rs = game:GetService("RunService")
local dist = script.settings.distance.Value
function zoom(new)
local dir = new > dist and "out" or "in"
print(dir)
if dir == "out" then
repeat
dist = dist + 0.4
wait()
until
dist >= new
else
repeat
dist = dist - 0.4
wait()
until
dist <= new
end
dist = new
end
script.settings.distance.Changed:connect(function()
zoom(script.settings.distance.Value)
end)
rs:BindToRenderStep("camera", Enum.RenderPriority.Camera.Value, function()
cam.CFrame = CFrame.new(chr.Torso.Position) * CFrame.new(0, 0, dist)
end)
------------------------------------------------------------------------------------------
Note: NO PAYMENTS, PLEASE HELP