1 files changed, 117 insertions, 0 deletions
diff --git a/tex/context/base/regi-iso-8859-7.tex b/tex/context/base/regi-iso-8859-7.tex
new file mode 100644
index 000000000..7cd4b6a30
--- /dev/null
+++ b/tex/context/base/regi-iso-8859-7.tex
@@ -0,0 +1,117 @@
+%D \module
+%D   [       file=regi-grk,
+%D        version=2003.03.01,
+%D          title=\CONTEXT\ Encoding Macros,
+%D       subtitle=Greek,
+%D         author=Apostolos Syropoulos,
+%D           date=\currentdate,
+%D      copyright=PRAGMA-ADE]
+%C
+%C This module is part of the \CONTEXT\ macro||package and is
+%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
+%C details.
+
+\startregime[iso-8859-7]
+
+%
+% Uppercase Greek letters
+%
+
+\defineactivetoken 193 {\greekAlpha}
+\defineactivetoken 194 {\greekBeta}
+\defineactivetoken 195 {\greekGamma}
+\defineactivetoken 196 {\greekDelta}
+\defineactivetoken 197 {\greekEpsilon}
+\defineactivetoken 198 {\greekZeta}
+\defineactivetoken 199 {\greekEta}
+\defineactivetoken 200 {\greekTheta}
+\defineactivetoken 201 {\greekIota}
+\defineactivetoken 202 {\greekKappa}
+\defineactivetoken 203 {\greekLambda}
+\defineactivetoken 204 {\greekMu}
+\defineactivetoken 205 {\greekNu}
+\defineactivetoken 206 {\greekXi}
+\defineactivetoken 207 {\greekOmicron}
+\defineactivetoken 208 {\greekPi}
+\defineactivetoken 209 {\greekRho}
+\defineactivetoken 211 {\greekSigma}
+\defineactivetoken 212 {\greekTau}
+\defineactivetoken 213 {\greekUpsilon}
+\defineactivetoken 214 {\greekPhi}
+\defineactivetoken 215 {\greekChi}
+\defineactivetoken 216 {\greekPsi}
+\defineactivetoken 217 {\greekOmega}
+
+%
+% Lowercase Greek letters
+%
+
+\defineactivetoken 225 {\greekalpha}
+\defineactivetoken 226 {\greekbeta}
+\defineactivetoken 227 {\greekgamma}
+\defineactivetoken 228 {\greekdelta}
+\defineactivetoken 229 {\greekepsilon}
+\defineactivetoken 230 {\greekzeta}
+\defineactivetoken 231 {\greeketa}
+\defineactivetoken 232 {\greektheta}
+\defineactivetoken 233 {\greekiota}
+\defineactivetoken 234 {\greekkappa}
+\defineactivetoken 235 {\greeklambda}
+\defineactivetoken 236 {\greekmu}
+\defineactivetoken 237 {\greeknu}
+\defineactivetoken 238 {\greekxi}
+\defineactivetoken 239 {\greekomicron}
+\defineactivetoken 240 {\greekpi}
+\defineactivetoken 241 {\greekrho}
+\defineactivetoken 242 {\greekfinalsigma}
+\defineactivetoken 243 {\greeksigma}
+\defineactivetoken 244 {\greektau}
+\defineactivetoken 245 {\greekupsilon}
+\defineactivetoken 246 {\greekphi}
+\defineactivetoken 247 {\greekchi}
+\defineactivetoken 248 {\greekpsi}
+\defineactivetoken 249 {\greekomega}
+
+%
+% Accented Uppercase Greek letters
+%
+
+\defineactivetoken 182 {\greekAlphatonos}
+\defineactivetoken 184 {\greekEpsilontonos}
+\defineactivetoken 185 {\greekEtatonos}
+\defineactivetoken 186 {\greekIotatonos}
+\defineactivetoken 188 {\greekOmicrontonos}
+\defineactivetoken 190 {\greekUpsilontonos}
+\defineactivetoken 191 {\greekOmegatonos}
+\defineactivetoken 218 {\greekIotadialytika}
+\defineactivetoken 219 {\greekUpsilondialytika}
+
+%
+% Accented Lowercase Greek letters
+%
+
+\defineactivetoken 220 {\greekalphatonos}
+\defineactivetoken 221 {\greekepsilontonos}
+\defineactivetoken 222 {\greeketatonos}
+\defineactivetoken 223 {\greekiotatonos}
+\defineactivetoken 252 {\greekomicrontonos}
+\defineactivetoken 253 {\greekupsilontonos}
+\defineactivetoken 254 {\greekomegatonos}
+\defineactivetoken 250 {\greekiotadialytika}
+\defineactivetoken 251 {\greekupsilondialytika}
+\defineactivetoken 192 {\greekiotadialytikatonos}
+\defineactivetoken 224 {\greekupsilondialytikatonos}
+
+%
+% Miscellaneous Greek symbols
+%
+
+\defineactivetoken 171 {\greekleftquot}
+\defineactivetoken 187 {\greekrightquot}
+\defineactivetoken 180 {\greektonos}
+\defineactivetoken 181 {\greekdialytikatonos}
+\defineactivetoken 162 {\greekapostrophos}
+
+\stopregime
+
+\endinput