HanzerCopy

Shiftlock

May 17th, 2025
105
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 2.24 KB | Source Code | 0 0
  1. local Players = game:GetService("Players")
  2. local UserInputService = game:GetService("UserInputService")
  3. local RunService = game:GetService("RunService")
  4. local player = Players.LocalPlayer
  5. local camera = workspace.CurrentCamera
  6. local button = script.Parent
  7. -- Gambar tombol shift lock
  8. local shiftLockOnImage = "rbxasset://textures/ui/[email protected]"
  9. local shiftLockOffImage = "rbxasset://textures/ui/[email protected]"
  10. -- Konfigurasi UI
  11. button.Image = shiftLockOffImage
  12. button.BackgroundTransparency = 1
  13. button.BorderSizePixel = 0
  14. button.Position = UDim2.new(0, 550, 0, 250)
  15. button.Size = UDim2.new(0, 50, 0, 50)
  16. -- Tambahkan UICorner jika belum ada
  17. if not button:FindFirstChildWhichIsA("UICorner") then
  18.     local corner = Instance.new("UICorner")
  19.     corner.CornerRadius = UDim.new(0, 12)
  20.     corner.Parent = button
  21. end
  22. -- Variabel shift lock
  23. local shiftLockEnabled = false
  24. -- Referensi karakter
  25. local char = player.Character or player.CharacterAdded:Wait()
  26. local hum = char:WaitForChild("Humanoid")
  27. local root = char:WaitForChild("HumanoidRootPart")
  28. -- Handler saat karakter respawn
  29. player.CharacterAdded:Connect(function(newChar)
  30.     char = newChar
  31.     hum = char:WaitForChild("Humanoid")
  32.     root = char:WaitForChild("HumanoidRootPart")
  33.     if shiftLockEnabled then
  34.         enableShiftLock(true)
  35.     end
  36. end)
  37. -- Fungsi aktif/nonaktif shift lock
  38. function enableShiftLock(active)
  39.     if active then
  40.         hum.AutoRotate = false
  41.         RunService:BindToRenderStep("ShiftLock", Enum.RenderPriority.Camera.Value, function()
  42.             UserInputService.MouseBehavior = Enum.MouseBehavior.LockCenter
  43.             local _, y = camera.CFrame.Rotation:ToEulerAnglesYXZ()
  44.             if root then
  45.                 root.CFrame = CFrame.new(root.Position) * CFrame.Angles(0, y, 0)
  46.             end
  47.         end)
  48.         button.ImageColor3 = Color3.fromRGB(255, 240, 180) -- Warna glow statis saat aktif
  49.     else
  50.         hum.AutoRotate = true
  51.         RunService:UnbindFromRenderStep("ShiftLock")
  52.         UserInputService.MouseBehavior = Enum.MouseBehavior.Default
  53.         button.ImageColor3 = Color3.new(1, 1, 1) -- Warna normal saat nonaktif
  54.     end
  55. end
  56. -- Tombol diklik
  57. button.MouseButton1Click:Connect(function()
  58.     shiftLockEnabled = not shiftLockEnabled
  59.     enableShiftLock(shiftLockEnabled)
  60.     button.Image = shiftLockEnabled and shiftLockOnImage or shiftLockOffImage
  61. end)
Add Comment
Please, Sign In to add comment