-- Word Bomb script (merged + WordList_Three included; two problematic words removed)
local WordList = loadstring(game:HttpGet("https://raw.githubusercontent.com/jjengu/scripts/refs/heads/main/wordbomb/words.lua"))()
local WordList_Two = loadstring(game:HttpGet("https://raw.githubusercontent.com/jjengu/scripts/refs/heads/main/wordbomb/words_two.lua"))()

-- WordList_Three (long words focus; lowercase to match other lists)
local WordList_Three = {
    -- ultra-long / fun ones you asked to keep
    "pseudopseudohypoparathyroidism",
    "floccinaucinihilipilification",
    "antidisestablishmentarianism",
    "supercalifragilisticexpialidocious",
    "hexakosioihexekontahexaphobia",
    "dichlorodiphenyltrichloroethane",
    "sphenopalatineganglioneuralgia",
    "radioimmunoelectrophoresis",
    "electroencephalographically",
    "ethylenediaminetetraacetates",
    "xenotransplantations",
    "unselfconsciousnesses",
    "weatherproofnesses",
    "zoogeographically",
    "worthwhilenesses",
    "overintellectualizations",
    "untranslatabilities",
    "phosphatidylethanolamines",
    "unexceptionablenesses",
    "reinstituionalizations",

    -- core long words (high match / useful)
    "counterdemonstrations",
    "characteristically",
    "unconstitutionality",
    "intercontinental",
    "misinterpretations",
    "phenomenological",
    "oversimplification",
    "representationalism",
    "disenfranchisement",
    "incompatibilities",
    "institutionalizing",
    "underrepresentation",
    "thermodynamically",
    "photosynthetically",
    "magnetohydrodynamics",
    "uncharacteristically",
    "electroencephalogram",
    "counterrevolutionary",
    "microminiaturization",
    "internationalization",
    "conceptualizations",
    "microarchitectures",
    "counterproductive",
    "environmentalists",
    "differentiability",
    "subcategorization",
    "ultramicroscopic",
    "disproportionately",
    "industrialization",
    "dematerialization",
    "recommendations",
    "overcompensations",
    "misunderstanding",
    "interrelationships",
    "transcontinental",
    "uncontrollability",
    "administratively",
    "photosensitizing",
    "bioluminescence",
    "counterarguments",
    "telecommunications",
    "immunohistochemistry",

    -- extras from earlier lists (kept useful long forms)
    "hypercholesterolemia",
    "incomprehensibilities",
    "multidimensionalities",
    "semiautobiographical",
    "uncompartmentalized",
    "deinstitutionalization",
    "electromagnetohydrodynamics",
    "psychopharmacological",
    "thyroparathyroidectomized",
    "overcommercialization",
    "overintellectualized",
    "overspecialization",
    "phytoplanktonically",
    "photospectrophotometer",
    "photolithographically",
    "photolithographies",
    "radiopharmaceutical",
    "reconceptualization",
    "reconceptualizations",
    "reindustrialization",
    "repoliticization",
    "reproducibilities",
    "reproportionations",
    "resynchronization",
    "restructurations",
    "semiconductivities",
    "spectroscopically",
    "standardizations",
    "subcompartmentalizing",
    "substantivizations",
    "supramolecularities",
    "thermoregulations",
    "transformationally",
    "transliterations",
    "transportationists",
    "underprivilegedness",
    "vulnerabilities",
    "westernization",
    "xenotransplantation",
}

-- keep the mobile detection & services
local IsOnMobile = table.find({Enum.Platform.IOS, Enum.Platform.Android}, game:GetService("UserInputService"):GetPlatform())

local Player = game:GetService("Players").LocalPlayer
local Games = game:GetService("ReplicatedStorage"):WaitForChild("Network"):WaitForChild("Games")

local GameID = "-1"
local UsedWords = {}
local Typing = false
local TypingActive = false
local CStatus = "Waiting For Next Round.."
local LastWord = ""
local TypeBox

-- Settings: WordList = 1 (one) by default
local Settings = {
    WordList = 1, -- 1 = WordList, 2 = WordList_Two, 3 = WordList_Three
    AutoType = false,
    LetterTypeDelay = 0.1,
    WordTypeDelay = 0.5,
    AutoJoin = false
}

local Library = loadstring(game:HttpGet("https://raw.githubusercontent.com/Pstrw/Reuploaded-Librarys/main/Venyx/source.lua"))()
local Venyx = Library.new("jengu.lol   I   word bomb", 5013109572)

local Tabs = {Main = Venyx:addPage("Main", 5012544693)}
local Sections = {Status_Section = Tabs.Main:addSection("Status"), Cheat_Section = Tabs.Main:addSection("Cheats")}

local UpdateStatus = function(ns)
    Sections.Status_Section:updateButton(CStatus, ns)
    CStatus = ns
end

local CheckInput = function(value)
    if type(tonumber(value)) == "number" then
        return true
    else
        return false
    end
end

local GetTurn = function()
    for _, v in pairs(getgc()) do
        if type(v) == "function" and debug.getinfo(v).name == "updateInfoFrame" then
            for __, vv in ipairs(debug.getupvalues(v)) do
                if type(vv) == "table" and vv.PlayerID ~= nil then
                    return vv.PlayerID
                end
            end
        end
    end
end

local GetLetters = function()
    for _, v in pairs(getgc()) do
        if type(v) == "function" and debug.getinfo(v).name == "updateInfoFrame" then
            for __, vv in pairs(debug.getupvalues(v)) do
                if type(vv) == "table" and vv.Prompt ~= nil then
                    return vv.Prompt
                end
            end
        end
    end
    return ""
end

-- FindWord chooses list based on Settings.WordList (1/2/3)
local FindWord = function(l)
    if not l or l == "" then
        return nil
    end
    UpdateStatus("Searching For Word Containing: " .. string.upper(l))
    local lowerL = string.lower(l)

    local WordListToUse
    if Settings.WordList == 1 then
        WordListToUse = WordList
    elseif Settings.WordList == 2 then
        WordListToUse = WordList_Two
    else
        WordListToUse = WordList_Three
    end

    for _, v in pairs(WordListToUse) do
        if v ~= nil then
            local lowerV = string.lower(v)
            -- compare with lowercase prompt; ensure we don't reuse UsedWords; and avoid LastWord repeat
            if string.find(lowerV, lowerL) and not table.find(UsedWords, v) and string.upper(v) ~= LastWord then
                table.insert(UsedWords, v)
                UpdateStatus("Found usable word: " .. string.upper(v))
                return string.upper(v)
            end
        end
    end
    UpdateStatus("No Valid Word Found.")
    return nil
end

local TypeWord = function(word)
    if Typing then return end

    Typing = true
    UpdateStatus("Typing Word: " .. string.upper(word))

    for i = 1, #word do
        Games.GameEvent:FireServer(GameID, "TypingEvent", string.upper(string.sub(word, 1, i)), false)
        task.wait(Settings.LetterTypeDelay)
    end

    task.wait()

    Games.GameEvent:FireServer(GameID, "TypingEvent", string.upper(word), true)

    UpdateStatus("Finished Typing: " .. string.upper(word))
    Typing = false
end

local TryTyping = function()
    if not Settings.AutoType then
        TypingActive = false
        return
    end

    if TypingActive then
        return
    end

    TypingActive = true

    while GetTurn() ~= Player.UserId do
        if not Settings.AutoType then
            TypingActive = false
            return
        end
        task.wait(0.5)
    end

    if not Settings.AutoType then
        TypingActive = false
        return
    end

    local Word, attempts = nil, 0
    repeat
        task.wait()
        Word = FindWord(GetLetters())
        attempts = attempts + 1
        if not Settings.AutoType then
            TypingActive = false
            return
        end
    until Word or attempts >= 5

    if Word then
        LastWord = Word
        task.wait(Settings.WordTypeDelay)
        if not Typing then
            TypeWord(Word)
        end
        task.wait(Settings.WordTypeDelay)

        if GetTurn() == Player.UserId and Settings.AutoType then
            UpdateStatus("Turn is still mine, retrying...")
            LastWord = ""
            TypingActive = false 
            TryTyping()
        end
    end

    TypingActive = false
end

Sections.Status_Section:addButton(CStatus, function()
    return
end)

Sections.Cheat_Section:addToggle("Auto Join Round", false, function(value)
    Settings.AutoJoin = value
    UpdateStatus("Auto Join " .. (value and "Enabled" or "Disabled"))
    if value then
        for i = -1, -1000, -1 do
            Games.GameEvent:FireServer(i, "JoinGame")
        end 
    end
end)

Sections.Cheat_Section:addToggle("Auto Type Word", false, function(value)
    Settings.AutoType = value
    UpdateStatus("Auto Type " .. (value and "Enabled" or "Disabled"))
    
    if not value then
        TypingActive = false
    end
    
    if value then
        TryTyping()
    end
end)

Sections.Cheat_Section:addDropdown("WordList", {"WordList: One", "WordList: Two", "WordList: Three"}, function(text)
    if text == "WordList: One" then
        Settings.WordList = 1
    elseif text == "WordList: Two" then
        Settings.WordList = 2
    else
        Settings.WordList = 3
    end
    UpdateStatus("Selected " .. text)
end)

Sections.Cheat_Section:addTextbox("Letter Type Delay", "Number", function(value)
    if CheckInput(value) then
        Settings.LetterTypeDelay = value
        UpdateStatus("Updated LetterTypeDelay To: " .. Settings.LetterTypeDelay)
    else
        UpdateStatus("Input a number value.")
    end
end)

Sections.Cheat_Section:addTextbox("Word Type Delay", "Number", function(value)
    if CheckInput(value) then
        Settings.WordTypeDelay = value
        UpdateStatus("Updated WordTypeDelay To: " .. Settings.WordTypeDelay)
    else
        UpdateStatus("Input a number value.")
    end
end)

Sections.Cheat_Section:addButton("Type Word", function()
    if GameID == "-1" then
        UpdateStatus("Please wait until a round starts or has occurred to use this.")
        return
    end
    while GetTurn() ~= Player.UserId do
        task.wait(0.5)
    end
    local Word, attempts = nil, 0
    repeat
        task.wait()
        Word = FindWord(GetLetters())
        attempts = attempts + 1
    until Word or attempts >= 5
    
    if Word then
        LastWord = Word 
        task.wait(Settings.WordTypeDelay)
        if not Typing then
            TypeWord(Word)
        end
        task.wait(Settings.WordTypeDelay)
        UpdateStatus("Finished typing word: " .. string.upper(Word))
        if GetTurn() == Player.UserId then
            TryTyping()
        end
    end
end)

Sections.Cheat_Section:addButton("Blurt Word", function()
    if GameID == "-1" then
        UpdateStatus("Please wait until a round starts or has occurred to use this.")
        return
    end
    local WordToBlurt = FindWord(GetLetters())
    game:GetService("ReplicatedStorage").Network.Chat.SendMessage:FireServer(GameID, WordToBlurt)
    UpdateStatus("Blurted: " .. WordToBlurt .. " (Only Others See Chat Message)")
end)

Venyx:SelectPage(Venyx.pages[1], true)

Games:WaitForChild("RegisterGame").OnClientEvent:Connect(function(int)
    GameID = int
    UsedWords = {}
    LastWord = ""
    UpdateStatus("Game Registered With ID: " .. int)
    if Settings.AutoJoin then
        Games.GameEvent:FireServer(int, "JoinGame")
    end
    task.wait(1)
    if Settings.AutoType then
        TryTyping()
    end
end)

Player.PlayerGui.GameUI.DescendantAdded:Connect(function(c)
    if c.Name == "Typebox" then
        if not IsOnMobile then
            TypeBox = Player.PlayerGui.GameUI.Container.GameSpace.DefaultUI.GameContainer.DesktopContainer.Typebar.Typebox
        else
            TypeBox = Player.PlayerGui.GameUI.Container.GameSpace.DefaultUI.GameContainer.Typebar.Typebox
        end
        TypeBox:GetPropertyChangedSignal("Visible"):Connect(function(v)
            if Settings.AutoType then
                TryTyping()
            end
        end)
    end
end)