Module:ετυμολογία: Διαφορά μεταξύ των αναθεωρήσεων

Περιεχόμενο που διαγράφηκε Περιεχόμενο που προστέθηκε
Εκκαθάριση δοκιμαστικών
προσαρμογή εντολών με λατινικούς χαρακτήρες και αγγλική γλώσσα - σε περίπτωση που χρειαστεί βοήθεια από ξενόγλωσσους προγραμματιστές.
Γραμμή 44:
--------------------------------------------------------------------------
 
languages = mw.loadData("Module:Languages")
local Ld = {}
 
Ld['γλώσσες'] = mw.loadData("Module:Languages")
 
local Lf = {} --πίνακας με τις τοπικές συναρτήσεις - local functions
 
--βρες βρίσκει το όνομα του Προτύπου που κάλεσε το Module
-- αλλά μόνο αν κλήθηκε από σελίδα που κάλεσε το πρότυπο
-- finds the Template's name calling this Module, but only if called from a page using the Template
Lf['πρότυπο'] = function(frame)
template_function = function(frame)
if type(frame.args) == 'table' and type(frame.getParent) == 'function' then
local templateobj = mw.title.new(frame:getParent():getTitle())
Γραμμή 65 ⟶ 64 :
end
 
-- Error, σφάλμα Used at ετυμ and at δάνειο
-- Error
Lf['σφάλμα']errorhere = function(astringerrstring)
return '<div class="error">' .. astringerrstring .. '</div>[[Κατηγορία:Σελίδες με σφάλματα στο πρότυπο ετυμετυμολογίας]]'
end
 
-- ================== Function link for donor-word - για τη λέξη-δότρια ====================== --
Lf['λινκ']linkFunction = function(link)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
-- for ine-proreconstructed (e.g. protoindoeuropean words) when they have an asterisc, i do NOT want the asterisc
if lc['έτυμο']word_donor:sub(1, 1) == '*' then --start at 1st character, stop at 1st character
lc['έτυμο_noasterisc']word_donor_noasterisc = lc['έτυμο']word_donor:sub(2, -1) --start at 2nd character, stop at last character
end
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
transliteration = lc['παράμετροι λήμματος']myargs['tr'] or lc['παράμετροι λήμματος']myargs['γ'] or '' -- test [[Βούδας]]
translation = lc['παράμετροι λήμματος']myargs['t'] or lc['παράμετροι λήμματος']myargs['μ'] or ''
translation_nolink = lc['παράμετροι λήμματος']myargs['tno'] or lc['παράμετροι λήμματος']myargs['μχωρίς'] or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- if there is an asterisc at etymon
if lc['έτυμο']word_donor ~= '' and lc['έτυμο']word_donor:sub(1, 1) == '*' and lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lang_donor_link = languages[lang_donor_iso]['link'] or ''
lc['ενότητα γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['link'] or ''
if lc['εμφάνιση']word_donor_show ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο_noasterisc']word_donor_noasterisc .. "#" .. lc['ενότητα γλώσσας ετύμου']lang_donor_link .. '|' .. lc['εμφάνιση']word_donor_show .. ']]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο_noasterisc']word_donor_noasterisc .. "#" .. lc['ενότητα γλώσσας ετύμου']lang_donor_link .. '|' .. lc['έτυμο']word_donor .. ']]'
end
else
if lc['έτυμο']word_donor ~= '' and lc['έτυμο']word_donor:sub(1, 1) == '*' and lc['iso γλώσσας ετύμου']lang_donor_iso == '' then
if lc['εμφάνιση']word_donor_show ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο_noasterisc']word_donor_noasterisc .. '|' .. lc['εμφάνιση']word_donor_show .. ']]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο_noasterisc']word_donor_noasterisc .. '|' .. lc['έτυμο']word_donor .. ']]'
end
end
end
-- if there is NO asterisc at etymon
if lc['έτυμο']word_donor ~= '' and lc['έτυμο']word_donor:sub(1, 1) ~= '*' and lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lang_donor_link = languages[lang_donor_iso]['link'] or ''
lc['ενότητα γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['link'] or ''
if lc['εμφάνιση']word_donor_show ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο']word_donor .. "#" .. lc['ενότητα γλώσσας ετύμου']lang_donor_link .. '|' .. lc['εμφάνιση']word_donor_show .. ']]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο']word_donor .. "#" .. lc['ενότητα γλώσσας ετύμου']lang_donor_link .. '|' .. lc['έτυμο']word_donor .. ']]'
end
else
if lc['έτυμο']word_donor ~= '' and lc['έτυμο']word_donor:sub(1, 1) ~= '*' and lc['iso γλώσσας ετύμου']lang_donor_iso == '' then
if lc['εμφάνιση']word_donor_show ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο']word_donor .. '|' .. lc['εμφάνιση']word_donor_show .. ']]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' ' .. '[[' .. lc['έτυμο']word_donor .. '|' .. lc['έτυμο']word_donor .. ']]'
end
end
Γραμμή 124 ⟶ 123 :
-- μεταγραφή, μετάφραση εντός συνδέσμου, μετάφραση χωρίς συνδέσμους (συμπληρώνει ο συντάκτης)
if transliteration ~= '' and translation ~= '' and translation_nolink == '' then
return lc['κείμενο']mytext .. ' (<span style="font-size:95%; letter-spacing:1px;">' ..
transliteration .. '</span>, ' .. '[[' ..translation .. ']])'
end
if transliteration ~= '' and translation == '' and translation_nolink ~= '' then
return lc['κείμενο']mytext .. ' (<span style="font-size:95%; letter-spacing:1px;">' ..
transliteration .. '</span>, ' .. translation_nolink .. ')'
end
if transliteration ~= '' and translation == '' and translation_nolink == '' then
return lc['κείμενο']mytext .. ' (<span style="font-size:95%; letter-spacing:1px;">' .. transliteration .. '</span>)'
end
if transliteration == '' and translation ~= '' and translation_nolink == '' then
return lc['κείμενο']mytext .. ' ([[' .. translation .. ']])'
end
if transliteration == '' and translation == '' and translation_nolink ~= '' then
return lc['κείμενο']mytext .. ' (' .. translation_nolink .. ')'
end
 
return lc['κείμενο']mytext
end
 
-- για μεγάλα κείμενα (param text= ή κειμ=) το [[Module:tin]] δίνει άρθρο θηλυκό, αιτιατική 'την' ή 'τη'
-- feminine article variations for longtext
Lf['την']fem_article_tin = require("Module:tin")
 
-- Export from
export['από πρότυπο'] = function(frame)
lc = {}
lc['παράμετροι λήμματος']myargs = frame:getParent().args
lemma_word = mw.title.getCurrentTitle().text
--lc['παράμετρος 1'] = lc['παράμετροι λήμματος'][1] or ''
template_name = template_function(frame)
--lc['παράμετρος 2'] = lc['παράμετροι λήμματος'][2] or ''
lc['τίτλος λήμματος'] = mw.title.getCurrentTitle().text
lc['πρότυπο'] = Lf['πρότυπο'](frame)
-- το Πρότυπο:ετυμ λειτουργεί από εδώ
if lc['πρότυπο']template_name == 'δαν' then return Lf['δάνειο'](lc) end
if lc['πρότυπο']template_name == 'λδαν' then return Lf['λόγιο δάνειο'](lc) end
if lc['πρότυπο']template_name == 'μτφδ' then return Lf['μεταφραστικό δάνειο'](lc) end
if lc['πρότυπο']template_name == 'απόδ' then return Lf['απόδοση'](lc) end
if lc['πρότυπο']template_name == 'σμσδ' then return Lf['σημασιολογικό δάνειο'](lc) end
if lc['πρότυπο']template_name == 'ορθδ' then return Lf['ορθογραφικό δάνειο'](lc) end
if lc['πρότυπο']template_name == 'φων' then return Lf['μεταγραφή'](lc) end
if lc['πρότυπο']template_name == 'κλη' then return Lf['κληρονομιά'](lc) end
if lc['πρότυπο']template_name == 'αναβ' then return Lf['αναβίωση'](lc) end
if lc['πρότυπο']template_name == 'μσν' then return Lf['μεσαιωνική'](lc) end
if lc['πρότυπο']template_name == 'υπο' then return Lf['υποκοριστικό'](lc) end
if lc['πρότυπο']template_name == 'μεγ' then return Lf['μεγεθυντικό'](lc) end
 
--απλή ετυμολόγηση = ετυμ: Προέλευση από
-- ΔΟΚΙΜΕΣ/TESTS (τα παρακάτω ΔΕΝ λειτουργούν)
if lc['πρότυπο'] == 'αρχ' then return Lf['αρχαία'](lc) end
if lc['πρότυπο'] == 'αρχ3' then return Lf['αρχαία'](lc) end
if lc['πρότυπο'] == 'ελνστ' then return Lf['ελληνιστική'](lc) end
if lc['πρότυπο'] == 'ιε' then return Lf['ινδοευρωπαϊκή ρίζα'](lc) end
if lc['πρότυπο'] == 'ετυμ-επιθ' then return Lf['επίθημα'](lc) end
--περίπτωση κανονικής ετυμολόγησης
return Lf['απλή ετυμολόγηση'](lc)
 
Γραμμή 190 ⟶ 181 :
 
 
-- ετυμ από Xoristzatziki (καλείται από το [[Πρότυπο:ετυμ]] και δημιουργεί Κατηγορίες Προέλευση από...)
-- ΑΠΛΗ ΕΤΥΜΟΛΟΓΗΣΗ - Derives from, originates from
Lf['απλή ετυμολόγηση'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '' or '' -- το default κείμενο είναι άδειο
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin (παράδειγμα: [[okyanus]])
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = 'προέλευσης από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Προέλευση, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Προέλευση, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso: if one iso is wrong, get error
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
--αν δεν υπάρχει το iso γλώσσας ετύμου στην param#1, ή iso γλώσσας-δέκτριας στην param#2, επίστρεψε σφάλμα
if Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso] == nil or Ldlanguages['γλώσσες'][lc['iso γλώσσας λήμματος']lang_target_iso] == nil then
return Lf['σφάλμα']errorhere('Κάποια παράμετρος (iso γλώσσας) είναι λάθος ή δεν υπάρχει ο κωδικός!')
else
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
lc['ascii']asciiSort = lc['παράμετροι λήμματος']myargs['ascii'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''"
else
if lc['ascii']asciiSort == '' then -- e.g. [[-ster]] (en)
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. '|' .. lc['ascii']asciiSort .. ']]'
end
end
Γραμμή 264 ⟶ 255 :
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 277 ⟶ 268 :
-- Δημιουργεί Κατηγορία:Δάνεια από... plus Προέλευση από... (παράδειγμα: [[αρένα]])
Lf['δάνειο'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '' or '' -- το default κείμενο είναι άδειο
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
-- test 'τη' at [[βανδαλισμός]], test 'την' at [[αβοκάντο]], test lemma without param |text=1 at [[πρελούδιο]]
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = '[[δάνειο]] από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Δάνεια, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Δάνεια, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso: if one iso is wrong, get error
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
--αν δεν υπάρχει το iso γλώσσας ετύμου στην param#1, ή iso γλώσσας-δέκτριας στην param#2, επίστρεψε σφάλμα
if Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso] == nil or Ldlanguages['γλώσσες'][lc['iso γλώσσας λήμματος']lang_target_iso] == nil then
return Lf['σφάλμα']errorhere('Κάποια παράμετρος (iso γλώσσας) είναι λάθος ή δεν υπάρχει ο κωδικός!')
else
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Δάνεια ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
Γραμμή 344 ⟶ 335 :
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 355 ⟶ 346 :
-- Δημιουργεί Κατηγορία:Λόγια δάνεια από... plus Προέλευση από... (παράδειγμα: [[ζενίθ]])
Lf['λόγιο δάνειο'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '([[λόγιος|λόγιο]] [[δάνειο]]) ' or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param notext= or 0=
lc['όχικείμενο']noDefaultText = lc['παράμετροι λήμματος']myargs['notext'] or ''
lc['μηδέν'] zero= lc['παράμετροι λήμματος']myargs['0'] or ''
if lc['όχικείμενο']noDefaultText ~= '' or lc['μηδέν'] zero~= '' then lc['κείμενο']mytext = '' else lc['κείμενο']mytext = '([[λόγιος|λόγιο]] [[δάνειο]]) ' end
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = '[[λόγιος|λόγιο]] [[δάνειο]] από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Λόγια δάνεια, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Λόγια δάνεια, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Λόγια δάνεια ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 432 ⟶ 423 :
-- Δημιουργεί Κατηγορία:Μεταφραστικά δάνεια από... (παράδειγμα: [[ουρανοξύστης]])
Lf['μεταφραστικό δάνειο'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '([[μεταφραστικό δάνειο]]) ' or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param notext= or 0=
lc['όχικείμενο']noDefaultText = lc['παράμετροι λήμματος']myargs['notext'] or ''
lc['μηδέν'] zero= lc['παράμετροι λήμματος']myargs['0'] or ''
if lc['όχικείμενο']noDefaultText ~= '' or lc['μηδέν'] zero~= '' then lc['κείμενο']mytext = '' else lc['κείμενο']mytext = '([[μεταφραστικό δάνειο]]) ' end
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = '[[μεταφραστικό δάνειο]] από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Μεταφραστικά δάνεια, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Μεταφραστικά δάνεια, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Μεταφραστικά δάνεια ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]'
-- 2019.03.10 Φεύγει: .. '[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 509 ⟶ 500 :
-- Δημιουργεί Κατηγορία:Μεταφραστικές αποδόσεις από... plus Προέλευση από... (παράδειγμα: [[αποικιοκρατία]])
Lf['απόδοση'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '([[απόδοση]]) ' or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param notext= or 0=
lc['όχικείμενο']noDefaultText = lc['παράμετροι λήμματος']myargs['notext'] or ''
lc['μηδέν'] zero= lc['παράμετροι λήμματος']myargs['0'] or ''
if lc['όχικείμενο']noDefaultText ~= '' or lc['μηδέν'] zero~= '' then lc['κείμενο']mytext = '' else lc['κείμενο']mytext = '([[απόδοση]]) ' end
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin (παράδειγμα: [[ανάδυση]])
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = '[[απόδοση]] για ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Μεταφραστικές αποδόσεις, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Μεταφραστικές αποδόσεις, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Μεταφραστικές αποδόσεις ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 587 ⟶ 578 :
-- Δημιουργεί Κατηγορία:Σημασιολογικά δάνεια από... (παράδειγμα: [[πληθωρισμός]], [[ποντίκι]])
Lf['σημασιολογικό δάνειο'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '([[σημασιολογικό δάνειο]]) ' or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param notext= or 0=
lc['όχικείμενο']noDefaultText = lc['παράμετροι λήμματος']myargs['notext'] or ''
lc['μηδέν'] zero= lc['παράμετροι λήμματος']myargs['0'] or ''
if lc['όχικείμενο']noDefaultText ~= '' or lc['μηδέν'] zero~= '' then lc['κείμενο']mytext = '' else lc['κείμενο']mytext = '([[σημασιολογικό δάνειο]]) ' end
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = '[[σημασιολογικό δάνειο]] από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Σημασιολογικά δάνεια, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Σημασιολογικά δάνεια, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Σημασιολογικά δάνεια ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]'
-- 2019.03.10 Φεύγει: .. '[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 665 ⟶ 656 :
-- Δημιουργεί Κατηγορία:Ορθογραφικά δάνεια από... plus Προέλευση από... (παράδειγμα [[ζέβρα]])
Lf['ορθογραφικό δάνειο'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '([[ορθογραφικό δάνειο]]) ' or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param notext= or 0=
lc['όχικείμενο']noDefaultText = lc['παράμετροι λήμματος']myargs['notext'] or ''
lc['μηδέν'] zero= lc['παράμετροι λήμματος']myargs['0'] or ''
if lc['όχικείμενο']noDefaultText ~= '' or lc['μηδέν'] zero~= '' then lc['κείμενο']mytext = '' else lc['κείμενο']mytext = '([[ορθογραφικό δάνειο]]) ' end
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = '[[ορθογραφικό δάνειο]] από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Ορθογραφικά δάνεια, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Ορθογραφικά δάνεια, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Ορθογραφικά δάνεια ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 741 ⟶ 732 :
-- Δημιουργεί Κατηγορία:Φωνητικές μεταγραφές από... plus Προέλευση από... (παράδειγμα: [[κέιτερινγκ]])
Lf['μεταγραφή'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '(φωνητική [[μεταγραφή]]) ' or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param notext= or 0=
lc['όχικείμενο']noDefaultText = lc['παράμετροι λήμματος']myargs['notext'] or ''
lc['μηδέν'] zero= lc['παράμετροι λήμματος']myargs['0'] or ''
if lc['όχικείμενο']noDefaultText ~= '' or lc['μηδέν'] zero~= '' then lc['κείμενο']mytext = '' else lc['κείμενο']mytext = '(φωνητική [[μεταγραφή]]) ' end
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = 'φωνητική [[μεταγραφή]] από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Φωνητικές μεταγραφές, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Φωνητικές μεταγραφές, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Φωνητικές μεταγραφές ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 818 ⟶ 809 :
-- Δημιουργεί Κατηγορία:Κληρονομημένες λέξεις από... plus Προέλευση από... (παράδειγμα: [[θησαυρός]])
Lf['κληρονομιά'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '' or '' -- το default κείμενο είναι άδειο
lc['ascii']asciiSort = lc['παράμετροι λήμματος']myargs['ascii'] or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = 'κληρονομημένη από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Κληρονομημένες λέξεις, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Κληρονομημένες λέξεις, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
lc['ascii']asciiSort = lc['παράμετροι λήμματος']myargs['ascii'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
if lc['ascii']asciiSort == '' then -- e.g. [[-etto]] (it)
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Κληρονομημένες λέξεις ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Κληρονομημένες λέξεις ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')|' .. lc['ascii']asciiSort .. ']]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. '|' .. lc['ascii']asciiSort .. ']]'
end
end
Γραμμή 887 ⟶ 878 :
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 898 ⟶ 889 :
-- Δημιουργεί Κατηγορία:Αναβιώσεις από... plus Προέλευση από... (παράδειγμα: [[αιδώς]], [[λάβαρο]])
Lf['αναβίωση'] = function(lc)
lang_donor_iso = myargs[1] or ''
lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
lang_target_iso = myargs[2] or ''
lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2] or ''
lc['έτυμο']word_donor = lc['παράμετροι λήμματος']myargs[3] or ''
word_donor_show = myargs[4] or ''
lc['εμφάνιση'] = lc['παράμετροι λήμματος'][4] or ''
lc['κείμενο']mytext = '([[λόγιος|λόγιο]]) ' or ''
-- easy-type διευκολύνσεις:
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'αρχ' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'ελν' or lc['iso γλώσσας ετύμου']lang_donor_iso == 'κοι' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'grc-koi' end
if lc['iso γλώσσας ετύμου']lang_donor_iso == 'μσν' then lc['iso γλώσσας ετύμου']lang_donor_iso = 'gkm' end
if lc['iso γλώσσας λήμματος']lang_target_iso == '' then lc['iso γλώσσας λήμματος']lang_target_iso = 'el' end -- el is assumed
-- param notext= or 0=
lc['όχικείμενο']noDefaultText = lc['παράμετροι λήμματος']myargs['notext'] or ''
lc['μηδέν'] zero= lc['παράμετροι λήμματος']myargs['0'] or ''
if lc['όχικείμενο']noDefaultText ~= '' or lc['μηδέν'] zero~= '' then lc['κείμενο']mytext = '' else lc['κείμενο']mytext = '([[λόγιος|λόγιο]]) < ' end
-- param text= or κειμ= for long text, requires [[Module:tin]], function tin
lc['μεγάλοκείμενο']longtext = lc['παράμετροι λήμματος']myargs['text'] or ''
lc['κειμ']longtextGr = lc['παράμετροι λήμματος']myargs['κειμ'] or ''
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' then
lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin'](Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['frm'] or '')
else lc['tinti']tin_or_ti = Lf['την']fem_article_tin['tin']('α') -- with 'α' the result will be 'την'
end
if lc['μεγάλοκείμενο']longtext ~= '' or lc['κειμ']longtextGr ~= '' then
lc['κείμενο']mytext = '[[λόγιος|λόγιο]] από ' .. lc['tinti']tin_or_ti .. ' '
else
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
end
 
-- param#1 και param#2 συνδυασμοί
-- 1) 0 + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Αναβιώσεις, πρέπει να εισάγετε τους κωδικούς iso των γλωσσών (1η και 2η παράμετρος)')
end
-- 2) 0 + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso == '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
mytext = mytext
lc['κείμενο'] = lc['κείμενο']
mw.addWarning('Αν θέλετε να μπει το λήμμα σε Κατηγορία:Αναβιώσεις, πρέπει να εισάγετε και τον κωδικό iso της γλώσσας-δότριας (1η παράμετρος)')
end
-- 3) iso + 0=el
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso == '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
end
-- 4) iso + iso
if lc['iso γλώσσας ετύμου']lang_donor_iso ~= '' and lc['iso γλώσσας λήμματος']lang_target_iso ~= '' then
lc['γλώσσα ετύμου']lang_donor = Ldlanguages['γλώσσες'][lc['iso γλώσσας ετύμου']lang_donor_iso]['name'] or ''
lang_donor_frm = languages[lang_donor_iso]['frm'] or ''
lc['γλώσσα ετύμου frm'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
lang_donor_apota = languages[lang_donor_iso]['apota'] or ''
lc['γλώσσα ετύμου apota'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['apota'] or ''
lang_target = languages[lang_target_iso]['name'] or ''
lc['γλώσσα λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['name'] or ''
lang_target_words = languages[lang_target_iso]['words'] or ''
lc['λέξεις γλώσσας λήμματος'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
lang_target_from = languages[lang_donor_iso]['from'] or ''
lc['προέλευσης γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' '
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "''[[" .. lc['γλώσσα ετύμου']lang_donor .. '|' .. lc['γλώσσα ετύμου frm']lang_donor_frm .. "]]''" .. ' ' ..
'[[Κατηγορία:Αναβιώσεις ' .. lc['γλώσσα ετύμου apota']lang_donor_apota .. ' (' ..lc['γλώσσα λήμματος']lang_target .. ')]]' ..
'[[Κατηγορία:' .. lc['λέξεις γλώσσας λήμματος']lang_target_words .. ' ' .. lc['προέλευσης γλώσσας ετύμου']lang_target_from .. ']]'
end
end
-- link στη λέξη-δότρια
if lc['έτυμο']word_donor ~= '' then
return Lf['λινκ']linkFunction('link')
end
 
return lc['κείμενο']mytext
end
 
Γραμμή 982 ⟶ 973 :
-- 2019.05.03. και παράμετρος για εμφάνιση λέξης
Lf['υποκοριστικό'] = function(lc)
local TOYAPOTOofGr = "''του''"
lc['κείμενο']mytext = "''[[υποκοριστικό]]'' " .. TOYAPOTOofGr .. " " or ''
if lc['παράμετροι λήμματος']myargs[1] == nil or lc['παράμετροι λήμματος']myargs[1] == '' then return lc['κείμενο']mytext end
wordbase = myargs[1]
lc['λέξη παραπομπής'] = lc['παράμετροι λήμματος'][1]
dim_suffix = myargs[2] or ''
lc['υποκοριστικό επίθημα'] = lc['παράμετροι λήμματος'][2] or ''
lang_iso = myargs[3] or ''
lc['iso γλώσσας'] = lc['παράμετροι λήμματος'][3] or ''
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['iso γλώσσας']lang_iso == '' then lc['iso γλώσσας']lang_iso = 'el' end
 
--if lc['παράμετροι λήμματος']myargs['γλ'] == nil or lc['παράμετροι λήμματος']myargs['γλ'] == '' then lc['iso γλώσσας']lang_iso = 'el' else lc['iso γλώσσας']lang_iso = lc['παράμετροι λήμματος']myargs['γλ'] end
lc['ενότητα γλώσσας']lang_link = Ldlanguages['γλώσσες'][lc['iso γλώσσας']lang_iso]['link'] or ''
lang_name = languages[lang_iso]['name'] or ''
--ευχής έργο θα ήταν να μπορούσαμε εδώ να κάνουμε έλεγχο αν είναι στη σωστή ενότητα γλώσσας. Μπορεί όμως να γίνει από μποτ.
lc['γλώσσα για κατηγορία'] = Ld['γλώσσες'][lc['iso γλώσσας']]['name'] or ''
 
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['εμφάνιση λέξης']wordbase_show ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['εμφάνιση λέξης']wordbase_show .. "]]"
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['λέξη παραπομπής']wordbase .. "]]"
end
-- param nocat= or 00=
if lc['υποκοριστικό επίθημα']dim_suffix ~= '' and lc['γλώσσα για κατηγορία']lang_name ~= '' then
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['εμφάνιση λέξης']wordbase_show ~= '' then
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['εμφάνιση λέξης']wordbase_show .. "]]" .. " + ''[[υποκοριστικό]] [[επίθημα]]'' " ..
"[[-" .. lc['υποκοριστικό επίθημα']dim_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['υποκοριστικό επίθημα']dim_suffix .. "]]"
else
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['λέξη παραπομπής']wordbase .. "]]" .. " + ''[[υποκοριστικό]] [[επίθημα]]'' " ..
"[[-" .. lc['υποκοριστικό επίθημα']dim_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['υποκοριστικό επίθημα']dim_suffix .. "]]"
end
else -- Κατηγορία ναι, Category yes
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['εμφάνιση λέξης']wordbase_show ~= '' then
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['εμφάνιση λέξης']wordbase_show .. "]]" .. " + ''[[υποκοριστικό]] [[επίθημα]]'' " ..
"[[-" .. lc['υποκοριστικό επίθημα']dim_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['υποκοριστικό επίθημα']dim_suffix .. "]]" ..
"[[Κατηγορία:Υποκοριστικά σε -" .. lc['υποκοριστικό επίθημα']dim_suffix
if lc['iso γλώσσας']lang_iso == 'el' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (νέα ελληνικά)]]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (' .. lc['γλώσσα για κατηγορία']lang_name ..')]]'
end -- claseclose if iso=el
else
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['λέξη παραπομπής']wordbase .. "]]" .. " + ''[[υποκοριστικό]] [[επίθημα]]'' " ..
"[[-" .. lc['υποκοριστικό επίθημα']dim_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['υποκοριστικό επίθημα']dim_suffix .. "]]" ..
"[[Κατηγορία:Υποκοριστικά σε -" .. lc['υποκοριστικό επίθημα']dim_suffix
if lc['iso γλώσσας']lang_iso == 'el' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (νέα ελληνικά)]]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (' .. lc['γλώσσα για κατηγορία']lang_name ..')]]'
end -- claseclose if iso=el
end
end -- close if nocat
end -- close if υποκοριστικό επίθημα
return lc['κείμενο']mytext
end
 
Γραμμή 1.045 ⟶ 1.035 :
-- Μεγεθυντικό - augmentative. 2019.05.03. [[Πρότυπο:μεγ]] κατά το 'Υποκοριστικό'
Lf['μεγεθυντικό'] = function(lc)
local TOYAPOTOofGr = "''του''"
lc['κείμενο']mytext = "''[[μεγεθυντικό]]'' " .. TOYAPOTOofGr .. " " or ''
if lc['παράμετροι λήμματος']myargs[1] == nil or lc['παράμετροι λήμματος']myargs[1] == '' then return lc['κείμενο']mytext end
wordbase = myargs[1]
lc['λέξη παραπομπής'] = lc['παράμετροι λήμματος'][1]
aug_suffix = myargs[2] or ''
lc['μεγεθυντικό επίθημα'] = lc['παράμετροι λήμματος'][2] or ''
lang_iso = myargs[3] or ''
lc['iso γλώσσας'] = lc['παράμετροι λήμματος'][3] or ''
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['iso γλώσσας']lang_iso == '' then lc['iso γλώσσας']lang_iso = 'el' end
lc['ενότητα γλώσσας']lang_link = Ldlanguages['γλώσσες'][lc['iso γλώσσας']lang_iso]['link'] or ''
lang_name = languages[lang_iso]['name'] or ''
lc['γλώσσα για κατηγορία'] = Ld['γλώσσες'][lc['iso γλώσσας']]['name'] or ''
 
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['εμφάνιση λέξης']wordbase_show ~= '' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['εμφάνιση λέξης']wordbase_show .. "]]"
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['λέξη παραπομπής']wordbase .. "]]"
end
 
if lc['μεγεθυντικό επίθημα']aug_suffix ~= '' and lc['γλώσσα για κατηγορία']lang_name ~= '' then
-- param nocat= or 00=
lc['όχικατηγορία']noCategory = lc['παράμετροι λήμματος']myargs['nocat'] or ''
lc['δύομηδενικά']doubleZero = lc['παράμετροι λήμματος']myargs['00'] or ''
if lc['όχικατηγορία']noCategory ~= '' or lc['δύομηδενικά']doubleZero ~= '' then
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['εμφάνιση λέξης']wordbase_show ~= '' then
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['εμφάνιση λέξης']wordbase_show .. "]]" .. " + ''[[μεγεθυντικό]] [[επίθημα]]'' " ..
"[[-" .. lc['μεγεθυντικό επίθημα']aug_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['μεγεθυντικό επίθημα']aug_suffix .. "]]"
else
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['λέξη παραπομπής']wordbase .. "]]" .. " + ''[[μεγεθυντικό]] [[επίθημα]]'' " ..
"[[-" .. lc['μεγεθυντικό επίθημα']aug_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['μεγεθυντικό επίθημα']aug_suffix .. "]]"
end
else -- Κατηγορία ναι, Category yes
wordbase_show = myargs[4] or ''
lc['εμφάνιση λέξης'] = lc['παράμετροι λήμματος'][4] or ''
if lc['εμφάνιση λέξης']wordbase_show ~= '' then
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['εμφάνιση λέξης']wordbase_show .. "]]" .. " + ''[[μεγεθυντικό]] [[επίθημα]]'' " ..
"[[-" .. lc['μεγεθυντικό επίθημα']aug_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['μεγεθυντικό επίθημα']aug_suffix .. "]]" ..
"[[Κατηγορία:Μεγεθυντικά σε -" .. lc['μεγεθυντικό επίθημα']aug_suffix
if lc['iso γλώσσας']lang_iso == 'el' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (νέα ελληνικά)]]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (' .. lc['γλώσσα για κατηγορία']lang_name ..')]]'
end -- claseclose if iso=el
else
lc['κείμενο']mytext = "[[" .. lc['λέξη παραπομπής']wordbase .. "#" .. lc['ενότητα γλώσσας']lang_link .. "|" .. lc['λέξη παραπομπής']wordbase .. "]]" .. " + ''[[μεγεθυντικό]] [[επίθημα]]'' " ..
"[[-" .. lc['μεγεθυντικό επίθημα']aug_suffix.. "#" .. lc['ενότητα γλώσσας']lang_link .. "|-" .. lc['μεγεθυντικό επίθημα']aug_suffix .. "]]" ..
"[[Κατηγορία:Μεγεθυντικά σε -" .. lc['μεγεθυντικό επίθημα']aug_suffix
if lc['iso γλώσσας']lang_iso == 'el' then
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (νέα ελληνικά)]]'
else
lc['κείμενο']mytext = lc['κείμενο']mytext .. ' (' .. lc['γλώσσα για κατηγορία']lang_name ..')]]'
end -- claseclose if iso=el
end
end -- close if nocat
end -- close if μεγεθυντικό επίθημα
return lc['κείμενο']mytext
end
 
--------------------------------------------------------------------------
-- Δ. ΔΟΚΙΜΑΣΤΙΚΑΜΕΣΑΙΩΝΙΚΗ -& TESTS --
--------------------------------------------------------------------------
 
--δεν λειτουργεί
Lf['αρχαία'] = function(lc)
lc['κείμενο'] = "[[w:Αρχαία ελληνική γλώσσα|''αρχαία ελληνική'']] "
return Lf['αρχαία τελικό'](lc)
end
 
-- δεν λειτουργεί
Lf['ελληνιστική'] = function(lc)
lc['κείμενο'] = "[[w:Ελληνική γλώσσα#Ελληνιστική κοινή|''ελληνιστική κοινή'']] "
return Lf['αρχαία τελικό'](lc)
end
 
-- 2019. mediaeval - Καλείται από το [[Πρότυπο:μσν]] και λειτουργεί
Lf['μεσαιωνική'] = function(lc)
lc['κείμενο']mytext = "[[w:Ελληνική γλώσσα#Μεσαιωνικήμεσαιωνικά Ελληνικήελληνικά|''μεσαιωνική ελληνική'']]"
if lc['παράμετροι λήμματος']myargs[1] == nil then return lc['κείμενο']mytext end
if lc['παράμετροι λήμματος']myargs[1] == '' then
lemma_link = lemma_word
lc['παραπομπή στο λήμμα'] = lc['τίτλος λήμματος']
else
lemma_link = myargs[1]
lc['παραπομπή στο λήμμα'] = lc['παράμετροι λήμματος'][1]
end
lc['κείμενο']mytext = lc['κείμενο']mytext .. " [[" .. lc['παραπομπή στο λήμμα']lemma_link .. "#" .. Ld['γλώσσες']languages['gkm']['link'] .. "|" .. lc['παραπομπή στο λήμμα']lemma_link .. "]]"
return lc['κείμενο']mytext
end
 
-- δεν λειτουργεί
-- not functioning. Links with Appendix:Reconstruction/ie (deprecated)
-- deprecated: Παράρτημα:Αμάρτυρες λέξεις/ιε/* could become *ine-pro/xxx (as in en.wikt: Reconstruction:Proto-Indo-European/xxx)
Lf['ινδοευρωπαϊκή ρίζα'] = function(lc)
mytext = "[[πρωτοϊνδοευρωπαϊκή|''πρωτοϊνδοευρωπαϊκή ρίζα'']] "
--αν επεκτεθεί ώστε να προστεθούν διαφορετικές σελίδες σε διαφορετικές οικογένειες
link_appendix = myargs[1] or ''
--θα πρέπει να προστεθούν ονομαστικές ή ανώνυμοι παράμετροι και να αλλαχθεί κάπως ο κώδικας εδώ
if link_appendix == '' then return mytext end
lc['κείμενο'] = "[[w:Ινδοευρωπαϊκές γλώσσες|''ινδοευρωπαϊκή (ρίζα)'']] "
mytext = mytext .. "*ine-pro" .. link_appendix .. "|*" .. link_appendix .. "]]"
lc['παραπομπή στο παράρτημα'] = lc['παράμετροι λήμματος'][1] or ''
return mytext
if lc['παραπομπή στο παράρτημα'] == '' then return lc['κείμενο'] end
lc['κείμενο'] = lc['κείμενο'] .. "[[Παράρτημα:Αμάρτυρες λέξεις/ιε/*" .. lc['παραπομπή στο παράρτημα'] .. "|*" .. lc['παραπομπή στο παράρτημα'] .. "]]"
return lc['κείμενο']
end