Gecko [ 122.154.134.11 ]

Name	Size	Permission
Uxnsh.fd	2 KB	-rw-r--r--
abidir.sty	9.27 KB	-rw-r--r--
abjad.sty	2.18 KB	-rw-r--r--
aboxes.sty	16 KB	-rw-r--r--
acjk.sty	895 B	-rw-r--r--
acmd.sty	11.21 KB	-rw-r--r--
aconfig.sty	3.32 KB	-rw-r--r--
aedpatch.sty	6.75 KB	-rw-r--r--
afonts.sty	1.63 KB	-rw-r--r--
afonts0.sty	2.23 KB	-rw-r--r--
afonts1.sty	1.75 KB	-rw-r--r--
afonts2.sty	1.87 KB	-rw-r--r--
afoot.sty	3.31 KB	-rw-r--r--
alatex.sty	5.54 KB	-rw-r--r--
aligs.sty	20.09 KB	-rw-r--r--
alists.sty	6.48 KB	-rw-r--r--
alocal.sty	623 B	-rw-r--r--
altxext.sty	3.41 KB	-rw-r--r--
amac.sty	6.92 KB	-rw-r--r--
aoutput.sty	5.76 KB	-rw-r--r--
aparse.sty	34.32 KB	-rw-r--r--
apatch.sty	83.18 KB	-rw-r--r--
arababel.sty	1.1 KB	-rw-r--r--
arabart.cls	778 B	-rw-r--r--
arabaux.sty	3.85 KB	-rw-r--r--
arabbook.cls	771 B	-rw-r--r--
arabchrs.sty	2.89 KB	-rw-r--r--
arabext.sty	3.37 KB	-rw-r--r--
arabrep.cls	31.25 KB	-rw-r--r--
arabrep1.cls	26.42 KB	-rw-r--r--
arabskel.sty	8.74 KB	-rw-r--r--
arabsymb.sty	8.52 KB	-rw-r--r--
arabtex.sty	23.53 KB	-rw-r--r--
arabtex.tex	4.43 KB	-rw-r--r--
arabtoks.sty	6.47 KB	-rw-r--r--
arwindoc.tex	4.3 KB	-rw-r--r--
ascan.sty	14.94 KB	-rw-r--r--
asect.sty	12.82 KB	-rw-r--r--
asize10.clo	1.15 KB	-rw-r--r--
asize11.clo	1.15 KB	-rw-r--r--
asize12.clo	1.15 KB	-rw-r--r--
asmo449.sty	4.24 KB	-rw-r--r--
asmo449a.sty	4.83 KB	-rw-r--r--
atabg.sty	4.44 KB	-rw-r--r--
atrans.sty	18.47 KB	-rw-r--r--
awrite.sty	11.97 KB	-rw-r--r--
bhs.sty	7.06 KB	-rw-r--r--
bhslabel.sty	4.38 KB	-rw-r--r--
buck.sty	8.1 KB	-rw-r--r--
captions.def	1.86 KB	-rw-r--r--
cp1256.sty	6.81 KB	-rw-r--r--
etrans.sty	163 B	-rw-r--r--
gedalin.sty	4.27 KB	-rw-r--r--
guha.tex	1.06 KB	-rw-r--r--
hebchrs.sty	5.09 KB	-rw-r--r--
hebsymb.sty	1.62 KB	-rw-r--r--
hebtex.sty	2.6 KB	-rw-r--r--
hebtex.tex	4.03 KB	-rw-r--r--
hecmd.sty	7.39 KB	-rw-r--r--
hefonts.sty	1.63 KB	-rw-r--r--
hefonts0.sty	1.42 KB	-rw-r--r--
hefonts1.sty	1.18 KB	-rw-r--r--
hefonts2.sty	1.79 KB	-rw-r--r--
heparse.sty	8.32 KB	-rw-r--r--
hepatch.sty	1.22 KB	-rw-r--r--
hescan.sty	8.41 KB	-rw-r--r--
hetrans.sty	3.33 KB	-rw-r--r--
hewrite.sty	21.65 KB	-rw-r--r--
hmac.sty	6.3 KB	-rw-r--r--
isiri.sty	7.96 KB	-rw-r--r--
iso88596.sty	896 B	-rw-r--r--
kashmiri.tex	3.47 KB	-rw-r--r--
ligtable.tex	3.59 KB	-rw-r--r--
malay.tex	1.18 KB	-rw-r--r--
nashbf.sty	156 B	-rw-r--r--
omar.tex	1022 B	-rw-r--r--
raw.sty	1.45 KB	-rw-r--r--
saw.sty	1.3 KB	-rw-r--r--
sindhi.tex	4.25 KB	-rw-r--r--
sotoku.sty	1.55 KB	-rw-r--r--
twoblks.sty	4 KB	-rw-r--r--
uheb.fd	3.47 KB	-rw-r--r--
uighur.tex	3.26 KB	-rw-r--r--
unash.fd	1.42 KB	-rw-r--r--
utf8.sty	1.28 KB	-rw-r--r--
utfcode.sty	10.68 KB	-rw-r--r--
verses.sty	3.55 KB	-rw-r--r--
witbhs.sty	7.1 KB	-rw-r--r--
xarbskel.sty	7.18 KB	-rw-r--r--
xarbsymb.sty	9.22 KB	-rw-r--r--
yiddish.sty	6.1 KB	-rw-r--r--

Code Editor : utfcode.sty

%%%%%%%%%%%%%%%%%%%%%%%%%%% utfcode.sty %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% utfcode.sty 
% scanner module for the Arabic and Hebrew segments of UTF-8
% loaded and called by utf8.sty
% 07.03.2002
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% (c) Klaus Lagally
%     Institut fuer Informatik
%     Universitaet Stuttgart
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\catcode`\@ = 11

\a@ident {utfcode.sty} {3.10a Arabic+Hebrew segment of UTF-8} {07.03.2002}

\newcount \u@lb	\newcount \u@lq

\newif \ifa@quote

\def \utfc@scan #1>{% modified scanner call: token sequence -> \a@tokens
\iftest@scan \tracingmacros = 1 \fi
\global\def \a@rest {}\global\a@tokens = {}\def \sc@char {}%
\utf@beg #1\@ \@ \@ \@@ % transform
\iftest@scan \tracingmacros = 0 \xpa \a@verb \xpa (\the\a@tokens )>\fi }

\def \utf@beg #1#2{% start UTF-8 scanner
\h@mzafalse  \iz@fetfalse \novocalize % because of explicit quoting
	\@ssimfalse
	\def \next {\utf@word #1#2}%
\ifnum `#1="D8 \ifnum `#2="27 \def \next {\utf@alif }\fi \else
%\ifx #1"\def \next {\utf@lquote #2}\else
\ifx #1/\global \a@tokens ={#1}\def \next {\utf@word #2}\else % x>
%\fi
\fi\fi \next }

{\catcode `\^ 7 \catcode `\^^M=13
\gdef \utf@word #1#2{% transform input into internal notation
\ifx #1\@ \def \next {\utf@end #2}\else		% finished
\ifx #1-\def \next {\utf@minus #2}\else %
%ifx #1"\def \next {\utf@rquote #2}\else %
\ifx #1/\def \next {\sc@back #1#2}\else %
%\if \nxp ^^M\nxp #1\def \next {\utf@par #2}\else % active character
\ifnum `#1="D6 \def \next {\utf@dvi #2}\else %
\ifnum `#1="D7 \def \next {\utf@dvii #2}\else %
\ifnum `#1="D8 \def \next {\utf@dviii #2}\else %
\ifnum `#1="D9 \def \next {\utf@dix #2}\else %
\ifnum `#1="DA \def \next {\utf@da #2}\else %
\ifnum `#1="DB \def \next {\utf@db #2}\else %
	\def \next {\utf@asci #1#2}%
\fi\fi\fi\fi\fi\fi %
%\fi\fi
\fi\fi\fi \next }%
%
\gdef \utf@word #1{% transform input into internal notation
\ifx #1\@ \def \next {\utf@end }\else		% finished
\ifx #1-\def \next {\utf@minus }\else %
\ifx #1/\def \next {\sc@back #1}\else %
\ifnum `#1="D6 \def \next {\utf@dvi }\else %
\ifnum `#1="D7 \def \next {\utf@dvii }\else %
\ifnum `#1="D8 \def \next {\utf@dviii }\else %
\ifnum `#1="D9 \def \next {\utf@dix }\else %
\ifnum `#1="DA \def \next {\utf@da }\else %
\ifnum `#1="DB \def \next {\utf@db }\else %
	\def \next {\utf@asci #1}%
\fi\fi\fi\fi\fi\fi %
\fi\fi\fi \next }%
} % catcode 13

\def \utf@end #1\@@ {\relax }

\def \utf@next {% save and deposit character
\sc@put \utf@word }

\def \utf@asci #1{% deposit ASCII item
\def \sc@char {#1}\utf@next }

{\catcode `\% 12 \gdef \a@pc {%}}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def \utf@dvi #1{% segment D6
	\u@lb `#1\relax \advance \u@lb -128 
	\u@lq \u@lb \divide \u@lq 8
	\edef \sc@char {}%
\ifcase \u@lq \or \or \or \or \or 
\or \advance \u@lb -48 \edef \sc@char 
	{\ifcase \u@lb
	"\n@xp\a@e\or "\n@xp\a@I\or "\n@xp\a@A\or "\n@xp\a@O\or 
	"i\or "\n@xp\a@E\or "e\or "a\or
	\fi }%
\or \advance \u@lb -56 \edef \sc@char 
	{\ifcase \u@lb
	"A\or "\n@xp\a@o\or L\or "u\or 
	"\n@xp\a@Zu\or |\or B\or "\n@xp\a@Zo\or
	\fi }%
\fi \utf@next }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def \utf@dvii #1{% segment D7
	\u@lb `#1\relax \advance \u@lb -128 
	\u@lq \u@lb \divide \u@lq 8
\ifcase \u@lq \edef \sc@char 
	{\ifcase \u@lb
	K\or "\n@xp\a@Ze\or "\n@xp\a@Za\or :\or "\n@xp\a@Zi\or \or \or \or
	\fi }%
\or \advance \u@lb  -8 \edef \sc@char {}%
\or \advance \u@lb -16 \edef \sc@char 
	{\ifcase \u@lb
	Q\or b\or g\or d\or h\or w\or z\or X\or
	\fi }%
\or \advance \u@lb -24 \edef \sc@char 
	{\ifcase \u@lb
	C\or y\or k\or k\or l\or m\or m\or n\or
	\fi }%
\or \advance \u@lb -32 \edef \sc@char 
	{\ifcase \u@lb
	n\or s\or P\or p\or p\or S\or S\or q\or
	\fi }%
\or \advance \u@lb -40 \edef \sc@char 
	{\ifcase \u@lb
	r\or \n@xp\a@S \or t\or \or \or \or \or \or
	\fi }%
\or \advance \u@lb -48 \edef \sc@char 
	{\ifcase \u@lb
	w\n@xp\a@U w\or wy\or y\n@xp\a@U y\or '\or 
	''\or \or \or \or
	\fi }%
\or \advance \u@lb -56 \edef \sc@char 
	{\ifcase \u@lb
	\or \or \or \or \or \or \or "|\or
	\fi }%
\fi \utf@next }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def \utf@dviii #1{% segment D8
	\u@lb `#1\relax \advance \u@lb -"80 
	\u@lq \u@lb \divide \u@lq 8
\ifcase \u@lq 	               \edef \sc@char {}%
\or  \advance \u@lb  -8        \edef \sc@char {\ifcase \u@lb
	\or    \or    \or    \or    ,\or   \or    \or    \or    \fi }%
\or  \advance \u@lb -"10       \edef \sc@char {}%
\or  \advance \u@lb -"18       \edef \sc@char {\ifcase \u@lb
	\or    \or    \or    ;\or   \or    \or    \or    ?\or   \fi }%
\or  \advance \u@lb -"20       \edef \sc@char {\ifcase \u@lb
	\or    Q|\or  QA\or  Qa\or  Qw\or  Qi\or  Qy\or  A\or   \fi }%
\or  \advance \u@lb -"28       \edef \sc@char {\ifcase \u@lb
	b\or   T\or   t\or   C\or   G\or   H\or   X\or   d\or  	\fi }%
\or  \advance \u@lb -"30       \edef \sc@char {\ifcase \u@lb
	F\or   r\or   z\or   s\or   x\or   S\or   D\or   V\or   \fi }%
\or  \advance \u@lb -"38       \edef \sc@char {\ifcase \u@lb
	Z\or   P\or   R\or   \or    \or    \or    \or    \or    \fi }%
\fi \utf@next }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def \utf@dix #1{% segment D9
	\u@lb `#1\relax \advance \u@lb -"80 
	\u@lq \u@lb \divide \u@lq 8
\ifcase \u@lq 		       \edef \sc@char {\ifcase \u@lb
	B\or   f\or   q\or   k\or   l\or   m\or   n\or   h\or   \fi }%
\or  \advance \u@lb  -8        \edef \sc@char {\ifcase \u@lb
	w\or   Y\or   y\or   "aN\or "uN\or "iN\or "a\or  "u\or  \fi }%
\or  \advance \u@lb -"10       \edef \sc@char {\ifcase \u@lb
	"i\or  "\n@xp\a@Ze\or ""\or "\n@xp\a@ZE\or 
	"\n@xp\a@Za\or "\n@xp\a@Zu\or \or \or \fi }%
\or  \advance \u@lb -"18       \edef \sc@char {}%
\or  \advance \u@lb -"20       \edef \sc@char {\ifcase \u@lb
	0\or   1\or   2\or   3\or   4\or   5\or   6\or   7\or   \fi }%
\or  \advance \u@lb -"28       \edef \sc@char {\ifcase \u@lb
	8\or           9\or           \a@pc\or       \f@sila\or   
	\f@sila\or     *\or           \or            \or            \fi }%
\or  \advance \u@lb -"30       \edef \sc@char {\ifcase \u@lb
	"\n@xp\a@a\or  "\or     "\n@xp\a@ZA\or "\n@xp\a@ZU\or          
%      N"\n@xp\a@Za\or Qa\or          Qw\or          Qw"u\or        \fi }%
N"\n@xp\a@Za\or N"\n@xp\a@Za A\or N"\n@xp\a@Za w\or N"\n@xp\a@Za w"u\or \fi }%
\or  \advance \u@lb -"38       \edef \sc@char {\ifcase \u@lb
%	Qy\or          \n@xp\a@t\or   \n@xp\a@T\or   \n@xp\a@ab\or  
	N"\n@xp\a@Za Y\or \n@xp\a@t\or   \n@xp\a@T\or   \n@xp\a@ab\or  
	\n@xp\a@v\or   \n@xp\a@at\or  p\or           \n@xp\a@ac\or  \fi }%
\fi \utf@next }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def \utf@da #1{% segment DA
	\u@lb `#1\relax \advance \u@lb -"80 
	\u@lq \u@lb \divide \u@lq 8
\ifcase \u@lq                  \edef \sc@char {\ifcase \u@lb
	\n@xp\a@ap\or  c\or           \n@xp\a@G\or   \n@xp\a@ag\or  
	\n@xp\a@ah\or  \n@xp\a@c\or   J\or           \n@xp\a@aj\or  \fi }%
\or  \advance \u@lb  -8        \edef \sc@char {\ifcase \u@lb
	\n@xp\a@d\or   \n@xp\a@aA\or  \n@xp\a@D\or   \n@xp\a@aB\or  
	\n@xp\a@ad\or  \n@xp\a@af\or  \n@xp\a@aC\or  \n@xp\a@ae\or  \fi }%
\or  \advance \u@lb -"10       \edef \sc@char {\ifcase \u@lb
	\n@xp\a@aD\or  \n@xp\a@r\or   \n@xp\a@aF\or  \n@xp\a@q\or  
	\n@xp\a@aG\or  \n@xp\a@R\or   \n@xp\a@z\or   \n@xp\a@aH\or  \fi }%
\or  \advance \u@lb -"18       \edef \sc@char {\ifcase \u@lb
	j\or           \n@xp\a@ar\or  \n@xp\a@s\or   \n@xp\a@aJ\or  
	\n@xp\a@aK\or  \n@xp\a@aL\or  \n@xp\a@aM\or  \n@xp\a@aO\or  \fi }%
\or  \advance \u@lb -"20       \edef \sc@char {\ifcase \u@lb
	\n@xp\a@p\or   \n@xp\a@f\or   \n@xp\a@F\or   \n@xp\a@aP\or  
	v\or           \n@xp\a@V\or   \n@xp\a@aq\or  \n@xp\a@aQ\or  \fi }%
\or  \advance \u@lb -"28       \edef \sc@char {\ifcase \u@lb
	\n@xp\a@aR\or  \n@xp\a@k\or   \n@xp\a@ax\or  \n@xp\a@g\or  
	\n@xp\a@L\or   K\or           \n@xp\a@aS\or  g\or           \fi }%
\or  \advance \u@lb -"30       \edef \sc@char {\ifcase \u@lb
	\n@xp\a@J\or   \n@xp\a@al\or  \n@xp\a@aT\or  \n@xp\a@ak\or  
	\n@xp\a@M\or   \n@xp\a@l\or   \n@xp\a@aW\or  \n@xp\a@aX\or  \fi }%
\or  \advance \u@lb -"38       \edef \sc@char {\ifcase \u@lb
	\n@xp\a@aY\or  \n@xp\a@aZ\or  \n@xp\a@n\or   \n@xp\a@an\or  
	\n@xp\a@m\or   \n@xp\a@am\or  h-\or          \n@xp\a@aE\or  \fi }%
\fi \utf@next }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def \utf@db #1{% segment DB
	\u@lb `#1\relax \advance \u@lb -"80 
	\u@lq \u@lb \divide \u@lq 8
\ifcase \u@lq                  \edef \sc@char {\ifcase \u@lb
	Qh\or          \n@xp\a@h\or   \n@xp\a@B\or  \n@xp\a@j\or  
	\n@xp\a@aU\or  \n@xp\a@aV\or  \n@xp\a@W\or  \n@xp\a@w\or    \fi }%
\or  \advance \u@lb  -8        \edef \sc@char {\ifcase \u@lb
	\n@xp\a@aw\or  \n@xp\a@au\or  \n@xp\a@av\or  \n@xp\a@X\or  
	Y\or           L\or           \n@xp\a@az\or  \n@xp\a@x\or   \fi }%
\or  \advance \u@lb -"10       \edef \sc@char {\ifcase \u@lb
	\n@xp\a@Y\or   \n@xp\a@y\or   E\or           \n@xp\a@ay\or  
	B\or           \n@xp\a@H\or   \or            \or            \fi }%
\or  \advance \u@lb -"18       \edef \sc@char {}%
\or  \advance \u@lb -"20       \edef \sc@char {}%
\or  \advance \u@lb -"28       \edef \sc@char {}%
\or  \advance \u@lb -"30       \edef \sc@char {\ifcase \u@lb
	0\or           1\or           2\or           3\or  
	4\or           5\or           6\or           7\or  \fi }%
\or  \advance \u@lb -"38       \edef \sc@char {\ifcase \u@lb
	8\or           9\or           \n@xp\a@aI\or  \n@xp\a@aN\or  
	\n@xp\a@P\or   \n@xp\a@ai"\n@xp\a@Zi\or 
	\n@xp\a@ao"\n@xp\a@Zi\or       \or            \fi }%
\fi \utf@next }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\def \utf@alif {% alif at the beginning of a word
\def \sc@char {a}\sc@put \utf@word }

\def \utf@minus {% hyphen between words
\def \sc@char {-}\sc@put \utf@beg }
%\def \sc@char {B}\sc@put \utf@beg }

\def \utf@lquote {% left quote
\ifa@quote \def \sc@char {'}\global\a@quotefalse
\else \def \sc@char {`}\global\a@quotetrue
\fi \sc@put \utf@beg }

\def \utf@rquote {% right quote
\global\a@quotefalse \def \sc@char {'}\sc@put \utf@word }

\def \utf@par #1\@ \@@ {% new line, push back the rest
\sc@back \\#1\@ \@@ }

\def \utf@b@cs #1#2{% test word end
\def \sc@char {#1}\sc@put 
%\ifx #2\@ \def \next {\sc@endscan #2}\else
\ifx #2\@ \def \next {\utf@end #2}\else
\ifcat -\nxp #2 \def \next {\utf@word #2}\else
\def \next {\sc@back #2}\fi \fi \next }

\def \utf@cs #1#2{% control sequence within a word; push back?
\xpa \ifx #1\closegeresh \def \next {\utf@b@cs {\nxp \lq }#2}\else 
\xpa \ifx #1\closequote \def \next {\utf@b@cs {`}#2}\else 
	\def \next {\sc@back #1#2}%
\fi\fi \next }

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

\catcode `\@ = \utfatcode

\endinput
%%%%%%%%%%%%%%%%%%%%%%%% EOF %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

${this.title}

Code Editor : utfcode.sty