%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 \& \CONTEXT\ Development Team}]
%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
