diff options
Diffstat (limited to 'macros/latex/exptl/mem/greek.tex')
-rw-r--r-- | macros/latex/exptl/mem/greek.tex | 307 |
1 files changed, 307 insertions, 0 deletions
diff --git a/macros/latex/exptl/mem/greek.tex b/macros/latex/exptl/mem/greek.tex new file mode 100644 index 0000000000..d87831b041 --- /dev/null +++ b/macros/latex/exptl/mem/greek.tex @@ -0,0 +1,307 @@ +%$Lamed
+\documentclass{book}
+
+% Aρadir los controles como A0 = no break space.
+
+%\tracingcommands2
+%\tracingmacros2
+%\ocptracelevel=3
+\errorcontextlines20
+
+
+%\def\rmdefault{omlgc}
+
+\usepackage[charset=isoell,english,spanish,french,greek]{mem}
+
+\languageunset
+\makeatletter
+\def\memh@verbatim{0}%
+\def\mem@b{verbatim}%
+\DeclareLanguage{verbatim}
+\mem@setencs{verbatim}{T1,ULA,OT1,UEL,LGR,T2A,UCY,LWN,LCY,OT2}
+\makeatother
+\languagereset
+
+\sloppy
+
+% For some reason grmo font doesn't work for me (task, see
+% why):
+\def\sldefault{it}
+
+%%%%%%%%%%%%%%%%%% Revisar esto:
+
+\scriptproperties{La}{rmfamily=pbk}
+
+\languageproperties{spanish}{charset = isolat1}
+
+\languageproperties{french}{
+ charset = isolat1,
+ uppercase = unaccented}
+
+\languageproperties{greek}{fontencs=LGR,rmfamily =cmr}
+
+% Surprise, surprise: omlgc does not have the Extended Greek page
+% thus meaning it cannot be considered a UEL font :-(. It has these
+% characters, but at non standard places, so a new enconding should
+% be added (LOG, Local Omega Greek).
+
+%\languageproperties{greek}{rmfamily= omlgc}
+
+\raggedright
+\parindent1.5pc
+
+% Verbatim with a different script to be fixed
+
+\makeatletter
+\mem@after\verbatim@font{\languageset{english}}
+\makeatother
+
+\begin{document}
+
+\tableofcontents
+
+\chapter{Ο Σύλλογος Ελλήνων Φίλων του TeX}
+
+\englishtext{What a black box means is that character is not available
+in the current enconding. It happens the LGR encoding has not Latin
+letters. The log file will have lines similar to: \texttt{Package Mem
+Warning: Unknown character 88 on input line 194.}}
+
+\section{Ο Σύλλογος Ελλήνων Φίλων του TeX}
+
+\frenchtext{With ascii input (Omega conventions):}
+{\languagetext[input=tex]{greek}{<'ahy opr'e `o =w 'a| >h|}}
+\frenchtext{{\ttfamily <'ahy opr'e `o =w 'a| >h|} A few letters with utf-8
+input:} \languagetext[charset=utf8]{greek}{αΌ
ὦἷἯ} \frenchtext{Note
+LGR contains \textit{no} Latin letter. Below is an extended sample in
+polytonic Greek.}
+
+.e.{\tracingmacros2 α\unitext{^^^^0301}.\^{α}}.
+
+Ο \textit{Σύλλογος Ελλήνων Φίλων του TeX (ή ΕΦΤ για
+συντομία) αποτελεί την επίσημη Τοπική Ομάδα του TeX ή Ελληνικό LUG
+(Local Users Group).} Ο ΕΦΤ αποσκοπεί στην διάδοση του
+TeX
+για την στοιχειοθεσία ελληνικών στην Ελλάδα και στο εξωτερικό.
+Επίσης πρόκειται
+να συνδράμει στην βελτίωση και εφαρμογή στα ελληνικά δεδομένα των
+εργαλείων
+του συστήματος TeX και στην δημιουργία νέων εργαλείων
+(π.χ. του γα)
+που θα διευκολύνουν την παραγωγή εντύπων στην
+ελληνική γλώσσα (αρχαία και νέα). \frenchtext{Ηa va, ηa va trθs
+bien. Tiens! qu'est-ce qu'ils peuvent regarder, ces jeunes gens?}
+ Τέλος, πρόθεση μας είναι επίσης η μελέτη, διατήρηση και εφαρμογή
+των αξιών της παραδοσιακής ελληνικής τυπογραφίας στην εποχή των Η/Υ.
+
+\section{Οποισδήποτε ηλικίας}
+
+Οποισδήποτε ηλικίας 18 και άνω και σύμφωνος με το
+καταστατικό
+του συλλόγου μπορεί να γίνει μέλος του συλλόγου. Θα πρέπει γι' αυτό να
+στείλει στον πρόεδρο του συλλόγου
+ενυπόγραφη επιστολή στην οποία να δηλώνει ότι επιθυμεί να γίνει μέλος και
+ότι εκπληρεί τις παραπάνω προϋποθέσεις. Επίσης η επιστολή αυτή πρέπει να
+περιέχει το ονοματεπώνυμο, το όνομα πατέρα, την διεύθυνση,
+τον αριθμό τηλεφώνου ή την ηλεκτρονική
+διεύθυνση του/της ενδιαφερομένου/νης. Τα αποδεκτά μέλη πληρώνουν τέλη εγγραφής
+που ανέρχονται στο ποσό των 5000 δραχμών (ή 20 δολλαρίων ΗΠΑ). Όλα τα μέλη
+πληρώνουν εξαμηνιαία συνδρομή 2000 δραχμών (ή 8 δολλαρίων ΗΠΑ). (Πληροφορίες
+για τους διαφόρους τρόπους πληρωμής
+μπορείτε να βρήτε στην αντίστοιχη ενότητα αυτών των σελίδων.)
+
+\begin{french}
+
+\section{Ηa va trθs bien (inside an environment)}
+
+\end{french}
+
+\section{Ο Σύλλογος Ελλήνων Φίλων του TeX}
+
+Ο Σύλλογος Ελλήνων Φίλων του TeX (ή ΕΦΤ για
+συντομία) αποτελεί την επίσημη Τοπική Ομάδα του TeX ή Ελληνικό LUG
+(Local Users Group). Ο ΕΦΤ αποσκοπεί στην διάδοση του
+TeX
+για την στοιχειοθεσία ελληνικών στην Ελλάδα και στο εξωτερικό.
+Επίσης πρόκειται
+να συνδράμει στην βελτίωση και εφαρμογή στα ελληνικά δεδομένα των
+εργαλείων
+του συστήματος TeX και στην δημιουργία νέων εργαλείων
+(π.χ. του γα)
+που θα διευκολύνουν την παραγωγή εντύπων στην
+ελληνική γλώσσα (αρχαία \frenchtext{Ηa va, ηa va trθs bien}
+και νέα). Τέλος, πρόθεση μας είναι επίσης η μελέτη, διατήρηση και εφαρμογή
+των αξιών της παραδοσιακής ελληνικής τυπογραφίας στην εποχή των Η/Υ.
+
+\section{Οποισδήποτε ηλικίας}
+
+Οποισδήποτε ηλικίας 18 και άνω και σύμφωνος με το
+καταστατικό
+του συλλόγου μπορεί να γίνει μέλος του συλλόγου. Θα πρέπει γι' αυτό να
+στείλει στον πρόεδρο του συλλόγου
+ενυπόγραφη επιστολή στην οποία να δηλώνει ότι επιθυμεί να γίνει μέλος και
+ότι εκπληρεί τις παραπάνω προϋποθέσεις. Επίσης η επιστολή αυτή πρέπει να
+περιέχει το ονοματεπώνυμο, το όνομα πατέρα, την διεύθυνση,
+τον αριθμό τηλεφώνου ή την ηλεκτρονική
+διεύθυνση του/της ενδιαφερομένου/νης. Τα αποδεκτά μέλη πληρώνουν τέλη εγγραφής
+που ανέρχονται στο ποσό των 5000 δραχμών (ή 20 δολλαρίων ΗΠΑ). Όλα τα μέλη
+πληρώνουν εξαμηνιαία συνδρομή 2000 δραχμών (ή 8 δολλαρίων ΗΠΑ). (Πληροφορίες
+για τους διαφόρους τρόπους πληρωμής
+μπορείτε να βρήτε στην αντίστοιχη ενότητα αυτών των σελίδων.)
+
+\section{Ο Σύλλογος Ελλήνων Φίλων του TeX}
+
+Ο Σύλλογος Ελλήνων Φίλων του TeX (ή ΕΦΤ για
+συντομία) αποτελεί την επίσημη Τοπική Ομάδα του TeX ή Ελληνικό LUG
+(Local Users Group). Ο ΕΦΤ αποσκοπεί στην διάδοση του
+TeX
+για την στοιχειοθεσία ελληνικών στην Ελλάδα και στο εξωτερικό.
+Επίσης πρόκειται
+να συνδράμει στην βελτίωση και εφαρμογή στα ελληνικά δεδομένα των
+εργαλείων
+του συστήματος TeX και στην δημιουργία νέων εργαλείων
+(π.χ. του γα)
+που θα διευκολύνουν την παραγωγή εντύπων στην
+ελληνική γλώσσα (αρχαία \frenchtext{Ηa va, ηa va trθs bien}
+και νέα). Τέλος, πρόθεση μας είναι επίσης η μελέτη, διατήρηση και εφαρμογή
+των αξιών της παραδοσιακής ελληνικής τυπογραφίας στην εποχή των Η/Υ.
+
+\section{Οποισδήποτε ηλικίας}
+
+Οποισδήποτε ηλικίας 18 και άνω και σύμφωνος με το
+καταστατικό
+του συλλόγου μπορεί να γίνει μέλος του συλλόγου. Θα πρέπει γι' αυτό να
+στείλει στον πρόεδρο του συλλόγου
+ενυπόγραφη επιστολή στην οποία να δηλώνει ότι επιθυμεί να γίνει μέλος και
+ότι εκπληρεί τις παραπάνω προϋποθέσεις. Επίσης η επιστολή αυτή πρέπει να
+περιέχει το ονοματεπώνυμο, το όνομα πατέρα, την διεύθυνση,
+τον αριθμό τηλεφώνου ή την ηλεκτρονική
+διεύθυνση του/της ενδιαφερομένου/νης. Τα αποδεκτά μέλη πληρώνουν τέλη εγγραφής
+που ανέρχονται στο ποσό των 5000 δραχμών (ή 20 δολλαρίων ΗΠΑ). Όλα τα μέλη
+πληρώνουν εξαμηνιαία συνδρομή 2000 δραχμών (ή 8 δολλαρίων ΗΠΑ). (Πληροφορίες
+για τους διαφόρους τρόπους πληρωμής
+μπορείτε να βρήτε στην αντίστοιχη ενότητα αυτών των σελίδων.)
+
+%\begin{french}
+
+\section{\frenchtext{Ηa va trθs bien (changed in argument)}}
+
+%\end{french}
+
+\section{Ο Σύλλογος Ελλήνων Φίλων του TeX}
+
+Ο Σύλλογος Ελλήνων Φίλων του TeX (ή ΕΦΤ για
+συντομία) αποτελεί την επίσημη Τοπική Ομάδα του TeX ή Ελληνικό LUG
+(Local Users Group). Ο ΕΦΤ αποσκοπεί στην διάδοση του
+TeX
+για την στοιχειοθεσία ελληνικών στην Ελλάδα και στο εξωτερικό.
+Επίσης πρόκειται
+να συνδράμει στην βελτίωση και εφαρμογή στα ελληνικά δεδομένα των
+εργαλείων
+του συστήματος TeX και στην δημιουργία νέων εργαλείων
+(π.χ. του γα)
+που θα διευκολύνουν την παραγωγή εντύπων στην
+ελληνική γλώσσα (αρχαία \frenchtext{Ηa va, ηa va trθs bien}
+και νέα). Τέλος, πρόθεση μας είναι επίσης η μελέτη, διατήρηση και εφαρμογή
+των αξιών της παραδοσιακής ελληνικής τυπογραφίας στην εποχή των Η/Υ.
+
+\section{Οποισδήποτε ηλικίας}
+
+Οποισδήποτε ηλικίας 18 και άνω και σύμφωνος με το
+καταστατικό
+του συλλόγου μπορεί να γίνει μέλος του συλλόγου. Θα πρέπει γι' αυτό να
+στείλει στον πρόεδρο του συλλόγου
+ενυπόγραφη επιστολή στην οποία να δηλώνει ότι επιθυμεί να γίνει μέλος και
+ότι εκπληρεί τις παραπάνω προϋποθέσεις. Επίσης η επιστολή αυτή πρέπει να
+περιέχει το ονοματεπώνυμο, το όνομα πατέρα, την διεύθυνση,
+τον αριθμό τηλεφώνου ή την ηλεκτρονική
+διεύθυνση του/της ενδιαφερομένου/νης. Τα αποδεκτά μέλη πληρώνουν τέλη εγγραφής
+που ανέρχονται στο ποσό των 5000 δραχμών (ή 20 δολλαρίων ΗΠΑ). Όλα τα μέλη
+πληρώνουν εξαμηνιαία συνδρομή 2000 δραχμών (ή 8 δολλαρίων ΗΠΑ). (Πληροφορίες
+για τους διαφόρους τρόπους πληρωμής
+μπορείτε να βρήτε στην αντίστοιχη ενότητα αυτών των σελίδων.)
+
+\newpage
+
+\frenchtext{Latin traslit:}
+
+\begin{languageset}[input=tex]{greek}
+ka`i E>ust'ajioc m`en <o >Antioqe'iac
+>ep'iskopoc dias'urei t`on Pamf'ilou E>us'ebion <wc t`hn >en Nika'ia|
+p'istin paraqar'attonta, d`e t`hn m`en >en Nika'ia| p'istin o>'u fhsi
+paraba'inein, diab'allei d`e t`on E>ust'ajion <wc t`hn Sabell'iou
+d'oxan e>is'agonta. di`a ta=uta <'ekastoi <wc kat`a antip'alwn to`uc
+l'ogouc sun'egrafon, >amf'otero'i te l'egontec >enup'ostat'on te ka`i
+sunup'arqonta t`on u<i`on e>=inai to=u jeo=u, <'ena te je`on >en
+tris`in <upost'asesin e>=inai <omologo=untec, >all'hloic o>uk o>=id'
+<'opwc, sumfwn=hsai o>uk >'isquon, ka`i di`a ta=uta <hsuq'azein
+o>uden`i tr'opw| >hne'iqonto. <'A
+
+\begin{verbatim}
+ka`i E>ust'ajioc m`en <o >Antioqe'iac
+>ep'iskopoc dias'urei t`on Pamf'ilou E>us'ebion <wc t`hn >en Nika'ia|
+p'istin paraqar'attonta, d`e t`hn m`en >en Nika'ia| p'istin o>'u fhsi
+paraba'inein, diab'allei d`e t`on E>ust'ajion <wc t`hn Sabell'iou
+d'oxan e>is'agonta. di`a ta=uta <'ekastoi <wc kat`a antip'alwn to`uc
+l'ogouc sun'egrafon, >amf'otero'i te l'egontec >enup'ostat'on te ka`i
+sunup'arqonta t`on u<i`on e>=inai to=u jeo=u, <'ena te je`on >en
+tris`in <upost'asesin e>=inai <omologo=untec, >all'hloic o>uk o>=id'
+<'opwc, sumfwn=hsai o>uk >'isquon, ka`i di`a ta=uta <hsuq'azein
+o>uden`i tr'opw| >hne'iqonto. <'A
+\end{verbatim}
+\end{languageset}
+
+\frenchtext{UTF-8:}
+
+\begin{languageset}[charset=utf8]{greek}
+ΞΏαΌ± Ξ΄α½² ΦοίνικΡΟ
+ΞΏα½ΟΞΏΞΉ ΞΏαΌ± Οα½ΊΞ½ Ξάδμῳ αΌΟικόμΡνοι, ΟαΏΆΞ½
+αΌ¦ΟΞ±Ξ½ ΞΏαΌ± ΞΞ΅ΟΟ
ΟΞ±αΏΞΏΞΉ, αΌΞ»Ξ»Ξ± ΟΞ΅ Οολλὰ
+οἰκὡΟΞ±Ξ½ΟΞ΅Ο ΟΞ±α½»ΟΞ·Ξ½ Οὴν Οα½½ΟΞ·Ξ½
+αΌΟὡγαγον διδαΟκάλια αΌΟ ΟΞΏα½ΊΟ
+αΌΞ»Ξ»Ξ·Ξ½Ξ±Ο ΞΊΞ±α½Ά δὴ ΞΊΞ±α½Ά Ξ³Οα½±ΞΌΞΌΞ±ΟΞ±, ΞΏα½ΞΊ
+αΌα½ΉΞ½ΟΞ± ΟΟα½ΆΞ½ αΌΞ»Ξ»Ξ·ΟΞΉ α½‘Ο αΌΞΌΞΏα½Ά δοκέΡιν,
+ΟΟαΏΆΟΞ± ΞΌα½²Ξ½ ΟΞΏαΏΟΞΉ ΞΊΞ±α½Ά αΌ
ΟΞ±Ξ½ΟΞ΅Ο
+ΟΟα½³ΟΞ½ΟΞ±ΞΉ ΦοίνικΡΟΞ ΞΌΞ΅Οα½° Ξ΄α½² ΟΟα½ΉΞ½ΞΏΟ
+ΟΟΞΏΞ²Ξ±α½·Ξ½ΞΏΞ½ΟΞΏΟ αΌ
ΞΌΞ± ΟαΏ ΟΟΞ½αΏ ΞΌΞ΅Οέβαλον
+ΞΊΞ±α½Ά Οα½ΈΞ½ αΏ₯Ο
ΞΈΞΌα½ΈΞ½ ΟαΏΆΞ½ Ξ³ΟΞ±ΞΌΞΌα½±ΟΟΞ½.
+ΟΞ΅ΟιοίκΡον Ξ΄α½² ΟΟΞ΅Ξ±Ο Οα½° Οολλὰ ΟαΏΆΞ½
+Οα½½ΟΟΞ½ ΟΞΏαΏ¦ΟΞΏΞ½ Οα½ΈΞ½ ΟΟα½ΉΞ½ΞΏΞ½ αΌΞ»Ξ»α½΅Ξ½ΟΞ½
+αΌΌΟΞ½Ξ΅ΟΞ ΞΏαΌ³ ΟΞ±ΟαλαβόνΟΞ΅Ο Ξ΄ΞΉΞ΄Ξ±ΟαΏ ΟΞ±Οα½°
+ΟαΏΆΞ½ ΦοινίκΟΞ½ Οα½° Ξ³Οα½±ΞΌΞΌΞ±ΟΞ±,
+ΞΌΞ΅ΟΞ±ΟΟΟ
ΞΈΞΌα½·ΟΞ±Ξ½Οα½³Ο ΟΟΞ΅ΟΞ½ α½Ξ»α½·Ξ³Ξ±
+αΌΟΟα½³ΟΞ½ΟΞΏ, ΟΟΡώμΡνοι Ξ΄α½² αΌΟα½±ΟΞΉΟΞ±Ξ½,
+α½₯ΟΟΞ΅Ο ΞΊΞ±α½Ά Οα½Έ Ξ΄α½·ΞΊΞ±ΞΉΞΏΞ½ αΌΟΞ΅ΟΞ΅,
+αΌΟΞ±Ξ³Ξ±Ξ³α½ΉΞ½ΟΟΞ½ ΦοινίκΟΞ½ αΌΟ Οὴν
+αΌΞ»Ξ»α½±Ξ΄Ξ±, Φοινικὡια κΡκλαΏΟΞΈΞ±ΞΉ. ΞΊΞ±α½Ά
+Οα½°Ο Ξ²α½»Ξ²Ξ»ΞΏΟ
Ο Ξ΄ΞΉΟΞΈα½³ΟΞ±Ο ΞΊΞ±Ξ»α½³ΞΏΟ
ΟΞΉ αΌΟα½Έ
+ΟΞΏαΏ¦ Οαλαιοῦ ΞΏαΌ± αΌΌΟΞ½Ξ΅Ο, α½
ΟΞΉ ΞΊΞΏΟα½² αΌΞ½
+ΟΟα½±Ξ½ΞΉ Ξ²α½»Ξ²Ξ»ΟΞ½ αΌΟΟα½³ΟΞ½ΟΞΏ διΟΞΈα½³ΟαΏΟΞΉ
+Ξ±αΌ°Ξ³α½³αΏΟα½· ΟΞ΅ ΞΊΞ±α½Ά ΞΏαΌ°α½³αΏΟΞΉΞ αΌΟΞΉ Ξ΄α½²
+ΞΊΞ±α½Ά Οα½Έ ΞΊΞ±Ο' αΌΞΌα½² Οολλοὢ ΟαΏΆΞ½ Ξ²Ξ±ΟΞ²α½±ΟΟΞ½
+αΌΟ ΟΞΏΞΉΞ±α½»ΟΞ±Ο Ξ΄ΞΉΟΞΈα½³ΟΞ±Ο Ξ³Οα½±ΟΞΏΟ
ΟΞΉ.
+
+[59] Ρἢδον Ξ΄α½² ΞΊΞ±α½Ά Ξ±α½Οα½ΈΟ Ξαδμὡια
+Ξ³Οα½±ΞΌΞΌΞ±ΟΞ± αΌΞ½ ΟαΏ· αΌ±ΟαΏ· ΟΞΏαΏ¦ αΌΟόλλΟΞ½ΞΏΟ
+ΟΞΏαΏ¦ αΌΈΟΞΌΞ·Ξ½α½·ΞΏΟ
αΌΞ½ ΞὡβαΏΟΞΉ ΟαΏΟΞΉ
+ΞΞΏΞΉΟΟαΏΆΞ½ αΌΟα½Ά ΟΟα½·ΟΞΏΟΞΉ ΟΟΞΉΟα½Ά
+αΌΞ³ΞΊΞ΅ΞΊΞΏΞ»Ξ±ΞΌΞΌα½³Ξ½Ξ±, Οα½° Οολλὰ α½
ΞΌΞΏΞΉΞ±
+αΌα½ΉΞ½ΟΞ± ΟΞΏαΏΟΞΉ αΌΈΟΞ½ΞΉΞΊΞΏαΏΟΞΉ. α½ ΞΌα½²Ξ½ δὴ
+Ξ΅αΌ·Ο ΟαΏΆΞ½ ΟΟΞΉΟα½ΉΞ΄ΟΞ½ αΌΟα½·Ξ³ΟΞ±ΞΌΞΌΞ± αΌΟΡιΞ
+
+αΌΞΌΟΞΉΟΟα½»ΟΞ½ ΞΌ' αΌΞ½α½³ΞΈΞ·ΞΊΞ΅Ξ½ αΌα½ΌΞ½ αΌΟα½Έ
+΀ηλΡβοάΟΞ½.
+
+ΟΞ±αΏ¦ΟΞ± ἑλικίην Ξ΅αΌ΄Ξ· αΌΞ½ ΞΊΞ±Οα½° Ξα½±ΞΉΞΏΞ½
+Οα½ΈΞ½ ΞΞ±Ξ²Ξ΄α½±ΞΊΞΏΟ
ΟΞΏαΏ¦ ΞΏΞ»Ο
Ξ΄α½½ΟΞΏΟ
ΟΞΏαΏ¦
+ΞάδμοΟ
. \frenchtext{(Herodot, Buch V, 58f.)}
+\end{languageset}
+
+\section{\frenchtext{Ηa va trθs bien. Nested spanish: \spanishtext{Mαs allα}}}
+
+\englishtext{Test uppercase in headlines.}
+
+\newpage
+
+xxx
+\end{document}
|