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
|
%%%%%%%%%%%%%%%%%%%%%%%%%%% utf8.sty %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% utf8.sty
% Scanner for UTF-8 Code
% to install it, include it as a LaTeX package or style option "utf8"
% with Plain TeX, say "\input utf8.sty"
% to activate it, say "\setcode {utf8}"
% 10.08.98
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% (c) Klaus Lagally
% Institut fuer Informatik
% Universitaet Stuttgart
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\ifx \utfatcode \undefined \else \expandafter \endinput
\fi % load only once
\chardef \utfatcode = \catcode`\@ \catcode`\@ = 11
\usepackage {arabtex}
\usepackage {hebtex}
\usepackage {utfcode}
\a@ident {utf8.sty} {1.00 UTF-8 input encoding } {10.08.1998}
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\def \utf@initcodes {% assignments for UTF-8
\countdef \is@m=2 \is@m = 160
\loop \catcode \is@m = 11
\ifnum 254 > \is@m \advance \is@m 1 \repeat
\is@m=0 }
\def \utf@setcodes {% assignments for UTF-8
\catcode ` 13 \catcode ` 13 \catcode ` 13
\catcode ` 13 \catcode ` 13 \catcode ` 13 }
%\utf@initcodes
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%{\utf@setcodes
\gdef \set@utfc {% select the UTF-8 scanner
%\utf@initcodes
\global\let \a@scan \utfc@scan
\global\def \sc@beg {\utf@beg }
\global\def \sc@word {\utf@word }
\iffalse
\utf@setcodes
\gdef {\u@d@@ }% Hebrew I
\gdef {\u@d@@ }% Hebrew II
\gdef {\u@d@@ }% Arabic I
\gdef {\u@d@@ }% Arabic II
\gdef {\u@d@@ }% Arabic III
\gdef {\u@d@@ }% Arabic IV
\fi
\global\a@digits = {0123456789}%
\global\a@first = {}
\message {input encoding set to UTF-8 conventions}}
%}
\xpa \def \xpa \sc@table \xpa {\sc@table % add the UTF-8 encoding
%utf-8\set@utf utf8\set@utf }
utf-8\set@utfc utf8\set@utfc }
\message {scanner for code UTF-8 installed.}
\catcode `\@ = \utfatcode
\endinput
%%%%%%%%%%%%%%%%%%%%%%%% EOF %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
|