% Define Atari ST character set (GERMAN) for TeX 3.0
%
% This file could not be used on computers with a different charset.
% (Just fix the special chars and use a codepage, or use the ^^xx notation
% with the TeX internal char coding, if there's a standard for chars > 127)
%
% 29.10.90 br	1.Version for TeX 3.0
% 30.12.90 br	Changed the chars from ^^xx notation to "real" ST special
%		chars.  (The ^^xx is not affected by a CodePage.)


% See the new `lplain.tex' for TeX 3.0 (>= Version 2.09  Feb 8, 1990)
%
% if not(TeX >= 3.0) do_nothing else ...
\ifx\undefined\inputlineno \else
\ifnum\inputlineno=-1 \else

\message{Style Option `atarist' (define ST special characters)}

% german umlauts:
%
\lccode`\„=`\„ \uccode`\„=`\Ž \catcode`\„=\active \def„{\"a}
\lccode`\Ž=`\„ \uccode`\Ž=`\Ž \catcode`\Ž=\active \defŽ{\"A}
\lccode`\”=`\” \uccode`\”=`\™ \catcode`\”=\active \def”{\"o}
\lccode`\™=`\” \uccode`\™=`\™ \catcode`\™=\active \def™{\"O}
\lccode`\=`\ \uccode`\=`\š \catcode`\=\active \def{\"u}
\lccode`\š=`\ \uccode`\š=`\š \catcode`\š=\active \defš{\"U}

% german sz and paragraph:  (Uppercase sz is ^^df [= SS in Ext.FontEncoding])
%
\lccode`\ž=`\ž \uccode`\ž=`\^^df \catcode`\ž=\active \defž{\ss{}}
\lccode`\^^df=`\ž \uccode`\^^df=`\^^df \catcode`\^^df=\active \def^^df{SS}
\catcode`\έ=\active \defέ{\S{}}

\fi\fi


% After transferring files there's sometimes an Ctrl-Z at the end.
% (This could also handled in the CodePage with a line ^^Z>^^@)
\catcode`^^Z=9                          % ignore it or ...
%\catcode`^^Z=\active \def^^Z{\endinput}% ... make it active

\endinput
%
% Atari ST Character Set (if you want to change it to your charset):
%	"84	\"a		"8e	\"A
%	"94	\"o		"99	\"O
%	"81	\"u		"9a	\"U
%	"9e	\ss		"dd	\S  (Paragraph)