Advertisement
Guest User

Untitled

a guest
Oct 21st, 2017
63
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.00 KB | None | 0 0
  1. -- Settings --
  2.  
  3. local Player = game.Players.LocalPlayer
  4. local PlayerName = Player.Name
  5. local Police = workspace:WaitForChild("Police")
  6. local Criminals = workspace:WaitForChild("Criminals")
  7. local Data = Player.TeleportStats
  8.  
  9. -- Functions --
  10.  
  11. for i, v in pairs(game.Workspace:GetChildren()) do
  12. if v:FindFirstChild("Cameras") then
  13. v.Cameras:ClearAllChildren()
  14. Police:ClearAllChildren()
  15. v.Citizenry:ClearAllChildren()
  16. end
  17. end
  18.  
  19. -- Shadow Raid Samurai Vault --
  20.  
  21. for i, v in pairs(workspace:GetChildren()) do
  22. if v.Name == "Shadow Raid" then
  23. if v:FindFirstChild("Vault") then
  24. v.VaultBig:Destroy()
  25. end
  26. end
  27. end
  28.  
  29. -- Easy Overdrill --
  30.  
  31. if workspace:FindFirstChild("World Bank") then
  32. local b = workspace:FindFirstChild("World Bank")
  33. b.VaultAreaDoorBig:Destroy()
  34. b.VaultDoorBig:Destroy()
  35. b.OverdrillDoorBig:Destroy()
  36. end
  37.  
  38. -- Exprience Overload --
  39.  
  40. Data.Kills.Value = 2094948294
  41. Data.Headshots.Value = 2094948294
  42.  
  43. -- Remove Vault Doors --
  44.  
  45. local mapValue = game.Workspace.MAP
  46. local Map = game.Workspace:FindFirstChild(mapValue.Value)
  47.  
  48. for i, v in pairs(Map:GetChildren()) do
  49. if v.Name == "Door" or v.Name == "VaultDoor" or v.Name == "Drilling" or v.Name == "DrillDoor" then
  50. vBig:Destroy()
  51. end
  52.  
  53. if v.Name == "Randoms" then
  54. for x, y in pairs(v:GetChildren()) do
  55. if y.Name == "Atm" then
  56. if y:FindFirstChild("Opened") then
  57. y.Opened.Value = true
  58. end
  59. end
  60. end
  61. end
  62.  
  63. if v.Name == "Lootables" then
  64. for z, q in pairs(v:GetChildren()) do
  65. if q.Name == "NewSafe" then
  66. if q:FindFirstChild("DrillDoor") then
  67. q.DrillDoorBig:Destroy()
  68. end
  69. elseif q.Name == "ShadowBox" then
  70. if q:FindFirstChild("Lid") then
  71. q.LidBig:Destroy()
  72. end
  73. end
  74. end
  75. end
  76.  
  77. end
  78.  
  79. -- Never Detected --
  80.  
  81. while wait(0.1) do
  82. workspace.Detected.Value = false
  83. for i, v in pairs(Criminals:GetChildren()) do
  84. if v:FindFirstChild("Detection") then
  85. v.Detection.Value = 0
  86. v.Health.Value = 10000
  87. v.Armor.Value = 4000
  88. v.humanoid.MaxHealth = 10000
  89. v.humanoid.Health = 10000
  90. v.humanoid.JumpPower = 100
  91. v.humanoid.WalkSpeed = 100
  92. end
  93. end
  94. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement