karobloxYT

Untitled

May 4th, 2019
93
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.33 KB | None | 0 0
  1. -- Farewell Infortality.
  2. -- Version: 2.82
  3.  
  4. -- Instances:
  5.  
  6. local INFINITY = Instance.new("ScreenGui")
  7. local Key = Instance.new("Frame")
  8. local KeyLabel = Instance.new("TextLabel")
  9. local Youtube = Instance.new("TextLabel")
  10. local Submit = Instance.new("TextButton")
  11. local KeyBox = Instance.new("TextBox")
  12. local Main = Instance.new("Frame")
  13. local Top = Instance.new("Frame")
  14. local Name = Instance.new("TextLabel")
  15. local Spons = Instance.new("TextLabel")
  16. local Youtube1 = Instance.new("TextLabel")
  17. local DontSelling = Instance.new("TextLabel")
  18. local AutoFarm = Instance.new("TextButton")
  19.  
  20. --Properties:
  21.  
  22. INFINITY.Name = "INFINITY"
  23. INFINITY.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  24. INFINITY.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  25.  
  26. Key.Name = "Key"
  27. Key.Parent = INFINITY
  28. Key.BackgroundColor3 = Color3.new(0.666667, 1, 1)
  29. Key.BorderSizePixel = 3
  30. Key.Position = UDim2.new(0.31490159, 0, 0.334661335, 0)
  31. Key.Size = UDim2.new(0, 394, 0, 166)
  32. Key.Visible = false
  33.  
  34. KeyLabel.Name = "KeyLabel"
  35. KeyLabel.Parent = Key
  36. KeyLabel.BackgroundColor3 = Color3.new(1, 1, 1)
  37. KeyLabel.BackgroundTransparency = 1
  38. KeyLabel.Position = UDim2.new(0.195431471, 0, 0.0542168692, 0)
  39. KeyLabel.Size = UDim2.new(0, 240, 0, 20)
  40. KeyLabel.Font = Enum.Font.Code
  41. KeyLabel.Text = "Join INFINITY for key !"
  42. KeyLabel.TextColor3 = Color3.new(0, 0, 0)
  43. KeyLabel.TextScaled = true
  44. KeyLabel.TextSize = 14
  45. KeyLabel.TextWrapped = true
  46.  
  47. Youtube.Name = "Discord"
  48. Youtube.Parent = Key
  49. Youtube.BackgroundColor3 = Color3.new(1, 1, 1)
  50. Youtube.BackgroundTransparency = 1
  51. Youtube.Position = UDim2.new(0.246192887, 0, 0.1746988, 0)
  52. Youtube.Size = UDim2.new(0, 200, 0, 22)
  53. Youtube.Font = Enum.Font.Code
  54. Youtube.Text = "Subcribe Kênh HN Gaming Nhé"
  55. Youtube.TextColor3 = Color3.new(0, 0, 0)
  56. Youtube.TextScaled = true
  57. Youtube.TextSize = 20
  58. Youtube.TextWrapped = true
  59.  
  60. Submit.Name = "Submit"
  61. Submit.Parent = Key
  62. Submit.BackgroundColor3 = Color3.new(0.172549, 0.172549, 0.172549)
  63. Submit.BorderColor3 = Color3.new(1, 1, 1)
  64. Submit.BorderSizePixel = 3
  65. Submit.Position = UDim2.new(0.246192887, 0, 0.746988058, 0)
  66. Submit.Size = UDim2.new(0, 200, 0, 34)
  67. Submit.Font = Enum.Font.Code
  68. Submit.Text = "Submit"
  69. Submit.TextColor3 = Color3.new(1, 1, 1)
  70. Submit.TextScaled = true
  71. Submit.TextSize = 14
  72. Submit.TextWrapped = true
  73. Submit.MouseButton1Click:Connect(function()
  74. if KeyBox.Text == "FreeHack" then
  75. Submit.Text = "Correct Key"
  76. wait(3)
  77. Main.Visible = true
  78. Key.Visible = false
  79. blur.Enabled = false
  80. elseif not KeyBox.Text == "FreeHack" then
  81. Submit.Text = "Wrong Key"
  82. wait(3)
  83. Submit.Text = "Submit"
  84. end
  85. end)
  86.  
  87. KeyBox.Name = "KeyBox"
  88. KeyBox.Parent = Key
  89. KeyBox.BackgroundColor3 = Color3.new(1, 1, 1)
  90. KeyBox.BorderSizePixel = 3
  91. KeyBox.Position = UDim2.new(0.149746194, 0, 0.379518062, 0)
  92. KeyBox.Size = UDim2.new(0, 275, 0, 39)
  93. KeyBox.Font = Enum.Font.Code
  94. KeyBox.PlaceholderColor3 = Color3.new(0, 0, 0)
  95. KeyBox.PlaceholderText = "Enter Key Here"
  96. KeyBox.Text = ""
  97. KeyBox.TextColor3 = Color3.new(0, 0, 0)
  98. KeyBox.TextScaled = true
  99. KeyBox.TextSize = 14
  100. KeyBox.TextWrapped = true
  101.  
  102. Main.Name = "Main"
  103. Main.Parent = INFINITY
  104. Main.BackgroundColor3 = Color3.new(0.356863, 0.356863, 0.356863)
  105. Main.Position = UDim2.new(0.31490159, 0, 0.334661335, 0)
  106. Main.Size = UDim2.new(0, 394, 0, 166)
  107. Main.Visible = true
  108. Main.Active = true
  109. Main.Draggable = true
  110.  
  111. Top.Name = "Top"
  112. Top.Parent = Main
  113. Top.BackgroundColor3 = Color3.new(1, 0, 0)
  114. Top.Size = UDim2.new(0, 394, 0, 28)
  115.  
  116. Name.Name = "Name"
  117. Name.Parent = Top
  118. Name.BackgroundColor3 = Color3.new(1, 1, 1)
  119. Name.BackgroundTransparency = 1
  120. Name.Size = UDim2.new(0, 394, 0, 28)
  121. Name.Font = Enum.Font.Code
  122. Name.Text = "HACK DUNGON QUEST"
  123. Name.TextColor3 = Color3.new(0, 0, 0)
  124. Name.TextScaled = true
  125. Name.TextSize = 14
  126. Name.TextWrapped = true
  127.  
  128. Spons.Name = "Spons"
  129. Spons.Parent = Main
  130. Spons.BackgroundColor3 = Color3.new(1, 1, 1)
  131. Spons.BackgroundTransparency = 1
  132. Spons.Position = UDim2.new(0, 0, 0.680722952, 0)
  133. Spons.Size = UDim2.new(0, 394, 0, 29)
  134. Spons.Font = Enum.Font.SourceSans
  135. Spons.Text = "Xin Chào M.N Nhé"
  136. Spons.TextColor3 = Color3.new(1, 1, 1)
  137. Spons.TextScaled = true
  138. Spons.TextSize = 14
  139. Spons.TextWrapped = true
  140.  
  141. Youtube1.Name = "Discord2"
  142. Youtube1.Parent = Main
  143. Youtube1.BackgroundColor3 = Color3.new(1, 1, 1)
  144. Youtube1.BackgroundTransparency = 1
  145. Youtube1.Position = UDim2.new(0.246192887, 0, 0.855421782, 0)
  146. Youtube1.Size = UDim2.new(0, 200, 0, 24)
  147. Youtube1.Font = Enum.Font.Code
  148. Youtube1.Text = "Subcribe Kênh HN Gaming Nhé"
  149. Youtube1.TextColor3 = Color3.new(1, 1, 1)
  150. Youtube1.TextScaled = true
  151. Youtube1.TextSize = 20
  152. Youtube1.TextWrapped = true
  153.  
  154. DontSelling.Name = "Don'tSelling"
  155. DontSelling.Parent = Main
  156. DontSelling.BackgroundColor3 = Color3.new(1, 1, 1)
  157. DontSelling.BackgroundTransparency = 1
  158. DontSelling.Position = UDim2.new(0, 0, 0.168674693, 0)
  159. DontSelling.Size = UDim2.new(0, 394, 0, 32)
  160. DontSelling.Font = Enum.Font.Code
  161. DontSelling.Text = "SCRIPT FREE CẤM MỌI HÌNH THỨC BÁN SCRIPT"
  162. DontSelling.TextColor3 = Color3.new(1, 1, 1)
  163. DontSelling.TextScaled = true
  164. DontSelling.TextSize = 14
  165. DontSelling.TextWrapped = true
  166.  
  167. AutoFarm.Name = "AutoFarm"
  168. AutoFarm.Parent = Main
  169. AutoFarm.BackgroundColor3 = Color3.new(0, 255, 255)
  170. AutoFarm.BorderSizePixel = 3
  171. AutoFarm.Position = UDim2.new(0.131979689, 0, 0.439759046, 0)
  172. AutoFarm.Size = UDim2.new(0, 290, 0, 33)
  173. AutoFarm.Font = Enum.Font.Code
  174. AutoFarm.Text = "Auto Farm"
  175. AutoFarm.TextColor3 = Color3.new(1, 1, 1)
  176. AutoFarm.TextScaled = true
  177. AutoFarm.TextSize = 14
  178. AutoFarm.TextWrapped = true
  179. Farm1 = false
  180. AutoFarm.MouseButton1Click:Connect(function()
  181. if Farm1 == false then
  182. Farm1 = true
  183. Attack = true
  184. game:GetService('RunService').Stepped:connect(function()
  185. if Farm1 then
  186. game.Players.LocalPlayer.Character.Humanoid:ChangeState(11)
  187. end
  188. end)
  189. function FireSwingRemote()
  190. for i,v in pairs(game.Players.LocalPlayer.Character:GetChildren()) do
  191. if v:FindFirstChild("Weapon") and v:FindFirstChild("swing") then
  192. return v.swing:FireServer()
  193. end
  194. end
  195. end
  196. plr = game.Players.LocalPlayer
  197. mouse = plr:GetMouse()
  198. mouse.KeyDown:connect(function(key)
  199. if key == "o" then
  200. Farm1 = not Farm1
  201. game.Players.LocalPlayer.Character.Humanoid:ChangeState(11)
  202. end
  203. end)
  204.  
  205. while Farm1 do
  206. wait(3)
  207. for a,b in pairs(game.Workspace:GetChildren()) do
  208. if b:IsA("Folder") then
  209. for c,d in pairs(b:GetChildren()) do
  210. if d:FindFirstChild("enemyFolder") then
  211. for e,f in pairs(d.enemyFolder:GetChildren()) do
  212. if f:FindFirstChild("HumanoidRootPart") and f:FindFirstChild("Humanoid") then
  213. game.Players.LocalPlayer.Character.HumanoidRootPart.CFrame = CFrame.new(f.HumanoidRootPart.Position + Vector3.new(0,6,0),f.HumanoidRootPart.Position)
  214. wait()
  215. end
  216. end
  217. end
  218. end
  219. end
  220. end
  221. FireSwingRemote()
  222. for i,v in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
  223. if v:IsA("Tool") and v:FindFirstChild("abilitySlot") then
  224. if v.abilitySlot.Value == "q" then
  225. v:FindFirstChildWhichIsA("RemoteEvent"):FireServer()
  226. v.cooldown.Changed:Connect(function()
  227. v.cooldown.Value = 0
  228. end)
  229. end
  230. end
  231. end
  232. for i,v in pairs(game.Players.LocalPlayer.Backpack:GetChildren()) do
  233. if v:IsA("Tool") and v:FindFirstChild("abilitySlot") then
  234. if v.abilitySlot.Value == "e" then
  235. v:FindFirstChildWhichIsA("RemoteEvent"):FireServer()
  236. v.cooldown.Changed:Connect(function()
  237. v.cooldown.Value = 0
  238. end)
  239. end
  240. end
  241. end
  242. end
  243. end
  244. end)
Add Comment
Please, Sign In to add comment