Moduuli:kieliaakkostus/pl

Tämän moduulin ohjeistuksen voi tehdä sivulle Moduuli:kieliaakkostus/pl/ohje

-- puola
local pl = {}
function pl.lajittelumuotoon(isanta, sana)
    return isanta.yksinkertaista_sana(sana, "abcdefghijklmnopqrstuvwxyzóąćęłńśżź")
end

function pl.lajittelukirjaimiksi(isanta, sana, n)
    n = n or 2
    local b = 0
    local p = 1
    while p <= n do
        -- "konsonanttiyhtymät ch, cz, dz, dź, dż, rz, sz aakkostetaan yhtenä kirjaimena samoin kuin unkarissa"
        if mw.ustring.sub(sana, p, p+1) == 'ch' then n = n + 1; p = p + 1 
        elseif mw.ustring.sub(sana, p, p+2) == 'cz' then n = n + 1; p = p + 1
        elseif mw.ustring.sub(sana, p, p+1) == 'dz' then n = n + 1; p = p + 1 
        elseif mw.ustring.sub(sana, p, p+1) == 'dź' then n = n + 1; p = p + 1 
	    elseif mw.ustring.sub(sana, p, p+1) == 'dż' then n = n + 1; p = p + 1 
	    elseif mw.ustring.sub(sana, p, p+1) == 'rz' then n = n + 1; p = p + 1 
	    elseif mw.ustring.sub(sana, p, p+1) == 'sz' then n = n + 1; p = p + 1 
	    end
	    p = p + 1
    end

    sana = pl.lajittelumuotoon(isanta, sana)
    return mw.ustring.sub(sana, 1, n + b), mw.ustring.sub(sana, n + b + 1)
end

return pl