Dex Function

-- Gui to Lua
-- Version: 3.2

-- Instances:

local DEX = Instance.new("ScreenGui")
local ScrollingFrame = Instance.new("ScrollingFrame")
local FunctionViewer = Instance.new("Frame")
local Copy = Instance.new("TextButton")
local CopyPath = Instance.new("TextButton")
local TextButton = Instance.new("TextButton")
local TextLabel = Instance.new("TextLabel")
local Frame = Instance.new("Frame")
local Exit = Instance.new("TextButton")
local ScrollingFrame2 = Instance.new("ScrollingFrame")
local TextBox = Instance.new("TextBox")
local Tab = Instance.new("Frame")
local Close = Instance.new("TextButton")
local Open = Instance.new("TextButton")

--Properties:

DEX.Name = "DEX"
DEX.Parent = game.Players.LocalPlayer:WaitForChild("PlayerGui")
DEX.DisplayOrder = 999999999
DEX.ResetOnSpawn = false

ScrollingFrame.Parent = DEX
ScrollingFrame.Active = true
ScrollingFrame.BackgroundColor3 = Color3.fromRGB(54, 54, 54)
ScrollingFrame.BorderColor3 = Color3.fromRGB(0, 0, 0)
ScrollingFrame.BorderSizePixel = 0
ScrollingFrame.Position = UDim2.new(0.858112037, 0, -0.00125185167, 0)
ScrollingFrame.Size = UDim2.new(0, 256, 0, 920)
ScrollingFrame.SizeConstraint = Enum.SizeConstraint.RelativeXX
ScrollingFrame.CanvasSize = UDim2.new(0, 0, 2, 6000)
ScrollingFrame.VerticalScrollBarPosition = Enum.VerticalScrollBarPosition.Left

FunctionViewer.Name = "FunctionViewer"
FunctionViewer.Parent = DEX
FunctionViewer.BackgroundColor3 = Color3.fromRGB(66, 66, 66)
FunctionViewer.BorderColor3 = Color3.fromRGB(0, 0, 0)
FunctionViewer.BorderSizePixel = 0
FunctionViewer.Position = UDim2.new(0.350400984, 0, 0.221864954, 0)
FunctionViewer.Size = UDim2.new(0, 498, 0, 18)

Copy.Name = "Copy"
Copy.Parent = FunctionViewer
Copy.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
Copy.BorderColor3 = Color3.fromRGB(0, 0, 0)
Copy.BorderSizePixel = 0
Copy.Position = UDim2.new(0, 0, 1, 0)
Copy.Size = UDim2.new(0, 180, 0, 17)
Copy.Font = Enum.Font.SourceSans
Copy.Text = "Copy to Clipboard"
Copy.TextColor3 = Color3.fromRGB(255, 255, 255)
Copy.TextSize = 14.000

CopyPath.Name = "CopyPath"
CopyPath.Parent = FunctionViewer
CopyPath.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
CopyPath.BorderColor3 = Color3.fromRGB(0, 0, 0)
CopyPath.BorderSizePixel = 0
CopyPath.Position = UDim2.new(0.361445785, 0, 1, 0)
CopyPath.Size = UDim2.new(0, 180, 0, 17)
CopyPath.Font = Enum.Font.SourceSans
CopyPath.Text = "LocalScript Path (broken)"
CopyPath.TextColor3 = Color3.fromRGB(255, 255, 255)
CopyPath.TextSize = 14.000

TextButton.Parent = FunctionViewer
TextButton.BackgroundColor3 = Color3.fromRGB(45, 45, 45)
TextButton.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextButton.BorderSizePixel = 0
TextButton.Position = UDim2.new(0.722891569, 0, 1, 0)
TextButton.Size = UDim2.new(0, 138, 0, 17)
TextButton.Font = Enum.Font.SourceSans
TextButton.TextColor3 = Color3.fromRGB(255, 255, 255)
TextButton.TextSize = 14.000

TextLabel.Parent = FunctionViewer
TextLabel.BackgroundColor3 = Color3.fromRGB(66, 66, 66)
TextLabel.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextLabel.BorderSizePixel = 0
TextLabel.Size = UDim2.new(0, 102, 0, 18)
TextLabel.Font = Enum.Font.SourceSans
TextLabel.Text = "Function Viewer"
TextLabel.TextColor3 = Color3.fromRGB(255, 255, 255)
TextLabel.TextSize = 14.000

Frame.Parent = FunctionViewer
Frame.BackgroundColor3 = Color3.fromRGB(36, 36, 36)
Frame.BorderColor3 = Color3.fromRGB(0, 0, 0)
Frame.BorderSizePixel = 0
Frame.Position = UDim2.new(0, 0, 1.94444442, 0)
Frame.Size = UDim2.new(0, 18, 0, 321)

Exit.Name = "Exit"
Exit.Parent = FunctionViewer
Exit.BackgroundColor3 = Color3.fromRGB(66, 66, 66)
Exit.BorderColor3 = Color3.fromRGB(0, 0, 0)
Exit.BorderSizePixel = 0
Exit.Position = UDim2.new(0.939759016, 0, 0, 0)
Exit.Size = UDim2.new(0, 30, 0, 18)
Exit.Font = Enum.Font.SourceSans
Exit.Text = "X"
Exit.TextColor3 = Color3.fromRGB(255, 255, 255)
Exit.TextSize = 14.000

ScrollingFrame2.Name = "ScrollingFrame2"
ScrollingFrame2.Parent = FunctionViewer
ScrollingFrame2.Active = true
ScrollingFrame2.BackgroundColor3 = Color3.fromRGB(36, 36, 36)
ScrollingFrame2.BorderColor3 = Color3.fromRGB(0, 0, 0)
ScrollingFrame2.BorderSizePixel = 0
ScrollingFrame2.Position = UDim2.new(0.0361446999, 0, 1.94444609, 0)
ScrollingFrame2.Size = UDim2.new(0, 480, 0, 321)
ScrollingFrame2.CanvasSize = UDim2.new(0, 0, 2, 2000)

TextBox.Parent = ScrollingFrame2
TextBox.BackgroundColor3 = Color3.fromRGB(36, 36, 36)
TextBox.BorderColor3 = Color3.fromRGB(0, 0, 0)
TextBox.BorderSizePixel = 0
TextBox.Position = UDim2.new(-0.00135536189, 0, -1.90140668e-07, 0)
TextBox.Size = UDim2.new(0, 480, 0, 2294)
TextBox.ClearTextOnFocus = false
TextBox.Font = Enum.Font.SourceSans
TextBox.MultiLine = true
TextBox.Text = ""
TextBox.TextColor3 = Color3.fromRGB(120, 120, 120)
TextBox.TextSize = 15.000
TextBox.TextXAlignment = Enum.TextXAlignment.Left
TextBox.TextYAlignment = Enum.TextYAlignment.Top

Tab.Name = "Tab"
Tab.Parent = DEX
Tab.BackgroundColor3 = Color3.fromRGB(44, 44, 44)
Tab.BorderColor3 = Color3.fromRGB(0, 0, 0)
Tab.BorderSizePixel = 0
Tab.Position = UDim2.new(0.837754488, 0, -0.00173611485, 0)
Tab.Size = UDim2.new(0, 36, 0, 234)

Close.Name = "Close"
Close.Parent = Tab
Close.BackgroundColor3 = Color3.fromRGB(44, 44, 44)
Close.BorderColor3 = Color3.fromRGB(0, 0, 0)
Close.BorderSizePixel = 0
Close.Position = UDim2.new(0, 0, 1, 0)
Close.Size = UDim2.new(0, 36, 0, 31)
Close.Font = Enum.Font.SourceSans
Close.Text = ">"
Close.TextColor3 = Color3.fromRGB(255, 255, 255)
Close.TextSize = 32.000

Open.Name = "Open"
Open.Parent = DEX
Open.BackgroundColor3 = Color3.fromRGB(44, 44, 44)
Open.BorderColor3 = Color3.fromRGB(0, 0, 0)
Open.BorderSizePixel = 0
Open.Position = UDim2.new(0.985194325, 0, 0, 0)
Open.Size = UDim2.new(0, 23, 0, 56)
Open.Visible = false
Open.Font = Enum.Font.SourceSans
Open.Text = "<"
Open.TextColor3 = Color3.fromRGB(255, 255, 255)
Open.TextSize = 33.000
Open.TextWrapped = true

-- Scripts:

local function EZBXHVB_fake_script() -- ScrollingFrame.LocalScript2
	local script = Instance.new('LocalScript', ScrollingFrame)

	local UserInputService = game:GetService("UserInputService")
	local Viewer = script.Parent.Parent:WaitForChild("FunctionViewer")
	local Box = Viewer:WaitForChild("ScrollingFrame2"):WaitForChild("TextBox")

	-- Positioning variables
	local yOffset = 0
	local buttonHeight = 30
	local padding = 5

	-- Keep track of the currently selected button
	local selectedButton = nil

	-- Function to convert tables to a readable string format
	local function tableToString(tbl, indent, seen)
		indent = indent or 0
		seen = seen or {}
		local toReturn = ""
		local prefix = string.rep(" ", indent)

		seen[tbl] = true

		for k, v in pairs(tbl) do
			if type(v) == "table" then
				if seen[v] then
					toReturn = toReturn .. prefix .. tostring(k) .. " = *circular reference*\n"
				else
					toReturn = toReturn .. prefix .. tostring(k) .. " = {\n" .. tableToString(v, indent + 2, seen) .. prefix .. "}\n"
				end
			else
				toReturn = toReturn .. prefix .. tostring(k) .. " = " .. tostring(v) .. "\n"
			end
		end

		seen[tbl] = nil
		return toReturn
	end

	for _, v in pairs(game:GetDescendants()) do
		if v:IsA("LocalScript") or v:IsA("Script") or v:IsA("ModuleScript") then
			local TextButton = Instance.new("TextButton")

			TextButton.Name = v.Name
			TextButton.Text = v.Name
			TextButton.Parent = script.Parent -- Assuming this script is a child of the ScrollingFrame

			-- Customize the appearance of the TextButton
			TextButton.BackgroundColor3 = Color3.fromRGB(54, 54, 54)
			TextButton.Size = UDim2.new(1, 0, 0, buttonHeight)  -- Full width, fixed height
			TextButton.Position = UDim2.new(0, 0, 0, yOffset)
			TextButton.Font = Enum.Font.SourceSans
			TextButton.TextSize = 18
			TextButton.TextColor3 = Color3.fromRGB(240, 240, 240)
			TextButton.TextWrapped = true

			-- Update yOffset for the next button
			yOffset = yOffset + buttonHeight + padding

			-- Function to handle the button click
			local function Click()
				-- Revert the color of the previously selected button
				if selectedButton then
					selectedButton.BackgroundColor3 = Color3.fromRGB(54, 54, 54)
				end

				-- Set the new selected button and change its color
				selectedButton = TextButton
				TextButton.BackgroundColor3 = Color3.fromRGB(67, 87, 141)  -- Light blue color

				-- Show and update the TextBox with environment variables of the script
				Viewer.Visible = true

				Box.Text = ""

				if v:IsA("ModuleScript") then
					-- If it's a ModuleScript, require the module and display its contents
					local success, result = pcall(require, v)
					if success and type(result) == "table" then
						for i, val in next, result do
							if type(val) == "table" then
								Box.Text = Box.Text .. tostring(i) .. " = {\n" .. tableToString(val, 2) .. "}\n"
							else
								Box.Text = Box.Text .. tostring(i) .. " = " .. tostring(val) .. "\n"
							end
						end
					else
						Box.Text = "Error: Could not require the module or invalid module content."
					end
				else
					-- If it's a LocalScript or Script, use getsenv
					local senv = getsenv(v)
					if type(senv) == "table" then
						-- Iterate over the environment variables and print them to the TextBox
						for k, val in pairs(senv) do
							if type(val) == "table" then
								Box.Text = Box.Text .. tostring(k) .. " = {\n" .. tableToString(val, 2) .. "}\n"
							else
								Box.Text = Box.Text .. tostring(k) .. " = " .. tostring(val) .. "\n"
							end
						end
					else
						Box.Text = "Error: Could not retrieve environment variables."
					end
				end

				-- Set the full name of the script to the clipboard
				setclipboard("game." .. v:GetFullName())
			end

			-- Connect the button click to the Click function
			TextButton.MouseButton1Click:Connect(Click)
		end
	end

end
coroutine.wrap(EZBXHVB_fake_script)()
local function FTQRV_fake_script() -- Copy.LocalScript
	local script = Instance.new('LocalScript', Copy)

	local TextBox = game.Players.LocalPlayer.PlayerGui.DEX.FunctionViewer.ScrollingFrame2.TextBox

	local function Click()
		setclipboard(TextBox.Text)
	end
	b = script.Parent
	b.MouseButton1Click:Connect(Click)
end
coroutine.wrap(FTQRV_fake_script)()
local function PPUT_fake_script() -- CopyPath.LocalScript
	local script = Instance.new('LocalScript', CopyPath)

	local BOX = game.Players.LocalPlayer.PlayerGui.DEX.FunctionViewer.ScrollingFrame2.TextBox
			local function OnClick()
				setclipboard("game."..BOX:GetFullName())
			end
			b = script.Parent
			b.MouseButton1Click:Connect(OnClick)
end
coroutine.wrap(PPUT_fake_script)()
local function NTGIVRQ_fake_script() -- TextButton.LocalScript
	local script = Instance.new('LocalScript', TextButton)

	local function Click()
		print("Test")
	end
end
coroutine.wrap(NTGIVRQ_fake_script)()
local function WNPZ_fake_script() -- FunctionViewer.LocalScript
	local script = Instance.new('LocalScript', FunctionViewer)

	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(WNPZ_fake_script)()
local function KJBRH_fake_script() -- Exit.LocalScript
	local script = Instance.new('LocalScript', Exit)

	local function Click()
		local Viewer = game.Players.LocalPlayer.PlayerGui.DEX.FunctionViewer
		Viewer.Visible = false
	end
	b = script.Parent
	b.MouseButton1Click:Connect(Click)
end
coroutine.wrap(KJBRH_fake_script)()
local function VVVPDC_fake_script() -- TextBox.LocalScript
	local script = Instance.new('LocalScript', TextBox)

	local textbox = script.Parent
	textbox.Changed:Connect(function()
		textbox.Text = textbox.Text:sub(1,21474836)
	end)
end
coroutine.wrap(VVVPDC_fake_script)()
local function RBQUX_fake_script() -- Close.LocalScript
	local script = Instance.new('LocalScript', Close)

	local TweenService = game:GetService("TweenService")
	local Players = game:GetService("Players")

	local PlayerGui = Players.LocalPlayer:WaitForChild("PlayerGui")
	local ScreenGui = PlayerGui:WaitForChild("DEX")
	local Frame = ScreenGui:WaitForChild("Tab")
	local Frame2 = ScreenGui:WaitForChild("ScrollingFrame")

	-- Définir l'AnchorPoint
	  Frame.AnchorPoint = Vector2.new(0, 0.5)
	-- Enregistrer les positions initiales
	local initialPosition = Frame.Position
	local initialPosition2 = Frame2.Position

	-- Définir les positions cibles
	local targetPosition = UDim2.new(1, 0, 0, 0)
	local targetPosition2 = UDim2.new(1, 0, 0, 0)

	local tweenInfo = TweenInfo.new(2)
	local tweenInfo2 = TweenInfo.new(2)

	local isAtTarget = true

	local function E()
		local tween, tween2

		if isAtTarget then
			tween = TweenService:Create(Frame2, tweenInfo2, {Position = initialPosition2})
			tween2 = TweenService:Create(Frame, tweenInfo, {Position = initialPosition})
			Frame.Close.Text = ">"
		else
			tween = TweenService:Create(Frame2, tweenInfo2, {Position = targetPosition2})
			tween2 = TweenService:Create(Frame, tweenInfo, {Position = targetPosition})
			Frame.Close.Text = "<"
		end

		tween:Play()
		tween2:Play()
		ScreenGui.Open.Visible = true
		isAtTarget = not isAtTarget
	end

	local b = script.Parent
	b.MouseButton1Click:Connect(E)

end
coroutine.wrap(RBQUX_fake_script)()
local function YYMHQF_fake_script() -- Open.LocalScript
	local script = Instance.new('LocalScript', Open)

	local function E()
		local TweenService = game:GetService("TweenService")
		local Players = game:GetService("Players")

		local PlayerGui = Players.LocalPlayer:WaitForChild("PlayerGui")
		local ScreenGui = PlayerGui:WaitForChild("DEX")
		local Frame = ScreenGui:WaitForChild("Tab")
		local Frame2 = game.Players.LocalPlayer.PlayerGui.DEX.ScrollingFrame

		Frame.AnchorPoint = Vector2.new(0, 0)

		local targetPosition = UDim2.new(0.838, 0,-0.002, 0)
		local targetPosition2 = UDim2.new(0.858, 0,-0.001, 0)

		local tweenInfo = TweenInfo.new(2)
		local tweenInfo2 = TweenInfo.new(2)
		local tween = TweenService:Create(Frame2, tweenInfo2, {Position = targetPosition2})
		local tween2 = TweenService:Create(Frame, tweenInfo, {Position = targetPosition})

		tween:Play()
		tween2:Play()
		wait(1)
		Frame.Close.Text = ">"
	end
	b = script.Parent
	b.Visible = false
	b.MouseButton1Click:Connect(E)
end
coroutine.wrap(YYMHQF_fake_script)()