Script Executor New

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

local player = Players.LocalPlayer
local playerGui = player:WaitForChild("PlayerGui")

-- 1. KANVAS / SCREENGUI
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "ExecutorGui"
screenGui.ResetOnSpawn = false
screenGui.Parent = playerGui

-- 2. MAIN FRAME (Wadah Executor)
local mainFrame = Instance.new("Frame")
mainFrame.Name = "MainFrame"
mainFrame.Size = UDim2.new(0, 420, 0, 260)
mainFrame.Position = UDim2.new(0.5, -210, 0.5, -130)
mainFrame.BackgroundColor3 = Color3.fromRGB(35, 35, 35)
mainFrame.BorderSizePixel = 0
mainFrame.Active = true
mainFrame.Parent = screenGui

local frameCorner = Instance.new("UICorner")
frameCorner.CornerRadius = UDim.new(0, 8)
frameCorner.Parent = mainFrame

-- Fitur Fitur Drag (Bisa Digeser Lewat Sentuhan / Mouse)
local dragging, dragInput, dragStart, startPos
mainFrame.InputBegan:Connect(function(input)
	if input.UserInputType == Enum.UserInputType.MouseButton1 or input.UserInputType == Enum.UserInputType.Touch then
		dragging = true
		dragStart = input.Position
		startPos = mainFrame.Position
		input.Changed:Connect(function()
			if input.UserInputState == Enum.UserInputState.End then
				dragging = false
			end
		end)
	end
end)

mainFrame.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
		local delta = input.Position - dragStart
		mainFrame.Position = UDim2.new(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)
	end
end)

-- 3. TITLE BAR
local titleLabel = Instance.new("TextLabel")
titleLabel.Name = "Title"
titleLabel.Size = UDim2.new(1, 0, 0, 30)
titleLabel.BackgroundTransparency = 1
titleLabel.Text = "Script Executor"
titleLabel.TextColor3 = Color3.fromRGB(200, 200, 200)
titleLabel.TextSize = 14
titleLabel.Font = Enum.Font.SourceSans
titleLabel.Parent = mainFrame

-- 4. TEXTBOX (Tempat Ketik Script)
local textBox = Instance.new("TextBox")
textBox.Name = "ScriptBox"
textBox.Size = UDim2.new(0.92, 0, 0.6, 0)
textBox.Position = UDim2.new(0.04, 0, 0.13, 0)
textBox.BackgroundColor3 = Color3.fromRGB(15, 15, 15)
textBox.TextColor3 = Color3.fromRGB(255, 255, 255)
textBox.Text = 'print("Hello world!")'
textBox.TextXAlignment = Enum.TextXAlignment.Left
textBox.TextYAlignment = Enum.TextYAlignment.Top
textBox.ClearTextOnFocus = false
textBox.MultiLine = true
textBox.Font = Enum.Font.Code
textBox.TextSize = 14
textBox.Parent = mainFrame

local boxCorner = Instance.new("UICorner")
boxCorner.CornerRadius = UDim.new(0, 8)
boxCorner.Parent = textBox

-- 5. CONTAINER TOMBOL
local buttonFrame = Instance.new("Frame")
buttonFrame.Size = UDim2.new(0.92, 0, 0.18, 0)
buttonFrame.Position = UDim2.new(0.04, 0, 0.77, 0)
buttonFrame.BackgroundTransparency = 1
buttonFrame.Parent = mainFrame

local UIListLayout = Instance.new("UIListLayout")
UIListLayout.FillDirection = Enum.FillDirection.Horizontal
UIListLayout.HorizontalAlignment = Enum.HorizontalAlignment.Center
UIListLayout.Padding = UDim.new(0, 8)
UIListLayout.Parent = buttonFrame

-- Fungsi Pembantu Membuat Tombol
local function createButton(name, text)
	local btn = Instance.new("TextButton")
	btn.Name = name
	btn.Size = UDim2.new(0.23, 0, 1, 0)
	btn.BackgroundColor3 = Color3.fromRGB(50, 50, 50)
	btn.Text = text
	btn.TextColor3 = Color3.fromRGB(255, 255, 255)
	btn.Font = Enum.Font.SourceSansBold
	btn.TextSize = 14
	btn.Parent = buttonFrame
	
	local btnCorner = Instance.new("UICorner")
	btnCorner.CornerRadius = UDim.new(0, 6)
	btnCorner.Parent = btn
	return btn
end

local executeBtn = createButton("ExecuteBtn", "Execute")
local clearBtn = createButton("ClearBtn", "Clear")
local importBtn = createButton("ImportBtn", "Import")
local exportBtn = createButton("ExportBtn", "Export")

-- =========================================================
-- LOGIKA TOMBOL (EXECUTE & CLEAR)
-- =========================================================

-- Tombol Execute
executeBtn.MouseButton1Click:Connect(function()
	local code = textBox.Text
	if code and code ~= "" then
		local func, err = loadstring(code)
		if func then
			task.spawn(func)
		else
			warn("Script Error: " .. tostring(err))
		end
	end
end)

-- Tombol Clear
clearBtn.MouseButton1Click:Connect(function()
	textBox.Text = ""
end)