-- LocalScript Executor (KRNL UI - Sticker ID: 98263909680428 | Size: 200x200 | Text: Violet/Purple | Speed: 4)
local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local RunService = game:GetService("RunService")
local HttpService = game:GetService("HttpService")
local MarketPlaceService = game:GetService("MarketplaceService")
local CoreGui = game:GetService("CoreGui")

local LocalPlayer = Players.LocalPlayer

-- Parent GUI yang aman untuk semua executor
local parentGui = (gethui and gethui()) or CoreGui or LocalPlayer:WaitForChild("PlayerGui")

-- File System Storage
local SavedFiles = {} 

-- Preset Warna Teks Ungu Terang-Gelap (Purple/Violet)
local PURPLE_TEXT = Color3.fromRGB(180, 80, 255)

-- 1. ScreenGui Utama
local screenGui = Instance.new("ScreenGui")
screenGui.Name = "KRNL_UI_PCFile"
screenGui.ResetOnSpawn = false
screenGui.DisplayOrder = 999
screenGui.Parent = parentGui

-- Variable Stiker Inject
local injectedSticker = nil

-- 2. Frame Utama KRNL
local mainFrame = Instance.new("Frame")
mainFrame.Name = "MainFrame"
mainFrame.Size = UDim2.new(0, 760, 0, 480)
mainFrame.Position = UDim2.new(0.5, -380, 0.5, -240)
mainFrame.BackgroundColor3 = Color3.fromRGB(18, 18, 18)
mainFrame.BorderSizePixel = 0
mainFrame.Active = true
mainFrame.Draggable = true
mainFrame.ZIndex = 1
mainFrame.Parent = screenGui

local mainCorner = Instance.new("UICorner")
mainCorner.CornerRadius = UDim.new(0, 10)
mainCorner.Parent = mainFrame

-- 3. Top Header Bar
local headerFrame = Instance.new("Frame")
headerFrame.Size = UDim2.new(1, 0, 0, 40)
headerFrame.BackgroundColor3 = Color3.fromRGB(12, 12, 12)
headerFrame.BorderSizePixel = 0
headerFrame.ZIndex = 2
headerFrame.Parent = mainFrame

local logoLabel = Instance.new("TextLabel")
logoLabel.Size = UDim2.new(0, 40, 1, 0)
logoLabel.Position = UDim2.new(0, 12, 0, 0)
logoLabel.BackgroundTransparency = 1
logoLabel.Text = "K"
logoLabel.TextColor3 = PURPLE_TEXT
logoLabel.Font = Enum.Font.SourceSansBold
logoLabel.TextSize = 26
logoLabel.TextXAlignment = Enum.TextXAlignment.Left
logoLabel.ZIndex = 3
logoLabel.Parent = headerFrame

local titleLabel = Instance.new("TextLabel")
titleLabel.Size = UDim2.new(1, -140, 1, 0)
titleLabel.Position = UDim2.new(0, 70, 0, 0)
titleLabel.BackgroundTransparency = 1
titleLabel.Text = "KRNL"
titleLabel.TextColor3 = PURPLE_TEXT
titleLabel.Font = Enum.Font.SourceSansBold
titleLabel.TextSize = 20
titleLabel.ZIndex = 3
titleLabel.Parent = headerFrame

local minBtn = Instance.new("TextButton")
minBtn.Size = UDim2.new(0, 34, 0, 30)
minBtn.Position = UDim2.new(1, -76, 0, 5)
minBtn.BackgroundColor3 = Color3.fromRGB(28, 28, 28)
minBtn.BorderSizePixel = 1
minBtn.BorderColor3 = Color3.fromRGB(50, 50, 50)
minBtn.Text = "_"
minBtn.TextColor3 = PURPLE_TEXT
minBtn.Font = Enum.Font.SourceSansBold
minBtn.TextSize = 18
minBtn.ZIndex = 3
minBtn.Parent = headerFrame

local closeMainBtn = Instance.new("TextButton")
closeMainBtn.Size = UDim2.new(0, 34, 0, 30)
closeMainBtn.Position = UDim2.new(1, -38, 0, 5)
closeMainBtn.BackgroundColor3 = Color3.fromRGB(28, 28, 28)
closeMainBtn.BorderSizePixel = 1
closeMainBtn.BorderColor3 = Color3.fromRGB(50, 50, 50)
closeMainBtn.Text = "X"
closeMainBtn.TextColor3 = PURPLE_TEXT
closeMainBtn.Font = Enum.Font.SourceSansBold
closeMainBtn.TextSize = 18
closeMainBtn.ZIndex = 3
closeMainBtn.Parent = headerFrame

-- 4. Sub-Menu Bar
local menuBar = Instance.new("Frame")
menuBar.Size = UDim2.new(1, 0, 0, 30)
menuBar.Position = UDim2.new(0, 0, 0, 40)
menuBar.BackgroundColor3 = Color3.fromRGB(24, 24, 24)
menuBar.BorderSizePixel = 0
menuBar.ZIndex = 2
menuBar.Parent = mainFrame

local menuLayout = Instance.new("UIListLayout")
menuLayout.FillDirection = Enum.FillDirection.Horizontal
menuLayout.SortOrder = Enum.SortOrder.LayoutOrder
menuLayout.Padding = UDim.new(0, 18)
menuLayout.Parent = menuBar

local menuPadding = Instance.new("UIPadding")
menuPadding.PaddingLeft = UDim.new(0, 14)
menuPadding.Parent = menuBar

local menus = {"File", "Credits", "Hot-Scripts", "Others"}
local menuButtons = {}

for _, item in ipairs(menus) do
	local itemBtn = Instance.new("TextButton")
	itemBtn.Name = "Menu_" .. item
	itemBtn.Size = UDim2.new(0, 0, 1, 0)
	itemBtn.AutomaticSize = Enum.AutomaticSize.X
	itemBtn.BackgroundTransparency = 1
	itemBtn.Text = item
	itemBtn.TextColor3 = PURPLE_TEXT
	itemBtn.Font = Enum.Font.SourceSansBold
	itemBtn.TextSize = 15
	itemBtn.ZIndex = 3
	itemBtn.Parent = menuBar
	menuButtons[item] = itemBtn
end

-- 5. Tab Area
local tabBar = Instance.new("ScrollingFrame")
tabBar.Size = UDim2.new(1, -24, 0, 35)
tabBar.Position = UDim2.new(0, 12, 0, 76)
tabBar.BackgroundTransparency = 1
tabBar.BorderSizePixel = 0
tabBar.CanvasSize = UDim2.new(0, 0, 0, 0)
tabBar.ScrollBarThickness = 0
tabBar.ZIndex = 2
tabBar.Parent = mainFrame

local tabLayout = Instance.new("UIListLayout")
tabLayout.FillDirection = Enum.FillDirection.Horizontal
tabLayout.SortOrder = Enum.SortOrder.LayoutOrder
tabLayout.Padding = UDim.new(0, 6)
tabLayout.Parent = tabBar

-- 6. Container CodeBox
local containerFrame = Instance.new("Frame")
containerFrame.Name = "ContainerFrame"
containerFrame.Size = UDim2.new(1, -24, 0, 295)
containerFrame.Position = UDim2.new(0, 12, 0, 118)
containerFrame.BackgroundColor3 = Color3.fromRGB(24, 24, 24)
containerFrame.BorderSizePixel = 1
containerFrame.BorderColor3 = Color3.fromRGB(45, 45, 45)
containerFrame.ZIndex = 2
containerFrame.Parent = mainFrame

-- 7. Bottom Action Bar
local bottomBar = Instance.new("Frame")
bottomBar.Size = UDim2.new(1, -24, 0, 42)
bottomBar.Position = UDim2.new(0, 12, 0, 422)
bottomBar.BackgroundTransparency = 1
bottomBar.ZIndex = 2
bottomBar.Parent = mainFrame

local bottomLayout = Instance.new("UIGridLayout")
bottomLayout.CellSize = UDim2.new(0.162, -3, 1, 0)
bottomLayout.CellPadding = UDim2.new(0, 6, 0, 0)
bottomLayout.SortOrder = Enum.SortOrder.LayoutOrder
bottomLayout.Parent = bottomBar

local actionButtons = {"EXECUTE", "CLEAR", "OPEN FILE", "SAVE FILE", "INJECT", "OPTIONS"}
local createdActionBtns = {}

for _, name in ipairs(actionButtons) do
	local btn = Instance.new("TextButton")
	btn.Name = name .. "_Btn"
	btn.BackgroundColor3 = Color3.fromRGB(28, 28, 28)
	btn.BorderSizePixel = 1
	btn.BorderColor3 = Color3.fromRGB(50, 50, 50)
	btn.Text = name
	btn.TextColor3 = PURPLE_TEXT
	btn.Font = Enum.Font.SourceSansBold
	btn.TextSize = 14
	btn.ZIndex = 3
	btn.Parent = bottomBar
	createdActionBtns[name] = btn
end

-- Tab System Logic
local tabCount = 0
local tabs = {}
local activeTab = nil

local function selectTab(targetTab)
	for _, t in ipairs(tabs) do
		t.codeBox.Visible = false
		t.tabFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
	end
	targetTab.codeBox.Visible = true
	targetTab.tabFrame.BackgroundColor3 = Color3.fromRGB(18, 18, 18)
	activeTab = targetTab
end

local addTabBtn

local function createTab(customName, defaultContent)
	tabCount = tabCount + 1
	local currentId = tabCount
	local fileName = customName or ("Script" .. currentId .. ".lua")

	local codeBox = Instance.new("TextBox")
	codeBox.Name = "CodeBox_" .. currentId
	codeBox.Size = UDim2.new(1, -16, 1, -16)
	codeBox.Position = UDim2.new(0, 8, 0, 8)
	codeBox.BackgroundTransparency = 1
	codeBox.TextColor3 = PURPLE_TEXT
	codeBox.TextXAlignment = Enum.TextXAlignment.Left
	codeBox.TextYAlignment = Enum.TextYAlignment.Top
	codeBox.Font = Enum.Font.Code
	codeBox.TextSize = 16
	codeBox.ClearTextOnFocus = false
	codeBox.MultiLine = true
	codeBox.TextEditable = true
	codeBox.Active = true
	codeBox.Text = defaultContent or ""
	codeBox.Visible = false
	codeBox.ZIndex = 3
	codeBox.Parent = containerFrame

	local tabFrame = Instance.new("Frame")
	tabFrame.Name = "TabFrame_" .. currentId
	tabFrame.Size = UDim2.new(0, 125, 1, 0)
	tabFrame.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
	tabFrame.BorderSizePixel = 1
	tabFrame.BorderColor3 = Color3.fromRGB(50, 50, 50)
	tabFrame.ZIndex = 3
	tabFrame.Parent = tabBar

	local labelBtn = Instance.new("TextButton")
	labelBtn.Size = UDim2.new(1, (currentId == 1 and 0 or -24), 1, 0)
	labelBtn.BackgroundTransparency = 1
	labelBtn.Text = fileName
	labelBtn.TextColor3 = PURPLE_TEXT
	labelBtn.Font = Enum.Font.SourceSansBold
	labelBtn.TextSize = 14
	labelBtn.ZIndex = 4
	labelBtn.Parent = tabFrame

	local tabData = {
		id = currentId,
		tabFrame = tabFrame,
		codeBox = codeBox,
		name = fileName
	}
	table.insert(tabs, tabData)

	if currentId > 1 then
		local closeTabBtn = Instance.new("TextButton")
		closeTabBtn.Size = UDim2.new(0, 24, 1, 0)
		closeTabBtn.Position = UDim2.new(1, -24, 0, 0)
		closeTabBtn.BackgroundTransparency = 1
		closeTabBtn.Text = "x"
		closeTabBtn.TextColor3 = PURPLE_TEXT
		closeTabBtn.Font = Enum.Font.SourceSansBold
		closeTabBtn.TextSize = 15
		closeTabBtn.ZIndex = 4
		closeTabBtn.Parent = tabFrame

		closeTabBtn.MouseButton1Click:Connect(function()
			for i, t in ipairs(tabs) do
				if t.id == currentId then
					table.remove(tabs, i)
					break
				end
			end
			tabFrame:Destroy()
			codeBox:Destroy()

			tabBar.CanvasSize = UDim2.new(0, #tabs * 131 + 40, 0, 0)

			if activeTab == tabData then
				if #tabs > 0 then
					selectTab(tabs[#tabs])
				end
			end
		end)
	end

	labelBtn.MouseButton1Click:Connect(function()
		selectTab(tabData)
	end)

	if addTabBtn then
		addTabBtn.Parent = nil
		addTabBtn.Parent = tabBar
	end

	tabBar.CanvasSize = UDim2.new(0, #tabs * 131 + 40, 0, 0)
	selectTab(tabData)
	return tabData
end

addTabBtn = Instance.new("TextButton")
addTabBtn.Name = "AddTabBtn"
addTabBtn.Size = UDim2.new(0, 35, 1, 0)
addTabBtn.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
addTabBtn.BorderSizePixel = 1
addTabBtn.BorderColor3 = Color3.fromRGB(50, 50, 50)
addTabBtn.Text = "+"
addTabBtn.TextColor3 = PURPLE_TEXT
addTabBtn.Font = Enum.Font.SourceSansBold
addTabBtn.TextSize = 18
addTabBtn.ZIndex = 4
addTabBtn.Parent = tabBar

addTabBtn.MouseButton1Click:Connect(function()
	createTab(nil, "")
end)

createTab("Script1.lua", "--KRNL BY r00bgui--")

-- Event Minimize / Close
closeMainBtn.MouseButton1Click:Connect(function()
	mainFrame.Visible = false
end)

minBtn.MouseButton1Click:Connect(function()
	mainFrame.Visible = false
end)

-- LOGIKA EXECUTE & CLEAR
createdActionBtns["EXECUTE"].MouseButton1Click:Connect(function()
	if activeTab and activeTab.codeBox then
		local source = activeTab.codeBox.Text
		if source and source ~= "" then
			local func, parseErr = loadstring(source)
			if func then
				local success, execErr = pcall(func)
				if not success then
					warn("[KRNL Exec Error]: " .. tostring(execErr))
				end
			else
				warn("[KRNL Syntax Error]: " .. tostring(parseErr))
			end
		end
	end
end)

createdActionBtns["CLEAR"].MouseButton1Click:Connect(function()
	if activeTab and activeTab.codeBox then
		activeTab.codeBox.Text = ""
	end
end)

--------------------------------------------------------------------------------
-- 8. WINDOW OPTIONS (COPY PLACE-ID)
--------------------------------------------------------------------------------
local optionsWindow = Instance.new("Frame")
optionsWindow.Name = "KRNL_OptionsWindow"
optionsWindow.Size = UDim2.new(0, 320, 0, 200)
optionsWindow.Position = UDim2.new(0.5, -160, 0.5, -100)
optionsWindow.BackgroundColor3 = Color3.fromRGB(28, 28, 32)
optionsWindow.BorderSizePixel = 1
optionsWindow.BorderColor3 = Color3.fromRGB(55, 55, 60)
optionsWindow.ZIndex = 400
optionsWindow.Visible = false
optionsWindow.Active = true
optionsWindow.Draggable = true
optionsWindow.Parent = screenGui

local optHeader = Instance.new("Frame")
optHeader.Size = UDim2.new(1, 0, 0, 30)
optHeader.BackgroundColor3 = Color3.fromRGB(18, 18, 20)
optHeader.BorderSizePixel = 0
optHeader.ZIndex = 401
optHeader.Parent = optionsWindow

local optTitle = Instance.new("TextLabel")
optTitle.Size = UDim2.new(1, -40, 1, 0)
optTitle.Position = UDim2.new(0, 10, 0, 0)
optTitle.BackgroundTransparency = 1
optTitle.Text = "KRNL Options"
optTitle.TextColor3 = PURPLE_TEXT
optTitle.Font = Enum.Font.SourceSansBold
optTitle.TextSize = 14
optTitle.TextXAlignment = Enum.TextXAlignment.Left
optTitle.ZIndex = 402
optTitle.Parent = optHeader

local optCloseBtn = Instance.new("TextButton")
optCloseBtn.Size = UDim2.new(0, 24, 0, 24)
optCloseBtn.Position = UDim2.new(1, -27, 0, 3)
optCloseBtn.BackgroundColor3 = Color3.fromRGB(180, 50, 50)
optCloseBtn.BorderSizePixel = 0
optCloseBtn.Text = "X"
optCloseBtn.TextColor3 = PURPLE_TEXT
optCloseBtn.Font = Enum.Font.SourceSansBold
optCloseBtn.TextSize = 12
optCloseBtn.ZIndex = 402
optCloseBtn.Parent = optHeader

optCloseBtn.MouseButton1Click:Connect(function()
	optionsWindow.Visible = false
end)

local copyPlaceBtn = Instance.new("TextButton")
copyPlaceBtn.Size = UDim2.new(1, -30, 0, 38)
copyPlaceBtn.Position = UDim2.new(0, 15, 0, 50)
copyPlaceBtn.BackgroundColor3 = Color3.fromRGB(40, 40, 48)
copyPlaceBtn.BorderSizePixel = 1
copyPlaceBtn.BorderColor3 = Color3.fromRGB(60, 60, 70)
copyPlaceBtn.Text = "📋 COPY PLACE-ID"
copyPlaceBtn.TextColor3 = PURPLE_TEXT
copyPlaceBtn.Font = Enum.Font.SourceSansBold
copyPlaceBtn.TextSize = 14
copyPlaceBtn.ZIndex = 402
copyPlaceBtn.Parent = optionsWindow

copyPlaceBtn.MouseButton1Click:Connect(function()
	local placeId = tostring(game.PlaceId)
	local setClip = setclipboard or (syn and syn.write_clipboard) or Clipboard and Clipboard.set
	if setClip then
		setClip(placeId)
		copyPlaceBtn.Text = "✅ PLACE-ID COPIED!"
		task.wait(1.5)
		copyPlaceBtn.Text = "📋 COPY PLACE-ID"
	else
		warn("setclipboard tidak didukung oleh executor kamu. Place ID: " .. placeId)
	end
end)

createdActionBtns["OPTIONS"].MouseButton1Click:Connect(function()
	optionsWindow.Visible = not optionsWindow.Visible
end)

--------------------------------------------------------------------------------
-- 9. FILE EXPLORER
--------------------------------------------------------------------------------
local fileExplorerWindow = Instance.new("Frame")
fileExplorerWindow.Name = "FileExplorerPC"
fileExplorerWindow.Size = UDim2.new(0, 420, 0, 280)
fileExplorerWindow.Position = UDim2.new(0.5, -210, 0.5, -140)
fileExplorerWindow.BackgroundColor3 = Color3.fromRGB(32, 32, 36)
fileExplorerWindow.BorderSizePixel = 1
fileExplorerWindow.BorderColor3 = Color3.fromRGB(60, 60, 65)
fileExplorerWindow.ZIndex = 200
fileExplorerWindow.Visible = false
fileExplorerWindow.Active = true
fileExplorerWindow.Draggable = true
fileExplorerWindow.Parent = screenGui

local feHeader = Instance.new("Frame")
feHeader.Size = UDim2.new(1, 0, 0, 30)
feHeader.BackgroundColor3 = Color3.fromRGB(20, 20, 22)
feHeader.BorderSizePixel = 0
feHeader.ZIndex = 201
feHeader.Parent = fileExplorerWindow

local feTitle = Instance.new("TextLabel")
feTitle.Size = UDim2.new(1, -40, 1, 0)
feTitle.Position = UDim2.new(0, 10, 0, 0)
feTitle.BackgroundTransparency = 1
feTitle.Text = "File Explorer (C:/KRNL_Scripts/)"
feTitle.TextColor3 = PURPLE_TEXT
feTitle.Font = Enum.Font.SourceSansBold
feTitle.TextSize = 14
feTitle.TextXAlignment = Enum.TextXAlignment.Left
feTitle.ZIndex = 202
feTitle.Parent = feHeader

local feCloseBtn = Instance.new("TextButton")
feCloseBtn.Size = UDim2.new(0, 25, 0, 25)
feCloseBtn.Position = UDim2.new(1, -28, 0, 2.5)
feCloseBtn.BackgroundColor3 = Color3.fromRGB(180, 50, 50)
feCloseBtn.BorderSizePixel = 0
feCloseBtn.Text = "X"
feCloseBtn.TextColor3 = PURPLE_TEXT
feCloseBtn.Font = Enum.Font.SourceSansBold
feCloseBtn.TextSize = 13
feCloseBtn.ZIndex = 202
feCloseBtn.Parent = feHeader

feCloseBtn.MouseButton1Click:Connect(function()
	fileExplorerWindow.Visible = false
end)

local feScroll = Instance.new("ScrollingFrame")
feScroll.Size = UDim2.new(1, -20, 0, 175)
feScroll.Position = UDim2.new(0, 10, 0, 40)
feScroll.BackgroundColor3 = Color3.fromRGB(22, 22, 24)
feScroll.BorderSizePixel = 1
feScroll.BorderColor3 = Color3.fromRGB(45, 45, 50)
feScroll.ZIndex = 201
feScroll.Parent = fileExplorerWindow

local feLayout = Instance.new("UIListLayout")
feLayout.SortOrder = Enum.SortOrder.LayoutOrder
feLayout.Padding = UDim.new(0, 4)
feLayout.Parent = feScroll

local feInputBox = Instance.new("TextBox")
feInputBox.Size = UDim2.new(0, 280, 0, 32)
feInputBox.Position = UDim2.new(0, 10, 1, -42)
feInputBox.BackgroundColor3 = Color3.fromRGB(20, 20, 22)
feInputBox.BorderSizePixel = 1
feInputBox.BorderColor3 = Color3.fromRGB(50, 50, 55)
feInputBox.PlaceholderText = "Ketik Nama File (.txt / .lua)..."
feInputBox.Text = ""
feInputBox.TextColor3 = PURPLE_TEXT
feInputBox.Font = Enum.Font.SourceSans
feInputBox.TextSize = 14
feInputBox.ZIndex = 201
feInputBox.Parent = fileExplorerWindow

local feActionSaveBtn = Instance.new("TextButton")
feActionSaveBtn.Size = UDim2.new(0, 105, 0, 32)
feActionSaveBtn.Position = UDim2.new(1, -115, 1, -42)
feActionSaveBtn.BackgroundColor3 = Color3.fromRGB(40, 100, 160)
feActionSaveBtn.BorderSizePixel = 0
feActionSaveBtn.Text = "SAVE"
feActionSaveBtn.TextColor3 = PURPLE_TEXT
feActionSaveBtn.Font = Enum.Font.SourceSansBold
feActionSaveBtn.TextSize = 14
feActionSaveBtn.ZIndex = 201
feActionSaveBtn.Parent = fileExplorerWindow

local function refreshFileExplorer(mode)
	for _, child in ipairs(feScroll:GetChildren()) do
		if child:IsA("Frame") then
			child:Destroy()
		end
	end

	local count = 0
	for fileName, content in pairs(SavedFiles) do
		count = count + 1
		local itemFrame = Instance.new("Frame")
		itemFrame.Size = UDim2.new(1, -8, 0, 30)
		itemFrame.BackgroundColor3 = Color3.fromRGB(35, 35, 40)
		itemFrame.BorderSizePixel = 0
		itemFrame.ZIndex = 202
		itemFrame.Parent = feScroll

		local itemBtn = Instance.new("TextButton")
		itemBtn.Size = UDim2.new(1, -35, 1, 0)
		itemBtn.BackgroundTransparency = 1
		itemBtn.Text = "  📄 " .. fileName
		itemBtn.TextColor3 = PURPLE_TEXT
		itemBtn.Font = Enum.Font.SourceSans
		itemBtn.TextSize = 14
		itemBtn.TextXAlignment = Enum.TextXAlignment.Left
		itemBtn.ZIndex = 203
		itemBtn.Parent = itemFrame

		local delBtn = Instance.new("TextButton")
		delBtn.Size = UDim2.new(0, 25, 0, 22)
		delBtn.Position = UDim2.new(1, -28, 0.5, -11)
		delBtn.BackgroundColor3 = Color3.fromRGB(160, 40, 40)
		delBtn.BorderSizePixel = 0
		delBtn.Text = "X"
		delBtn.TextColor3 = PURPLE_TEXT
		delBtn.Font = Enum.Font.SourceSansBold
		delBtn.TextSize = 12
		delBtn.ZIndex = 203
		delBtn.Parent = itemFrame

		itemBtn.MouseButton1Click:Connect(function()
			if mode == "OPEN" and activeTab and activeTab.codeBox then
				activeTab.codeBox.Text = content
				fileExplorerWindow.Visible = false
			end
		end)

		delBtn.MouseButton1Click:Connect(function()
			SavedFiles[fileName] = nil
			refreshFileExplorer(mode)
		end)
	end

	feScroll.CanvasSize = UDim2.new(0, 0, 0, count * 34)
end

local function openExplorerWindow(mode)
	if mode == "OPEN" then
		feTitle.Text = "Open File (C:/KRNL_Scripts/)"
		feInputBox.Visible = false
		feActionSaveBtn.Visible = false
		feScroll.Size = UDim2.new(1, -20, 0, 225)
	else
		feTitle.Text = "Save File As... (C:/KRNL_Scripts/)"
		feInputBox.Visible = true
		feActionSaveBtn.Visible = true
		feScroll.Size = UDim2.new(1, -20, 0, 175)
	end
	refreshFileExplorer(mode)
	fileExplorerWindow.Visible = true
end

createdActionBtns["OPEN FILE"].MouseButton1Click:Connect(function()
	openExplorerWindow("OPEN")
end)

createdActionBtns["SAVE FILE"].MouseButton1Click:Connect(function()
	openExplorerWindow("SAVE")
end)

menuButtons["File"].MouseButton1Click:Connect(function()
	openExplorerWindow("OPEN")
end)

feActionSaveBtn.MouseButton1Click:Connect(function()
	local name = feInputBox.Text
	if name and name ~= "" and activeTab and activeTab.codeBox then
		if not string.find(name, "%.") then
			name = name .. ".lua"
		end
		SavedFiles[name] = activeTab.codeBox.Text
		feInputBox.Text = ""
		refreshFileExplorer("SAVE")
	end
end)

--------------------------------------------------------------------------------
-- 10. POPUP SCRIPTBLOX & GAMEPASS SCANNER MAP
--------------------------------------------------------------------------------
local dialogWindow = Instance.new("Frame")
dialogWindow.Name = "KRNL_DialogWindow"
dialogWindow.Size = UDim2.new(0, 520, 0, 340)
dialogWindow.Position = UDim2.new(0.5, -260, 0.5, -170)
dialogWindow.BackgroundColor3 = Color3.fromRGB(28, 28, 32)
dialogWindow.BorderSizePixel = 1
dialogWindow.BorderColor3 = Color3.fromRGB(55, 55, 60)
dialogWindow.ZIndex = 300
dialogWindow.Visible = false
dialogWindow.Active = true
dialogWindow.Draggable = true
dialogWindow.Parent = screenGui

local dialogHeader = Instance.new("Frame")
dialogHeader.Size = UDim2.new(1, 0, 0, 32)
dialogHeader.BackgroundColor3 = Color3.fromRGB(18, 18, 20)
dialogHeader.BorderSizePixel = 0
dialogHeader.ZIndex = 301
dialogHeader.Parent = dialogWindow

local dialogTitle = Instance.new("TextLabel")
dialogTitle.Size = UDim2.new(1, -40, 1, 0)
dialogTitle.Position = UDim2.new(0, 10, 0, 0)
dialogTitle.BackgroundTransparency = 1
dialogTitle.Text = "ScriptHub / Gamepass Scanner"
dialogTitle.TextColor3 = PURPLE_TEXT
dialogTitle.Font = Enum.Font.SourceSansBold
dialogTitle.TextSize = 15
dialogTitle.TextXAlignment = Enum.TextXAlignment.Left
dialogTitle.ZIndex = 302
dialogTitle.Parent = dialogHeader

local dialogCloseBtn = Instance.new("TextButton")
dialogCloseBtn.Size = UDim2.new(0, 26, 0, 26)
dialogCloseBtn.Position = UDim2.new(1, -29, 0, 3)
dialogCloseBtn.BackgroundColor3 = Color3.fromRGB(180, 50, 50)
dialogCloseBtn.BorderSizePixel = 0
dialogCloseBtn.Text = "X"
dialogCloseBtn.TextColor3 = PURPLE_TEXT
dialogCloseBtn.Font = Enum.Font.SourceSansBold
dialogCloseBtn.TextSize = 13
dialogCloseBtn.ZIndex = 302
dialogCloseBtn.Parent = dialogHeader

dialogCloseBtn.MouseButton1Click:Connect(function()
	dialogWindow.Visible = false
end)

local dialogScroll = Instance.new("ScrollingFrame")
dialogScroll.Size = UDim2.new(1, -20, 1, -45)
dialogScroll.Position = UDim2.new(0, 10, 0, 38)
dialogScroll.BackgroundColor3 = Color3.fromRGB(20, 20, 22)
dialogScroll.BorderSizePixel = 1
dialogScroll.BorderColor3 = Color3.fromRGB(40, 40, 45)
dialogScroll.ZIndex = 301
dialogScroll.Parent = dialogWindow

local dialogLayout = Instance.new("UIListLayout")
dialogLayout.SortOrder = Enum.SortOrder.LayoutOrder
dialogLayout.Padding = UDim.new(0, 6)
dialogLayout.Parent = dialogScroll

-- Safe HTTP Get
local function safeHttpGet(url)
	local proxies = {
		url,
		"https://corsproxy.io/?" .. HttpService:UrlEncode(url),
		"https://api.allorigins.win/raw?url=" .. HttpService:UrlEncode(url)
	}

	for _, reqUrl in ipairs(proxies) do
		local success, response = pcall(function()
			return game:HttpGet(reqUrl, true)
		end)
		if success and response and #response > 10 then
			return response
		end
	end
	return nil
end

-- Load ScriptBlox Data
local function loadScriptBloxData(urlCategory, titleText)
	dialogTitle.Text = titleText
	dialogWindow.Visible = true

	for _, c in ipairs(dialogScroll:GetChildren()) do
		if c:IsA("Frame") or c:IsA("TextLabel") then
			c:Destroy()
		end
	end

	local loadingLabel = Instance.new("TextLabel")
	loadingLabel.Size = UDim2.new(1, 0, 0, 50)
	loadingLabel.BackgroundTransparency = 1
	loadingLabel.Text = "Memuat script..."
	loadingLabel.TextColor3 = PURPLE_TEXT
	loadingLabel.Font = Enum.Font.SourceSansItalic
	loadingLabel.TextSize = 14
	loadingLabel.ZIndex = 302
	loadingLabel.Parent = dialogScroll

	task.spawn(function()
		local response = safeHttpGet(urlCategory)
		loadingLabel:Destroy()

		if response then
			local dataSuccess, parsed = pcall(function()
				return HttpService:JSONDecode(response)
			end)

			if dataSuccess and parsed and parsed.result and parsed.result.scripts then
				local scripts = parsed.result.scripts
				local count = 0

				for _, scriptData in ipairs(scripts) do
					count = count + 1

					local card = Instance.new("Frame")
					card.Size = UDim2.new(1, -8, 0, 58)
					card.BackgroundColor3 = Color3.fromRGB(32, 32, 36)
					card.BorderSizePixel = 0
					card.ZIndex = 302
					card.Parent = dialogScroll

					local title = Instance.new("TextLabel")
					title.Size = UDim2.new(1, -110, 0, 22)
					title.Position = UDim2.new(0, 8, 0, 4)
					title.BackgroundTransparency = 1
					title.Text = scriptData.title or "Untitled Script"
					title.TextColor3 = PURPLE_TEXT
					title.Font = Enum.Font.SourceSansBold
					title.TextSize = 14
					title.TextXAlignment = Enum.TextXAlignment.Left
					title.TextTruncate = Enum.TextTruncate.AtEnd
					title.ZIndex = 303
					title.Parent = card

					local gameName = Instance.new("TextLabel")
					gameName.Size = UDim2.new(1, -110, 0, 18)
					gameName.Position = UDim2.new(0, 8, 0, 28)
					gameName.BackgroundTransparency = 1
					gameName.Text = "Game: " .. (scriptData.game and scriptData.game.name or "Universal")
					gameName.TextColor3 = PURPLE_TEXT
					gameName.Font = Enum.Font.SourceSans
					gameName.TextSize = 12
					gameName.TextXAlignment = Enum.TextXAlignment.Left
					gameName.TextTruncate = Enum.TextTruncate.AtEnd
					gameName.ZIndex = 303
					gameName.Parent = card

					local loadBtn = Instance.new("TextButton")
					loadBtn.Size = UDim2.new(0, 90, 0, 35)
					loadBtn.Position = UDim2.new(1, -98, 0.5, -17.5)
					loadBtn.BackgroundColor3 = Color3.fromRGB(40, 120, 60)
					loadBtn.BorderSizePixel = 0
					loadBtn.Text = "LOAD CODE"
					loadBtn.TextColor3 = PURPLE_TEXT
					loadBtn.Font = Enum.Font.SourceSansBold
					loadBtn.TextSize = 12
					loadBtn.ZIndex = 303
					loadBtn.Parent = card

					loadBtn.MouseButton1Click:Connect(function()
						local scriptCode = scriptData.script or ""
						if activeTab and activeTab.codeBox then
							activeTab.codeBox.Text = scriptCode
							dialogWindow.Visible = false
						end
					end)
				end

				dialogScroll.CanvasSize = UDim2.new(0, 0, 0, count * 64)
			end
		end
	end)
end

-- MURNI SCANNER GAMEPASS DARI MAP (CREDITS Menu)
local function scanGameStore()
	dialogTitle.Text = "Credits - Gamepass Scanner"
	dialogWindow.Visible = true

	for _, c in ipairs(dialogScroll:GetChildren()) do
		if c:IsA("Frame") or c:IsA("TextLabel") then
			c:Destroy()
		end
	end

	local info = Instance.new("TextLabel")
	info.Size = UDim2.new(1, 0, 0, 40)
	info.BackgroundTransparency = 1
	info.Text = "Scanning Gamepass & Products dari Map..."
	info.TextColor3 = PURPLE_TEXT
	info.Font = Enum.Font.SourceSansItalic
	info.TextSize = 14
	info.ZIndex = 302
	info.Parent = dialogScroll

	task.spawn(function()
		local foundItems = {}
		local addedIds = {}

		local function addItem(id, itemType)
			if id and tonumber(id) and tonumber(id) > 0 and not addedIds[tostring(id) .. "_" .. tostring(itemType)] then
				addedIds[tostring(id) .. "_" .. tostring(itemType)] = true
				table.insert(foundItems, {Id = tonumber(id), Type = itemType})
			end
		end

		for _, v in ipairs(game:GetDescendants()) do
			if v:IsA("NumberValue") or v:IsA("IntValue") or v:IsA("StringValue") then
				local name = string.lower(v.Name)
				local val = tonumber(v.Value)
				if val and val > 100 then
					if string.find(name, "pass") or string.find(name, "gamepass") then
						addItem(val, Enum.InfoType.GamePass)
					elseif string.find(name, "prod") or string.find(name, "shop") or string.find(name, "item") or string.find(name, "dev") then
						addItem(val, Enum.InfoType.Product)
					end
				end
			end
		end

		info:Destroy()

		if #foundItems == 0 then
			local emptyLabel = Instance.new("TextLabel")
			emptyLabel.Size = UDim2.new(1, 0, 0, 60)
			emptyLabel.BackgroundTransparency = 1
			emptyLabel.Text = "Tidak ada Gamepass/Product terdeteksi secara otomatis di Map ini."
			emptyLabel.TextColor3 = PURPLE_TEXT
			emptyLabel.Font = Enum.Font.SourceSans
			emptyLabel.TextSize = 14
			emptyLabel.ZIndex = 302
			emptyLabel.Parent = dialogScroll
		else
			for _, itemData in ipairs(foundItems) do
				local success, itemInfo = pcall(function()
					return MarketPlaceService:GetProductInfo(itemData.Id, itemData.Type)
				end)

				local card = Instance.new("Frame")
				card.Size = UDim2.new(1, -8, 0, 52)
				card.BackgroundColor3 = Color3.fromRGB(32, 32, 36)
				card.BorderSizePixel = 0
				card.ZIndex = 302
				card.Parent = dialogScroll

				local itemName = (success and itemInfo and itemInfo.Name) or ("Item ID: " .. tostring(itemData.Id))
				local itemPrice = (success and itemInfo and itemInfo.PriceInRobux) and (tostring(itemInfo.PriceInRobux) .. " Robux") or "N/A"
				local typeText = (itemData.Type == Enum.InfoType.GamePass) and "[GamePass]" or "[Product]"

				local title = Instance.new("TextLabel")
				title.Size = UDim2.new(1, -100, 0, 22)
				title.Position = UDim2.new(0, 8, 0, 4)
				title.BackgroundTransparency = 1
				title.Text = typeText .. " " .. itemName
				title.TextColor3 = PURPLE_TEXT
				title.Font = Enum.Font.SourceSansBold
				title.TextSize = 13
				title.TextXAlignment = Enum.TextXAlignment.Left
				title.TextTruncate = Enum.TextTruncate.AtEnd
				title.ZIndex = 303
				title.Parent = card

				local price = Instance.new("TextLabel")
				price.Size = UDim2.new(1, -100, 0, 18)
				price.Position = UDim2.new(0, 8, 0, 24)
				price.BackgroundTransparency = 1
				price.Text = "Harga: " .. itemPrice
				price.TextColor3 = PURPLE_TEXT
				price.Font = Enum.Font.SourceSans
				price.TextSize = 12
				price.TextXAlignment = Enum.TextXAlignment.Left
				price.ZIndex = 303
				price.Parent = card

				local buyBtn = Instance.new("TextButton")
				buyBtn.Size = UDim2.new(0, 80, 0, 32)
				buyBtn.Position = UDim2.new(1, -88, 0.5, -16)
				buyBtn.BackgroundColor3 = Color3.fromRGB(0, 120, 215)
				buyBtn.BorderSizePixel = 0
				buyBtn.Text = "BUY"
				buyBtn.TextColor3 = PURPLE_TEXT
				buyBtn.Font = Enum.Font.SourceSansBold
				buyBtn.TextSize = 13
				buyBtn.ZIndex = 303
				buyBtn.Parent = card

				buyBtn.MouseButton1Click:Connect(function()
					if itemData.Type == Enum.InfoType.GamePass then
						MarketPlaceService:PromptGamePassPurchase(LocalPlayer, itemData.Id)
					else
						MarketPlaceService:PromptPurchase(LocalPlayer, itemData.Id)
					end
				end)
			end
		end
		dialogScroll.CanvasSize = UDim2.new(0, 0, 0, #foundItems * 58)
	end)
end

-- Sub-Menu Events
menuButtons["Hot-Scripts"].MouseButton1Click:Connect(function()
	loadScriptBloxData("https://scriptblox.com/api/script/fetch?page=1", "Hot-Scripts (Trending ScriptBlox)")
end)

menuButtons["Others"].MouseButton1Click:Connect(function()
	loadScriptBloxData("https://scriptblox.com/api/script/search?q=universal&page=1", "Others (Universal Scripts)")
end)

menuButtons["Credits"].MouseButton1Click:Connect(function()
	scanGameStore()
end)

--------------------------------------------------------------------------------
-- 11. INJECT BUTTON (Kecepatan Rotasi Stiker: 4)
--------------------------------------------------------------------------------
createdActionBtns["INJECT"].MouseButton1Click:Connect(function()
	if injectedSticker then return end 

	local sticker = Instance.new("ImageLabel")
	sticker.Name = "InjectedSticker_Large"
	sticker.Size = UDim2.new(0, 200, 0, 200)
	sticker.Position = UDim2.new(0.5, -100, 0.5, -100)
	sticker.Image = "rbxassetid://98263909680428"
	sticker.BackgroundTransparency = 1
	sticker.ZIndex = 1000
	sticker.Parent = screenGui

	injectedSticker = sticker

	local targetPos = UDim2.new(0, 20, 1, -220)
	local tweenInfo = TweenInfo.new(1.2, Enum.EasingStyle.Quart, Enum.EasingDirection.Out)
	local tween = TweenService:Create(sticker, tweenInfo, {Position = targetPos})
	tween:Play()

	tween.Completed:Connect(function()
		local rotateSpeed = 4 -- Kecepatan putaran pas di angka 4
		RunService.RenderStepped:Connect(function()
			if sticker and sticker.Parent then
				sticker.Rotation = sticker.Rotation + rotateSpeed
			end
		end)
	end)
end)