1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73
|
%D \module
%D [ file=regi-ibm,
%D version=1995.01.01,
%D title=\CONTEXT\ Encoding Macros,
%D subtitle=The Good Old MSDOS IBM codepage,
%D author=Hans Hagen,
%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.
%D This module activates the \cap{IBM PC} high \ASCII\
%D characters, such as and .
\startregime [ibm]
\defineactivetoken 145 {\aeligature} %
\defineactivetoken 146 {\AEligature} %
\defineactivetoken 152 {\ijligature} %
\defineactivetoken 225 {\ssharp} %
\defineactivetoken 160 {\aacute} %
\defineactivetoken 130 {\eacute} %
\defineactivetoken 144 {\Eacute} %
\defineactivetoken 161 {\iacute} %
\defineactivetoken 162 {\oacute} %
\defineactivetoken 163 {\uacute} %
\defineactivetoken 135 {\ccedilla} %
\defineactivetoken 128 {\Ccedilla} %
\defineactivetoken 132 {\adiaeresis} %
\defineactivetoken 142 {\Adiaeresis} %
\defineactivetoken 137 {\ediaeresis} %
\defineactivetoken 139 {\idiaeresis} %
\defineactivetoken 148 {\odiaeresis} %
\defineactivetoken 153 {\Odiaeresis} %
\defineactivetoken 129 {\udiaeresis} %
\defineactivetoken 154 {\Udiaeresis} %
\defineactivetoken 164 {\ntilde} %
\defineactivetoken 165 {\Ntilde} %
\defineactivetoken 134 {\aring} %
\defineactivetoken 143 {\Aring} %
\defineactivetoken 131 {\acircumflex} %
\defineactivetoken 136 {\ecircumflex} %
\defineactivetoken 140 {\icircumflex} %
\defineactivetoken 147 {\ocircumflex} %
\defineactivetoken 150 {\ucircumflex} %
\defineactivetoken 133 {\agrave} %
\defineactivetoken 138 {\egrave} %
\defineactivetoken 141 {\igrave} %
\defineactivetoken 149 {\ograve} %
\defineactivetoken 151 {\ugrave} %
\stopregime
% todo
\startregime [ibm]
\defineactivetoken {\ifvmode\leavevmode\fi\leftguillemot\prewordbreak}
\defineactivetoken {\prewordbreak\rightguillemot}
\stopregime
\endinput
|