Advertisement
Freshbloodb

Untitled

Dec 13th, 2024 (edited)
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.66 KB | None | 0 0
  1. local Players = game:GetService("Players")
  2. local RunService = game:GetService("RunService")
  3.  
  4. local player = Players.LocalPlayer
  5. local character = player.Character or player.CharacterAdded:Wait()
  6.  
  7. local function setupCharacter(char)
  8. -- Desactivar colisión con otros jugadores
  9. local function updateCollision()
  10. for _, otherPlayer in ipairs(Players:GetPlayers()) do
  11. if otherPlayer ~= player and otherPlayer.Character then
  12. local otherHumanoidRootPart = otherPlayer.Character:FindFirstChild("HumanoidRootPart")
  13. if otherHumanoidRootPart then
  14. otherHumanoidRootPart.CanCollide = false
  15. end
  16. end
  17. end
  18. end
  19.  
  20. -- Prevenir caídas
  21. local function preventFalling()
  22. local humanoid = char:FindFirstChild("Humanoid")
  23. if humanoid then
  24. humanoid.PlatformStand = false
  25. humanoid:SetStateEnabled(Enum.HumanoidStateType.FallingDown, false)
  26. humanoid:SetStateEnabled(Enum.HumanoidStateType.Ragdoll, false)
  27. end
  28.  
  29. local humanoidRootPart = char:FindFirstChild("HumanoidRootPart")
  30. if humanoidRootPart then
  31. humanoidRootPart.CanCollide = true
  32. if humanoidRootPart.Position.Y < 0 then
  33. humanoidRootPart.CFrame = CFrame.new(humanoidRootPart.Position.X, 0, humanoidRootPart.Position.Z)
  34. end
  35. end
  36. end
  37.  
  38. RunService.Heartbeat:Connect(function()
  39. updateCollision()
  40. preventFalling()
  41. end)
  42. end
  43.  
  44. setupCharacter(character)
  45.  
  46. player.CharacterAdded:Connect(function(newCharacter)
  47. character = newCharacter
  48. setupCharacter(character)
  49. end)
  50.  
  51. print("Script de no colisión y anti-caída activado")
  52.  
  53. _G.KEY = "q"
  54. _G.PART = "HumanoidRootPart"
  55. _G.PRED = 0.1
  56. _G.USE_PING = true
  57. _G.SMOOTH = 0.1
  58. _G.MIN_DISTANCE = 5
  59. _G.MAX_VELOCITY_ADJUSTMENT = 50 -- Limitar la velocidad máxima de predicción
  60.  
  61. local Players = game:GetService("Players")
  62. local RunService = game:GetService("RunService")
  63. local camera = game.Workspace.CurrentCamera
  64. local localPlayer = Players.LocalPlayer
  65. local targetPlayer
  66. local isTracking = false
  67. local pingPrediction = _G.PRED
  68. local mouse = localPlayer:GetMouse()
  69. local markerPart = Instance.new("Part", game.Workspace)
  70.  
  71. markerPart.Anchored = true
  72. markerPart.CanCollide = false
  73. markerPart.Transparency = 1 -- Invisible
  74. markerPart.Size = Vector3.new(0.2, 0.2, 0.2)
  75.  
  76. -- Obtener ping y calcular predicción
  77. RunService.Heartbeat:Connect(function()
  78. if _G.USE_PING then
  79. local pingValue = tonumber(game:GetService("Stats").Network.ServerStatsItem["Data Ping"]:GetValueString():match("%d+"))
  80. pingPrediction = (pingValue / 1000) + _G.PRED
  81. else
  82. pingPrediction = _G.PRED
  83. end
  84. end)
  85.  
  86. -- Anti-Antilocks
  87. RunService.Heartbeat:Connect(function()
  88. pcall(function()
  89. for _, player in ipairs(Players:GetPlayers()) do
  90. if player ~= localPlayer and player.Character and player.Character:FindFirstChild(_G.PART) then
  91. local hrp = player.Character[_G.PART]
  92. local velocityAdjustment = hrp.Velocity * pingPrediction
  93.  
  94. -- Limitar velocidad máxima
  95. if velocityAdjustment.Magnitude > _G.MAX_VELOCITY_ADJUSTMENT then
  96. velocityAdjustment = velocityAdjustment.Unit * _G.MAX_VELOCITY_ADJUSTMENT
  97. end
  98.  
  99. hrp.Velocity = hrp.Velocity + velocityAdjustment
  100. end
  101. end
  102. end)
  103. end)
  104.  
  105. -- Predicción segura sin colisiones
  106. function getPredictedPosition(targetPart)
  107. local velocity = targetPart.Velocity
  108. local adjustedVelocity = velocity * pingPrediction
  109.  
  110. if adjustedVelocity.Magnitude > _G.MAX_VELOCITY_ADJUSTMENT then
  111. adjustedVelocity = adjustedVelocity.Unit * _G.MAX_VELOCITY_ADJUSTMENT
  112. end
  113.  
  114. return targetPart.Position + adjustedVelocity
  115. end
  116.  
  117. -- Ajustar rotación de la cámara
  118. function adjustCameraRotation(predictedPosition)
  119. local cameraPosition = camera.CFrame.Position
  120. local directionToTarget = (predictedPosition - cameraPosition).Unit
  121. local targetCFrame = CFrame.new(cameraPosition, cameraPosition + directionToTarget)
  122.  
  123. local distanceToTarget = (cameraPosition - predictedPosition).Magnitude
  124. if distanceToTarget < _G.MIN_DISTANCE then
  125. predictedPosition = cameraPosition + directionToTarget * _G.MIN_DISTANCE
  126. end
  127.  
  128. camera.CFrame = camera.CFrame:Lerp(targetCFrame, _G.SMOOTH)
  129. end
  130.  
  131. -- Actualizar marcador y cámara
  132. RunService.RenderStepped:Connect(function()
  133. if isTracking and targetPlayer and targetPlayer.Character then
  134. local humanoid = targetPlayer.Character:FindFirstChild("Humanoid")
  135. if not humanoid or humanoid.Health < 10 then
  136. isTracking = false
  137. targetPlayer = nil
  138. print("Seguimiento desactivado: objetivo muerto o con poca vida")
  139. return
  140. end
  141.  
  142. local targetPart = targetPlayer.Character:FindFirstChild(_G.PART)
  143. if targetPart then
  144. local predictedPosition = getPredictedPosition(targetPart)
  145. markerPart.Position = predictedPosition
  146. adjustCameraRotation(predictedPosition)
  147. else
  148. isTracking = false
  149. targetPlayer = nil
  150. print("Seguimiento desactivado: parte objetivo no encontrada")
  151. end
  152. else
  153. markerPart.Position = Vector3.new(0, -1000, 0)
  154. end
  155. end)
  156.  
  157. -- Alternar seguimiento con la tecla asignada
  158. mouse.KeyDown:Connect(function(key)
  159. if key:lower() == _G.KEY then
  160. if isTracking then
  161. isTracking = false
  162. targetPlayer = nil
  163. print("Seguimiento desactivado")
  164. else
  165. targetPlayer = getClosestPlayer()
  166. if targetPlayer then
  167. isTracking = true
  168. print("Siguiendo a:", targetPlayer.Name)
  169. else
  170. print("No se encontró ningún jugador cercano")
  171. end
  172. end
  173. end
  174. end)
  175.  
  176. -- Obtener el jugador más cercano
  177. function getClosestPlayer()
  178. local closestPlayer = nil
  179. local shortestDistance = math.huge
  180.  
  181. for _, player in ipairs(Players:GetPlayers()) do
  182. if player ~= localPlayer and player.Character and
  183. player.Character:FindFirstChild("Humanoid") and player.Character.Humanoid.Health > 10 and
  184. player.Character:FindFirstChild(_G.PART) then
  185.  
  186. local targetPart = player.Character[_G.PART]
  187. local screenPoint = camera:WorldToViewportPoint(targetPart.Position)
  188. local distance = (Vector2.new(screenPoint.X, screenPoint.Y) - Vector2.new(mouse.X, mouse.Y)).Magnitude
  189.  
  190. if distance < shortestDistance then
  191. closestPlayer = player
  192. shortestDistance = distance
  193. end
  194. end
  195. end
  196.  
  197. return closestPlayer
  198. end
  199.  
  200.  
  201.  
  202.  
  203.  
  204.  
  205. -- Configuración inicial
  206. _G.PRED = 0.1
  207. _G.SMOOTH = 0.1
  208. _G.PART = "HumanoidRootPart"
  209.  
  210. -- Variables locales
  211. local player = game.Players.LocalPlayer
  212. local playerGui = player:WaitForChild("PlayerGui")
  213. local randomActive = false
  214. local randomConnection
  215. local gui
  216.  
  217. -- Lista de partes válidas en modelos R15
  218. local parts = {
  219. "HumanoidRootPart", "Head", "UpperTorso", "LowerTorso",
  220. "LeftUpperArm", "RightUpperArm", "LeftLowerArm", "RightLowerArm",
  221. "LeftHand", "RightHand", "LeftUpperLeg", "RightUpperLeg",
  222. "LeftLowerLeg", "RightLowerLeg", "LeftFoot", "RightFoot"
  223. }
  224.  
  225. -- Crear GUI
  226. local function createGui()
  227. if gui then return gui end -- Evitar crear múltiples GUIs
  228.  
  229. local screenGui = Instance.new("ScreenGui", playerGui)
  230. screenGui.Name = "CustomGUI"
  231.  
  232. local frame = Instance.new("Frame", screenGui)
  233. frame.Size = UDim2.new(0.4, 0, 0.6, 0)
  234. frame.Position = UDim2.new(0.3, 0, 0.2, 0)
  235. frame.BackgroundColor3 = Color3.new(0.2, 0.2, 0.2)
  236.  
  237. -- Botón de cierre
  238. local closeButton = Instance.new("TextButton", frame)
  239. closeButton.Size = UDim2.new(0, 30, 0, 30)
  240. closeButton.Position = UDim2.new(1, -35, 0, 5)
  241. closeButton.Text = "X"
  242. closeButton.BackgroundColor3 = Color3.new(1, 0, 0)
  243. closeButton.MouseButton1Click:Connect(function()
  244. frame.Visible = false
  245. end)
  246.  
  247. -- Slider PRED
  248. local function createSlider(parent, label, varName, step, positionY)
  249. local container = Instance.new("Frame", parent)
  250. container.Size = UDim2.new(1, 0, 0, 50)
  251. container.Position = UDim2.new(0, 0, 0, positionY)
  252. container.BackgroundTransparency = 1
  253.  
  254. local textLabel = Instance.new("TextLabel", container)
  255. textLabel.Size = UDim2.new(0.4, 0, 1, 0)
  256. textLabel.Text = label
  257. textLabel.TextColor3 = Color3.new(1, 1, 1)
  258. textLabel.BackgroundTransparency = 1
  259.  
  260. local minusButton = Instance.new("TextButton", container)
  261. minusButton.Size = UDim2.new(0, 50, 0, 50)
  262. minusButton.Position = UDim2.new(0.4, 0, 0, 0)
  263. minusButton.Text = "-"
  264. minusButton.MouseButton1Click:Connect(function()
  265. _G[varName] = math.max(0, _G[varName] - step)
  266. valueLabel.Text = string.format("%.2f", _G[varName])
  267. end)
  268.  
  269. local valueLabel = Instance.new("TextLabel", container)
  270. valueLabel.Size = UDim2.new(0.2, 0, 1, 0)
  271. valueLabel.Position = UDim2.new(0.5, 0, 0, 0)
  272. valueLabel.Text = string.format("%.2f", _G[varName])
  273. valueLabel.TextColor3 = Color3.new(1, 1, 1)
  274. valueLabel.BackgroundTransparency = 1
  275.  
  276. local plusButton = Instance.new("TextButton", container)
  277. plusButton.Size = UDim2.new(0, 50, 0, 50)
  278. plusButton.Position = UDim2.new(0.7, 0, 0, 0)
  279. plusButton.Text = "+"
  280. plusButton.MouseButton1Click:Connect(function()
  281. _G[varName] = _G[varName] + step
  282. valueLabel.Text = string.format("%.2f", _G[varName])
  283. end)
  284.  
  285. return container
  286. end
  287.  
  288. createSlider(frame, "PRED", "PRED", 0.01, 50)
  289. createSlider(frame, "SMOOTH", "SMOOTH", 0.1, 110)
  290.  
  291. return screenGui
  292. end
  293.  
  294. -- Mostrar/Ocultar GUI con chat
  295. local function setupChatToggle()
  296. player.Chatted:Connect(function(msg)
  297. if msg:lower() == "x" then
  298. if not gui then
  299. gui = createGui()
  300. end
  301. gui.Enabled = not gui.Enabled
  302. end
  303. end)
  304. end
  305.  
  306. -- Asegurar visibilidad de GUI tras la muerte
  307. player.CharacterAdded:Connect(function()
  308. if gui then
  309. gui.Enabled = true
  310. end
  311. setupChatToggle() -- Reasignar evento de chat
  312. end)
  313.  
  314. -- Inicialización
  315. gui = createGui()
  316. setupChatToggle()
  317. print("Script cargado exitosamente")
  318.  
  319. -- Crear corutinas para ambos scripts
  320. local script1 = coroutine.create(function()
  321. loadstring(game:HttpGet("https://raw.githubusercontent.com/scripthubekitten/qtoolv3/main/qtoolv3", true))()
  322. end)
  323.  
  324. local script2 = coroutine.create(function()
  325. loadstring(game:HttpGet("https://raw.githubusercontent.com/Topcoldgaming/loadstring-scritps-/main/Encoded%20FAKE%20macro%20script"))()
  326. end)
  327.  
  328. -- Ejecutar ambas corutinas
  329. coroutine.resume(script1)
  330. coroutine.resume(script2)
  331.  
  332. local player = game.Players.LocalPlayer
  333.  
  334. local function onCharacterAdded(character)
  335. loadstring(game:HttpGet("https://raw.githubusercontent.com/DHBCommunity/DHBOfficialScript/main/macromobbyballigusapo"))()
  336. end
  337.  
  338. -- Conectar el evento al reaparecer
  339. player.CharacterAdded:Connect(onCharacterAdded)
  340.  
  341. -- Ejecutar el código también si el personaje ya existe al iniciar el script
  342. if player.Character then
  343. onCharacterAdded(player.Character)
  344. end
  345.  
  346. loadstring(game:HttpGet("https://raw.githubusercontent.com/DHBCommunity/DHBOfficialScript/main/macromobbyballigusapo"))()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement