--[[
	WARNING: Heads up! This script has not been verified by ScriptBlox. Use at your own risk!
]]
local Players = game:GetService("Players")
local TweenService = game:GetService("TweenService")
local HttpService = game:GetService("HttpService")
local player = Players.LocalPlayer
local pgui = player:WaitForChild("PlayerGui")

-- GUI OLUŞTUR (Kodu doğrudan kullan)
local LMG2L = {};
LMG2L["ScreenGui_1"] = Instance.new("ScreenGui", pgui)
LMG2L["ScreenGui_1"].ZIndexBehavior = Enum.ZIndexBehavior.Sibling
LMG2L["ScreenGui_1"].Name = "OK13Executor"

-- Frame (Ana pencere)
LMG2L["Frame_2"] = Instance.new("Frame", LMG2L["ScreenGui_1"])
local Frame = LMG2L["Frame_2"]
Frame.BorderSizePixel = 0
Frame.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
Frame.Size = UDim2.new(0, 504, 0, 304)
Frame.Position = UDim2.new(0.5, -252, 0.5, -152)
Frame.BackgroundTransparency = 0.5
Frame.Visible = false
Frame.Name = "MainFrame"

local UICorner_3 = Instance.new("UICorner", Frame)
UICorner_3.CornerRadius = UDim.new(0.05, 0)

-- Başlık
local TextLabel_4 = Instance.new("TextLabel", Frame)
TextLabel_4.Size = UDim2.new(0, 152, 0, 58)
TextLabel_4.Position = UDim2.new(0, 26, 0, -6)
TextLabel_4.BackgroundTransparency = 1
TextLabel_4.Text = "OK-13   Executor"
TextLabel_4.TextColor3 = Color3.fromRGB(255,255,255)
TextLabel_4.FontFace = Font.new("rbxasset://fonts/families/Arial.json", Enum.FontWeight.Bold)
TextLabel_4.TextSize = 24

-- Versiyon
local TextLabel_5 = Instance.new("TextLabel", TextLabel_4)
TextLabel_5.Size = UDim2.new(0, 152, 0, 58)
TextLabel_5.Position = UDim2.new(0, -56, 0, 260)
TextLabel_5.BackgroundTransparency = 1
TextLabel_5.Text = "V-0.1 Test"
TextLabel_5.TextColor3 = Color3.fromRGB(255,255,255)
TextLabel_5.FontFace = Font.new("rbxasset://fonts/families/Arial.json", Enum.FontWeight.Bold)
TextLabel_5.TextSize = 14

-- Kod Alanı
local ImageLabel_8 = Instance.new("ImageLabel", Frame)
ImageLabel_8.Size = UDim2.new(0, 334, 0, 234)
ImageLabel_8.Position = UDim2.new(0, 148, 0, 56)
ImageLabel_8.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
ImageLabel_8.BackgroundTransparency = 0.5
ImageLabel_8.BorderSizePixel = 0
local UICorner_9 = Instance.new("UICorner", ImageLabel_8)

local TextBox_a = Instance.new("TextBox", ImageLabel_8)
TextBox_a.Size = UDim2.new(0, 326, 0, 186)
TextBox_a.Position = UDim2.new(0, 4, 0, 4)
TextBox_a.BackgroundTransparency = 1
TextBox_a.TextColor3 = Color3.fromRGB(255,255,255)
TextBox_a.Text = "Kod Girin..."
TextBox_a.TextXAlignment = Enum.TextXAlignment.Left
TextBox_a.TextYAlignment = Enum.TextYAlignment.Top
TextBox_a.ClearTextOnFocus = false
TextBox_a.MultiLine = true
TextBox_a.TextWrapped = true

-- Butonlar (Sol Menü)
local function CreateMenuButton(parent, text, posY)
	local btn = Instance.new("TextButton", parent)
	btn.Size = UDim2.new(0, 116, 0, 38)
	btn.Position = UDim2.new(0, 0, 0, posY)
	btn.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
	btn.BackgroundTransparency = 0.7
	btn.TextColor3 = Color3.fromRGB(255,255,255)
	btn.Text = text
	btn.FontFace = Font.new("rbxasset://fonts/families/Arial.json", Enum.FontWeight.Bold)
	btn.TextSize = 14
	local corner = Instance.new("UICorner", btn)
	return btn
end

local MenuFrame = Instance.new("Frame", Frame)
MenuFrame.Size = UDim2.new(0, 116, 0, 200)
MenuFrame.Position = UDim2.new(0, 16, 0, 62)
MenuFrame.BackgroundTransparency = 1

local KodAlaniBtn = CreateMenuButton(MenuFrame, " Kod Alanı", 0)
local ScriptAraBtn = CreateMenuButton(MenuFrame, " Script Ara", 46)
local KaydetBtn = CreateMenuButton(MenuFrame, " Kaydet", 92)

-- Çalıştır & Temizle
local CalistirBtn = Instance.new("TextButton", Frame)
CalistirBtn.Size = UDim2.new(0, 82, 0, 30)
CalistirBtn.Position = UDim2.new(0, 158, 0, 252)
CalistirBtn.BackgroundTransparency = 0.9
CalistirBtn.BackgroundColor3 = Color3.fromRGB(255,255,255)
CalistirBtn.Text = "▶ Çalıştır"
CalistirBtn.TextColor3 = Color3.fromRGB(255,255,255)
CalistirBtn.FontFace = Font.new("rbxasset://fonts/families/Arial.json", Enum.FontWeight.Bold)
CalistirBtn.Name = "CalistirBtn"
Instance.new("UICorner", CalistirBtn)

local TemizleBtn = CalistirBtn:Clone()
TemizleBtn.Parent = Frame
TemizleBtn.Position = UDim2.new(0, 250, 0, 252)
TemizleBtn.Text = "🗑️ Temizle"
TemizleBtn.Name = "TemizleBtn"

-- X Kapat Butonu
local KapatBtn = Instance.new("TextButton", Frame)
KapatBtn.Size = UDim2.new(0, 36, 0, 28)
KapatBtn.Position = UDim2.new(0, 460, 0, 8)
KapatBtn.BackgroundTransparency = 0.9
KapatBtn.BackgroundColor3 = Color3.fromRGB(0,0,0)
KapatBtn.Text = "X"
KapatBtn.TextColor3 = Color3.fromRGB(255,255,255)
Instance.new("UICorner", KapatBtn)

-- OK-13 Yuvarlak Buton
local OK13Btn = Instance.new("TextButton", LMG2L["ScreenGui_1"])
OK13Btn.Size = UDim2.new(0, 58, 0, 58)
OK13Btn.Position = UDim2.new(1, -70, 0, 10)
OK13Btn.BackgroundColor3 = Color3.fromRGB(0, 0, 0)
OK13Btn.BackgroundTransparency = 0.4
OK13Btn.Text = "OK-13"
OK13Btn.TextColor3 = Color3.fromRGB(255,255,255)
OK13Btn.FontFace = Font.new("rbxasset://fonts/families/IndieFlower.json")
OK13Btn.TextSize = 28
local corner = Instance.new("UICorner", OK13Btn)
corner.CornerRadius = UDim.new(1, 0)

-- Animasyon Fonksiyonları
local function OpenGUI()
	Frame.Visible = true
	Frame.Position = UDim2.new(0.5, -252, 0.5, -152)
	local left = Frame:Clone()
	left.Parent = Frame.Parent
	left.Size = UDim2.new(0, 252, 0, 304)
	left.Position = UDim2.new(0, -252, 0.5, -152)
	left.BackgroundTransparency = 1
	local right = left:Clone()
	right.Position = UDim2.new(1, 0, 0.5, -152)
	for _, v in pairs({left, right}) do
		for _, child in pairs(v:GetDescendants()) do
			if child:IsA("GuiObject") then child.Visible = false end
		end
	end
	local tweenInfo = TweenInfo.new(0.4, Enum.EasingStyle.Quint, Enum.EasingDirection.Out)
	TweenService:Create(left, tweenInfo, {Position = UDim2.new(0.5, -252, 0.5, -152)}):Play()
	TweenService:Create(right, tweenInfo, {Position = UDim2.new(0.5, 0, 0.5, -152)}):Play()
	task.wait(0.4)
	left:Destroy()
	right:Destroy()
	Frame.BackgroundTransparency = 0.5
end

local function CloseGUI()
	local tweenInfo = TweenInfo.new(0.4, Enum.EasingStyle.Quint)
	TweenService:Create(Frame, tweenInfo, {Position = UDim2.new(0, -504, 0.5, -152)}):Play()
	task.wait(0.4)
	Frame.Visible = false
	Frame.Position = UDim2.new(0.5, -252, 0.5, -152)
end

-- Buton Fonksiyonları
OK13Btn.MouseButton1Click:Connect(function()
	if Frame.Visible then CloseGUI() else OpenGUI() end
end)

KapatBtn.MouseButton1Click:Connect(CloseGUI)

CalistirBtn.MouseButton1Click:Connect(function()
	local code = TextBox_a.Text
	if code == "" or code == "Kod Girin..." then return end
	local func, err = loadstring(code)
	if func then
		pcall(func)
	else
		warn("Kod Hatası: " .. err)
	end
end)

TemizleBtn.MouseButton1Click:Connect(function()
	TextBox_a.Text = ""
end)

-- Script Arama Sistemi (ScriptBlox API)
local SearchFrame = nil
local CurrentSearchResults = {}

local function ShowExecuteButtons(show)
	CalistirBtn.Visible = show
	TemizleBtn.Visible = show
end

local function CreateScriptItem(parent, scriptData, index)
    local item = Instance.new("Frame", parent)
    item.Size = UDim2.new(1, -10, 0, 60)
    item.Position = UDim2.new(0, 5, 0, (index-1)*65)
    item.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
    item.BackgroundTransparency = 0.2
    Instance.new("UICorner", item)

    local title = Instance.new("TextLabel", item)
    title.Size = UDim2.new(0.7, -10, 0, 20)
    title.Position = UDim2.new(0, 10, 0, 5)
    title.BackgroundTransparency = 1
    title.Text = scriptData.title or "İsimsiz Script"
    title.TextColor3 = Color3.fromRGB(255, 255, 255)
    title.TextXAlignment = Enum.TextXAlignment.Left
    title.TextScaled = true
    title.TextWrapped = true

    local gameLabel = Instance.new("TextLabel", item)
    gameLabel.Size = UDim2.new(0.7, -10, 0, 15)
    gameLabel.Position = UDim2.new(0, 10, 0, 25)
    gameLabel.BackgroundTransparency = 1
    gameLabel.Text = "Oyun: " .. (scriptData.game and scriptData.game.name or "Bilinmiyor")
    gameLabel.TextColor3 = Color3.fromRGB(200, 200, 200)
    gameLabel.TextXAlignment = Enum.TextXAlignment.Left
    gameLabel.TextSize = 11
    gameLabel.TextWrapped = true

    local viewsLabel = Instance.new("TextLabel", item)
    viewsLabel.Size = UDim2.new(0.7, -10, 0, 15)
    viewsLabel.Position = UDim2.new(0, 10, 0, 40)
    viewsLabel.BackgroundTransparency = 1
    viewsLabel.Text = "👁️ " .. (scriptData.views or 0)
    viewsLabel.TextColor3 = Color3.fromRGB(180, 180, 180)
    viewsLabel.TextXAlignment = Enum.TextXAlignment.Left
    viewsLabel.TextSize = 11

    local playBtn = Instance.new("TextButton", item)
    playBtn.Size = UDim2.new(0.25, -5, 0, 25)
    playBtn.Position = UDim2.new(0.75, 5, 0, 5)
    playBtn.BackgroundColor3 = Color3.fromRGB(0, 170, 0)
    playBtn.BackgroundTransparency = 0.3
    playBtn.Text = "▶ Çalıştır"
    playBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
    playBtn.TextSize = 10
    playBtn.FontFace = Font.new("rbxasset://fonts/families/Arial.json", Enum.FontWeight.Bold)
    Instance.new("UICorner", playBtn)

    local saveBtn = Instance.new("TextButton", item)
    saveBtn.Size = UDim2.new(0.25, -5, 0, 25)
    saveBtn.Position = UDim2.new(0.75, 5, 0, 30)
    saveBtn.BackgroundColor3 = Color3.fromRGB(0, 100, 200)
    saveBtn.BackgroundTransparency = 0.3
    saveBtn.Text = " Kaydet"
    saveBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
    saveBtn.TextSize = 10
    Instance.new("UICorner", saveBtn)

    playBtn.MouseButton1Click:Connect(function()
        if scriptData.script then
            TextBox_a.Text = scriptData.script
            if SearchFrame then 
                SearchFrame:Destroy()
                SearchFrame = nil
            end
            ImageLabel_8.Visible = true
            ShowExecuteButtons(true)
        else
            warn("Script kodu bulunamadı!")
        end
    end)

    saveBtn.MouseButton1Click:Connect(function()
        local savedScripts = getfenv().savedScripts or {}
        table.insert(savedScripts, {
            name = scriptData.title or "İsimsiz Script",
            code = scriptData.script or "",
            game = scriptData.game and scriptData.game.name or "Bilinmiyor"
        })
        getfenv().savedScripts = savedScripts
        KaydetBtn.Text = " ("..#savedScripts..")"
        task.delay(2, function() 
            KaydetBtn.Text = " Kaydet" 
        end)
    end)

    return item
end

local function SearchScripts(query)
    if SearchFrame then
        local resultsScrolling = SearchFrame:FindFirstChild("ResultsScrolling")
        if resultsScrolling then
            for _, child in pairs(resultsScrolling:GetChildren()) do
                if child:IsA("Frame") then
                    child:Destroy()
                end
            end
        end
    end

    CurrentSearchResults = {}

    -- ScriptBlox API'den scriptleri çek
    local success, result = pcall(function()
        local url
        if query and query ~= "" then
            url = "https://scriptblox.com/api/script/search?q=" .. HttpService:UrlEncode(query)
        else
            url = "https://scriptblox.com/api/script/fetch" -- Popüler scriptler
        end
        
        local response = game:HttpGet(url)
        local data = HttpService:JSONDecode(response)
        return data
    end)

    local resultsScrolling = SearchFrame:FindFirstChild("ResultsScrolling")
    if not resultsScrolling then return end

    if success and result and result.result and result.result.scripts then
        CurrentSearchResults = result.result.scripts
        
        for i, scriptData in ipairs(CurrentSearchResults) do
            if i <= 10 then -- Sadece ilk 10 sonuç
                CreateScriptItem(resultsScrolling, scriptData, i)
            end
        end
    else
        -- Hata durumunda örnek scriptler göster
        local sampleScripts = {
            {
                title = "Örnek Script 1 - Hız Scripti",
                game = {name = "Brookhaven RP"},
                views = 1500,
                script = "game.Players.LocalPlayer.Character.Humanoid.WalkSpeed = 50"
            },
            {
                title = "Örnek Script 2 - Zıplama Gücü",
                game = {name = "Prison Life"},
                views = 800,
                script = "game.Players.LocalPlayer.Character.Humanoid.JumpPower = 100"
            },
            {
                title = "Örnek Script 3 - ESP",
                game = {name = "Universal Script"},
                views = 2500,
                script = "for i,v in pairs(game.Players:GetPlayers()) do if v ~= game.Players.LocalPlayer then print(v.Name) end end"
            }
        }
        
        for i, scriptData in ipairs(sampleScripts) do
            CreateScriptItem(resultsScrolling, scriptData, i)
        end
    end
end

ScriptAraBtn.MouseButton1Click:Connect(function()
    if SearchFrame then 
        SearchFrame:Destroy() 
        SearchFrame = nil
    end
    
    SearchFrame = Instance.new("Frame", Frame)
    SearchFrame.Size = UDim2.new(0, 334, 0, 234)
    SearchFrame.Position = UDim2.new(0, 148, 0, 56)
    SearchFrame.BackgroundTransparency = 1
    ImageLabel_8.Visible = false
    
    -- Çalıştır/Temizle butonlarını gizle
    ShowExecuteButtons(false)

    local searchBox = Instance.new("TextBox", SearchFrame)
    searchBox.Size = UDim2.new(0, 250, 0, 30)
    searchBox.Position = UDim2.new(0, 10, 0, 5)
    searchBox.PlaceholderText = "Script ara... (Örnek: Brookhaven, Prison Life)"
    searchBox.BackgroundTransparency = 0.8
    searchBox.BackgroundColor3 = Color3.fromRGB(0,0,0)
    searchBox.TextColor3 = Color3.fromRGB(255,255,255)
    searchBox.Text = ""
    searchBox.Name = "SearchBox"
    Instance.new("UICorner", searchBox)

    local searchBtn = Instance.new("TextButton", SearchFrame)
    searchBtn.Size = UDim2.new(0, 60, 0, 30)
    searchBtn.Position = UDim2.new(0, 270, 0, 5)
    searchBtn.BackgroundColor3 = Color3.fromRGB(0, 120, 255)
    searchBtn.BackgroundTransparency = 0.3
    searchBtn.Text = " Ara"
    searchBtn.TextColor3 = Color3.fromRGB(255,255,255)
    Instance.new("UICorner", searchBtn)

    local resultsScrolling = Instance.new("ScrollingFrame", SearchFrame)
    resultsScrolling.Size = UDim2.new(1, -10, 1, -45)
    resultsScrolling.Position = UDim2.new(0, 5, 0, 40)
    resultsScrolling.BackgroundTransparency = 1
    resultsScrolling.ScrollBarThickness = 6
    resultsScrolling.CanvasSize = UDim2.new(0, 0, 0, 0)
    resultsScrolling.Name = "ResultsScrolling"
    resultsScrolling.ScrollingDirection = Enum.ScrollingDirection.Y

    local layout = Instance.new("UIListLayout", resultsScrolling)
    layout.Padding = UDim.new(0, 5)
    layout.SortOrder = Enum.SortOrder.LayoutOrder

    layout:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
        resultsScrolling.CanvasSize = UDim2.new(0, 0, 0, layout.AbsoluteContentSize.Y)
    end)

    -- Arama butonu işlevi
    local function performSearch()
        local query = searchBox.Text
        SearchScripts(query)
    end

    searchBtn.MouseButton1Click:Connect(performSearch)
    
    searchBox.FocusLost:Connect(function(enterPressed)
        if enterPressed then
            performSearch()
        end
    end)

    -- İlk açılışta popüler scriptleri göster
    task.spawn(function()
        performSearch()
    end)
end)

-- Kod Alanı Butonu
KodAlaniBtn.MouseButton1Click:Connect(function()
    if SearchFrame then 
        SearchFrame:Destroy() 
        SearchFrame = nil
    end
    ImageLabel_8.Visible = true
    ShowExecuteButtons(true)
end)

-- Kaydet Butonu (Kayıtlı Scriptleri Göster)
KaydetBtn.MouseButton1Click:Connect(function()
    local savedScripts = getfenv().savedScripts or {}
    
    if SearchFrame then 
        SearchFrame:Destroy() 
        SearchFrame = nil
    end
    
    SearchFrame = Instance.new("Frame", Frame)
    SearchFrame.Size = UDim2.new(0, 334, 0, 234)
    SearchFrame.Position = UDim2.new(0, 148, 0, 56)
    SearchFrame.BackgroundTransparency = 1
    ImageLabel_8.Visible = false
    ShowExecuteButtons(false)

    local title = Instance.new("TextLabel", SearchFrame)
    title.Size = UDim2.new(1, -10, 0, 30)
    title.Position = UDim2.new(0, 5, 0, 5)
    title.BackgroundTransparency = 1
    title.Text = " Kayıtlı Scriptler ("..#savedScripts..")"
    title.TextColor3 = Color3.fromRGB(255,255,255)
    title.TextSize = 16
    title.FontFace = Font.new("rbxasset://fonts/families/Arial.json", Enum.FontWeight.Bold)

    local resultsScrolling = Instance.new("ScrollingFrame", SearchFrame)
    resultsScrolling.Size = UDim2.new(1, -10, 1, -45)
    resultsScrolling.Position = UDim2.new(0, 5, 0, 40)
    resultsScrolling.BackgroundTransparency = 1
    resultsScrolling.ScrollBarThickness = 6
    resultsScrolling.CanvasSize = UDim2.new(0, 0, 0, 0)
    resultsScrolling.ScrollingDirection = Enum.ScrollingDirection.Y

    local layout = Instance.new("UIListLayout", resultsScrolling)
    layout.Padding = UDim.new(0, 5)
    layout.SortOrder = Enum.SortOrder.LayoutOrder

    layout:GetPropertyChangedSignal("AbsoluteContentSize"):Connect(function()
        resultsScrolling.CanvasSize = UDim2.new(0, 0, 0, layout.AbsoluteContentSize.Y)
    end)

    if #savedScripts == 0 then
        local emptyLabel = Instance.new("TextLabel", resultsScrolling)
        emptyLabel.Size = UDim2.new(1, -10, 0, 50)
        emptyLabel.BackgroundTransparency = 1
        emptyLabel.Text = "Henüz kayıtlı script yok!\nScript ara butonundan script kaydedebilirsin."
        emptyLabel.TextColor3 = Color3.fromRGB(150, 150, 150)
        emptyLabel.TextSize = 14
        emptyLabel.TextWrapped = true
    else
        for i, savedScript in ipairs(savedScripts) do
            local item = Instance.new("Frame", resultsScrolling)
            item.Size = UDim2.new(1, -10, 0, 50)
            item.BackgroundColor3 = Color3.fromRGB(30, 30, 30)
            item.BackgroundTransparency = 0.2
            Instance.new("UICorner", item)

            local scriptTitle = Instance.new("TextLabel", item)
            scriptTitle.Size = UDim2.new(0.7, -10, 0, 20)
            scriptTitle.Position = UDim2.new(0, 10, 0, 5)
            scriptTitle.BackgroundTransparency = 1
            scriptTitle.Text = savedScript.name
            scriptTitle.TextColor3 = Color3.fromRGB(255, 255, 255)
            scriptTitle.TextXAlignment = Enum.TextXAlignment.Left
            scriptTitle.TextWrapped = true

            local gameLabel = Instance.new("TextLabel", item)
            gameLabel.Size = UDim2.new(0.7, -10, 0, 15)
            gameLabel.Position = UDim2.new(0, 10, 0, 25)
            gameLabel.BackgroundTransparency = 1
            gameLabel.Text = "Oyun: " .. savedScript.game
            gameLabel.TextColor3 = Color3.fromRGB(200, 200, 200)
            gameLabel.TextXAlignment = Enum.TextXAlignment.Left
            gameLabel.TextSize = 12
            gameLabel.TextWrapped = true

            local loadBtn = Instance.new("TextButton", item)
            loadBtn.Size = UDim2.new(0.25, -5, 0, 25)
            loadBtn.Position = UDim2.new(0.75, 5, 0, 12)
            loadBtn.BackgroundColor3 = Color3.fromRGB(0, 170, 0)
            loadBtn.BackgroundTransparency = 0.3
            loadBtn.Text = " Yükle"
            loadBtn.TextColor3 = Color3.fromRGB(255, 255, 255)
            loadBtn.TextSize = 10
            Instance.new("UICorner", loadBtn)

            loadBtn.MouseButton1Click:Connect(function()
                TextBox_a.Text = savedScript.code
                if SearchFrame then 
                    SearchFrame:Destroy()
                    SearchFrame = nil
                end
                ImageLabel_8.Visible = true
                ShowExecuteButtons(true)
            end)
        end
    end
end)

-- GUI Başlangıçta Kapalı
Frame.Visible = false

-- TextBox placeholder işlevi
TextBox_a.Focused:Connect(function()
    if TextBox_a.Text == "Kod Girin..." then
        TextBox_a.Text = ""
    end
end)

TextBox_a.FocusLost:Connect(function()
    if TextBox_a.Text == "" then
        TextBox_a.Text = "Kod Girin..."
    end
end)