Untitled

From Scorching Giraffe, 11 Years ago, written in Lua, viewed 860 times.

URL https://paste.godclan.hu/view/S-F1wjeh Embed

Download Paste or View Raw

local betuk_eredeti = {"BOVNRKBFNAYXIHZGJODDFCHS",
"BLZTKJMLODFVGRTOPMRYXAOP",
"ORULTDILISSZERELEMIRCHMK",
"SQBECUIKLOWNRJTHLVVAGAIN",
"RJCJVQDFBGAIORUCFHEJOTHT",
"TSGIZARKYNXEDFCHJNGTZAVD",
"RKIOWALVBGFTFDAKHZAJOLRP",
"KBFNACBERDAIERTXHBZMKOGZ",
"KGTBJEGENGSZTEROSZTAGMJW",
"YZSCNDUXDTTHDAVCNJUKLAXT",
"YHYFTGTPJUINPRZFDMVGGRIP",
"MFQELIRNVGMNUTAMGRZDRNVE",
"AHILACOKSACKETHJMXHJNYFR",
"PVBNUNUSTZSMLODFVSNSWEZT",
"ASZERELMUNKLAPJAIKVNBKKA",
"ZUILLOTKTANLSXRGCASERAFC",
"ZDXSFJNLKGAABRLFUHYSQBLD",
"HTNOANGKHRJPZZUDZFZPHAGN",
"KHTNASVZRCEFTOLKJOVNGNAT",
}
 
local szavak_eredeti = {
    "gengszterosztag",
    "veresromanc",
    "plasztikszerelem",
    "tores",
    "felnelson",
    "szobatarsak",
    "afiatalkoru",
    "ahihetetlen",
    "alomsuli",
    "bluevalentine"
}
 
local betuk, szavak = {}, {}
 
for i=1,#betuk_eredeti do
    local t = {betuk_eredeti[i]:byte(1, -1)}
    table.sort(t)
    betuk[i] = t
end
 
for i=1,#szavak_eredeti do
    local t = {szavak_eredeti[i]:upper():byte(1, -1)}
    table.sort(t)
    szavak[i] = t
end
 
for i=1,#szavak do
    local szo = szavak[i]
    local szohossz = #szo
    for j=1,#betuk do
        local ozs = betuk[j]
        local n = 1
        for j=1,#ozs do
            if szo[n] == ozs[j] then
                if n == szohossz then
                    n = -1
                    break
                end
                n = n + 1
            end
        end
        if n == -1 then
            print(i, szavak_eredeti[i], j, betuk_eredeti[j])
            break -- ez kell ide? 
        end
    end
end
 

Reply to "Untitled"

Here you can reply to the paste above

Author What's your name?

Title Give your paste a title.

Language What language is your paste written in?

Your paste Paste your paste here

local betuk_eredeti = {"BOVNRKBFNAYXIHZGJODDFCHS",
"BLZTKJMLODFVGRTOPMRYXAOP",
"ORULTDILISSZERELEMIRCHMK",
"SQBECUIKLOWNRJTHLVVAGAIN",
"RJCJVQDFBGAIORUCFHEJOTHT",
"TSGIZARKYNXEDFCHJNGTZAVD",
"RKIOWALVBGFTFDAKHZAJOLRP",
"KBFNACBERDAIERTXHBZMKOGZ",
"KGTBJEGENGSZTEROSZTAGMJW",
"YZSCNDUXDTTHDAVCNJUKLAXT",
"YHYFTGTPJUINPRZFDMVGGRIP",
"MFQELIRNVGMNUTAMGRZDRNVE",
"AHILACOKSACKETHJMXHJNYFR",
"PVBNUNUSTZSMLODFVSNSWEZT",
"ASZERELMUNKLAPJAIKVNBKKA",
"ZUILLOTKTANLSXRGCASERAFC",
"ZDXSFJNLKGAABRLFUHYSQBLD",
"HTNOANGKHRJPZZUDZFZPHAGN",
"KHTNASVZRCEFTOLKJOVNGNAT",
}
 
local szavak_eredeti = {
    "gengszterosztag",
    "veresromanc",
    "plasztikszerelem",
    "tores",
    "felnelson",
    "szobatarsak",
    "afiatalkoru",
    "ahihetetlen",
    "alomsuli",
    "bluevalentine"
}

local betuk, szavak = {}, {}

for i=1,#betuk_eredeti do
    local t = {betuk_eredeti[i]:byte(1, -1)}
    table.sort(t)
    betuk[i] = t
end

for i=1,#szavak_eredeti do
    local t = {szavak_eredeti[i]:upper():byte(1, -1)}
    table.sort(t)
    szavak[i] = t
end

for i=1,#szavak do
    local szo = szavak[i]
    local szohossz = #szo
    for j=1,#betuk do
        local ozs = betuk[j]
        local n = 1
        for j=1,#ozs do
            if szo[n] == ozs[j] then
                if n == szohossz then
                    n = -1
                    break
                end
                n = n + 1
            end
        end
        if n == -1 then
            print(i, szavak_eredeti[i], j, betuk_eredeti[j])
            break -- ez kell ide? 
        end
    end
end

Create Shorturl Create a shorter url that redirects to your paste?

Private Private paste aren't shown in recent listings.

Delete After When should we delete your paste?

Spam protection Type in the letters

godclan.hu Pastebin

Untitled

Reply to "Untitled"