local Players = game:GetService("Players")
local HttpService = game:GetService("HttpService")
local ReplicatedStorage = game:GetService("ReplicatedStorage")

local player = Players.LocalPlayer
local AIEvent = ReplicatedStorage:WaitForChild("AskRoboMind")

local gui = Instance.new("ScreenGui")
gui.Name = "RoboMindExplorer"
pcall(function() gui.Parent = game.CoreGui end)

local frame = Instance.new("Frame")
frame.Size = UDim2.new(0,450,0,320)
frame.Position = UDim2.new(0.5,-225,0.5,-160)
frame.Parent = gui

local title = Instance.new("TextLabel")
title.Size = UDim2.new(1,0,0,35)
title.Text = "RoboMind Game Explorer"
title.Parent = frame

local questionBox = Instance.new("TextBox")
questionBox.Size = UDim2.new(1,-20,0,35)
questionBox.Position = UDim2.new(0,10,0,45)
questionBox.PlaceholderText = "Ask about the game..."
questionBox.Parent = frame

local output = Instance.new("TextBox")
output.Size = UDim2.new(1,-20,0,180)
output.Position = UDim2.new(0,10,0,90)
output.MultiLine = true
output.ClearTextOnFocus = false
output.TextWrapped = true
output.Text = "Ready."
output.Parent = frame

local askButton = Instance.new("TextButton")
askButton.Size = UDim2.new(0.48,0,0,35)
askButton.Position = UDim2.new(0.01,0,1,-45)
askButton.Text = "Ask AI"
askButton.Parent = frame

local scanButton = Instance.new("TextButton")
scanButton.Size = UDim2.new(0.48,0,0,35)
scanButton.Position = UDim2.new(0.51,0,1,-45)
scanButton.Text = "Analyze Game"
scanButton.Parent = frame

local function ScanGame()
    local result = {}

    local services = {
        workspace,
        game:GetService("ReplicatedStorage"),
        game:GetService("StarterGui"),
        game:GetService("Players")
    }

    for _,service in ipairs(services) do
        for _,obj in ipairs(service:GetDescendants()) do
            table.insert(result,{
                Name = obj.Name,
                Class = obj.ClassName,
                Path = obj:GetFullName()
            })

            if #result >= 1000 then
                break
            end
        end
    end

    return HttpService:JSONEncode(result)
end

local busy = false

local function SendToAI(prompt)
    if busy then return end
    busy = true

    output.Text = "Thinking..."

    AIEvent:FireServer(prompt,true)

    local conn
    conn = AIEvent.OnClientEvent:Connect(function(reply)
        conn:Disconnect()
        busy = false
        output.Text = tostring(reply)
    end)
end

askButton.MouseButton1Click:Connect(function()
    local scan = ScanGame()

    SendToAI(
        "Game Data:\n" ..
        scan ..
        "\n\nQuestion:\n" ..
        questionBox.Text
    )
end)

scanButton.MouseButton1Click:Connect(function()
    local scan = ScanGame()

    SendToAI(
        "Analyze this Roblox game and explain important objects, NPCs, prompts, remotes, tools, and systems:\n\n"
        .. scan
    )
end)