Βικιλεξικό

Module:Πρότυπο:ετυμ

Module:Πρότυπο:ετυμ/τεκμηρίωση: To Module:Πρότυπο:ετυμ είναι δοκιμαστικό.

Το Module δημιουργήθηκε για να επεξεργάζεται τα πρότυπα ετυμολόγησης μέσω κυρίως του {{ετυμ}}. Θεωρητικά μπορεί να αντικαταστήσει όλα τα πρότυπα "ετυμ ΧΧ" της Κατηγορία:Πρότυπα ετυμολογίας.

Επίσης μπορεί να επεξεργαστεί και κάποια κλασικά (για εδώ...) πρότυπα όπως το {{αρχ}}, {{μσν}}, {{ελνστ}}, {{ιε}} (για αυτά υπάρχει ήδη μέσα ο κώδικας).

Η μετάβαση ίσως δεν μπορεί να γίνει ακόμα αν κάποια χρησιμοποιούνται σε άλλη ενότητα, εκτός της ετυμολογίας, γιατί εντάσσει το λήμμα και σε κατηγορία. Θέλει ψάξιμο.

Ίσως και το όνομα να μην είναι ακριβές γιατί χρησιμοποιείται και από άλλα πρότυπα. Το Module:ετυμολόγηση ίσως είναι καλύτερο.

Η κλήση από το πρότυπο πρέπει να γίνεται με <includeonly> γιατί χρησιμοποιεί τις παραμέτρους του λήμματος οπότε θα εμφανίζει σφάλμα στο πρότυπο.

Το Module ελέγχει αρχικά αν κλήθηκε από κάποιο από τα {{αρχ}}, {{μσν}}, {{ελνστ}}, {{ιε}} και αν είναι έτσι τότε προωθεί τις παραμέτρους στην αντίστοιχη συνάρτηση.

Αν δεν κλήθηκε από αυτά, ελέγχει αν η δεύτερη παράμετρος είναι το "υποκ". (Το έφτιαξα έτσι γιατί στα πρότυπα για τα υποκοριστικά επικρατεί "λίγο" χάος. Αν ξεκαθαριστούν μπορεί να μετατραπεί ώστε να λειτουργεί όπως τα προηγούμενα. Δηλαδή να γίνεται έλεγχος για το όνομά του και να προωθούνται οι παράμετροι σε μια ανανεωμένη συνάρτηση "υποκοριστικά".)

Αν δεν έχει αυτήν την παράμετρο τότε προωθούνται οι παράμετροι στη συνάρτηση "κανονική ετυμολόγηση" όπου ισχύουν τα "κλασικά":

  • πρώτη αριθμητική παράμετρος είναι το iso της γλώσσας του ετύμου.
  • δεύτερη αριθμητική παράμετρος είναι το iso της γλώσσας της ετυμολογούμενης λέξης.
  • τρίτη αριθμητική παράμετρος είναι το λήμμα που περιέχει το έτυμο.
  • τέταρτη αριθμητική παράμετρος είναι μια πιθανά διαφορετική μορφή του ετύμου (π.χ. σε άλλη πτώση)

Για το πρότυπο ιε, αν δοθεί έτυμο (χωρίς αστεράκι μπροστά) φτιάχνει παραπομπή σε Παράρτημα:Αμάρτυρες λέξεις/ιε/*ΧΧΧΧ, και προσθέτει μπροστά από αυτό που εμφανίζει ένα αστεράκι.

Για την περίπτωση του υποκ χρησιμοποιείται η πρώτη παράμετρος για να οριστεί η λέξη της οποίας είναι υποκοριστικό. ΠΡΟΣΟΧΗ! Το Module θεωρεί ότι η λέξη που ετυμολογείται και το έτυμο ανήκουν στην ίδια γλώσσα. Δεν πρέπει να χρησιμοποιηθεί για ετυμολόγηση της ετυμολόγησης (την ετυμολόγηση, ω ετυμολόγηση :-) Αν δεν δοθεί παράμετρος για τη γλώσσα (παράμετρος: γλ) τότε θεωρεί ότι είναι ελληνική.

Στο πρότυπο μπορεί να δοθεί και παράμετρος κατ με το επίθημα που χρησιμοποιείται για τη δημιουργία του υποκοριστικού (χωρίς το ενωτικό μπροστά, για ευκολία) Αν δοθεί η παράμετρος τότε δημιουργεί παραπομπή προς το λήμμα που έχει το επίθημα (και την ανάλογη γλώσσα) και εντάσσει το λήμμα σε Κατηγορία:Υποκοριστικά σε -ΧΧΧΧ (γλώσσαετύμουκαιετυμολογούμενου). 

--1. κανονικά το module θα πρέπει πάντα να εντάσσει το λήμμα σε κάποια κατηγορία ετυμολόγησης
--2. μάλλον δεν χρειάζεται το frame:preprocess
--αν χρειάζεται το προσθέτουμε...
export = {}

local Ld = {}
--Ld['γλώσσες'] = mw.loadData("Module:γλώσσες")
Ld['γλώσσες'] = mw.loadData("Module:Languages")
--πίνακας με τις τοπικές συναρτήσεις
local Lf = {}

--βρες το όνομα του Προτύπου που κάλεσε το Module
--αλλά μόνο αν κλήθηκε από σελίδα που κάλεσε το πρότυπο
Lf['πρότυπο'] =  function(frame)
    if type(frame.args) == 'table' and type(frame.getParent) == 'function' then
        local templateobj = mw.title.new(frame:getParent():getTitle())
        if templateobj.namespace == 10 then -- NS_TEMPLATE
            return templateobj.text:match( "^%s*(.-)%s*$" )
        else
            return nil
        end
    else
        return nil
    end
end

Lf['σφάλμα'] =  function(astring)
    return '<div class="error">' .. astring .. '</div>[[Κατηγορία:Σελίδες με σφάλματα στο πρότυπο ετυμ]]'
end

export['βασική'] = function(frame)
    lc = {}
    lc['παράμετροι λήμματος'] = frame:getParent().args
    --lc['παράμετρος 1'] = lc['παράμετροι λήμματος'][1] or ''
    --lc['παράμετρος 2'] = lc['παράμετροι λήμματος'][2] or ''
    lc['τίτλος λήμματος'] = mw.title.getCurrentTitle().text
    lc['πρότυπο'] = Lf['πρότυπο'](frame)
    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
    if lc['πρότυπο'] == 'μτφδ-τεστ' then return Lf['μεταφραστικό δάνειο'](lc) end
    --if lc['πρότυπο'] == 'μσν' then return Lf['μεσαιωνική'](lc) end
    --if lc['πρότυπο'] == 'μσν' then return Lf['μεσαιωνική'](lc) end

    --δοκιμαστικό πρότυπο Πρότυπο:Χρήστης/Xoristzatziki/τεσταρχ με {{#invoke:Πρότυπο:ετυμ|βασική}} και στο λήμμα {{Χρήστης/Xoristzatziki/τεσταρχ...
    if lc['πρότυπο'] == 'Χρήστης/Xoristzatziki/τεσταρχ' then return Lf['τεσταρχ'](lc) end

    --δοκιμαστικό πρότυπο Πρότυπο:Χρήστης/Xoristzatziki/τεστιε με {{#invoke:Πρότυπο:ετυμ|βασική}} και στο λήμμα {{Χρήστης/Xoristzatziki/τεστιε...
    if lc['πρότυπο'] == 'Χρήστης/Xoristzatziki/τεστιε' then return Lf['ινδοευρωπαϊκή ρίζα'](lc) end


    --δοκιμαστικό πρότυπο Πρότυπο:Χρήστης/Xoristzatziki/τεστυποκ με {{#invoke:Πρότυπο:ετυμ|βασική}} και στο λήμμα {{Χρήστης/Xoristzatziki/τεστυποκ|υποκ...
    if lc['πρότυπο'] == 'Χρήστης/Xoristzatziki/τεστυποκ' then return Lf['υποκοριστικό'](lc) end

    --για τα υπόλοιπα:
    --αν η πρώτη παράμετρος είναι κάποια από τις:
    --αρχ, μσν, ελνστ, ιε ΙΣΩΣ να πήγαινει στις παραπάνω συναρτήσεις
    --αλλά θέλει αλλαγές στις παραμέτρους (στη σειρά τους δηλαδή)
    --ή μπορεί να κάνουμε ενδιάμεση συνάρτηση που να δημιουργεί νέες παραμέτρους

    --αν η πρώτη αριθμητική παράμετρος είναι κενή επέστρεψε σφάλμα
    --(δεν υπάρχει ακόμα κάποια χρήση για τέτοιες περιπτώσεις...)
    if lc['παράμετροι λήμματος'][1] == nil then
        error( 'Δεν δόθηκε καμία παράμετρος!' .. "#" .. type(frame.args) .. "#" .. type(frame.getParent) .. "#" .. lc['πρότυπο'] .. "#")
    end

    --αν είναι υποκ
    --(ή κάποιες που μπορεί να προστεθούν αργότερα όπως πρόθημα, επίθημα κλπ κατά τα αγγλικά Template:suffix κλπ.)
    --πήγαινε στην αντίστοιχη συνάρτηση (δες εκεί για τις υπόλοιπες παραμέτρους)
    --Αλλιώς θεώρησε ότι είναι το iso της γλώσσας του ετύμου
    --και η επόμενη είναι το iso της γλώσσας του λήμματος
    --τότε η τρίτη παράμετρος θα είναι το λήμμα για παραπομπή
    --και η τέταρτη ίσως είναι το τι θα εμφανίζει
    if lc['παράμετροι λήμματος'][1] == 'υποκ' then return Lf['υποκοριστικό'](lc) end

    if lc['παράμετροι λήμματος'][1] == 'επίθημα' then return Lf['επίθημα'](lc) end


    --περίπτωση κανονικής ετυμολόγησης
    return Lf['κανονική ετυμολόγηση'](lc)


end

--ΔΟΚΙΜΑΣΤΙΚΑ ΓΙΑ ΑΡΧΙΚΟ ΕΛΕΓΧΟ. ΝΑ ΑΦΑΙΡΕΘΟΥΝ. ----------------------------------------------
Lf['τεσταρχ'] = function(lc)
    return Lf['αρχαία'](lc)
end
Lf['τεστυποκ'] = function(lc)
    return Lf['αρχαία'](lc)
end
--ΤΕΛΟΣ ΤΟΥ ΝΑ ΑΦΑΙΡΕΘΟΥΝ. --------------------------------------------------------------------

--ΚΥΡΙΕΣ ΣΥΝΑΡΤΗΣΕΙΣ ΓΙΑ ΤΗΝ ΕΤΥΜΟΛΟΓΗΣΗ
--ΚΛΑΣΙΚΑ ΠΡΟΤΥΠΑ
Lf['αρχαία'] = function(lc)
    lc['κείμενο'] = "[[w:Αρχαία ελληνική γλώσσα|''αρχαία ελληνική'']] "
    return Lf['αρχαία τελικό'](lc)
end

Lf['ελληνιστική'] = function(lc)
    lc['κείμενο'] = "[[w:Ελληνική γλώσσα#Ελληνιστική κοινή|''ελληνιστική κοινή'']] "
    return Lf['αρχαία τελικό'](lc)
end

Lf['επίθημα'] = function(lc)
	lc['λέξη'] = lc['παράμετροι λήμματος'][2] or ''
	lc['επίθημα'] = lc['παράμετροι λήμματος'][3] or ''
	lc['iso γλώσσας'] = lc['παράμετροι λήμματος']['γλ'] or ''
	lc['κείμενο'] = Lf['σφάλμα']('Δόθηκαν λάθος παράμετροι.')
	if (lc['iso γλώσσας'] ~= '') and  (Ld['γλώσσες'][lc['iso γλώσσας']] ~= nil)  then
		if lc['λέξη'] ~= '' then
			if lc['επίθημα'] ~= '' then
				lc['κείμενο'] =  "[[" .. lc['λέξη'] .. "]] " .. " + επίθημα [[-" .. lc['επίθημα'] .. "]]"
				if mw.ustring.sub(lc['τίτλος λήμματος'],-mw.ustring.len(lc['επίθημα'])) == lc['επίθημα'] then
					lc['κείμενο'] = lc['κείμενο'] .. "[[Κατηγορία:" .. Ld['γλώσσες'][lc['iso γλώσσας']]['words'] .. " με επίθημα: -" .. lc['επίθημα'] .. "]]"
				else
					mw.addWarning('Η ετυμολόγηση του επιθήματος δεν αναφέρεται στο λήμμα!')
				end 
			else
				mw.addWarning('Δεν δώσατε τιμή στη δεύτερη παράμετρο (επίθημα).')
			end
		else
			mw.addWarning('Δεν δώσατε τιμή στην πρώτη παράμετρο.')
		end	
	else
		mw.addWarning('Δώσατε λάθος τιμή στην παράμετρο iso γλώσσας της ετυμολογούμενης λέξης.')
	end
    return lc['κείμενο']
end




Lf['μεταφραστικό δάνειο'] = function(lc)
	lc['iso ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
	lc['iso ετυμολογούμενης'] = lc['παράμετροι λήμματος'][2] or ''
	lc['έτυμο'] = lc['παράμετροι λήμματος']['λ'] or ''
    lc['κείμενο'] = "[[μεταφραστικό δάνειο]] από την "
    if lc['έτυμο'] ~= '' then
	    if lc['iso ετύμου'] ~= '' then
	    	if Ld['γλώσσες'][lc['iso ετύμου']] ~= nil then
	    		lc['κείμενο'] = lc['κείμενο'] .. '{{λ|'.. lc['έτυμο'] .. '|' .. lc['iso ετύμου'] .. '}}'
	    		if lc['iso ετυμολογούμενης'] == '' then
	    			mw.addWarning('Δώσατε λάθος τιμή στη δεύτερη παράμετρο (iso γλώσσας της ετυμολογούμενης λέξης). Δεν θα ενταχθεί σε κατηγορία ετυμολογίας.')
	    		else
	    			--;;;
	    			lc['κείμενο'] = lc['κείμενο'] .. '[[Κατηγορία:Δάνεια από τα ' .. Ld['γλώσσες'][lc['iso ετύμου']]['name'] .. ' (' .. Ld['γλώσσες'][lc['iso ετυμολογούμενης']]['name'] .. ')]]'
	    		end
	    	end
	    end
	end
    return lc['κείμενο']
end

Lf['αρχαία τελικό'] = function(lc)
    --για παραμέτρους που θα δείχνουν άλλη λέξη από τη λέξη παραπομπής
    --και για παραμέτρους που θα περιέχουν τη γλώσσα του ετυμολογούμενου λήμματος
    --καλύτερα να μπουν ονομαστικά
    --π.χ. γλ και λ:
    --γλ=la (ή it ή de κλπ.)
    --λ=λέξησεάλληπτώση
    if lc['παράμετροι λήμματος'][1] == nil then return lc['κείμενο'] end
    if lc['παράμετροι λήμματος'][1] == '' then
        lc['παραπομπή στο λήμμα'] = lc['τίτλος λήμματος']
    else
        lc['παραπομπή στο λήμμα'] = lc['παράμετροι λήμματος'][1]
    end
    lc['κείμενο'] = lc['κείμενο'] .. "[[" .. lc['παραπομπή στο λήμμα'] .. "#" .. Ld['γλώσσες']['grc']['link'] .. "|" .. lc['παραπομπή στο λήμμα'] .. "]]"
    return lc['κείμενο']
end

Lf['μεσαιωνική'] = function(lc)
    lc['κείμενο'] = "[[w:Ελληνική γλώσσα#Μεσαιωνική Ελληνική|''μεσαιωνική ελληνική'']]"
    if lc['παράμετροι λήμματος'][1] == nil then return lc['κείμενο'] end
    if lc['παράμετροι λήμματος'][1] == '' then
        lc['παραπομπή στο λήμμα'] = lc['τίτλος λήμματος']
    else
        lc['παραπομπή στο λήμμα'] = lc['παράμετροι λήμματος'][1]
    end
    lc['κείμενο'] = lc['κείμενο'] .. "[[" .. lc['παραπομπή στο λήμμα'] .. "#" .. Ld['γλώσσες']['gkm']['link'] .. "|" .. lc['παραπομπή στο λήμμα'] .. "]]"
    return lc['κείμενο']
end

Lf['ινδοευρωπαϊκή ρίζα'] = function(lc)
    --αν επεκτεθεί ώστε να προστεθούν διαφορετικές σελίδες σε διαφορετικές οικογένειες
    --θα πρέπει να προστεθούν ονομαστικές ή ανώνυμοι παράμετροι και να αλλαχθεί κάπως ο κώδικας εδώ
    lc['κείμενο'] = "[[w:Ινδοευρωπαϊκές γλώσσες|''ινδοευρωπαϊκή (ρίζα)'']] "
    lc['παραπομπή στο παράρτημα'] = lc['παράμετροι λήμματος'][1] or ''
    if lc['παραπομπή στο παράρτημα'] == '' then return lc['κείμενο'] end
    lc['κείμενο'] = lc['κείμενο'] .. "[[Παράρτημα:Αμάρτυρες λέξεις/ιε/*" .. lc['παραπομπή στο παράρτημα'] .. "|*" .. lc['παραπομπή στο παράρτημα'] .. "]]"
    return lc['κείμενο']
end

--ΥΠΟΠΕΡΙΠΤΩΣΕΙΣ
Lf['υποκοριστικό'] = function(lc)
    --υπόθεση:
    --{{ετυμ|υποκ|λέξη|γλ=el|κατ=άκι}}
    --αν δεν υπάρχει το γλ σημαίνει ελληνικά
    --(το γλ θα αναφέρεται σε όλα, και στη λέξη και στην κατάληξη)
    local TOYAPOTO = "''του:''"
    lc['κείμενο'] = "[[υποκοριστικό|''υποκοριστικό'']] " .. TOYAPOTO .. " "
    --προσθέτει παραπομπή στη λέξη
    --δεν έχει νόημα το κενό εδώ (δηλαδή στη δεύτερη αριθμητική παράμετρο)
    if lc['παράμετροι λήμματος'][2] == nil or lc['παράμετροι λήμματος'][2] == '' then return lc['κείμενο']  end
    lc['λέξη παραπομπής'] = lc['παράμετροι λήμματος'][2]
    if lc['παράμετροι λήμματος']['γλ'] == nil or lc['παράμετροι λήμματος']['γλ'] == '' then lc['iso γλώσσας'] = 'el' else lc['iso γλώσσας'] = lc['παράμετροι λήμματος']['γλ'] end
    lc['ενότητα γλώσσας'] = Ld['γλώσσες'][lc['iso γλώσσας']]['link'] or ''
    lc['γλώσσα για κατηγορία'] = Ld['γλώσσες'][lc['iso γλώσσας']]['name'] or ''

    if lc['ενότητα γλώσσας'] ~= '' then
        lc['κείμενο'] = lc['κείμενο'] .. "[[" .. lc['λέξη παραπομπής'] .. "#" .. lc['ενότητα γλώσσας'] .. "|" .. lc['λέξη παραπομπής'] .. "]]"
    end
    --αν έχει και την κατάληξη προσθέτει παραπομπή στο λήμμα του επιθήματος
    lc['υποκοριστικό επίθημα'] = lc['παράμετροι λήμματος']['κατ'] or ''
    
    if lc['υποκοριστικό επίθημα'] ~= '' and lc['γλώσσα για κατηγορία']  ~= '' then
        lc['κείμενο'] = lc['κείμενο'] .. " + υποκοριστικό επίθημα "
        lc['κείμενο'] = lc['κείμενο'] .. "[[-" .. lc['παράμετροι λήμματος']['κατ'].. "#" .. lc['ενότητα γλώσσας'] .. "|-" .. lc['παράμετροι λήμματος']['κατ'] .. "]]"
        lc['κείμενο'] = lc['κείμενο'] .. "[[Κατηγορία:Υποκοριστικά σε -" .. lc['παράμετροι λήμματος']['κατ'] .. ' (' .. lc['γλώσσα για κατηγορία'] ..')]]'
    end
    return lc['κείμενο']
end

--ΚΛΑΣΙΚΗ ΕΤΥΜΟΛΟΓΗΣΗ
Lf['κανονική ετυμολόγηση'] = function(lc)
    --διαβάζουμε το iso γλώσσας ετύμου από την πρώτη παράμετρο
    lc['iso γλώσσας ετύμου'] = lc['παράμετροι λήμματος'][1] or ''
    --αν δεν υπάρχει ή είναι κενό επέστρεψε σφάλμα
    if Ld['γλώσσες'][lc['iso γλώσσας ετύμου']] == '' then
        return Lf['σφάλμα']('Η πρώτη παράμετρος (το iso της γλώσσας του ετύμου) είναι εσφαλμένη ή δεν δόθηκε!')
    end
    lc['ενότητα γλώσσας ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['link'] or ''
    lc['γλώσσα ετύμου'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['name'] or ''
    --αν δεν υπάρχει καταχωρισμένο όνομα γλώσσας επέστρεψε σφάλμα
    if lc['γλώσσα ετύμου'] == '' then
        return Lf['σφάλμα']( 'Δεν βρέθηκε όνομα γλώσσας του ετύμου: "' .. lc['iso γλώσσας ετύμου'] .. '"!')
    end
    --και η δεύτερη αριθμητική παράμετρος πρέπει να υπάρχει
    if lc['παράμετροι λήμματος'][2] == nil then
        return Lf['σφάλμα']( 'Δεν δόθηκε δεύτερη παράμετρος (το iso της γλώσσας)!')
    end
    lc['iso γλώσσας λήμματος'] = lc['παράμετροι λήμματος'][2]
    --αν είναι κενή τότε υποθέτουμε τα ελληνικά
    if lc['iso γλώσσας λήμματος'] == '' then lc['iso γλώσσας λήμματος'] = 'el' end
    --αν δεν υπάρχει το iso επέστρεψε σφάλμα
    if Ld['γλώσσες'][lc['iso γλώσσας λήμματος']] == nil then
        return Lf['σφάλμα']('Η δεύτερη παράμετρος (το iso της γλώσσας της ετυμολογούμενης λέξης) είναι εσφαλμένη ή δεν δόθηκε!')
    end
    lc['επίθετο γλώσσας'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['frm'] or ''
    if lc['επίθετο γλώσσας'] == '' then
        return Lf['σφάλμα']( 'Δεν βρέθηκε παράμετρος frm για τη γλώσσα του ετύμου: "' .. lc['iso γλώσσας ετύμου'] .. '"!')
    end
    --προετοιμασία παραπομπής
    lc['παραπομπή στη Βικιπαίδεια'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['wiki'] or ''
    if lc['παραπομπή στη Βικιπαίδεια'] ~= '' then
        lc['κείμενο'] = "''[[w:" .. lc['παραπομπή στη Βικιπαίδεια'] .. '|' .. lc['επίθετο γλώσσας'] .. "]]'' "
    else
        lc['κείμενο'] = "''" .. lc['επίθετο γλώσσας'] .. "'' "
    end

    --αν έχει δώσει και το έτυμο
    lc['έτυμο'] = lc['παράμετροι λήμματος'][3] or ''
    --θα δείξουμε το έτυμο αν δεν έχει δώσει 4η παράμετρο
    lc['λέξη που δείξουμε'] = lc['παράμετροι λήμματος'][4] or lc['έτυμο']

    if lc['έτυμο'] ~= '' then
        --αν έχει ενότητα η γλώσσα του ετύμου φτιάξε παραπομπή
        if lc['ενότητα γλώσσας ετύμου'] ~= '' then
            lc['κείμενο'] = lc['κείμενο'] .. "[[" .. lc['έτυμο'] .. '#' .. lc['ενότητα γλώσσας ετύμου'] .. '|' .. lc['λέξη που δείξουμε'] .. ']]'
        else
            lc['κείμενο'] = lc['κείμενο'] .. lc['λέξη που δείξουμε']
            --αν το έτυμο είναι διαφορετικό από τη λέξη που θέλει να δείξουμε βάζουμε το έτυμο σε παρένθεση
            --(αν βρεθεί περίπτωση που δεν θέλουμε να γίνεται, για κάποιον λόγο, μπορούμε να προσθέσουμε παράμετρο που να μην το έμφανίζει)
            if lc['έτυμο'] ~= lc['λέξη που δείξουμε'] then lc['κείμενο'] = lc['κείμενο'] .. '(' .. lc['έτυμο'] .. ')' end
        end
    end
    lc['γλώσσα λήμματος για κατηγορία'] = Ld['γλώσσες'][lc['iso γλώσσας λήμματος']]['words'] or ''
    lc['γλώσσα ετύμου για κατηγορία'] = Ld['γλώσσες'][lc['iso γλώσσας ετύμου']]['from'] or ''
    if lc['γλώσσα λήμματος για κατηγορία'] ~= '' and lc['γλώσσα ετύμου για κατηγορία'] ~= '' then
    	--αν η γλώσσα του λήμματος είναι η ελληνική δημιουργεί κατηγορία  Δάνεια από τα .. αλλιώς δημιουργεί κατηγορία ΧΧΧ λέξεις ΧΧΧ προέλευσης
    	if lc['iso γλώσσας λήμματος'] == 'el' then
    		lc['κείμενο'] = lc['κείμενο'] .. '[[Κατηγορία:Δάνεια από τα ' .. lc['γλώσσα ετύμου'] .. ']]'
    	else
        	lc['κείμενο'] = lc['κείμενο'] .. '[[Κατηγορία:' .. lc['γλώσσα λήμματος για κατηγορία'] .. ' ' .. lc['γλώσσα ετύμου για κατηγορία'] .. ']]'
        end
    else
        lc['κείμενο'] = lc['κείμενο'] .. '[[Κατηγορία:Σελίδες χωρίς κατηγοριοποίηση ετυμολόγησης]]'
    end
    return lc['κείμενο']
end

return export
Ανακτήθηκε από "https://el.wiktionary.org/w/index.php?title=Module:Πρότυπο:ετυμ&oldid=3964779"