NoTextForSpeech

the red lake script

Feb 24th, 2024
27
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.22 KB | None | 0 0
  1. local library = loadstring(game:HttpGet("https://raw.githubusercontent.com/xHeptc/Kavo-UI-Library/main/source.lua"))()
  2. local window = library.CreateLib("Novaz#5792", "BloodTheme")
  3. local main = window:NewTab("Main")
  4. local section = main:NewSection("Main")
  5. local section1 = main:NewSection("ESP")
  6. local main1 = window:NewTab("Misc")
  7. local section2 = main1:NewSection("Local Player")
  8. local plr = game.Players.LocalPlayer
  9.  
  10. local function getclosestenemy()
  11. local closest = nil
  12. local maxdist = math.huge
  13. for i,v in pairs(game.Workspace.NPCs:GetChildren()) do
  14. if v.Name == "Tango" or v.Name == "Monsters" then
  15. for o,k in pairs(v:GetChildren()) do
  16. if k:IsA("Model") and k:FindFirstChild("HumanoidRootPart") then
  17. local magnitude = (k:FindFirstChild("HumanoidRootPart").Position - plr.Character.HumanoidRootPart.Position).Magnitude
  18. if magnitude < maxdist then
  19. closest = k
  20. maxdist = magnitude
  21. end
  22. end
  23. end
  24. end
  25. end
  26. return closest
  27. end
  28.  
  29. local function getclosestenemytm()
  30. local closest = nil
  31. local maxdist = math.huge
  32. for i,v in pairs(game.Workspace.NPCs:GetChildren()) do
  33. if v.Name == "Tango" or v.Name == "Monsters" then
  34. for o,k in pairs(v:GetChildren()) do
  35. if k:IsA("Model") and k:FindFirstChild("HumanoidRootPart") then
  36. local screenpoint = game.Workspace.CurrentCamera:WorldToScreenPoint(k:FindFirstChild("HumanoidRootPart").Position)
  37. local distance = (Vector2.new(game.Players.LocalPlayer:GetMouse().x, game.Players.LocalPlayer:GetMouse().y) - Vector2.new(screenpoint.x, screenpoint.y)).Magnitude
  38. if distance < maxdist then
  39. closest = k
  40. maxdist = distance
  41. end
  42. end
  43. end
  44. end
  45. end
  46. return closest
  47. end
  48.  
  49. section:NewToggle("Silent Aim", "", function(c)
  50. d = c
  51. while d and task.wait() do
  52. pcall(function()
  53. plr.Character:FindFirstChildOfClass("Tool").Main:FireServer("DAMAGE", {getclosestenemytm():FindFirstChild("Head"), getclosestenemytm():FindFirstChild("Head").Position, 0, false})
  54. end)
  55. end
  56. end)
  57.  
  58. section:NewToggle("Kill Closest", "", function(a)
  59. b = a
  60. while b and task.wait() do
  61. pcall(function()
  62. if tonumber(plr.PlayerGui.Crosshair.Counter.StoredAmmo.Text) >= 10 then
  63. plr.Character:FindFirstChildOfClass("Tool").Main:FireServer("AMMO")
  64. plr.Character:FindFirstChildOfClass("Tool").Main:FireServer("MUZZLE", plr.Character:FindFirstChildOfClass("Tool").Handle.Barrel)
  65. plr.Character:FindFirstChildOfClass("Tool").Main:FireServer("DAMAGE", {getclosestenemy():FindFirstChild("Head"), getclosestenemy():FindFirstChild("Head").Position, 0, false})
  66. elseif tonumber(plr.PlayerGui.Crosshair.Counter.StoredAmmo.Text) < 10 then
  67. task.wait()
  68. local oldpos = plr.Character.HumanoidRootPart.Position
  69. wait(.1)
  70. plr.Character.HumanoidRootPart.CFrame = game:GetService("Workspace").Maps["Chaos Facility"].Misc.Ammo.Box.Main.CFrame
  71. wait(.5)
  72. fireproximityprompt(game:GetService("Workspace").Maps["Chaos Facility"].Misc.Ammo.Box.Main:FindFirstChild("Template"))
  73. wait(.5)
  74. plr.Character.HumanoidRootPart.CFrame = CFrame.new(oldpos)
  75. end
  76. end)
  77. end
  78. end)
  79.  
  80. section:NewToggle("Instant Reload", "", function(q)
  81. r = q
  82. while r and task.wait() do
  83. pcall(function()
  84. plr.Character:FindFirstChildOfClass("Tool").Main:FireServer("AMMO")
  85. end)
  86. end
  87. end)
  88.  
  89. section:NewButton("Fill Up Ammo", "", function()
  90. pcall(function()
  91. local oldpos = plr.Character.HumanoidRootPart.Position
  92. wait(.1)
  93. plr.Character.HumanoidRootPart.CFrame = game:GetService("Workspace").Maps["Chaos Facility"].Misc.Ammo.Box.Main.CFrame
  94. wait(.5)
  95. fireproximityprompt(game:GetService("Workspace").Maps["Chaos Facility"].Misc.Ammo.Box.Main:FindFirstChild("Template"))
  96. wait(.5)
  97. plr.Character.HumanoidRootPart.CFrame = CFrame.new(oldpos)
  98. end)
  99. end)
  100.  
  101. section1:NewToggle("Enemy ESP", "", function(o)
  102. oo = o
  103. while oo and task.wait() do
  104. pcall(function()
  105. for i,v in pairs(game.Workspace.NPCs:GetChildren()) do
  106. if v.Name == "Tango" or v.Name == "Monsters" then
  107. for o,k in pairs(v:GetChildren()) do
  108. if (not k:FindFirstChildOfClass("Highlight")) and k.Parent.Name == "Tango" then
  109. local Highlight = Instance.new("Highlight")
  110. Highlight.Parent = k
  111. Highlight.Adornee = k
  112. Highlight.OutlineColor = Color3.fromRGB(1, 1, 1)
  113. Highlight.OutlineTransparency = 0
  114. Highlight.FillTransparency = 1
  115. elseif (not k:FindFirstChildOfClass("Highlight")) and k.Parent.Name == "Monsters" then
  116. local Highlight = Instance.new("Highlight")
  117. Highlight.Parent = k
  118. Highlight.Adornee = k
  119. Highlight.OutlineColor = Color3.fromRGB(255, 0, 0)
  120. Highlight.OutlineTransparency = 0
  121. Highlight.FillTransparency = 1
  122. end
  123. end
  124. end
  125. end
  126. end)
  127. end
  128. end)
Add Comment
Please, Sign In to add comment