thegameplayer

Untitled

Jun 6th, 2023
28
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.00 KB | None | 0 0
  1.  
  2. Settings = {
  3. Kalslock = {
  4. Enabled = true,
  5. Key = "q",
  6. showdot = true,
  7. airshots = true,
  8. notifaction = true,
  9. pingprediction = true,
  10. FOV = math.huge,
  11. RESOVLER = true,
  12. Tracer = true,
  13. TracerColor = Color3.new(0, 255, 238),
  14. TracerTransparency = 0.75,
  15. TracerThickness = 5,
  16. Circles = false,
  17. CircleFOV = 500,
  18. CircleColor = Color3.new(255, 255, 255),
  19. CircleThickness = 2,
  20. CircleFilled = true,
  21. CircleTransparency = 0.10,
  22. CircleTransparencyOutline = 0,
  23. OutlineColor = Color3.new(255, 255, 255),
  24. Texts = false,
  25. TextColor = Color3.new(255, 255, 255),
  26. TextSize = 35,
  27. TextInput = "skidded",
  28. Hitbox = true,
  29. NoBulletDelay = false,
  30. Autoclicker = false,
  31. AutoclickerTime = 0.01,
  32. AutoclickerKey = "v",
  33. AnimationPack = false
  34.  
  35. }
  36. }
  37.  
  38. --[[
  39. Parts - / HumanoidRootPart / LowerTorso / UpperTorso / Head
  40. ]]
  41.  
  42. local SelectedPart = "HumanoidRootPart"
  43. local Prediction = true
  44. local PredictionValue = 0.132
  45.  
  46.  
  47.  
  48. local AnchorCount = 0
  49. local MaxAnchor = 50
  50.  
  51. local CC = game:GetService"Workspace".CurrentCamera
  52. local Plr;
  53. local enabled = false
  54. local accomidationfactor = 0.132
  55. local mouse = game.Players.LocalPlayer:GetMouse()
  56.  
  57. local Inset = game:GetService("GuiService"):GetGuiInset().Y
  58. local Line = Drawing.new("Line")
  59. local Text = Drawing.new("Text")
  60. local Circle = Drawing.new("Circle")
  61. local Circle1 = Drawing.new("Circle")
  62.  
  63.  
  64. _G.Types = {
  65. Ball = Enum.PartType.Ball,
  66. Block = Enum.PartType.Block,
  67. Cylinder = Enum.PartType.Cylinder
  68. }
  69.  
  70. local placemarker = Instance.new("Part", game.Workspace)
  71. placemarker.Shape = _G.Types.Ball
  72. placemarker.Material = "ForceField"
  73. placemarker.Color = Color3.new(0, 1, 1)
  74.  
  75. function makemarker(Parent, Adornee, Color, Size, Size2)
  76. local e = Instance.new("BillboardGui", Parent)
  77. e.Name = "PP"
  78. e.Adornee = Adornee
  79. e.Size = UDim2.new(Size, Size2, Size, Size2)
  80. e.AlwaysOnTop = Settings.Kalslock.showdot
  81. local a = Instance.new("Frame", e)
  82. if Settings.Kalslock.showdot == true then
  83. a.Size = UDim2.new(1, 0, 1, 0)
  84. else
  85. a.Size = UDim2.new(0, 0, 0, 0)
  86. end
  87. if Settings.Kalslock.showdot == true then
  88. a.Transparency = 0
  89. a.BackgroundTransparency = 0
  90. else
  91. a.Transparency = 1
  92. a.BackgroundTransparency = 1
  93. end
  94. a.BackgroundColor3 = Color
  95. local g = Instance.new("UICorner", a)
  96. if Settings.Kalslock.showdot == false then
  97. g.CornerRadius = UDim.new(0, 0)
  98. else
  99. g.CornerRadius = UDim.new(1, 1)
  100. end
  101. return(e)
  102. end
  103.  
  104.  
  105. local data = game.Players:GetPlayers()
  106. function noob(player)
  107. local character
  108. repeat wait() until player.Character
  109. local handler = makemarker(guimain, player.Character:WaitForChild(SelectedPart), Color3.fromRGB(0, 255, 229), 0.3, 3)
  110. handler.Name = player.Name
  111. player.CharacterAdded:connect(function(Char) handler.Adornee = Char:WaitForChild(SelectedPart) end)
  112.  
  113.  
  114. spawn(function()
  115. while wait() do
  116. if player.Character then
  117. end
  118. end
  119. end)
  120. end
  121.  
  122. for i = 1, #data do
  123. if data[i] ~= game.Players.LocalPlayer then
  124. noob(data[i])
  125. end
  126. end
  127.  
  128. game.Players.PlayerAdded:connect(function(Player)
  129. noob(Player)
  130. end)
  131.  
  132. spawn(function()
  133. placemarker.Anchored = true
  134. placemarker.CanCollide = false
  135. if Settings.Kalslock.showdot == true then
  136. placemarker.Size = Vector3.new(11, 11, 11)
  137. else
  138. placemarker.Size = Vector3.new(0, 0, 0)
  139. end
  140. if Settings.Kalslock.Hitbox == true then
  141. placemarker.Transparency = 0.30
  142. else
  143. placemarker.Transparency = 1
  144. end
  145. if Settings.Kalslock.showdot then
  146. makemarker(placemarker, placemarker, Color3.fromRGB(0, 255, 238), 0.80, 0)
  147. end
  148. end)
  149.  
  150. game.Players.LocalPlayer:GetMouse().KeyDown:Connect(function(k)
  151. if k == Settings.Kalslock.Key and Settings.Kalslock.Enabled then
  152. if enabled == true then
  153. enabled = false
  154. if Settings.Kalslock.notifaction == true then
  155. Plr = getClosestPlayerToCursor()
  156. game.StarterGui:SetCore("SendNotification", {
  157. Title = "Kal Skidded This";
  158. Text = " Unlocked",
  159. Icon = "http://www.roblox.com/asset/?id=5314810647",
  160. Duration = 3
  161. })
  162. end
  163. else
  164. Plr = getClosestPlayerToCursor()
  165. enabled = true
  166. if Settings.Kalslock.notifaction == true then
  167.  
  168. game.StarterGui:SetCore("SendNotification", {
  169. Title = "Kal Skidded This";
  170. Text = " Target: "..tostring(Plr.Character.Humanoid.DisplayName),
  171. Icon = "http://www.roblox.com/asset/?id=8709610734",
  172. Duration = 3
  173. })
  174.  
  175. end
  176. end
  177. end
  178. end)
  179.  
  180.  
  181.  
  182. function getClosestPlayerToCursor()
  183. local closestPlayer
  184. local shortestDistance = Settings.Kalslock.FOV
  185.  
  186. for i, v in pairs(game.Players:GetPlayers()) do
  187. if v ~= game.Players.LocalPlayer and v.Character and v.Character:FindFirstChild("Humanoid") and v.Character.Humanoid.Health ~= 0 and v.Character:FindFirstChild("HumanoidRootPart") then
  188. local pos = CC:WorldToViewportPoint(v.Character.PrimaryPart.Position)
  189. local magnitude = (Vector2.new(pos.X, pos.Y) - Vector2.new(mouse.X, mouse.Y)).magnitude
  190. if magnitude < shortestDistance then
  191. closestPlayer = v
  192. shortestDistance = magnitude
  193. end
  194. end
  195. end
  196. return closestPlayer
  197. end
  198.  
  199. local pingvalue = nil;
  200. local split = nil;
  201. local ping = nil;
  202.  
  203. game:GetService"RunService".Stepped:connect(function()
  204. if enabled and Plr.Character ~= nil and Plr.Character:FindFirstChild("HumanoidRootPart") then
  205. placemarker.CFrame = CFrame.new(Plr.Character.HumanoidRootPart.Position)
  206. local Vector1 = CC:WorldToViewportPoint(Plr.Character.HumanoidRootPart.Position)
  207. Line.Color = Settings.Kalslock.TracerColor
  208. Line.Transparency = Settings.Kalslock.TracerTransparency
  209. Line.Thickness = Settings.Kalslock.TracerThickness
  210. Line.From = Vector2.new(mouse.X, mouse.Y + Inset)
  211. Line.To = Vector2.new(Vector1.X, Vector1.Y)
  212. Line.Visible = Settings.Kalslock.Tracer
  213. Text.Position = Vector2.new(mouse.X, mouse.Y + Inset)
  214. Text.Visible = Settings.Kalslock.Texts
  215. Text.Center = true
  216. Text.Outline = true
  217. Text.Font = 1
  218. Text.Size = Settings.Kalslock.TextSize
  219. Text.Color = Settings.Kalslock.TextColor
  220. Text.Text = Settings.Kalslock.TextInput
  221. Circle.Position = Vector2.new(mouse.X, mouse.Y + Inset)
  222. Circle.Visible = Settings.Kalslock.Circles
  223. Circle.Thickness = 1.5
  224. Circle.Thickness = Settings.Kalslock.CircleThickness
  225. Circle.Radius = Settings.Kalslock.CircleFOV
  226. Circle.Color = Settings.Kalslock.CircleColor
  227. Circle.Filled = Settings.Kalslock.CircleFilled
  228. Circle.Transparency = Settings.Kalslock.CircleTransparency
  229. Circle1.Visible = true
  230. Circle1.Radius = Settings.Kalslock.CircleTransparencyOutline
  231. Circle1.Position = Vector2.new(mouse.X, mouse.Y + Inset)
  232. Circle1.Thickness = 5
  233. Circle1.Color = Settings.Kalslock.OutlineColor
  234.  
  235. else
  236. Circle.Visible = false
  237. Line.Visible = false
  238. Text.Visible = false
  239. Circle1.Visible = false
  240. placemarker.CFrame = CFrame.new(0, 9999, 0)
  241. end
  242. if Settings.Kalslock.pingprediction == true then
  243. pingvalue = game:GetService("Stats").Network.ServerStatsItem["Data Ping"]:GetValueString()
  244. split = string.split(pingvalue,'(')
  245. ping = tonumber(split[1])
  246. if ping < 130 then
  247. PredictionValue = 0.151
  248. elseif ping < 125 then
  249. PredictionValue = 0.149
  250. elseif ping < 110 then
  251. PredictionValue = 0.146
  252. elseif ping < 105 then
  253. PredictionValue = 0.138
  254. elseif ping < 90 then
  255. PredictionValue = 0.136
  256. elseif ping < 80 then
  257. PredictionValue = 0.134
  258. elseif ping < 70 then
  259. PredictionValue = 0.131
  260. elseif ping < 60 then
  261. PredictionValue = 0.1229
  262. elseif ping < 50 then
  263. PredictionValue = 0.1225
  264. elseif ping < 40 then
  265. PredictionValue = 0.1256
  266. end
  267. end
  268. end)
  269.  
  270. local mt = getrawmetatable(game)
  271. local old = mt.__namecall
  272. setreadonly(mt, false)
  273. mt.__namecall = newcclosure(function(...)
  274. local args = {...}
  275. if enabled and getnamecallmethod() == "FireServer" and args[2] == "UpdateMousePos" and Settings.Kalslock.Enabled and Plr.Character ~= nil then
  276.  
  277. -- args[3] = Plr.Character.HumanoidRootPart.Position+(Plr.Character.HumanoidRootPart.Velocity*accomidationfactor)
  278. --[[
  279. if Settings.Kalslock.airshots == true then
  280. if game.Workspace.Players[Plr.Name].Humanoid:GetState() == Enum.HumanoidStateType.Freefall then -- Plr.Character:WaitForChild("Humanoid"):GetState() == Enum.HumanoidStateType.Freefall
  281.  
  282. --// Airshot
  283. args[3] = Plr.Character.LeftFoot.Position+(Plr.Character.LeftFoot.Velocity*PredictionValue)
  284.  
  285. else
  286. args[3] = Plr.Character.HumanoidRootPart.Position+(Plr.Character.HumanoidRootPart.Velocity*PredictionValue)
  287.  
  288. end
  289. else
  290. args[3] = Plr.Character.HumanoidRootPart.Position+(Plr.Character.HumanoidRootPart.Velocity*PredictionValue)
  291. end
  292. ]]
  293. if Prediction == true then
  294.  
  295. args[3] = Plr.Character[SelectedPart].Position+(Plr.Character[SelectedPart].Velocity*PredictionValue)
  296.  
  297. else
  298.  
  299. args[3] = Plr.Character[SelectedPart].Position
  300.  
  301. end
  302.  
  303. return old(unpack(args))
  304. end
  305. return old(...)
  306. end)
  307.  
  308. game:GetService("RunService").RenderStepped:Connect(function()
  309. if Settings.Kalslock.RESOVLER == true and Plr.Character ~= nil and enabled and Settings.Kalslock.Enabled then
  310. if Settings.Kalslock.airshots == true and enabled and Plr.Character ~= nil then
  311.  
  312. if game.Workspace.Players[Plr.Name].Humanoid:GetState() == Enum.HumanoidStateType.Freefall then -- Plr.Character:WaitForChild("Humanoid"):GetState() == Enum.HumanoidStateType.Freefall
  313.  
  314.  
  315.  
  316. if Plr.Character ~= nil and Plr.Character.HumanoidRootPart.Anchored == true then
  317. AnchorCount = AnchorCount + 1
  318. if AnchorCount >= MaxAnchor then
  319. Prediction = false
  320. wait(2)
  321. AnchorCount = 0;
  322. end
  323. else
  324. Prediction = true
  325. AnchorCount = 0;
  326. end
  327.  
  328. SelectedPart = "LeftFoot"
  329.  
  330. else
  331.  
  332.  
  333. if Plr.Character ~= nil and Plr.Character.HumanoidRootPart.Anchored == true then
  334. AnchorCount = AnchorCount + 1
  335. if AnchorCount >= MaxAnchor then
  336. Prediction = false
  337. wait(2)
  338. AnchorCount = 0;
  339. end
  340.  
  341. else
  342. Prediction = true
  343. AnchorCount = 0;
  344. end
  345.  
  346. SelectedPart = "HumanoidRootPart"
  347.  
  348. end
  349. else
  350.  
  351.  
  352.  
  353. if Plr.Character ~= nil and Plr.Character.HumanoidRootPart.Anchored == true then
  354. AnchorCount = AnchorCount + 1
  355. if AnchorCount >= MaxAnchor then
  356. Prediction = false
  357. wait(2)
  358. AnchorCount = 0;
  359. end
  360. else
  361. Prediction = true
  362. AnchorCount = 0;
  363. end
  364. SelectedPart = "HumanoidRootPart"
  365. end
  366. else
  367. SelectedPart = "HumanoidRootPart"
  368. end
  369. end)
  370.  
  371. if Settings.Kalslock.NoBulletDelay == true then
  372. local FuckDelay = game:GetService("CorePackages").Packages
  373. FuckDelay:Destroy()
  374. end
  375.  
  376. if Settings.Kalslock.Autoclicker == true then
  377. local time = Settings.Kalslock.AutoclickerTime --decrease if too slow increase if too fast
  378.  
  379. click = false
  380. m = game.Players.LocalPlayer:GetMouse()
  381. m.KeyDown:connect(function(key)
  382. if key == Settings.Kalslock.AutoclickerKey then
  383. if click == true then click = false
  384. elseif
  385. click == false then click = true
  386.  
  387. while click == true do
  388. wait(time)
  389. mouse1click()
  390. end
  391. end
  392. end
  393. end)
  394. end
  395.  
Add Comment
Please, Sign In to add comment