xDavid673x

fling player

Aug 4th, 2022
40
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 15.17 KB | None | 0 0
  1. local ultimateFling = Instance.new("ScreenGui")
  2. local drag = Instance.new("Frame")
  3. local UICorner = Instance.new("UICorner")
  4. local windowNameFrame = Instance.new("Frame")
  5. local UICorner_2 = Instance.new("UICorner")
  6. local windowNameLabel = Instance.new("TextLabel")
  7. local closeButton = Instance.new("TextButton")
  8. local mainFrame = Instance.new("Frame")
  9. local UICorner_3 = Instance.new("UICorner")
  10. local buttonsFrame = Instance.new("Frame")
  11. local toggleButton = Instance.new("TextButton")
  12. local UICorner_4 = Instance.new("UICorner")
  13. local rotSpeedLabel = Instance.new("TextLabel")
  14. local UICorner_5 = Instance.new("UICorner")
  15. local rotSpeedTextbox = Instance.new("TextBox")
  16. local flySpeedLabel = Instance.new("TextLabel")
  17. local UICorner_6 = Instance.new("UICorner")
  18. local flySpeedTextbox = Instance.new("TextBox")
  19. local UICorner_7 = Instance.new("UICorner")
  20. local notificationsFrame = Instance.new("Frame")
  21. local UIListLayout = Instance.new("UIListLayout")
  22. local notificationTemplate = Instance.new("TextLabel")
  23. local teleportersFrame = Instance.new("Frame")
  24. local teleportingLabel = Instance.new("TextLabel")
  25. local UICorner_8 = Instance.new("UICorner")
  26. local tpingTextbox = Instance.new("TextBox")
  27.  
  28. ultimateFling.Name = "ultimateFling"
  29. ultimateFling.Parent = game:GetService("CoreGui")
  30. ultimateFling.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  31. ultimateFling.ResetOnSpawn = false
  32.  
  33. drag.Name = "drag"
  34. drag.Parent = ultimateFling
  35. drag.Active = true
  36. drag.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  37. drag.BackgroundTransparency = 1.000
  38. drag.Draggable = true
  39. drag.Position = UDim2.new(0.5, -150, 0.5, -67)
  40. drag.Selectable = true
  41. drag.Size = UDim2.new(0, 300, 0, 135)
  42.  
  43. UICorner.Parent = drag
  44.  
  45. windowNameFrame.Name = "windowNameFrame"
  46. windowNameFrame.Parent = drag
  47. windowNameFrame.BackgroundColor3 = Color3.fromRGB(64, 64, 64)
  48. windowNameFrame.Size = UDim2.new(1, 0, 0, 30)
  49.  
  50. UICorner_2.Parent = windowNameFrame
  51.  
  52. windowNameLabel.Name = "windowNameLabel"
  53. windowNameLabel.Parent = windowNameFrame
  54. windowNameLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  55. windowNameLabel.BackgroundTransparency = 1.000
  56. windowNameLabel.BorderSizePixel = 0
  57. windowNameLabel.Size = UDim2.new(1, 0, 0, 20)
  58. windowNameLabel.Font = Enum.Font.SourceSans
  59. windowNameLabel.Text = "Ultimate Fling"
  60. windowNameLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
  61. windowNameLabel.TextSize = 20.000
  62.  
  63. closeButton.Name = "closeButton"
  64. closeButton.Parent = windowNameLabel
  65. closeButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  66. closeButton.BackgroundTransparency = 1.000
  67. closeButton.BorderSizePixel = 0
  68. closeButton.Position = UDim2.new(1, -20, 0, 0)
  69. closeButton.Size = UDim2.new(0, 20, 0, 20)
  70. closeButton.Font = Enum.Font.SourceSans
  71. closeButton.Text = "X"
  72. closeButton.TextColor3 = Color3.fromRGB(255, 0, 0)
  73. closeButton.TextSize = 20.000
  74.  
  75. mainFrame.Name = "mainFrame"
  76. mainFrame.Parent = drag
  77. mainFrame.BackgroundColor3 = Color3.fromRGB(32, 32, 32)
  78. mainFrame.Position = UDim2.new(0, 0, 0, 20)
  79. mainFrame.Size = UDim2.new(1, 0, 1, -20)
  80.  
  81. UICorner_3.Parent = mainFrame
  82.  
  83. buttonsFrame.Name = "buttonsFrame"
  84. buttonsFrame.Parent = mainFrame
  85. buttonsFrame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
  86. buttonsFrame.BackgroundTransparency = 0.500
  87. buttonsFrame.Size = UDim2.new(0, 110, 1, 0)
  88.  
  89. toggleButton.Name = "toggleButton"
  90. toggleButton.Parent = buttonsFrame
  91. toggleButton.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  92. toggleButton.BackgroundTransparency = 0.800
  93. toggleButton.BorderSizePixel = 0
  94. toggleButton.Position = UDim2.new(0, 5, 0, 5)
  95. toggleButton.Size = UDim2.new(0, 100, 0, 25)
  96. toggleButton.Font = Enum.Font.SourceSans
  97. toggleButton.Text = "Start fling"
  98. toggleButton.TextColor3 = Color3.fromRGB(255, 255, 255)
  99. toggleButton.TextSize = 20.000
  100.  
  101. UICorner_4.Parent = toggleButton
  102.  
  103. rotSpeedLabel.Name = "rotSpeedLabel"
  104. rotSpeedLabel.Parent = buttonsFrame
  105. rotSpeedLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  106. rotSpeedLabel.BackgroundTransparency = 0.800
  107. rotSpeedLabel.Position = UDim2.new(0, 5, 0, 35)
  108. rotSpeedLabel.Size = UDim2.new(0, 100, 0, 35)
  109. rotSpeedLabel.Font = Enum.Font.SourceSans
  110. rotSpeedLabel.Text = "RotSpeed"
  111. rotSpeedLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
  112. rotSpeedLabel.TextSize = 14.000
  113. rotSpeedLabel.TextYAlignment = Enum.TextYAlignment.Top
  114.  
  115. UICorner_5.Parent = rotSpeedLabel
  116.  
  117. rotSpeedTextbox.Name = "rotSpeedTextbox"
  118. rotSpeedTextbox.Parent = rotSpeedLabel
  119. rotSpeedTextbox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  120. rotSpeedTextbox.BackgroundTransparency = 1.000
  121. rotSpeedTextbox.Position = UDim2.new(0, 0, 0, 13)
  122. rotSpeedTextbox.Size = UDim2.new(1, 0, 1, -13)
  123. rotSpeedTextbox.ClearTextOnFocus = false
  124. rotSpeedTextbox.Font = Enum.Font.SourceSans
  125. rotSpeedTextbox.Text = "10000"
  126. rotSpeedTextbox.TextColor3 = Color3.fromRGB(0, 255, 0)
  127. rotSpeedTextbox.TextSize = 16.000
  128.  
  129. flySpeedLabel.Name = "flySpeedLabel"
  130. flySpeedLabel.Parent = buttonsFrame
  131. flySpeedLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  132. flySpeedLabel.BackgroundTransparency = 0.800
  133. flySpeedLabel.Position = UDim2.new(0, 5, 0, 75)
  134. flySpeedLabel.Size = UDim2.new(0, 100, 0, 35)
  135. flySpeedLabel.Font = Enum.Font.SourceSans
  136. flySpeedLabel.Text = "FlySpeed"
  137. flySpeedLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
  138. flySpeedLabel.TextSize = 14.000
  139. flySpeedLabel.TextYAlignment = Enum.TextYAlignment.Top
  140.  
  141. UICorner_6.Parent = flySpeedLabel
  142.  
  143. flySpeedTextbox.Name = "flySpeedTextbox"
  144. flySpeedTextbox.Parent = flySpeedLabel
  145. flySpeedTextbox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  146. flySpeedTextbox.BackgroundTransparency = 1.000
  147. flySpeedTextbox.Position = UDim2.new(0, 0, 0, 13)
  148. flySpeedTextbox.Size = UDim2.new(1, 0, 1, -13)
  149. flySpeedTextbox.ClearTextOnFocus = false
  150. flySpeedTextbox.Font = Enum.Font.SourceSans
  151. flySpeedTextbox.Text = "1"
  152. flySpeedTextbox.TextColor3 = Color3.fromRGB(0, 255, 0)
  153. flySpeedTextbox.TextSize = 16.000
  154.  
  155. UICorner_7.Parent = buttonsFrame
  156.  
  157. notificationsFrame.Name = "notificationsFrame"
  158. notificationsFrame.Parent = mainFrame
  159. notificationsFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  160. notificationsFrame.BackgroundTransparency = 1.000
  161. notificationsFrame.ClipsDescendants = true
  162. notificationsFrame.Position = UDim2.new(0, 110, 0, 45)
  163. notificationsFrame.Size = UDim2.new(1, -110, 1, -45)
  164.  
  165. UIListLayout.Parent = notificationsFrame
  166. UIListLayout.SortOrder = Enum.SortOrder.LayoutOrder
  167. UIListLayout.VerticalAlignment = Enum.VerticalAlignment.Bottom
  168.  
  169. notificationTemplate.Name = "notificationTemplate"
  170. notificationTemplate.Parent = notificationsFrame
  171. notificationTemplate.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  172. notificationTemplate.BackgroundTransparency = 1.000
  173. notificationTemplate.ClipsDescendants = true
  174. notificationTemplate.Size = UDim2.new(1, 0, 0, 20)
  175. notificationTemplate.Visible = false
  176. notificationTemplate.Font = Enum.Font.SourceSans
  177. notificationTemplate.Text = ""
  178. notificationTemplate.TextColor3 = Color3.fromRGB(255, 255, 255)
  179. notificationTemplate.TextSize = 19.000
  180. notificationTemplate.TextWrapped = true
  181.  
  182. teleportersFrame.Name = "teleportersFrame"
  183. teleportersFrame.Parent = mainFrame
  184. teleportersFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  185. teleportersFrame.BackgroundTransparency = 1.000
  186. teleportersFrame.ClipsDescendants = true
  187. teleportersFrame.Position = UDim2.new(0, 110, 0, 0)
  188. teleportersFrame.Size = UDim2.new(1, -110, 0, 45)
  189.  
  190. teleportingLabel.Name = "teleportingLabel"
  191. teleportingLabel.Parent = teleportersFrame
  192. teleportingLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  193. teleportingLabel.BackgroundTransparency = 0.800
  194. teleportingLabel.Position = UDim2.new(0, 5, 0, 5)
  195. teleportingLabel.Size = UDim2.new(1, -10, 1, -10)
  196. teleportingLabel.Font = Enum.Font.SourceSans
  197. teleportingLabel.Text = "tping to players delay (0 = disable)"
  198. teleportingLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
  199. teleportingLabel.TextSize = 14.000
  200. teleportingLabel.TextYAlignment = Enum.TextYAlignment.Top
  201.  
  202. UICorner_8.Parent = teleportingLabel
  203.  
  204. tpingTextbox.Name = "tpingTextbox"
  205. tpingTextbox.Parent = teleportingLabel
  206. tpingTextbox.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  207. tpingTextbox.BackgroundTransparency = 1.000
  208. tpingTextbox.Position = UDim2.new(0, 0, 0, 13)
  209. tpingTextbox.Size = UDim2.new(1, 0, 1, -13)
  210. tpingTextbox.ClearTextOnFocus = false
  211. tpingTextbox.Font = Enum.Font.SourceSans
  212. tpingTextbox.Text = "0"
  213. tpingTextbox.TextColor3 = Color3.fromRGB(0, 255, 0)
  214. tpingTextbox.TextSize = 16.000
  215.  
  216. local function align(Part0, Part1)
  217.     Part0.CustomPhysicalProperties = PhysicalProperties.new(0.001, 0.001, 0.001, 0.001, 0.001)
  218.     local att1 = Instance.new("Attachment")
  219.     att1.Orientation = Vector3.new(0, 0, 0)
  220.     att1.Position = Vector3.new(0, 0, 0)
  221.     att1.Archivable = true
  222.     local att0 = att1:Clone()
  223.  
  224.     local ap = Instance.new("AlignPosition", att0)
  225.     ap.ApplyAtCenterOfMass = true
  226.     ap.MaxForce = 9e9
  227.     ap.MaxVelocity = 9e9
  228.     ap.ReactionForceEnabled = false
  229.     ap.Responsiveness = 200
  230.     ap.RigidityEnabled = false
  231.  
  232.     ap.Attachment1 = att1
  233.     ap.Attachment0 = att0
  234.  
  235.     att1.Parent = Part1
  236.     att0.Parent = Part0
  237. end
  238.  
  239. local rs = game:GetService("RunService")
  240.  
  241. local function notify(msg)
  242.     spawn(function()
  243.         local label = notificationTemplate:Clone()
  244.         label.Text = msg
  245.         label.Parent = notificationsFrame
  246.         label.Size = UDim2.new(1, 0, 0, 0)
  247.         label.Visible = true
  248.         local siz = 0
  249.         while rs.Stepped:Wait() and label and label.Parent and (siz < 20) do
  250.             siz += 1
  251.             label.Size = UDim2.new(1, 0, 0, siz)
  252.         end
  253.         if label and label.Parent then
  254.             wait(15)
  255.             while rs.Stepped:Wait() and label and label.Parent and (label.TextTransparency < 1) do
  256.                 label.TextTransparency += 0.1
  257.             end
  258.             if label and label.Parent then
  259.                 label:Destroy()
  260.             end
  261.         end
  262.     end)
  263. end
  264.  
  265. local plrs = game:GetService("Players")
  266. local lp = plrs.LocalPlayer
  267. local mouse = lp:GetMouse()
  268. local ws = game:GetService("Workspace")
  269. local c = nil
  270.  
  271. local function resReq()
  272.     local nm = Instance.new("Model")
  273.     local nh = Instance.new("Humanoid", nm)
  274.     nh.Health = 100
  275.     lp.Character = nm
  276.     nh.Health = 0
  277.     nh:Destroy()
  278.     nm:Destroy()
  279. end
  280.  
  281. local parts = {}
  282.  
  283. ws.DescendantRemoving:Connect(function(des)
  284.     if table.find(parts, des) then
  285.         local desn = des.Name
  286.         wait()
  287.         if c and c.Parent then
  288.             notify("lost part: " .. desn)
  289.         end
  290.     end
  291. end)
  292.  
  293. toggleButton.MouseButton1Click:Connect(function()
  294.     if c and c.Parent then
  295.         resReq()
  296.         lp.Character = c
  297.         notify("attempting to respawn...")
  298.     else
  299.         notify("Loading...")
  300.         c = lp.Character
  301.         if not (c and c.Parent) then
  302.             notify("error: character not found")
  303.             return nil
  304.         end
  305.         local hum = c:FindFirstChildOfClass("Humanoid")
  306.         if not (hum and hum.Parent) then
  307.             notify("error: humanoid not found")
  308.             return nil
  309.         end
  310.         if hum.Health == 0 then
  311.             notify("error: humanoid health 0")
  312.             return nil
  313.         end
  314.         resReq()
  315.         lp.Character = c
  316.         wait(5.1)
  317.         if not (c and c.Parent) then
  318.             notify("error: character removed")
  319.             return nil
  320.         end
  321.         if not (hum and hum.Parent) then
  322.             notify("error: humanoid removed")
  323.             return nil
  324.         end
  325.         if hum.Health == 0 then
  326.             notify("error: humanoid died")
  327.             return nil
  328.         end
  329.         c:BreakJoints()
  330.         hum.Health = 0
  331.         wait()
  332.         if not (c and c.Parent) then
  333.             notify("error: character removed")
  334.             return nil
  335.         end
  336.         parts = {}
  337.         for i, v in pairs(c:GetDescendants()) do
  338.             if v and v.Parent and v:IsA("BasePart") then
  339.                 if v.CanCollide then
  340.                     table.insert(parts, v)
  341.                 else
  342.                     v.Velocity = Vector3.new(0, -1000, 0)
  343.                 end
  344.             end
  345.         end
  346.         local hrp = Instance.new("Part", c)
  347.         hrp.Name = "hrp"
  348.         hrp.Anchored = true
  349.         hrp.Transparency = 1
  350.         pcall(function()
  351.             hrp.CFrame = parts[1].CFrame
  352.         end)
  353.         ws.CurrentCamera.CameraSubject = hrp
  354.         for i, v in pairs(parts) do
  355.             if v and v.Parent then
  356.                 align(v, hrp)
  357.             end
  358.         end
  359.         spawn(function()
  360.             local currentp = nil
  361.             spawn(function()
  362.                 while rs.Stepped:Wait() and c and c.Parent and hrp and hrp.Parent do
  363.                     if currentp and currentp.Parent then
  364.                         local c1 = currentp.Character
  365.                         if c1 and c1.Parent then
  366.                             local hed1 = c1:FindFirstChild("Head") or c1:FindFirstChild("Torso") or c1:FindFirstChild("HumanoidRootPart") or c1:FindFirstChildWhichIsA("BasePart")
  367.                             if hed1 then
  368.                                 hrp.CFrame = hed1.CFrame
  369.                             end
  370.                         end
  371.                     end
  372.                 end
  373.             end)
  374.             while rs.Heartbeat:Wait() and c and c.Parent and hrp and hrp.Parent do
  375.                 local delay = tonumber(tpingTextbox.Text)
  376.                 if (not delay) or (delay < 0) then
  377.                     delay = 0
  378.                 end
  379.                 if delay == 0 then
  380.                     currentp = false
  381.                 else
  382.                     wait(delay)
  383.                     delay = tonumber(tpingTextbox.Text)
  384.                     if (not delay) or (delay < 0) then
  385.                         delay = 0
  386.                     end
  387.                     if c and c.Parent and hrp and hrp.Parent and (delay ~= 0) then
  388.                         local getp = plrs:GetPlayers()
  389.                         local i1 = false
  390.                         for i, v in pairs(getp) do
  391.                             if (v == currentp) and (v ~= lp) then
  392.                                 i1 = i
  393.                             end
  394.                         end
  395.                         if (not i1) then
  396.                             i1 = 1
  397.                         end
  398.                         local function nextp()
  399.                             if i1 == #getp then
  400.                                 i1 = 1
  401.                             else
  402.                                 i1 += 1
  403.                             end
  404.                             currentp = getp[i1]
  405.                         end
  406.                         local c1 = nil
  407.                         while wait() and not (c1 and c1.Parent) do
  408.                             nextp()
  409.                             if currentp == lp then
  410.                                 nextp()
  411.                             end
  412.                             c1 = currentp.Character
  413.                         end
  414.                     end
  415.                 end
  416.             end
  417.         end)
  418.  
  419.         spawn(function()
  420.             while c and c.Parent and rs.Heartbeat:Wait() do
  421.                 for i, v in pairs(parts) do
  422.                     if v and v.Parent then
  423.                         v.Velocity = Vector3.new(0, -25.05, 0)
  424.                         local s = tonumber(rotSpeedTextbox.Text)
  425.                         v.RotVelocity = Vector3.new(s, s, s)
  426.                     end
  427.                 end
  428.             end
  429.         end)
  430.  
  431.         spawn(function()
  432.             while rs.Stepped:Wait() and c and c.Parent do
  433.                 for i, v in pairs(parts) do
  434.                     if v and v.Parent then
  435.                         v.CanCollide = false
  436.                     end
  437.                 end
  438.             end
  439.         end)
  440.  
  441.         spawn(function()
  442.             local ctrlf = {
  443.                 ["w"] = false,
  444.                 ["a"] = false,
  445.                 ["s"] = false,
  446.                 ["d"] = false
  447.             }
  448.             mouse.KeyDown:Connect(function(key)
  449.                 key = key:lower()
  450.                 if ctrlf[key] ~= nil then
  451.                     ctrlf[key] = true
  452.                 end
  453.             end)
  454.             mouse.KeyUp:Connect(function(key)
  455.                 key = key:lower()
  456.                 if ctrlf[key] ~= nil then
  457.                     ctrlf[key] = false
  458.                 end
  459.             end)
  460.             while rs.RenderStepped:Wait() and c and c.Parent do
  461.                 if hrp and hrp.Parent then
  462.                     local flyspeed = tonumber(flySpeedTextbox.Text)
  463.                     local fb = ((ctrlf["w"] and flyspeed) or 0) + ((ctrlf["s"] and -flyspeed) or 0)
  464.                     local lr = ((ctrlf["a"] and -flyspeed) or 0) + ((ctrlf["d"] and flyspeed) or 0)
  465.                     local camcf = ws.CurrentCamera.CFrame
  466.                     local caX, caY, caZ, ca1, ca2, ca3, ca4, ca5, ca6, ca7, ca8, ca9 = camcf:GetComponents()
  467.                     local flycf = hrp.CFrame
  468.                     flycf = CFrame.new(flycf.X, flycf.Y, flycf.Z, ca1, ca2, ca3, ca4, ca5, ca6, ca7, ca8, ca9)
  469.                     flycf += camcf.lookVector * fb
  470.                     flycf += camcf.rightVector * lr
  471.                     hrp.CFrame = flycf
  472.                 end
  473.             end
  474.            
  475.             local c1 = lp.Character
  476.             if c1 and c1.Parent then
  477.                 notify("respawned")
  478.             end
  479.            
  480.             if toggleButton and toggleButton.Parent then
  481.                 toggleButton.Text = "Start fling"
  482.             end
  483.         end)
  484.        
  485.         if toggleButton and toggleButton.Parent then
  486.             toggleButton.Text = "Respawn"
  487.         end
  488.        
  489.         notify("done")
  490.     end
  491. end)
  492.  
  493. closeButton.MouseButton1Click:Connect(function()
  494.     if c and c.Parent then
  495.         resReq()
  496.     end
  497.     ultimateFling:Destroy()
  498. end)
Add Comment
Please, Sign In to add comment