Word Generator

-- Unique username generator

-- What does this even do lmao?  Well, It generates a word that no one has ever seen or even attempted to pronounce.  You might even find a neat little name that you'd like to try some day.  Or you might stay unlucky and won't find anything.

-- INSTRUCTIONS : below the function, call the function with a random number, each number generates a different name if ran with default Lua.


function CreateWord(Seed,By)
    --AmountOfVowels = 3

    Vowels = {"a","e","i","o","u"}

    Letters = {"b", "bb", "c", "d", "f", "g", "gg", "h", "j", "k", "l", "ll", "m", "n", "p", "pp", "q", "r", "s", "t", "v", "w", "x", "y", "z"}

    LetterStarts = {"Br", "Fr", "M", "Cr", "Kr", "Zy", "Zr", "Pr", "Out", "Tr", "Ro", "Yet", "Hel", "Ker", "Ket", "Kel", "Kep", "Wer", "Wet", "Wel", "Wep", "Qr", "Qsr", "Qre", "Jr", "Je", "Jo","Comp"}

    LetterEnds = {"ek", "rape", "eck", "pe", "rd", "rt", "ck", "st", "ty", "ge", "cy", "llow", "nt", "ct", "r", "ter", "can", "fer", "feir", "ker", "ler", "head", "ways", "one", "thing", "swer", "ther", "roach", "ound", "ply", "gue", "rive","igger", "d", "sume", "come", "rch", "ch", "ld", "zen", "ss", "al", "mon", "tor", "wn", "ge", "rgy", "tal", "tor", "fy", "blox"}

    word = ""
    kek = 0

    while kek <= By do
        kek = kek + 1
        for i=1,Seed do
            vo1 = math.random(1,#Vowels)
            vo2 = math.random(1,#Vowels)
            vo3 = math.random(1,#Vowels)
            vo4 = math.random(1,#Vowels)
            let1 = math.random(1,#Letters)
            let2 = math.random(1,#Letters)
            let3 = math.random(1,#Letters)
            let4 = math.random(1,#Letters)
            lets1 = math.random(1,#LetterStarts)
            lets2 = math.random(1,#LetterStarts)
            lets3 = math.random(1,#LetterStarts)
            lets4 = math.random(1,#LetterStarts)
            lete1 = math.random(1,#LetterEnds)
            lete2 = math.random(1,#LetterEnds)
            lete3 = math.random(1,#LetterEnds)
            lete4 = math.random(1,#LetterEnds)
        end
    end

    --Create the word

    word = word..LetterStarts[lets1]..Vowels[vo1]..Letters[let1]..Vowels[vo2]..Letters[let2]..Vowels[vo3]..LetterEnds[lete1]
    return word
end


for i=1,10000 do
    print(i.."   |   "..CreateWord(1,14))
end