Module:κλίση/pl/ουσιαστικό

Documentation for this module may be created at Module:κλίση/pl/ουσιαστικό/τεκμηρίωση

export = {}

local Lf = {} -- local functions
local Ld = {['έκδοση'] = 1, } -- local params and constants
Ld['κατηγορίες για σφάλματα'] = '[[Κατηγορία:Συντήρηση:Σελίδες με σφάλματα στο Module κλίση/pl/ουσιαστικό]]'

Ld['χρώμαυπόβαθρου'] = 'd9ebff'
Ld['χρώμαπεριγράμματος'] = '#AAAACC'
Ld['χρώματίτλου'] = '#A1BDEA'
Ld['χρώματίτλουπτώσεων'] = '#eff7ff'
Ld['χρώμακατάληξης'] = 'DeepPink'

Lf['κατάληξη'] = function (kataliksi)
    return '<font style="color:' .. Ld['χρώμακατάληξης'] ..';">' .. kataliksi .. '</font>'
end

Lf['πλήρηςπίνακας'] = function (args)
    local lc = {}

    lc['έχει ενικό'] = true
    lc['έχει πληθυντικό'] = true
    lc['τίτλος ενικού'] = ''
    lc['τίτλος πληθυντικού'] = ''

    lc['Κοε'] =  '' --κελί ονομαστικής ενικού
    lc['Κγε'] =  ''
    lc['Κδε'] =  ''
    lc['Καε'] =  ''
    lc['Κρε'] =  ''
    lc['Κτε'] =  ''
    lc['Κκε'] =  ''

    lc['Κοπ'] =  ''
    lc['Κγπ'] =  ''
    lc['Κδπ'] =  ''
    lc['Καπ'] =  ''
    lc['Κρπ'] =  ''
    lc['Κτπ'] =  ''
    lc['Κκπ'] =  ''

    --local hassingular = true --(args['εν'] ~= nil)
    if args['μόνο'] == "πλ" then lc['έχει ενικό'] = false end
    --local hasplural = true -- (args['πλ'] ~= nil)
    if args['μόνο'] == "εν" then lc['έχει πληθυντικό'] = false end

    lc['κελί παρατήρησης'] = ''
    if not (args['παρατήρηση'] == nil or mw.ustring.len(args['παρατήρηση']) < 1) then
        --mw.log('para')
        lc['κελί παρατήρησης'] = '|-' .. "\n" .. [=[| colspan="4" align="left" style="background:#d9ebff; font-size: 90%; font-style: italic;" | ]=]
        lc['κελί παρατήρησης'] = lc['κελί παρατήρησης'] .. args['παρατήρηση'] .. "\n"
    end

    if lc['έχει ενικό']  then
        lc['τίτλος ενικού'] =  [=[! bgcolor="]=] .. Ld['χρώμαυπόβαθρου'] .. [=[" colspan="1" align="center"| '''''[[ενικός]]''''']=] .. "\n"
        lc['Κοε'] =  [=[| align="left" | ]=] .. args['Λοε'] ..  "\n"
        lc['Κγε'] =  [=[| align="left" | ]=] .. args['Λγε'] ..  "\n"
        lc['Κδε'] =  [=[| align="left" | ]=] .. args['Λδε'] ..  "\n"
        lc['Καε'] =  [=[| align="left" | ]=] .. args['Λαε'] ..  "\n"
        lc['Κρε'] =  [=[| align="left" | ]=] .. args['Λρε'] ..  "\n"
        lc['Κτε'] =  [=[| align="left" | ]=] .. args['Λτε'] ..  "\n"
        lc['Κκε'] =  [=[| align="left" | ]=] .. args['Λκε'] ..  "\n"
    end
    if lc['έχει πληθυντικό'] then
        lc['τίτλος πληθυντικού'] = [=[! bgcolor="]=] .. Ld['χρώμαυπόβαθρου'] .. [=[" colspan="1" align="center"| '''''[[πληθυντικός]]''''']=] .. "\n"
        lc['Κοπ'] =  [=[| align="left" | ]=] .. args['Λοπ'] ..  "\n"
        lc['Κγπ'] =  [=[| align="left" | ]=] .. args['Λγπ'] ..  "\n"
        lc['Κδπ'] =  [=[| align="left" | ]=] .. args['Λδπ'] ..  "\n"
        lc['Καπ'] =  [=[| align="left" | ]=] .. args['Λαπ'] ..  "\n"
        lc['Κρπ'] =  [=[| align="left" | ]=] .. args['Λρπ'] ..  "\n"
        lc['Κτπ'] =  [=[| align="left" | ]=] .. args['Λτπ'] ..  "\n"
        lc['Κκπ'] =  [=[| align="left" | ]=] .. args['Λκπ'] ..  "\n"
    end
	
    lc['πλήρης πίνακας'] = [=[{| style="float:right;border:1px solid #AAAACC;margin-left:0.5em;margin-bottom:0.5em;text-align:right;" rules="all" cellpadding="3" cellspacing="0"
|-
! bgcolor="]=] .. Ld['χρώμαυπόβαθρου'] .. [=[" | πτώση]=] .. "\n" .. lc['τίτλος ενικού'] .. lc['τίτλος πληθυντικού'] .. [=[|-
| bgcolor="]=] .. Ld['χρώματίτλουπτώσεων'] .. [=[" | '''''[[ονομαστική]]''''' ('''''[[mianownik]]''''')]=] .. "\n" .. lc['Κοε'] .. lc['Κοπ'] .. [=[|-
| bgcolor="]=] .. Ld['χρώματίτλουπτώσεων'] .. [=[" | '''''[[γενική]]''''' ('''''[[dopełniacz]]''''')]=] .. "\n" .. lc['Κγε'] .. lc['Κγπ'] .. [=[|-
| bgcolor="]=] .. Ld['χρώματίτλουπτώσεων'] .. [=[" | '''''[[δοτική]]''''' ('''''[[celownik]]''''')]=] .. "\n" .. lc['Κδε'] .. lc['Κδπ'] .. [=[|-
| bgcolor="]=] .. Ld['χρώματίτλουπτώσεων'] .. [=[" | '''''[[αιτιατική]]''''' ('''''[[biernik]]''''')]=] .. "\n" .. lc['Καε'] .. lc['Καπ'] .. [=[|-
| bgcolor="]=] .. Ld['χρώματίτλουπτώσεων'] .. [=[" | '''''[[οργανική]]''''' ('''''[[narzędnik]]''''')]=] .. "\n" .. lc['Κρε'] .. lc['Κρπ'] .. [=[|-
| bgcolor="]=] .. Ld['χρώματίτλουπτώσεων'] .. [=[" | '''''[[τοπική]]''''' ('''''[[miejscownik]]''''')]=] .. "\n" .. lc['Κτε'] .. lc['Κτπ'] .. [=[|-
| bgcolor="]=] .. Ld['χρώματίτλουπτώσεων'] .. [=[" | '''''[[κλητική]]''''' ('''''[[wołacz]]''''')]=] .. "\n" .. lc['Κκε'] .. lc['Κκπ'] .. lc['κελί παρατήρησης'] .. [=[|}]=]

    if (args['ονοματοχώρος'] or 1) == 0 then
        if not args['χωρίς κατηγορία'] then
            --η γλώσσα στην κατηγορία θα είναι απαραίτητη αν υπάρχουν ίδιοι "τύποι" σε διαφορετικές γλώσσες.
            lc['πλήρης πίνακας'] = lc['πλήρης πίνακας'] .. '[[Κατηγορία:' .. args['κατηγορία κλίσης'] .. ' που κλίνονται όπως το ' .. args['τύπος'] .. ']]'
        end
    end
	return lc['πλήρης πίνακας']
end

Lf['κλίση1'] = function(args)
	lc = {}
    lc['αρκατάληξης'] = 0
    local stemnumber = 0
    if args['α'] ~= "πλ" then
        lc['αρκατάληξης'] = tonumber(mw.ustring.len(args['οε']))
    else
        lc['αρκατάληξης'] = tonumber(mw.ustring.len(args['οπ']))
    end
    lc['θέμα1'] = mw.ustring.sub(args['λήμμα'],1,-lc['αρκατάληξης']-1)

    args['Λοε'] = lc['θέμα1'] .. Lf['κατάληξη'](args['οε'])
    args['Λγε'] = lc['θέμα1'] .. Lf['κατάληξη'](args['γε'])
    args['Λδε'] = lc['θέμα1'] .. Lf['κατάληξη'](args['δε'])
    args['Λαε'] = lc['θέμα1'] .. Lf['κατάληξη'](args['αε'])
    args['Λρε'] = lc['θέμα1'] .. Lf['κατάληξη'](args['ρε'])
    args['Λτε'] = lc['θέμα1'] .. Lf['κατάληξη'](args['τε'])
    args['Λκε'] = lc['θέμα1'] .. Lf['κατάληξη'](args['κε'])

    args['Λοπ'] = lc['θέμα1'] .. Lf['κατάληξη'](args['οπ'])
    args['Λγπ'] = lc['θέμα1'] .. Lf['κατάληξη'](args['γπ'])
    args['Λδπ'] = lc['θέμα1'] .. Lf['κατάληξη'](args['δπ'])
    args['Λαπ'] = lc['θέμα1'] .. Lf['κατάληξη'](args['απ'])
    args['Λρπ'] = lc['θέμα1'] .. Lf['κατάληξη'](args['ρπ'])
    args['Λτπ'] = lc['θέμα1'] .. Lf['κατάληξη'](args['τπ'])
    args['Λκπ'] = lc['θέμα1'] .. Lf['κατάληξη'](args['κπ'])

    return Lf['πλήρηςπίνακας'](args)

end

export['artysta'] = function (args)
    args['οε'] = 'sta'
    args['γε'] = 'sty'
    args['δε'] = 'ście'
    args['αε'] = 'stę'
    args['ρε'] = 'stą'
    args['τε'] = args['δε']
    args['κε'] = 'sto'
    args['οπ'] = 'ści'
    args['γπ'] = 'stów'
    args['δπ'] = 'stom'
    args['απ'] = args['γπ']
    args['ρπ'] = 'stami'
    args['τπ'] = 'stach'
    args['κπ'] = args['οπ']
    return Lf['κλίση1'](args)
end

export['lekarz'] = function (args)
    args['οε'] = ''
    args['γε'] = 'a'
    args['δε'] = 'owi'
    args['αε'] = args['γε']
    args['ρε'] = 'em'
    args['τε'] = 'u'
    args['κε'] = args['τε']
    args['οπ'] = 'e'
    args['γπ'] = 'y'
    args['δπ'] = 'om'
    args['απ'] = args['γπ']
    args['ρπ'] = 'ami'
    args['τπ'] = 'ach'
    args['κπ'] = args['οπ']
    return Lf['κλίση1'](args)
end

export['poeta'] = function (args)
    args['οε'] = 'ta'
    args['γε'] = 'ty'
    args['δε'] = 'cie'
    args['αε'] = 'tę'
    args['ρε'] = 'tą'
    args['τε'] = args['δε']
    args['κε'] = 'to'
    args['οπ'] = 'ci'
    args['γπ'] = 'tów'
    args['δπ'] = 'tom'
    args['απ'] = args['γπ']
    args['ρπ'] = 'tami'
    args['τπ'] = 'tach'
    args['κπ'] = args['οπ']
    return Lf['κλίση1'](args)
end

export['profesor'] = function (args)
    args['οε'] = ''
    args['γε'] = 'a'
    args['δε'] = 'owi'
    args['αε'] = args['γε']
    args['ρε'] = 'em'
    args['τε'] = 'ze'
    args['κε'] = args['τε']
    args['οπ'] = 'owie'
    args['γπ'] = 'ów'
    args['δπ'] = 'om'
    args['απ'] = args['γπ']
    args['ρπ'] = 'ami'
    args['τπ'] = 'ach'
    args['κπ'] = args['οπ']
    return Lf['κλίση1'](args)
end



export['pl-test'] = function (args)
    args['οε'] = 'ta'
    args['γε'] = 'ty'
    args['δε'] = 'cie'
    args['αε'] = 'tę'
    args['ρε'] = 'tą'
    args['τε'] = args['δε']
    args['κε'] = 'to'
    args['οπ'] = 'ci'
    args['γπ'] = 'tów'
    args['δπ'] = 'tom'
    args['απ'] = args['γπ']
    args['ρπ'] = 'tami'
    args['τπ'] = 'tach'
    args['κπ'] = args['οπ']
    return Lf['κλίση1'](args)
end

return export