-- Gui to Lua
-- Version: 3.2

-- Instances:

local ScreenGui = Instance.new("ScreenGui")
local Frame = Instance.new("Frame")
local Frame_2 = Instance.new("Frame")
local TextLabel = Instance.new("TextLabel")
local ImageLabel = Instance.new("ImageLabel")
local TextBox = Instance.new("TextBox")
local TextLabel_2 = Instance.new("TextLabel")
local Frame_3 = Instance.new("Frame")
local TextLabel_3 = Instance.new("TextLabel")
local TextLabel_4 = Instance.new("TextLabel")
local TextLabel_5 = Instance.new("TextLabel")
local TextLabel_6 = Instance.new("TextLabel")
local TextLabel_7 = Instance.new("TextLabel")
local TextLabel_8 = Instance.new("TextLabel")
local TextLabel_9 = Instance.new("TextLabel")
local TextLabel_10 = Instance.new("TextLabel")
local TextLabel_11 = Instance.new("TextLabel")

--Properties:

ScreenGui.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")

Frame.Parent = ScreenGui
Frame.BackgroundColor3 = Color3.fromRGB(50, 34, 27)
Frame.BackgroundTransparency = 0.150
Frame.BorderColor3 = Color3.fromRGB(0, 0, 0)
Frame.BorderSizePixel = 0
Frame.Position = UDim2.new(0.748725414, 0, 0.877887785, 0)
Frame.Size = UDim2.new(0, 212, 0, 65)

Frame_2.Parent = Frame
Frame_2.BackgroundColor3 = Color3.fromRGB(34, 16, 11)
Frame_2.BorderColor3 = Color3.fromRGB(0, 0, 0)
Frame_2.BorderSizePixel = 0
Frame_2.Position = UDim2.new(0.0424528308, 0, 0.184615389, 0)
Frame_2.Size = UDim2.new(0, 195, 0, 43)

TextLabel.Parent = Frame_2
TextLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
TextLabel.BackgroundTransparency = 1.000
TextLabel.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel.BorderSizePixel = 0
TextLabel.Position = UDim2.new(-0.0153846154, 0, 0, 0)
TextLabel.Size = UDim2.new(0, 200, 0, 43)
TextLabel.Font = Enum.Font.SourceSans
TextLabel.Text = "Welcome to Mr.Bean Admin Use the\\nProgram to execute scripts Status\\nEnabled! press : to inject Scripts!"
TextLabel.TextColor3 = Color3.fromRGB(175, 163, 48)
TextLabel.TextScaled = true
TextLabel.TextSize = 14.000
TextLabel.TextWrapped = true

ImageLabel.Parent = Frame
ImageLabel.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
ImageLabel.BackgroundTransparency = 1.000
ImageLabel.BorderColor3 = Color3.fromRGB(0, 0, 0)
ImageLabel.BorderSizePixel = 0
ImageLabel.Position = UDim2.new(1.07547164, 0, -0.384615391, 0)
ImageLabel.Size = UDim2.new(0, 86, 0, 90)
ImageLabel.Image = "rbxassetid://16523540787"

TextBox.Parent = ScreenGui
TextBox.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextBox.BackgroundTransparency = 1.000
TextBox.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextBox.BorderSizePixel = 0
TextBox.Position = UDim2.new(0.0109999999, 0, 0, -50)
TextBox.Size = UDim2.new(0, 1251, 0, 50)
TextBox.Font = Enum.Font.Arial
TextBox.Text = ""
TextBox.TextColor3 = Color3.fromRGB(255, 255, 255)
TextBox.TextSize = 52.000
TextBox.TextWrapped = true

TextLabel_2.Parent = ScreenGui
TextLabel_2.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_2.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_2.BorderSizePixel = 0
TextLabel_2.Position = UDim2.new(0.426012456, 0, 0.210361063, 0)
TextLabel_2.Size = UDim2.new(0, 534, 0, 50)
TextLabel_2.Font = Enum.Font.FredokaOne
TextLabel_2.Text = "Command List"
TextLabel_2.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_2.TextSize = 49.000
TextLabel_2.TextWrapped = true

Frame_3.Parent = TextLabel_2
Frame_3.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
Frame_3.BorderColor3 = Color3.fromRGB(0, 0, 0)
Frame_3.BorderSizePixel = 0
Frame_3.Position = UDim2.new(-0.000936329598, 0, 1, 0)
Frame_3.Size = UDim2.new(0, 534, 0, 262)

TextLabel_3.Parent = Frame_3
TextLabel_3.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_3.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_3.BorderSizePixel = 0
TextLabel_3.Size = UDim2.new(0, 115, 0, 50)
TextLabel_3.Font = Enum.Font.FredokaOne
TextLabel_3.Text = ":hint"
TextLabel_3.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_3.TextSize = 30.000

TextLabel_4.Parent = Frame_3
TextLabel_4.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_4.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_4.BorderSizePixel = 0
TextLabel_4.Position = UDim2.new(0, 0, 0.23282443, 0)
TextLabel_4.Size = UDim2.new(0, 115, 0, 50)
TextLabel_4.Font = Enum.Font.FredokaOne
TextLabel_4.Text = ":chat all"
TextLabel_4.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_4.TextSize = 30.000

TextLabel_5.Parent = Frame_3
TextLabel_5.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_5.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_5.BorderSizePixel = 0
TextLabel_5.Position = UDim2.new(0, 0, 0.423664123, 0)
TextLabel_5.Size = UDim2.new(0, 115, 0, 50)
TextLabel_5.Font = Enum.Font.FredokaOne
TextLabel_5.Text = ":fire all"
TextLabel_5.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_5.TextSize = 30.000

TextLabel_6.Parent = Frame_3
TextLabel_6.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_6.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_6.BorderSizePixel = 0
TextLabel_6.Position = UDim2.new(0, 0, 0.648854971, 0)
TextLabel_6.Size = UDim2.new(0, 115, 0, 50)
TextLabel_6.Font = Enum.Font.FredokaOne
TextLabel_6.Text = ":knife"
TextLabel_6.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_6.TextSize = 30.000

TextLabel_7.Parent = Frame_3
TextLabel_7.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_7.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_7.BorderSizePixel = 0
TextLabel_7.Position = UDim2.new(0.215355799, 0, 0, 0)
TextLabel_7.Size = UDim2.new(0, 115, 0, 50)
TextLabel_7.Font = Enum.Font.FredokaOne
TextLabel_7.Text = ":R6"
TextLabel_7.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_7.TextSize = 30.000

TextLabel_8.Parent = Frame_3
TextLabel_8.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_8.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_8.BorderSizePixel = 0
TextLabel_8.Position = UDim2.new(0.230337083, 0, 0.23282443, 0)
TextLabel_8.Size = UDim2.new(0, 115, 0, 50)
TextLabel_8.Font = Enum.Font.FredokaOne
TextLabel_8.Text = ":sm"
TextLabel_8.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_8.TextSize = 30.000

TextLabel_9.Parent = Frame_3
TextLabel_9.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_9.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_9.BorderSizePixel = 0
TextLabel_9.Position = UDim2.new(0.230337083, 0, 0.5, 0)
TextLabel_9.Size = UDim2.new(0, 115, 0, 50)
TextLabel_9.Font = Enum.Font.FredokaOne
TextLabel_9.Text = ":decalspam"
TextLabel_9.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_9.TextScaled = true
TextLabel_9.TextSize = 30.000
TextLabel_9.TextWrapped = true

TextLabel_10.Parent = Frame_3
TextLabel_10.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_10.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_10.BorderSizePixel = 0
TextLabel_10.Position = UDim2.new(0.230337083, 0, 0.690839708, 0)
TextLabel_10.Size = UDim2.new(0, 115, 0, 50)
TextLabel_10.Font = Enum.Font.FredokaOne
TextLabel_10.Text = ":fly"
TextLabel_10.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_10.TextSize = 30.000
TextLabel_10.TextWrapped = true

TextLabel_11.Parent = Frame_3
TextLabel_11.BackgroundColor3 = Color3.fromRGB(43, 43, 43)
TextLabel_11.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel_11.BorderSizePixel = 0
TextLabel_11.Position = UDim2.new(0.430711597, 0, 0, 0)
TextLabel_11.Size = UDim2.new(0, 115, 0, 50)
TextLabel_11.Font = Enum.Font.FredokaOne
TextLabel_11.Text = ":function"
TextLabel_11.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel_11.TextSize = 30.000
TextLabel_11.TextWrapped = true

-- Scripts:

local function VUYYC_fake_script() -- TextBox.LocalScript
	local script = Instance.new('LocalScript', TextBox)

	local TB = script.Parent

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(function(key)
		if key == "E" or key == "e" then
			TB.BackgroundTransparency = 0.45
			TB:TweenPosition(UDim2.new(0.0109033315, 0, 0.0329153612, 0), "Out", "Back", 0.5, true)


		end
	end)
	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(function(key)
		if key == "p" or key == "P" then
			TB:TweenPosition(UDim2.new({0.011, 0},{0, -50}), "Out", "Back", 0.5, true)
			TB.BackgroundTransparency = 1
		end
	end)

	local function handleKeyPress(key)
		if key == "f" then
			local text = TB.Text:lower()
			local match = string.match(text, ":sm (.*)")

			if match then
				local message = match
				local D = Instance.new("Message", game.Players.LocalPlayer.PlayerGui) D.Text = message wait(2) D:Destroy()

				-- Ajoutez ici le code pour afficher le message où vous le souhaitez dans votre jeu

				TB.Text = ""  -- Efface le texte après l'affichage du message (si nécessaire)
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(handleKeyPress)


	local function handleKeyPress2(key)
		local text = TB.Text:lower()
		local match = string.match(text, ":fire all")
		if key == "f" then
			if match then

				local fire = Instance.new("Fire")
				local Players = game.Players

				if fire and Players then
					for _, player in pairs(Players:GetPlayers()) do
						local playerHead = player.Character and player.Character:WaitForChild("Head")
						local playerFire = fire:Clone()
						playerFire.Parent = playerHead
						game.Chat:Chat(playerHead,'I AM ON FIRE!')
					end
				end


				TB.Text = ""
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(handleKeyPress2)

	local function d(key)
		local text = TB.Text:lower()
		local match, message = string.match(text, ":chat all (.*)")
		if key == "f" then
			if match then
				local Players = game.Players
				for _, player in pairs(Players:GetPlayers()) do
					local playerHead = player.Character and player.Character:FindFirstChild("Head")
					if playerHead then
						game.Chat:Chat(playerHead, match)
					end
				end

				TB.Text = ""
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(d)

	local function dd(key)
		local text = TB.Text:lower()
		local match, message = string.match(text, ":knife")
		if key == "f" then
			if match then
				loadstring(game:HttpGet("https://rawscripts.net/raw/Lumber-Tycoon-grab-knife-v4-10647"))()
				TB.Text = ""
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(dd)

	local function ddd(key)
		local text = TB.Text:lower()
		local match, message = string.match(text, ":R6")
		if key == "f" then
			if match then
				loadstring(game:HttpGet("https://raw.githubusercontent.com/Imagnir/r6_anims_for_r15/main/r6_anims.lua"))()
				TB.Text = ""
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(ddd)

	local function laaa(key)
		local text = TB.Text:lower()
		local match, id = string.match(text, ":decalspam%s*%((%d+)%)")

		if key == "f" and match then
			print("Texte:", text)
			print("ID extrait:", id)

			-- Convertir l'ID en un nombre
			local decalID = tonumber(id)

			-- Vérifier si l'ID est valide
			if decalID then
				-- DECAL SPAM SCRIPT. CHANGE THIS TO THE DECAL ID YOU WANT TO BE SPAMMED.
				local ID = decalID

				-- IF YOU WANT THE SKYBOX TO BE SPAMMED AS WELL, TURN THIS TO TRUE.
				local Skybox = true

				-- FINALLY, IF YOU WANT PARTICLES TO BE SPAMMED, TURN THIS TO TRUE.
				local particle = true

				-- DO NOT CHANGE BELOW. UNLESS YOU KNOW WHAT YOU'RE DOING.

				for _, v in pairs(game.Workspace:GetChildren()) do
					if v:IsA("Part") then
						local decal = Instance.new("Decal")
						decal.Texture = "http://www.roblox.com/asset/?id=" .. ID
						decal.Parent = v
					end
				end

				if Skybox then
					local sky = Instance.new("Sky")
					sky.Parent = game.Lighting
					sky.SkyboxBk = "http://www.roblox.com/asset/?id=" .. ID
					sky.SkyboxDn = "http://www.roblox.com/asset/?id=" .. ID
					sky.SkyboxFt = "http://www.roblox.com/asset/?id=" .. ID
					sky.SkyboxLf = "http://www.roblox.com/asset/?id=" .. ID
					sky.SkyboxRt = "http://www.roblox.com/asset/?id=" .. ID
					sky.SkyboxUp = "http://www.roblox.com/asset/?id=" .. ID
				end

				if particle then
					for _, v in pairs(game.Workspace:GetChildren()) do
						if v:IsA("Part") then
							local particle = Instance.new("ParticleEmitter")
							particle.Texture = "http://www.roblox.com/asset/?id=" .. ID
							particle.Parent = v
							particle.Rate = 200
						end
					end
				end

				TB.Text = ""
			else
				print("ID de décalcomanie invalide.")
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(laaa)


	local function dddd(key)
		local text = TB.Text:lower()
		local match, message = string.match(text, ":fly")
		if key == "g" then
			if match then

				-- Press X to fly
				game:GetService("StarterGui"):SetCore("SendNotification",{
					Title = "From Mr.Bean Admin", -- Required
					Text = "Press X for fly and UNFLY have fun !", -- Required
					Icon = "rbxassetid://1234567890" -- Optional

				})

				local plr = game.Players.LocalPlayer
				local mouse = plr:GetMouse()

				localplayer = plr

				if workspace:FindFirstChild("Core") then
					workspace.Core:Destroy()
				end

				local Core = Instance.new("Part")
				Core.Name = "Core"
				Core.Size = Vector3.new(0.05, 0.05, 0.05)

				spawn(function()
					Core.Parent = workspace
					local Weld = Instance.new("Weld", Core)
					Weld.Part0 = Core
					Weld.Part1 = localplayer.Character.LowerTorso
					Weld.C0 = CFrame.new(0, 0, 0)
				end)

				workspace:WaitForChild("Core")

				local torso = workspace.Core
				flying = true
				local speed=10
				local keys={a=false,d=false,w=false,s=false}
				local e1
				local e2
				local function start()
					local pos = Instance.new("BodyPosition",torso)
					local gyro = Instance.new("BodyGyro",torso)
					pos.Name="EPIXPOS"
					pos.maxForce = Vector3.new(math.huge, math.huge, math.huge)
					pos.position = torso.Position
					gyro.maxTorque = Vector3.new(9e9, 9e9, 9e9)
					gyro.cframe = torso.CFrame
					repeat
						wait()
						localplayer.Character.Humanoid.PlatformStand=true
						local new=gyro.cframe - gyro.cframe.p + pos.position
						if not keys.w and not keys.s and not keys.a and not keys.d then
							speed=5
						end
						if keys.w then
							new = new + workspace.CurrentCamera.CoordinateFrame.lookVector * speed
							speed=speed+0
						end
						if keys.s then
							new = new - workspace.CurrentCamera.CoordinateFrame.lookVector * speed
							speed=speed+0
						end
						if keys.d then
							new = new * CFrame.new(speed,0,0)
							speed=speed+0
						end
						if keys.a then
							new = new * CFrame.new(-speed,0,0)
							speed=speed+0
						end
						if speed>10 then
							speed=5
						end
						pos.position=new.p
						if keys.w then
							gyro.cframe = workspace.CurrentCamera.CoordinateFrame*CFrame.Angles(-math.rad(speed*0),0,0)
						elseif keys.s then
							gyro.cframe = workspace.CurrentCamera.CoordinateFrame*CFrame.Angles(math.rad(speed*0),0,0)
						else
							gyro.cframe = workspace.CurrentCamera.CoordinateFrame
						end
					until flying == false
					if gyro then gyro:Destroy() end
					if pos then pos:Destroy() end
					flying=false
					localplayer.Character.Humanoid.PlatformStand=false
					speed=10
				end
				e1=mouse.KeyDown:connect(function(key)
					if not torso or not torso.Parent then flying=false e1:disconnect() e2:disconnect() return end
					if key=="w" then
						keys.w=true
					elseif key=="s" then
						keys.s=true
					elseif key=="a" then
						keys.a=true
					elseif key=="d" then
						keys.d=true
					elseif key=="x" then
						if flying==true then
							flying=false
						else
							flying=true
							start()
						end
					end
				end)
				e2=mouse.KeyUp:connect(function(key)
					if key=="w" then
						keys.w=false
					elseif key=="s" then
						keys.s=false
					elseif key=="a" then
						keys.a=false
					elseif key=="d" then
						keys.d=false
					end
				end)
				start()
			end
			TB.Text = ""
		end
	end


	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(dddd)




	local function lol(key)
		local text = TB.Text:lower()
		local match, message = string.match(text, ":function")
		if key == "f" then
			if match then
				local F = function() end print(F)
				TB.Text = ""
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(lol)

	local function handleKeyPress3(key)
		if key == "f" then
			local text = TB.Text:lower()
			local match = string.match(text, ":hint (.*)")

			if match then
				local message = match
				local D = Instance.new("Hint", game.Players.LocalPlayer.PlayerGui) D.Text = message wait(5) D:Destroy()

				-- Ajoutez ici le code pour afficher le message où vous le souhaitez dans votre jeu

				TB.Text = ""  -- Efface le texte après l'affichage du message (si nécessaire)
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(handleKeyPress3)

	local function lol2(key)
		local text = TB.Text:lower()
		local match, message = string.match(text, ":cmds")
		if key == "f" then
			if match then
				local Cmds = game.StarterGui.ScreenGui.TextLabel
				Cmds.Visible = true
				TB.Text = ""
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(lol2)
end
coroutine.wrap(VUYYC_fake_script)()
local function BRJOFS_fake_script() -- TextLabel_2.LocalScript
	local script = Instance.new('LocalScript', TextLabel_2)

	local UserInputService = game:GetService("UserInputService")

	local gui = script.Parent

	local dragging
	local dragInput
	local dragStart
	local startPos

	local function update(input)
		local delta = input.Position - dragStart
		gui.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
	end

	gui.InputBegan:Connect(function(input)
		if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
			dragging = true
			dragStart = input.Position
			startPos = gui.Position

			input.Changed:Connect(function()
				if input.UserInputState == Enum.UserInputState.End then
					dragging = false
				end
			end)
		end
	end)

	gui.InputChanged:Connect(function(input)
		if input.UserInputType == Enum.UserInputType.MouseMovement or input.UserInputType == Enum.UserInputType.Touch then
			dragInput = input
		end
	end)

	UserInputService.InputChanged:Connect(function(input)
		if input == dragInput and dragging then
			update(input)
		end
	end)
end
coroutine.wrap(BRJOFS_fake_script)()
local function BWMMXF_fake_script() -- TextLabel_2.LocalScript
	local script = Instance.new('LocalScript', TextLabel_2)

	local TB = game.StarterGui.ScreenGui.TextBox

	local function lol2(key)
		local text = TB.Text:lower()
		local match, message = string.match(text, ":cmds")
		if key == "f" then
			if match then
				local Cmds = game.StarterGui.ScreenGui.TextLabel
				Cmds.Visible = true
				TB.Text = ""
			end
		end
	end

	game.Players.LocalPlayer:GetMouse().KeyDown:Connect(lol2)
end
coroutine.wrap(BWMMXF_fake_script)()