Guest User

Untitled

a guest
Oct 15th, 2024
24
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.86 KB | None | 0 0
  1. --[[
  2. WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
  3. ]]
  4. local screenGui = Instance.new("ScreenGui") -- Cria a interface na tela
  5. local frame = Instance.new("Frame") -- Cria um quadro para a interface
  6. local particlesButton = Instance.new("TextButton") -- Botão para partículas
  7. local skyboxButton = Instance.new("TextButton") -- Botão para mudar o céu
  8. local hintLabel = Instance.new("TextLabel") -- Label para hint
  9. local changeGroundButton = Instance.new("TextButton") -- Botão para mudar o chão
  10. local creditsLabel = Instance.new("TextLabel") -- Label de créditos
  11.  
  12. -- Configurações do ScreenGui
  13. screenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
  14.  
  15. -- Configurações do Frame
  16. frame.Size = UDim2.new(0, 300, 0, 200)
  17. frame.Position = UDim2.new(0.5, -150, 0.5, -100)
  18. frame.BackgroundColor3 = Color3.fromRGB(255, 255, 0) -- Cor amarela
  19. frame.Parent = screenGui
  20.  
  21. -- Configurações do Hint
  22. hintLabel.Size = UDim2.new(1, 0, 0, 50)
  23. hintLabel.Position = UDim2.new(0, 0, 0, 0)
  24. hintLabel.Text = "Join Team girl00kidd"
  25. hintLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
  26. hintLabel.Parent = frame
  27.  
  28. -- Configurações do botão de partículas
  29. particlesButton.Size = UDim2.new(1, 0, 0, 50)
  30. particlesButton.Position = UDim2.new(0, 0, 0, 50)
  31. particlesButton.Text = "Old Particles"
  32. particlesButton.Parent = frame
  33. particlesButton.MouseButton1Click:Connect(function()
  34. local particleId = "rbxassetid://134964139950"
  35. -- Código para adicionar partículas com o ID acima
  36. end)
  37.  
  38. -- Configurações do botão de mudar o céu
  39. skyboxButton.Size = UDim2.new(1, 0, 0, 50)
  40. skyboxButton.Position = UDim2.new(0, 0, 0, 100)
  41. skyboxButton.Text = "Skybox"
  42. skyboxButton.Parent = frame
  43. skyboxButton.MouseButton1Click:Connect(function()
  44. local skybox = Instance.new("Sky") -- Cria uma nova instância de Sky
  45. skybox.Parent = game.Lighting -- Coloca o Skybox no Lighting
  46. local skyImageId = "rbxassetid://134964139950"
  47. skybox.SkyboxBk = skyImageId -- Imagem para a parte de trás
  48. skybox.SkyboxDn = skyImageId -- Imagem para a parte de baixo
  49. skybox.SkyboxFt = skyImageId -- Imagem para a frente
  50. skybox.SkyboxLf = skyImageId -- Imagem para a esquerda
  51. skybox.SkyboxRt = skyImageId -- Imagem para a direita
  52. skybox.SkyboxUp = skyImageId -- Imagem para cima
  53. end)
  54.  
  55. -- Configurações do botão para mudar o chão
  56. changeGroundButton.Size = UDim2.new(1, 0, 0, 50)
  57. changeGroundButton.Position = UDim2.new(0, 0, 0, 150)
  58. changeGroundButton.Text = "1x2x7x9"
  59. changeGroundButton.Parent = frame
  60. changeGroundButton.MouseButton1Click:Connect(function()
  61. local groundImageId = "rbxassetid://134964139950"
  62. local terrain = game.Workspace.Terrain
  63. terrain:FillBlock(workspace.Baseplate.Position, workspace.Baseplate.Size, Enum.Material.Grass)
  64. -- Aplique a textura ao chão (baseplate ou qualquer parte do seu chão)
  65. end)
  66.  
  67. -- Configurações dos Créditos
  68. creditsLabel.Size = UDim2.new(1, 0, 0, 50)
  69. creditsLabel.Position = UDim2.new(0, 0, 1, -50)
  70. creditsLabel.Text = "Credits to girl00kidd"
  71. creditsLabel.TextColor3 = Color3.fromRGB(0, 0, 0)
  72. creditsLabel.Parent = frame
  73.  
  74. -- Função para permitir arrastar a interface
  75. local dragging = false
  76. local dragStart = nil
  77. local startPos = nil
  78.  
  79. frame.InputBegan:Connect(function(input)
  80. if input.UserInputType == Enum.UserInputType.MouseButton1 then
  81. dragging = true
  82. dragStart = input.Position
  83. startPos = frame.Position
  84. end
  85. end)
  86.  
  87. frame.InputEnded:Connect(function(input)
  88. if input.UserInputType == Enum.UserInputType.MouseButton1 then
  89. dragging = false
  90. end
  91. end)
  92.  
  93. frame.InputChanged:Connect(function(input)
  94. if dragging and input.UserInputType == Enum.UserInputType.MouseMovement then
  95. local delta = input.Position - dragStart
  96. frame.Position = startPos + UDim2.new(0, delta.X, 0, delta.Y)
  97. end
  98. end)
Add Comment
Please, Sign In to add comment