Advertisement
Guest User

Untitled

a guest
Jan 24th, 2018
47
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.20 KB | None | 0 0
  1. if game:GetService("CoreGui"):FindFirstChild("Yuno's BNH") then
  2. game:GetService("CoreGui")["Yuno's BNH"]Big :Destroy()
  3. end
  4.  
  5. local RS = game:GetService("RunService")
  6. local localplayer = game:GetService("Players").LocalPlayer
  7. local version = "1"
  8. function createGui()
  9. _G.mainGui = Instance.new("ScreenGui", game.CoreGui)
  10. _G.mainGui.Name = "Yuno's BNH"
  11.  
  12. _G.Background = Instance.new("Frame")
  13. _G.Background.BackgroundColor3 = Color3.new(0,0,0)
  14. _G.Background.BackgroundTransparency = 0.5
  15. _G.Background.Parent = _G.mainGui
  16. _G.Background.Size = UDim2.new(0,400,0,400)
  17. _G.Background.Position = UDim2.new(0.5,-200,0.5,-200)
  18. _G.Background.Visible = false
  19.  
  20. _G.StartButton = Instance.new("TextButton")
  21. _G.StartButton.Parent = _G.mainGui
  22. _G.StartButton.Size = UDim2.new(0,100,0,25)
  23. _G.StartButton.Position = UDim2.new(0,0,0.7,0)
  24. _G.StartButton.Font = "Cartoon"
  25. _G.StartButton.FontSize = "Size18"
  26. _G.StartButton.Text = "Yuno's BNH"
  27. _G.StartButton.TextColor3 = Color3.new(0, 0, 0)
  28. _G.StartButton.Name = "Start"
  29. _G.StartButton.BackgroundColor3 = Color3.new(255, 255, 255)
  30. local openvalue = Instance.new("BoolValue", _G.StartButton)
  31. openvalue.Name = "Open"
  32.  
  33. _G.Input = Instance.new("Frame")
  34. _G.Input.Parent = _G.Background
  35. _G.Input.Name = "Input"
  36. _G.Input.BackgroundTransparency = 1
  37. _G.Input.Size = UDim2.new(0,400,0,50)
  38.  
  39. _G.Options = Instance.new("Frame")
  40. _G.Options.Parent = _G.Background
  41. _G.Options.Name = "Options"
  42. _G.Options.BackgroundTransparency = 1
  43. _G.Options.Size = UDim2.new(0,400,0,350)
  44. _G.Options.Position = UDim2.new(0,0,0,50)
  45.  
  46. _G.OutputFrame = Instance.new("Frame")
  47. _G.OutputFrame.Parent = _G.Background
  48. _G.OutputFrame.Name = "OutputFrame"
  49. _G.OutputFrame.BackgroundTransparency = 1
  50. _G.OutputFrame.Size = UDim2.new(1,0,0,100)
  51. _G.OutputFrame.Position = UDim2.new(0,0,0,300)
  52.  
  53. _G.Information = Instance.new("Frame")
  54. _G.Information.Parent = _G.Background
  55. _G.Information.Name = "Information"
  56. _G.Information.BackgroundTransparency = 1
  57. _G.Information.Size = UDim2.new(0,200,0,250)
  58. _G.Information.Position = UDim2.new(0,200,0.5,-50)
  59. _G.Information.BorderSizePixel = 0
  60.  
  61.  
  62. local lv = Instance.new("TextBox", _G.Input)
  63. lv.Name = "LevelValue"
  64. lv.BackgroundTransparency = 1
  65. lv.Size = UDim2.new(0,100,0,50)
  66. lv.Position = UDim2.new(0,300,0,0)
  67. lv.Font = "Cartoon"
  68. lv.FontSize = "Size18"
  69. lv.Text = 1
  70. lv.TextColor3 = Color3.new(255/255,0/255,4/255)
  71. lv.TextXAlignment = "Left"
  72. local lvValue = Instance.new("IntValue", lv)
  73.  
  74. local qv = Instance.new("TextBox", _G.Input)
  75. qv.Name = "QuirkValue"
  76. qv.BackgroundTransparency = 1
  77. qv.Size = UDim2.new(0,100,0,50)
  78. qv.Position = UDim2.new(0,300,0,50)
  79. qv.Font = "Cartoon"
  80. qv.FontSize = "Size18"
  81. qv.Text = 0
  82. qv.TextColor3 = Color3.new(255/255,0/255,4/255)
  83. qv.TextXAlignment = "Left"
  84. local qvValue = Instance.new("IntValue", qv)
  85.  
  86. local pn = Instance.new("TextBox", _G.Input)
  87. pn.Name = "PlayerName"
  88. pn.BackgroundTransparency = 1
  89. pn.Size = UDim2.new(0,100,0,50)
  90. pn.Position = UDim2.new(0,50,0,0)
  91. pn.Font = "Cartoon"
  92. pn.FontSize = "Size18"
  93. pn.Text = localplayer.Name
  94. pn.TextColor3 = Color3.new(255/255,0/255,4/255)
  95. pn.TextXAlignment = "Left"
  96. local pnValue = Instance.new("StringValue", pn)
  97. pnValue.Value = localplayer.Name
  98.  
  99. local ll = Instance.new("TextLabel", _G.Input)
  100. ll.Name = "LevelLabel"
  101. ll.BackgroundTransparency = 1
  102. ll.Size = UDim2.new(0,50,0,50)
  103. ll.Position = UDim2.new(0,250,0,0)
  104. ll.TextColor3 = Color3.new(255/255,255/255,255/255)
  105. ll.Text = "Level:"
  106. ll.Font = "Cartoon"
  107. ll.FontSize = "Size18"
  108.  
  109. local pl = Instance.new("TextLabel", _G.Input)
  110. pl.BackgroundTransparency = 1
  111. pl.Name = "PlayerLabel"
  112. pl.Size = UDim2.new(0,50,0,50)
  113. pl.TextColor3 = Color3.new(255/255,255/255,255/255)
  114. pl.Font = "Cartoon"
  115. pl.FontSize = "Size18"
  116. pl.Text = "Name:"
  117.  
  118. local ql = Instance.new("TextLabel", _G.Input)
  119. ql.BackgroundTransparency = 1
  120. ql.Name = "QuirkLabel"
  121. ql.Size = UDim2.new(0,50,0,50)
  122. ql.Position = UDim2.new(0,250,0,50)
  123. ql.TextColor3 = Color3.new(255/255,255/255,255/255)
  124. ql.Font = "Cartoon"
  125. ql.FontSize = "Size18"
  126. ql.Text = "Quirk:"
  127.  
  128. local expbutton = Instance.new("TextButton", _G.Options)
  129. expbutton.Name = "EXPLoop"
  130. expbutton.Font = "Highway"
  131. expbutton.FontSize = "Size14"
  132. expbutton.Text = "EXP Loop"
  133. expbutton.TextColor3 = Color3.new(27/255,42/255,53/255)
  134. expbutton.Size = UDim2.new(0,100,0,25)
  135. expbutton.Position = UDim2.new(0,0,0,20)
  136. expbutton.Style = "RobloxRoundDropdownButton"
  137. local started = Instance.new("BoolValue", expbutton)
  138. started.Name = "Started"
  139.  
  140. local quirkchange = Instance.new("TextButton", _G.Options)
  141. quirkchange.Name = "QuirkChange"
  142. quirkchange.Font = "Highway"
  143. quirkchange.FontSize = "Size14"
  144. quirkchange.Text = "Change Quirk"
  145. quirkchange.TextColor3 = Color3.new(27/255,42/255,53/255)
  146. quirkchange.Size = UDim2.new(0,100,0,25)
  147. quirkchange.Position = UDim2.new(0,0,0,50)
  148. quirkchange.Style = "RobloxRoundDropdownButton"
  149.  
  150. local outputtext = Instance.new("TextLabel", _G.OutputFrame)
  151. outputtext.Name = "OutputText"
  152. outputtext.BackgroundTransparency = 1
  153. outputtext.Size = UDim2.new(1,0,1,0)
  154. outputtext.TextColor3 = Color3.new(255/255,255/255,255/255)
  155. outputtext.Font = "ArialBold"
  156. outputtext.FontSize = "Size18"
  157. outputtext.Text = "Output:"
  158. outputtext.TextXAlignment = "Left"
  159.  
  160. local information = Instance.new("TextLabel", _G.Information)
  161. information.Name = "InformationLabel"
  162. information.BackgroundTransparency = 1
  163. information.Size = UDim2.new(0,200,0,50)
  164. information.FontSize = "Size24"
  165. information.Font = "Cartoon"
  166. information.TextColor3 = Color3.new(255/255,255/255,255/255)
  167. information.Text = "Information"
  168.  
  169. local level = Instance.new("TextLabel", _G.Information)
  170. level.Name = "Level"
  171. level.BackgroundTransparency = 1
  172. level.Size = UDim2.new(0,200,0,25)
  173. level.Position = UDim2.new(0,0,0,50)
  174. level.TextColor3 = Color3.new(255/255,255/255,255/255)
  175. level.Font = "ArialBold"
  176. level.FontSize = "Size18"
  177. level.Text = "Level: 0"
  178. level.TextXAlignment = "Left"
  179.  
  180. local strength = Instance.new("TextLabel", _G.Information)
  181. strength.Name = "Strength"
  182. strength.BackgroundTransparency = 1
  183. strength.Size = UDim2.new(0,200,0,25)
  184. strength.Position = UDim2.new(0,0,0,75)
  185. strength.TextColor3 = Color3.new(255/255,255/255,255/255)
  186. strength.Font = "ArialBold"
  187. strength.FontSize = "Size18"
  188. strength.Text = "Strength: 0"
  189. strength.TextXAlignment = "Left"
  190.  
  191. local agility = Instance.new("TextLabel", _G.Information)
  192. agility.Name = "Agility"
  193. agility.BackgroundTransparency = 1
  194. agility.Size = UDim2.new(0,200,0,25)
  195. agility.Position = UDim2.new(0,0,0,100)
  196. agility.TextColor3 = Color3.new(255/255,255/255,255/255)
  197. agility.Font = "ArialBold"
  198. agility.FontSize = "Size18"
  199. agility.Text = "Agility: 0"
  200. agility.TextXAlignment = "Left"
  201.  
  202. local int = Instance.new("TextLabel", _G.Information)
  203. int.Name = "Intelligence"
  204. int.BackgroundTransparency = 1
  205. int.Size = UDim2.new(0,200,0,25)
  206. int.Position = UDim2.new(0,0,0,125)
  207. int.TextColor3 = Color3.new(255/255,255/255,255/255)
  208. int.Font = "ArialBold"
  209. int.FontSize = "Size18"
  210. int.Text = "Intelligence: 0"
  211. int.TextXAlignment = "Left"
  212.  
  213. local quirk = Instance.new("TextLabel", _G.Information)
  214. quirk.Name = "Quirk"
  215. quirk.BackgroundTransparency = 1
  216. quirk.Size = UDim2.new(0,200,0,25)
  217. quirk.Position = UDim2.new(0,0,0,150)
  218. quirk.TextColor3 = Color3.new(255/255,255/255,255/255)
  219. quirk.Font = "ArialBold"
  220. quirk.FontSize = "Size18"
  221. quirk.Text = "Quirk: N/A"
  222. quirk.TextXAlignment = "Left"
  223. end createGui()
  224.  
  225. function output(text)
  226. _G.OutputFrame.OutputText.Text = "Output: "..text
  227. end
  228.  
  229. output("Made by Yuno Gasai, Updated By Lilly Bay Fox (v"..version..")")
  230.  
  231. _G.StartButton.MouseButton1Down:connect(function()
  232. _G.StartButton.Open.Value = not _G.StartButton.Open.Value
  233. if _G.StartButton.Open.Value then
  234. _G.Background.Visible = true
  235. else
  236. _G.Background.Visible = false
  237. end
  238. end)
  239.  
  240. _G.Input.LevelValue.Changed:connect(function()
  241. _G.Input.LevelValue.Value.Value = _G.Input.LevelValue.Text
  242. end)
  243.  
  244. _G.Input.PlayerName.Changed:connect(function()
  245. _G.Input.PlayerName.Value.Value = _G.Input.PlayerName.Text
  246. end)
  247.  
  248. _G.Input.QuirkValue.Changed:connect(function()
  249. _G.Input.QuirkValue.Value.Value = _G.Input.QuirkValue.Text
  250. end)
  251.  
  252. spawn(function()
  253. while wait() do
  254. if _G.selectedPlayer then
  255. local leveltext = _G.Information.Level
  256. local strengthtext = _G.Information.Strength
  257. local agilitytext = _G.Information.Agility
  258. local inttext = _G.Information.Intelligence
  259. local quirktext = _G.Information.Quirk
  260.  
  261. leveltext.Text = "Level: " .. _G.selectedPlayer.Data.Level.Value
  262. strengthtext.Text = "Strength: " .. _G.selectedPlayer.Data.Strenght.Value
  263. agilitytext.Text = "Agility: " .. _G.selectedPlayer.Data.Agility.Value
  264. inttext.Text = "Intelligence: " .. _G.selectedPlayer.Data.Intelligence.Value
  265. quirktext.Text = "Quirk: " .. CheckQuirk(_G.selectedPlayer)
  266. end
  267. end
  268. end)
  269.  
  270. function CheckQuirk(player)
  271. if player then
  272. local data = player.Data
  273. if data.Quirk.Value == 0 then
  274. return "No quirk"
  275. elseif data.Quirk.Value == 1 then
  276. return "One For All"
  277. elseif data.Quirk.Value == 2 then
  278. return "Half Hot Half Cold"
  279. elseif data.Quirk.Value == 3 then
  280. return "Explosion"
  281. elseif data.Quirk.Value == 4 then
  282. return "Transparency"
  283. elseif data.Quirk.Value == 5 then
  284. return "Eraser"
  285. elseif data.Quirk.Value == 6 then
  286. return "Regeneration"
  287. elseif data.Quirk.Value == 7 then
  288. return "Engine"
  289. elseif data.Quirk.Value == 8 then
  290. return "Electrification"
  291. elseif data.Quirk.Value == 9 then
  292. return "Phoenix"
  293. elseif data.Quirk.Value == 10 then
  294. return "Hardening"
  295. elseif data.Quirk.Value == 11 then
  296. return "Hell Flames"
  297. end
  298. else
  299. return "N/A"
  300. end
  301. end
  302.  
  303. function _G.assignQuirk(player, value) --Credits to Vitality (modified by me)
  304. local talk = game.ReplicatedFirst.Talk:Clone()
  305. talk.Parent = player.Backpack
  306. talk.msg.Change.Q.Value = value
  307. wait(1)
  308. talk.msg.Change.Disabled = false
  309. end
  310.  
  311. _G.Options.QuirkChange.MouseButton1Down:connect(function()
  312. if game:GetService("Players"):FindFirstChild(_G.Input.PlayerName.Value.Value) then
  313. _G.selectedPlayer = game:GetService("Players"):FindFirstChild(_G.Input.PlayerName.Value.Value)
  314. local quirk = _G.Input.QuirkValue.Value.Value
  315. if _G.Input.QuirkValue.Value.Value >= 0 and _G.Input.QuirkValue.Value.Value <= 11 then
  316. _G.assignQuirk(_G.selectedPlayer, quirk)
  317. output("Quirk has been changed to " .. CheckQuirk(_G.selectedPlayer))
  318. elseif quirk.Value < 0 then
  319. output("Value too low, Quirk values are 0-11")
  320. else
  321. output("Value too high, Quirk values are 0-11")
  322. end
  323. else
  324. output("Player doesn't exist")
  325. end
  326. end)
  327.  
  328. _G.Options.EXPLoop.MouseButton1Down:connect(function()
  329. _G.Options.EXPLoop.Started.Value = not _G.Options.EXPLoop.Started.Value
  330. if _G.Options.EXPLoop.Started.Value then
  331. if game:GetService("Players"):FindFirstChild(_G.Input.PlayerName.Value.Value) then
  332. _G.selectedPlayer = game:GetService("Players"):FindFirstChild(_G.Input.PlayerName.Value.Value)
  333. local level = _G.selectedPlayer.Data.Level
  334. if level.Value < _G.Input.LevelValue.Value.Value and _G.Input.LevelValue.Value.Value <= 400 then
  335. local desiredLevel = _G.Input.LevelValue.Value.Value
  336. local expscript = _G.selectedPlayer.Backpack.Main.Script
  337. for i=1,50,1 do
  338. local clonedScript = expscript:Clone()
  339. clonedScript.Parent = _G.selectedPlayer.Backpack.Main
  340. clonedScript.Name = "ClonedScript"
  341. end
  342. output("Starting EXP Loop")
  343. _G.EXPLoop = RS.RenderStepped:connect(function()
  344. if level.Value < desiredLevel then
  345. for _,expscripts in pairs(_G.selectedPlayer.Backpack.Main:GetChildren()) do
  346. if expscripts:IsA("Script") and expscripts.Name == "ClonedScript" then
  347. expscripts.Disabled = false
  348. end
  349. end
  350. else
  351. output("Reached desired level")
  352. for _,v in pairs(_G.selectedPlayer.Backpack.Main:GetChildren()) do
  353. if v:IsA("Script") and v.Name == "ClonedScript" then
  354. vBig :Destroy()
  355. end
  356. end
  357. _G.EXPLoop:disconnect()
  358. _G.Options.EXPLoop.Started.Value = false
  359. end
  360. end)
  361. elseif _G.Input.LevelValue.Value.Value > 400 then
  362. output("Desired level is too over the maxed level.")
  363. _G.Options.EXPLoop.Started.Value = false
  364. else
  365. output("Level already exceeds desired amount")
  366. _G.Options.EXPLoop.Started.Value = false
  367. end
  368. else
  369. output("Player doesn't exist")
  370. _G.Options.EXPLoop.Started.Value = false
  371. end
  372. else
  373. output("Stopping EXP loop")
  374. _G.EXPLoop:disconnect()
  375. for _,v in pairs(_G.selectedPlayer.Backpack.Main:GetChildren()) do
  376. if v.Name == "ClonedScript" then
  377. vBig Grinestroy()
  378. end
  379. end
  380. _G.Options.EXPLoop.Started.Value = false
  381. end
  382. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement