Advertisement
Guest User

PBB SCRIPT

a guest
Sep 3rd, 2021
7,549
0
Never
2
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 6.71 KB | None | 0 0
  1. LPlr = game.Players.LocalPlayer
  2. MDown = false
  3. Mouse = LPlr:GetMouse()
  4. function ConvertNumbers(X, Y)
  5. local TX = Mouse.ViewSizeX*X
  6. local TY = Mouse.ViewSizeY*Y
  7. return TX, TY
  8. end
  9. local OriginalMaxAndMin = {LPlr.CameraMaxZoomDistance, LPlr.CameraMinZoomDistance}
  10. function MoveableItem(item)
  11. item.InputBegan:connect(function(input)
  12. if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
  13. MDown = true
  14. local CX, CY = ConvertNumbers(item.Position.X.Scale, item.Position.Y.Scale)
  15. item.Position = UDim2.new(0, item.Position.X.Offset+CX, 0, item.Position.Y.Offset+CY)
  16. local StartX = Mouse.X - item.Position.X.Offset
  17. local StartY = Mouse.Y - item.Position.Y.Offset
  18. while MDown == true do
  19. item.Position = UDim2.new(0, Mouse.X - StartX, 0, Mouse.Y - StartY)
  20. wait()
  21. end
  22. end
  23. end)
  24. item.InputEnded:connect(function(input)
  25. if input.UserInputType == Enum.UserInputType.MouseButton1 then
  26. MDown = false
  27. end
  28. end)
  29. end
  30. function LockedCamera(Val)
  31. local Dist = (game.Workspace.Camera.CoordinateFrame.p - LPlr.Character.Head.Position).Magnitude
  32. LPlr.CameraMaxZoomDistance = Dist
  33. LPlr.CameraMinZoomDistance = Dist
  34. if Val ~= true then
  35. LPlr.CameraMaxZoomDistance = OriginalMaxAndMin[1]
  36. LPlr.CameraMinZoomDistance = OriginalMaxAndMin[2]
  37. end
  38. end
  39. function ChangePos(input, item, Amount)
  40. local Pos = item.CanvasPosition
  41. if Amount == nil then
  42. Amount = 90
  43. end
  44. Amount = Amount *-1
  45. Pos = Pos + Vector2.new(0, input.Position.Z*Amount)
  46. if Pos.Y < 0 then
  47. Pos = Vector2.new(0, 0)
  48. elseif Pos.Y > item.CanvasSize.Y.Offset then
  49. Pos = Vector2.new(0, item.CanvasSize.Y.Offset)
  50. end
  51. item.CanvasPosition = Pos
  52. end
  53. function ScrollableItem(item, Amount)
  54. item.ScrollingEnabled = false
  55. item.inputBegan:connect(function(input)
  56. if input.UserInputType == Enum.UserInputType.MouseWheel then
  57. ChangePos(input, item, Amount)
  58. end
  59. end)
  60. item.InputChanged:connect(function(input)
  61. if input.UserInputType == Enum.UserInputType.MouseWheel then
  62. ChangePos(input, item, Amount)
  63. end
  64. end)
  65. item.MouseEnter:connect(function()
  66. LockedCamera(true)
  67. end)
  68. item.MouseLeave:connect(function()
  69. LockedCamera()
  70. end)
  71. end
  72.  
  73. BrickBronzeGui = Instance.new("ScreenGui", game:GetService("CoreGui"))
  74. BrickBronzeGui.Name = "BrickBronzeGui"
  75. BrickBronzeGui.ZIndexBehavior = Enum.ZIndexBehavior.Sibling
  76.  
  77. Main = Instance.new("Frame", BrickBronzeGui)
  78. Main.Name = "Main"
  79. Main.BackgroundColor3 = Color3.fromRGB(16, 180, 255)
  80. Main.BorderSizePixel = 0
  81. Main.Position = UDim2.new(0.38, 0, 0.289, 0)
  82. Main.Size = UDim2.new(0, 200, 0, 250)
  83. MoveableItem(Main)
  84.  
  85. TextLabel = Instance.new("TextLabel", Main)
  86. TextLabel.Name = "TextLabel"
  87. TextLabel.BackgroundColor3 = Color3.fromRGB(8, 202, 255)
  88. TextLabel.BorderSizePixel = 0
  89. TextLabel.Size = UDim2.new(1, 0, 0, 25)
  90. TextLabel.Font = Enum.Font.SourceSans
  91. TextLabel.Text = "Victini's Brick Bronze Gui"
  92. TextLabel.TextColor3 = Color3.fromRGB(107, 8, 220)
  93. TextLabel.TextScaled = true
  94. TextLabel.TextSize = 14
  95. TextLabel.TextWrapped = true
  96.  
  97. ScrollingFrame = Instance.new("ScrollingFrame", Main)
  98. ScrollingFrame.Name = "ScrollingFrame"
  99. ScrollingFrame.Active = true
  100. ScrollingFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  101. ScrollingFrame.BackgroundTransparency = 1
  102. ScrollingFrame.BorderSizePixel = 0
  103. ScrollingFrame.Position = UDim2.new(0, 0, 0, 25)
  104. ScrollingFrame.Size = UDim2.new(1, 0, 1, -25)
  105. ScrollingFrame.ScrollBarImageColor3 = Color3.fromRGB(0, 0, 0)
  106. ScrollingFrame.ScrollBarThickness = 4
  107. ScrollableItem(ScrollingFrame, 90)
  108.  
  109. UIListLayout = Instance.new("UIListLayout", ScrollingFrame)
  110. UIListLayout.Name = "UIListLayout"
  111. UIListLayout.SortOrder = Enum.SortOrder.LayoutOrder
  112. UIListLayout.Padding = UDim.new(0, 2)
  113.  
  114. TextButton = Instance.new("TextButton")
  115. TextButton.Name = "TextButton"
  116. TextButton.BackgroundColor3 = Color3.fromRGB(20, 153, 255)
  117. TextButton.BorderSizePixel = 0
  118. TextButton.Size = UDim2.new(1, -4, 0, 30)
  119. TextButton.Font = Enum.Font.SourceSans
  120. TextButton.Text = "Test"
  121. TextButton.TextColor3 = Color3.fromRGB(255, 255, 255)
  122. TextButton.TextScaled = true
  123. TextButton.TextSize = 14
  124. TextButton.TextWrapped = true
  125.  
  126. function AddButton(Txt, Func, ...)
  127.     local B = TextButton:Clone()
  128.     ScrollingFrame.CanvasSize = UDim2.new(0, 0, 0, 32*#ScrollingFrame:GetChildren())
  129.     B.Parent = ScrollingFrame
  130.     B.Text = Txt
  131.     local Args = {...}
  132.     B.MouseButton1Down:connect(function()
  133.         Func(unpack(Args))
  134.     end)
  135.     return B
  136. end
  137.  
  138. Get = game:GetService("ReplicatedStorage").GET
  139. function GetMainData()
  140.     for i, v in pairs(debug.getregistry()) do
  141.         if typeof(v) == "function" then
  142.             for a, b in pairs(debug.getupvalues(v)) do
  143.                 if typeof(b) == "table" and rawget(b, "Fishing") then
  144.                     return b
  145.                 end
  146.             end
  147.         end
  148.     end
  149. end
  150. Data = GetMainData()
  151. AuthKey = debug.getupvalue(Data["Network"]["getAuthKey"], 1)
  152. function ToggleSubmarine(Val)
  153.     local Sub = true
  154.     if LPlr.Character ~= nil and LPlr.Character:FindFirstChild("UMVModel") then
  155.         Sub = false
  156.     end
  157.     if Val ~= nil then
  158.         Sub = Val
  159.     end
  160.     Get:InvokeServer(AuthKey, "ToggleSubmarine", Sub)
  161. end
  162. function GoInvisible()
  163.     if LPlr.Character == nil or LPlr.Character:FindFirstChild("UMVModel") and not LPlr.Character.UMVModel:FindFirstChild("Root") then
  164.         return
  165.     end
  166.     ToggleSubmarine(true)
  167.     repeat
  168.         wait()
  169.     until LPlr.Character:FindFirstChild("UMVModel")
  170.     LPlr.Character.UMVModel:FindFirstChild("Root"):remove()
  171. end
  172. function GoVisible()
  173.     ToggleSubmarine(false)
  174. end
  175. local SF = {}
  176. SF["Fish"] = Data["Fishing"]["Fish"]
  177. SF["Fly"] = Data["Menu"]["map"]["fly"]
  178. local SkipChat = true
  179. local OldWait;
  180. OldWait = hookfunction(Data["NPCChat"]["AdvanceSignal"]["wait"], function(...)
  181. if SkipChat then
  182. return
  183. end
  184. OldWait(...)
  185. end)
  186. local Old;
  187. Old = hookfunction(Data["NPCChat"]["say"], function(...)
  188.     local Args = {...}
  189. if SkipChat then
  190. for i = 3, #Args do
  191. if typeof(Args[i]) == "string" then
  192. Args[i] = "."
  193. end
  194. end
  195. end
  196.     return Old(unpack(Args))
  197. end)
  198.  
  199.  
  200. AddButton("Fly", SF["Fly"])
  201. AddButton("Fish", function()
  202. SF["Fish"](nil, "GoodRod", LPlr.Character.Head.Position+LPlr.Character.Head.CFrame.LookVector*5)
  203. end)
  204. AddButton("SubmarineMode", ToggleSubmarine, true)
  205. AddButton("HumanMode", ToggleSubmarine, false)
  206. AddButton("ToggleSubmarine", ToggleSubmarine)
  207. AddButton("Invisible", GoInvisible)
  208. AddButton("Visible", GoVisible)
  209. local SkipChatButton;
  210. SkipChatButton = AddButton("SkipNPCChat", function()
  211. SkipChat = not SkipChat
  212. SkipChatButton.BackgroundColor3 = Color3.fromRGB(20, 153, 255)
  213. if SkipChat == false then
  214. SkipChatButton.BackgroundColor3 = Color3.fromRGB(120, 153, 155)
  215. end
  216. end)
  217. AddButton("HealPokemon", function()
  218. Get:InvokeServer(AuthKey, "PDS", "getPartyPokeBalls")
  219. end)
Advertisement
Comments
Add Comment
Please, Sign In to add comment
Advertisement